The following sections contain the examples of the VEHICLES Master File, Access File, and FDT.
$$$ CREATED BY AUTOADBS ON 12/10/97 AT 10.17.27 BY PMSMJB$ ADABAS FILE = VEHICLES-FILE DICTIONARY = 6
SEGNAME=S01 ,SEGTYPE=S,$
FIELD= REG_NUM ,ALIAS= AA ,A15 ,A15 , INDEX=I,$
FIELD= CHASSIS_NUM ,ALIAS= AB ,I9 ,I4 ,$
FIELD= PERSONNEL_ID ,ALIAS= AC ,A8 ,A8 , INDEX=I,$
GROUP= CAR_DETAILS ,ALIAS= CD ,A50 ,A50 ,$
FIELD= MAKE ,ALIAS= AD ,A20 ,A20 , INDEX=I,$
FIELD= MODEL ,ALIAS= AE ,A20 ,A20 ,$
FIELD= COLOR ,ALIAS= AF ,A10 ,A10 , INDEX=I,$
FIELD= YEAR ,ALIAS= AG ,P2 ,Z2 ,$
FIELD= CLASS ,ALIAS= AH ,A1 ,A1 , INDEX=I,$
FIELD= LEASE_PUR ,ALIAS= AI ,A1 ,A1 ,$
FIELD= DATE_ACQ ,ALIAS= AJ ,P6 ,Z6 ,$
$GRMU = CAR_MAINTENANCE ,ALIAS= AK ,A11 ,A7 ,$
FIELD= CURR_CODE ,ALIAS= AL ,A3 ,A3 ,$
FIELD= MAINT_COST_CNT ,ALIAS= AMC ,I4 ,I2 ,$
FIELD= DAT_ACQ_DESC ,ALIAS= AN ,A4 ,A4 , INDEX=I,$
GROUP= MODEL_YEAR_MAKE ,ALIAS= AO ,A28 ,A22 , INDEX=I,$
FIELD=YEAR_S02 ,ALIAS= AG ,P2 ,Z2 ,$
FIELD=MAKE_S02 ,ALIAS= AD ,A20 ,A20 , INDEX=I,$
SEGNAME=AM0101 ,SEGTYPE=S,PARENT=S01 ,OCCURS=AMC,$ MAX= 60
FIELD= MAINT_COST ,ALIAS= AM ,P7 ,P4 ,$
FIELD= AM0101_OCC ,ALIAS= ORDER ,I4 ,I2 ,$
$$$ CREATED BY AUTOADBS ON 12/10/97 AT 10.17.27 BY PMSMJB$ ADABAS FILE = VEHICLES-FILE DICTIONARY = 6
SEGNAM=S01 ,ACCESS=ADBS,FILENO=002,
CALLTYPE=RL,SEQFIELD=PERSONNEL_ID,$
FIELD= DAT_ACQ_DESC ,TYPE=NOP,$
FIELD= MODEL_YEAR_MAKE ,TYPE=SPR,$
FIELD=YEAR_S02 ,TYPE= ,NU=YES,$
FIELD=MAKE_S02 ,TYPE=DSC,NU=YES,$
SEGNAM=AM0101,ACCESS=MU ,FILENO=002,$ MAINT_COST
********************************* I I I I I I
TYPE I NAME I LENGTH I FORMAT I OPTIONS I STRUCTURE I
I I I I I I
-------I------I--------I--------I----------------I----------------I
I I I I I I
SUPER I AN I 4 I B I DE,NU I AJ ( 5 - 6) I
I I I I I AJ ( 3 - 4) I
SUPER I AO I 22 I A I DE,NU I AG ( 1 - 2) I
I I I I I AD ( 1 - 20) I
I I I I I I
| Information Builders |