Ì 2
main
[mnemonic]
&(G)GPDCT[gpdTX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 15 FREE L gpdTX
active 1 YN L &(G)GPDCT[gpdTX]|0
description 30 FREE L &(G)GPDCT[gpdTX]|1
format 5 FREE L &(G)GPDCT[gpdTX]T|0
last.update 10 FREE L &(G)GPDCT[gpdTX]UPD|0
last.update.date 8 DATE L VAL=%Z.date.in.magic(@last.update)
last.update.date.time 15 FREE L VAL=%Z.date.out(@last.update.date,"",10)_"-"_@last.upd
VAL=ate.time'="-"
last.update.time 4 HHMM L VAL=%Z.time.out(@last.update)
last.update.user 10 FREE L MIS.USER &(G)GPDCT[gpdTX]UPD|1
last.update.user.out 30 FREE L VAL=%Z.convert.to.mixed.case(@MIS.USER.name[@last.upda
VAL=te.user],"",1)
setup.done 1 YN L VAL=/GPDCT.SETUP
standard 1 YN L &(G)GPDCT[gpdTX]|2
Ì 2
lines
[mnemonic, line.seq]
&(G)GPDCT[gpdTX]T[gpdtL]
Field Name Len Dat Typ J DPM Offset/Local/VAL
line.seq 3 PINT R gpdtL
line.text 80 TEXT L &(G)GPDCT[gpdTX]T[gpdtL]
Ì 2
mnemonic.x
[mnemonic.caps,mnemonic.mnemonic]
&(G)GPDCTMX[gPDtmx,gpdTX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic.caps 15 FREE L gPDtmx
mnemonic.mnemonic 15 FREE L MIS.PD.TEXT gpdTX
Ì 2
name.x
[name.caps,name.mnemonic]
&(G)GPDCTNX[gPDtnx,gpdTX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
name.caps 30 FREE L gPDtnx
name.mnemonic 15 FREE L MIS.PD.TEXT gpdTX
Ì 2
word.x
[word,word.mnemonic]
&(G)GPDCTWX[gPDtwx,gpdTX]
Field Name Len Dat Typ J DPM Offset/Local/VAL
word 20 FREE L gPDtwx
word.mnemonic 15 FREE L MIS.PD.TEXT gpdTX
|
|
| | |