Ì i 2
main
[facility]
&(A)AS[gqb]
Field Name Len Dat Typ J DPM Offset/Local/VAL
facility 10 FREE L MIS.FACILITY gqb
Ì i 2
questionnaires
[facility, questionnaire]
&(A)AS[gqb,apQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
questionnaire 10 FREE L apQ
Ì i 2
quest.pages
[facility,questionnaire, quest.page]
&(A)AS[gqb,apQ]P[apCP]
Field Name Len Dat Typ J DPM Offset/Local/VAL
quest.page 1 PINT R apCP
cd.screen 15 FREE L MIS.SCREEN VAL=@ADM.CD.REG.SCRN.cd.screen.ee[@.facility,ADM.CD.RE
VAL=G.SCRN.questionnaire,quest.page]
cd.screen.ee 15 FREE L MIS.SCREEN &(A)AS[gqb,apQ]P[apCP]|0
quest.real.page 1 PINT R &(A)AS[gqb,apQ]P[apCP]|2
tab.text 9 FREE L &(A)AS[gqb,apQ]P[apCP]|1
Ì i 2
quest.section.cds
[facility,questionnaire,quest.page, quest.cds.seq]
&(A)AS[gqb,apQ]P[apCP]CDS[apSEQ]
Field Name Len Dat Typ J DPM Offset/Local/VAL
quest.cds.seq 1 PINT R apSEQ
quest.cds.sec.name 15 FREE L MIS.SCREEN VAL=@ADM.CD.REG.SCRN.cd.screen.ee[@.facility,ADM.CD.RE
VAL=G.SCRN.questionnaire,ADM.PARAM.quest.page,ADM.CD.R
VAL=EG.SCRN.quest.cds.seq]
quest.cds.sec.name.ee 15 FREE L MIS.SCREEN &(A)AS[gqb,apQ]P[apCP]CDS[apSEQ]|0
Index Files Subscripts/Physical Base
quest.index [facility,questionnaire,quest.real.page] = quest.page
&(A)ASQ[gqb,apQ,apQP]
|
|
| | |