Ì i 2
top
&(S)SCD
Field Name Len Dat Typ J DPM Offset/Local/VAL
Ì € i 2
main
[routine]
&(S)SCD[scd]
Field Name Len Dat Typ J DPM Offset/Local/VAL
routine 10 FREE L scd
active 1 YN L &(S)SCD[scd]|0
custom 1 YN L &(S)SCD[scd]|2
last.update 50 FREE L &(S)SCD[scd]UPD
list.active 1 YN L VAL=IF{@.user="MTB" "Y";@active}
routine.name 35 FREE L &(S)SCD[scd]|1
Ì € i 2
defaults.by.prompt.code
[routine, prompt.code.by.value]
&(S)SCD[scd]D[scdP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prompt.code.by.value 10 FREE L scdP
dft 30 FREE L &(S)SCD[scd]D[scdP]
test 30 FREE L &(S)SCD[scd]D[scdP]XXX
Ì € i 2
defaults.by.site
[routine,prompt.code.by.value, site]
&(S)SCD[scd]D[scdP]S[scl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
site 10 FREE L LAB.C.SITE scl
site.dft 30 FREE L &(S)SCD[scd]D[scdP]S[scl]
Ì € i 2
prompts.by.seq.num
[routine, prompt.seq.num]
&(S)SCD[scd]P[scdN]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prompt.seq.num 7 PDEC R scdN
choices 80 FREE L &(S)SCD[scd]P[scdN]C|0
default.by.seq.num 30 FREE L &(S)SCD[scd]P[scdN]|6
default.view 30 FREE L VAL=IF{@default.by.seq.num;"NO DEFAULT"}
dft.data.type 7 CHOICE L &(S)SCD[scd]P[scdN]|4
dft.extra.check 80 FREE L &(S)SCD[scd]P[scdN]|5
dft.length 2 PINT R &(S)SCD[scd]P[scdN]|3
help 70 FREE L &(S)SCD[scd]P[scdN]HLP
prompt.code 10 FREE L &(S)SCD[scd]P[scdN]|0
prompt.custom 1 YN L &(S)SCD[scd]P[scdN]|2
prompt.text 30 FREE L &(S)SCD[scd]P[scdN]|1
Ì € i 2
prompt.sites
[routine,prompt.seq.num, prompt.site]
&(S)SCD[scd]P[scdN]S[scl]
Field Name Len Dat Typ J DPM Offset/Local/VAL
prompt.site 10 FREE L LAB.C.SITE scl
prompt.site.default 30 FREE L &(S)SCD[scd]P[scdN]S[scl]
Index Files Subscripts/Physical Base
site.x [routine,site]
&(S)SCDS[scd,scl]
|
|
| | | | |