Ì 2
oe.form.dict (main)
[department,mnemonic]
&PF[ggn,pf]
Field Name Len Dat Typ J DPM Offset/Local/VAL
department 10 FREE L MIS.LOCN.DICT ggn
mnemonic 10 FREE L pf
active 1 YN L &PF[ggn,pf]|0
description 30 FREE L &PF[ggn,pf]|1
last.update 30 FREE L &PF[ggn,pf]UPD
text.editor 0 FREE L VAL=%MIS.EDIT.ed.setup(1),%MIS.EDIT.sh(^/PF[department
VAL=,mnemonic]T,8,19,92,0,"D"),*X[0]^#,""
text.editor.view 0 FREE L VAL=K(/PF[department,mnemonic]T),M(&PF[department,mnem
VAL=onic]T,/PF[department,mnemonic]T),%MIS.EDIT.ed.set
VAL=up(""),%MIS.EDIT.sh(^/PF[department,mnemonic]T,8,1
VAL=9,92,0,"D"),*X[0]^#
width 2 PINT R &PF[ggn,pf]|2
Ì € 2
oe.form.dict.fields (fields)
[department,mnemonic, marker]
&PF[ggn,pf]F[pfM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
marker 6 FREE L pfM
column 2 INT R &PF[ggn,pf]F[pfM]|3
field 20 FREE L &PF[ggn,pf]F[pfM]|0
length 2 INT R &PF[ggn,pf]F[pfM]|4
length.view 2 INT R VAL=@length
module 3 CHOICE L &PF[ggn,pf]F[pfM]|7
multiple 1 YN L &PF[ggn,pf]F[pfM]|5
name 40 FREE L VAL=IF{@t.type="F" %OE.FORM.fn(@t.field,@t.module);@MI
VAL=S.QUERY.text.40[@t.field]}
name.view 40 FREE L VAL=IF{@type="F" %OE.FORM.fn(@field,@module);@MIS.QUER
VAL=Y.text.40[@field]}
row 2 INT R &PF[ggn,pf]F[pfM]|2
type 1 CHOICE L &PF[ggn,pf]F[pfM]|1
with.field 6 FREE L &PF[ggn,pf]F[pfM]|6
Ì € 2
oe.form.dict.text (text)
[department,mnemonic, line.num]
&PF[ggn,pf]T[pfT]
Field Name Len Dat Typ J DPM Offset/Local/VAL
line.num 2 PINT R pfT
line.text 92 FREE L &PF[ggn,pf]T[pfT]
|
|
|