The following file definitions are used in all examples in this manual.
In these examples, SL means standard length, and SF means standard format.
File 1:
01,GA ; Group GA, consisting of fields AA and AB.
02,AA,8,A,DE,NU ; Elementary field AA; SL is 8 bytes, SF is
; Alphanumeric, Descriptor, Null Value
; Suppression.
02,AB,2,P,DE,NU ; Elementary field AB; SL is 2, SF is Packed,
; Descriptor, Null Value Suppression.
01,AC,20,A,NU ; Elementary field AC; SL is 20, SF is
; Alphanumeric, Null Value Suppression.
01,MF,3,A,MU,DE,NU ; Multiple value field MF; SL is 3, SF is
; Alphanumeric, Descriptor, Null Value
; Suppression.
01,GB,PE ; Periodic group GB.
02,BA,1,B,DE,NU ; Elementary field BA (within periodic group
; GB); SL is 1, SF is Binary, Descriptor, Null
; Value Suppression.
02,BB,5,P,NU ; Elementary field BB (within periodic group
; GB); SL is 5, SF is Packed, Null Value
; Suppression.
02,BC,10,A,NU ; Elementary field BC (within periodic group
; GB); SL is 10, SF is Alphanumeric, Null Value
; Suppression.
01,GC,PE ; Periodic group GC.
02,CA,7,A,DE,NU ; Elementary field CA (within periodic group
; GC); SL is 7, SF is Alphanumeric, Descriptor,
; Null Value Suppression.
02,CB,10,A,MU,NU ; Multiple value field CB (within periodic group
; GC); SL is 10, SF is Alphanumeric, Null Value
; Suppression.
01,DA,4,F,NC ; Elementary field DA; SL is 4; SF is Fixed Point;
; may contain SQL NULL values
01,W1,0,W ; Elementary field W1
; SL is variable
; SF is Unicode
File 2:
01,L1,0,A,NU,NV,NB,LB ; LOB field
01,RG ; Group RG, consisting of all other fields in the
; record.
02,RA,8,A,DE,NU ; Elementary field RA; SL is 8, SF is Alphanumeric,
; Descriptor, Null Value Suppression.
02,RB,10,A,DE ; Elementary field RB; SL is 10, SF is
; Alphanumeric, Descriptor.
02,GX ; Group GX, consisting of the fields XA, XB, XC,
; XD, and XE.
03,XA,10,A ; Elementary field XA; SL is 10, SF is
; Alphanumeric.
03,XB,2,P,DE ; Elementary field XB; SL is 2, SF is Packed,
; Descriptor.
03,XC,6,U ; Elementary field XC; SL is 6, SF is Unpacked.
03,XD,8,A,DE,NU ; Elementary field XD; SL is 8, SF is
; Alphanumeric, Descriptor, Null Value
; Suppression.
03,XE,5,A,DE,NU ; Elementary field XE; SL is 5, SF is
; Alphanumeric, Descriptor, Null Value
; Suppression.
SA=RA(1,4) ; Subdescriptor SA; derived from bytes 1 through
; 4 of field RA, format is Alphanumeric.
SB=RA(1,8),RB(1,4) ; Superdescriptor SB; derived from bytes 1
; through 8 of field RA and bytes 1 through 4 of
; field RB, format is Alphanumeric.
SC=XB(1,2),XC(1,6) ; Superdescriptor SC; derived from bytes 1
; through 2 of field XB and bytes 1 through 6 of
; field XC, format is Binary.
SD,B,UQ = XC(1,1),XC(5,6)
; Superdescriptor SD; derived from the first byte
; and the bytes 5 through 6 of the field XC, the
; resulting format is binary, unique descriptor
