Ì € i 2
main
[mnemonic]
&(G)GIM[gim]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 15 FREE L gim
active 1 YN L &(G)GIM[gim]|0
description 50 FREE L &(G)GIM[gim]|1
non.primary.ins 1 YN L &(G)GIM[gim]|2
Ì € i 2
rules
[mnemonic, rule.line.no]
&(G)GIM[gim]R[gimR]
Field Name Len Dat Typ J DPM Offset/Local/VAL
rule.line.no 2 PINT R gimR
action 10 CHOICE L &(G)GIM[gim]R[gimR]|2
edi.pgm 15 FREE L MIS.EDI.PGM &(G)GIM[gim]R[gimR]|1
process 10 CHOICE L &(G)GIM[gim]R[gimR]|0
Ì € i 2
adm.pt.statuses
[mnemonic,rule.line.no, adm.pt.status]
&(G)GIM[gim]R[gimR]A[aaS]
Field Name Len Dat Typ J DPM Offset/Local/VAL
adm.pt.status 8 FREE L aaS
Ì € i 2
bar.pt.statuses
[mnemonic,rule.line.no, bar.pt.status]
&(G)GIM[gim]R[gimR]B[bt]
Field Name Len Dat Typ J DPM Offset/Local/VAL
bar.pt.status 8 FREE L bt
Index Files Subscripts/Physical Base
adm.rule.line.x [mnemonic,process,adm.pt.status] = rule.line.no
&(G)GIMA[gim,gimT,aaS]
bar.rule.line.x [mnemonic,process,bar.pt.status] = rule.line.no
&(G)GIMB[gim,gimT,bt]
|
|
| | |