The following file definitions are used in the examples that follow in this documentation. Two file structures (files 1 and 2) are used.
The following tables show the structures of files 1 and 2 where
SF | is standard format |
SL | is standard length |
File 1 is neither security-protected nor ciphered. Certain examples in the documentation assume that file 1 has been coupled to file 2 using the descriptor AA as the basis for coupling.
Adabas Definition | Explanation |
---|---|
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 SF | Multiple value field CB (within periodic group GC); SL is 10, is alphanumeric, null value suppression. |
File 2 is security-protected. It is not ciphered. Certain examples in this documentation assume that file 2 is coupled to file 1 using field RA as the basis for coupling.
Adabas Definition | Explanation |
---|---|
01,RG | Group RG, consisting of all the 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. |