Ì 2
main
[number]
*(JY)JY.CB[jycb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
number 42 URN L jycb
cov.from.date 8 DATE L *(JY)JY.CB[jycb]|6
cov.thru.date 8 DATE L *(JY)JY.CB[jycb]|7
dp.number 2 PINT R *(JY)JY.CB[jycb]|1
employee 42 URN L PP.PER *(JY)JY.CB[jycb]|0
id 42 URN L PP.PER.COBRA VAL=%(PP)["PER.COBRA..display.id"](number)
monthly.payment 8 MONEY R *(JY)JY.CB[jycb]|8
name 26 FREE L VAL=IF{@PP.PER.dp.name[@employee,@dp.number];@PP.PER.n
VAL=ame[@employee]}
qual.code 8 FREE L PP.COBRA *(JY)JY.CB[jycb]|5
relationship 30 FREE L VAL=IF{'@dp.number "EMPLOYEE";@MIS.RELAT.name[@PP.PER.
VAL=dp.relationship[@employee,@dp.number]]}
ss.number 12 FREE L VAL=IF{@PP.PER.dp.ss.number[@employee,@dp.number];@PP.
VAL=PER.ss.number[@employee]}
status 8 CHOICE L *(JY)JY.CB[jycb]|2
status.date 8 DATE L *(JY)JY.CB[jycb]|3
status.reason 10 FREE L PP.REASON *(JY)JY.CB[jycb]|4
Ì 2
comments
[number, comment.line]
*(JY)JY.CB[jycb]C[jycbN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
comment.line 8 PINT R jycbN
comment.text 92 TEXT L *(JY)JY.CB[jycb]C[jycbN]
Ì 2
letters
[number, letter.q]
*(JY)JY.CB[jycb]L[jycbQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
letter.q 2 PINT R jycbQ
letter 10 FREE L PP.LTR.TEMPLATE*(JY)JY.CB[jycb]L[jycbQ]|0
letter.id 3 INT R *(JY)JY.CB[jycb]L[jycbQ]|5
letter.print.date 8 DATE L *(JY)JY.CB[jycb]L[jycbQ]|4
letter.prt.on.date 8 DATE L *(JY)JY.CB[jycb]L[jycbQ]|3
letter.status 9 CHOICE L *(JY)JY.CB[jycb]L[jycbQ]|1
letter.status.date 8 DATE L *(JY)JY.CB[jycb]L[jycbQ]|2
|
|
|