Ì € i 2
pp.roe.records (records)
[employee, record]
*JRY[jy,jry]
Field Name Len Dat Typ J DPM Offset/Local/VAL
record 4 URN L jry
date 8 DATE L *JRY[jy,jry]|1
notes 50 FREE L *JRY[jy,jry]|5
replaced.by.record 8 FREE L *JRY[jy,jry]|4
replacement.for.record 8 URN L *JRY[jy,jry]|3
status 8 CHOICE L *JRY[jy,jry]|0
user 10 FREE L MIS.USER *JRY[jy,jry]|2
Ì € i 2
pp.roe.file.boxes (boxes)
[employee,record, box]
*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 *JRY[jy,jry]B[jryF]|0
box.edit 50 FREE L *JRY[jy,jry]B[jryF]|1
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
pp.roe.file.issue.date.x [issue.date,serial.number,employee,record]
issue.date.index ?JRYD[jryD,jryS,jy,jry]
pp.roe.file.repl.serial.no.x [repl.serial.number,employee,record]
repl.serial.no.index ?JRYR[jryR,jy,jry]
pp.roe.file.serial.no.x [serial.number,employee,record]
serial.no.index ?JRYS[jryS,jy,jry]
|
|
|