Ì i 2
abs.cpt (main)
[mnemonic]
&DFA[dfa]
Field Name Len Dat Typ J DPM Offset/Local/VAL
mnemonic 8 FREE L dfa
active 1 YN L &DFA[dfa]|0
confidential.data 1 YN L &DFA[dfa]CF
eff.from.date 8 DATE L &DFA[dfa]|4
eff.thru.date 8 DATE L &DFA[dfa]|5
group 3 FREE L ABS.CPT.GROUP &DFA[dfa]|2
invalid.proc 1 YN L &DFA[dfa]|3
last.update 10 PINT R &DFA[dfa]UPD
name 60 FREE L &DFA[dfa]|1
name.50 50 FREE L VAL=(@ABS.CPT.name$50)
sort.id 60 FREE L
text.editor 0 FREE L
Ì € i 2
abs.pat.cpt.fin.class (fin.classes)
[mnemonic, fin.class]
&DFA[dfa]F[ggk]
Field Name Len Dat Typ J DPM Offset/Local/VAL
fin.class 10 FREE L MIS.FIN.CLASS ggk
Ì € i 2
abs.cpt.eff.dates (eff.dates)
[mnemonic,fin.class, eff.date]
&DFA[dfa]F[ggk]EF[dfaED]
Field Name Len Dat Typ J DPM Offset/Local/VAL
eff.date 8 DATE L dfaED
fin.class.group 3 FREE L ABS.CPT.GROUP &DFA[dfa]F[ggk]EF[dfaED]|0
Ì € i 2
abs.cpt.long.description (long.desc)
[mnemonic, long.desc.line.num]
&DFA[dfa]LD[dfaLD]
Field Name Len Dat Typ J DPM Offset/Local/VAL
long.desc.line.num 2 PINT R dfaLD
long.desc.text 72 FREE L &DFA[dfa]LD[dfaLD]
Ì € i 2
abs.cpt.screen.edits (screen.edits)
[mnemonic, screen.edit]
&DFA[dfa]SE[dje]
Field Name Len Dat Typ J DPM Offset/Local/VAL
screen.edit 10 FREE L ABS.SCRN.EDIT dje
screen.edit.check 10 FREE L &DFA[dfa]SE[dje]|0
Ì 2
INDEX FILE/INTERNAL NAME SUBSCRIPTS/PHYSICAL BASE
abs.cpt.confid.x [mnemonic]
confid.x &DFAC[dfa]
abs.cpt.date.x [eff.from.date]
date.x &DFAD[dfcD]
abs.cpt.fin.class.index [fin.class,eff.date]
fin.class.x &DFAFC[ggk,dfaED]
abs.cpt.id.x [sort.id,mnemonic]
id.x &DFAA[dfaS,dfa]
|
|
| | | |