Ì i 2
main
[employee]
*(J)JRY[jy]
Field Name Len Dat Typ J DPM Offset/Local/VAL
employee 42 URN L PP.PER jy
payroll 8 FREE L PP.PAYROLL
Ì € i 2
records
[employee, record]
*(J)JRY[jy,jry]
Field Name Len Dat Typ J DPM Offset/Local/VAL
record 4 URN L jry
date 8 DATE L *(J)JRY[jy,jry]|1
serial.comment 45 FREE L *(J)JRY[jy,jry]|3
status 8 CHOICE L *(J)JRY[jy,jry]|0
user 10 FREE L MIS.USER *(J)JRY[jy,jry]|2
Ì € i 2
boxes
[employee,record, box]
*(J)JRY[jy,jry]B[jryF]
Field Name Len Dat Typ J DPM Offset/Local/VAL
box 3 PINT R jryF
box.comp 50 FREE L *(J)JRY[jy,jry]B[jryF]|0
box.edit 50 FREE L *(J)JRY[jy,jry]B[jryF]|1
Index Files Subscripts/Physical Base
issue.date.index [issue.date,serial.number,employee,record]
?(J)JRYD[jryD,jryS,jy,jry]
repl.serial.no.index [repl.serial.number,employee,record]
?(J)JRYR[jryR,jy,jry]
serial.no.index [serial.number,employee,record]
?(J)JRYS[jryS,jy,jry]
|
|
| |