Ì € i 2
main
[code]
&(G)GSKM[gskM]
Field Name Len Dat Typ J DPM Offset/Local/VAL
code 2 FREE L gskM
active 1 YN L &(G)GSKM[gskM]|0
last.user 10 FREE L MIS.USER &(G)GSKM[gskM]USR
name 70 FREE L &(G)GSKM[gskM]|1
name.50 50 FREE L VAL=(@MIS.MDC.name$50)
name.60 60 FREE L VAL=(@MIS.MDC.name$60)
name.real 70 FREE L VAL=@name'$IF{code="**" 0;code<14&(code'=10) 28;cod
VAL=e=16 24;0}
source 1 CHOICE L &(G)GSKM[gskM]|2
Ì i 2
version
&(G)GSKM
Field Name Len Dat Typ J DPM Offset/Local/VAL
grouper.version 2 FREE L &(G)GSKM|0
Index Files Subscripts/Physical Base
name.index [name,code]
&(G)GSKMN[gskMN,gskM]
|
|
|