Ì 2
main
[dept,mnemonic]
&(M)MRQ[gd,mrq]
Field Name Len Dat Typ J DPM Offset/Local/VAL
dept 15 FREE L MIS.GL.DEPT gd
mnemonic 15 FREE L mrq
active 1 YN L &(M)MRQ[gd,mrq]|0
del.to 30 FREE L &(M)MRQ[gd,mrq]|1
dept.check 1 YN L VAL=IF{%MIS.GL.DEPT.user.ok(dept) "Y";"N"}
|