Ì i 2
main
[type]
&(HL)HLDRL[hldrl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
type 20 CHOICE L hldrl
Ì € i 2
role.queue
[type, role.q]
&(HL)HLDRL[hldrl]R[hldrlQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
role.q 3 PINT R hldrlQ
description 30 FREE L &(HL)HLDRL[hldrl]R[hldrlQ]|1
name 10 FREE L &(HL)HLDRL[hldrl]R[hldrlQ]|0
Ì € i 2
role.option.sets
[type,role.q, option.set.q]
&(HL)HLDRL[hldrl]R[hldrlQ]OS[hldrlO]
Field Name Len Dat Typ J DPM Offset/Local/VAL
option.set.q 2 PINT R hldrlO
option.set 10 FREE L HR.OPTION.SET &(HL)HLDRL[hldrl]R[hldrlQ]OS[hldrlO]|1
process.screen 15 FREE L HR.SCREEN &(HL)HLDRL[hldrl]R[hldrlQ]OS[hldrlO]|0
Ì € i 2
role.pp.db
[type,role.q, pp.db]
&(HL)HLDRL[hldrl]R[hldrlQ]DB[pp.db]
Field Name Len Dat Typ J DPM Offset/Local/VAL
pp.db 12 FREE L MIS.APPL.DB pp.db
Ì € i 2
role.job.codes
[type,role.q,pp.db, job.code]
&(HL)HLDRL[hldrl]R[hldrlQ]DB[pp.db]JC[jdj]
Field Name Len Dat Typ J DPM Offset/Local/VAL
job.code 10 FREE L PP.JOB jdj
Ì € i 2
role.users
[type,role.q, role.user]
&(HL)HLDRL[hldrl]R[hldrlQ]USR[gu]
Field Name Len Dat Typ J DPM Offset/Local/VAL
role.user 10 FREE L MIS.USER gu
Index Files Subscripts/Physical Base
job.type.x [pp.db,job.code,type] = role.q
&(HL)HLDRLJTX[pp.db,jdj,hldrl]
temp.user.roles [type,role.q,pp.db,job.code]
/ROLES[hldrl,hldrlQ,pp.db,jdj]
user.x [role.user,type,role.q] = role.q
&(HL)HLRLUIX[gu,hldrl,hldrlQ]
|
|
| | | | |