Rational Programming Patterns for System z

Description in the FILE SECTION

Here you can see a description generated in the FILE SECTION of a program.

Figure 1. Sample contents of a description in the FILE SECTION
01                 TR00.
   05              TR00-00.
     10            TR00-KEYCD.
       11          TR00-COCARA PICTURE  X.
       11          TR00-ORDNUM PICTURE  9(5).
       11          TR00-SUPPLI PICTURE  X(3).
   05              TR00-SUITE.
     15       FILLER         PICTURE  X(00157).
01                 TR05.
     10       FILLER         PICTURE  X(00009).
     10            TR05-CLINUM PICTURE  9(8).
     10            TR05-DATE   PICTURE  X(6).
     10            TR05-RELEA  PICTURE  X(3).
     10            TR05-CLIREF PICTURE  X(30).
     10            TR05-STREET PICTURE  X(40).
     10            TR05-ZIPCO  PICTURE  X(5).
     10            TR05-TOWN   PICTURE  X(20).
     10            TR05-CORRES PICTURE  X(25).
     10            TR05-DISCOU PICTURE  S9(4)V99.
     10            TR05-MATE   PICTURE  X(8).
     10            TR05-LANGU  PICTURE  X.
     10            TR05-FILLER PICTURE  X(5).
01                 TR10.
     10       FILLER         PICTURE  X(00009).
     10            TR10-QTMAC  PICTURE  99.
     10            TR10-QTMAL  PICTURE  99.
     10            TR10-INFOR  PICTURE  X(35).
     10            TR10-RFI    PICTURE  X(100).
     10       FILLER         PICTURE  X(00018).
01                 TR20.
     10       FILLER         PICTURE  X(00009).
     10            TR20-EDIT   PICTURE  X.
     10       FILLER         PICTURE  X(00156).
01                 TR30.
     10       FILLER         PICTURE  X(00009).
     10            TR30-ORDNUM PICTURE  9(5).
     10            TR30-LV00.
       11          TR30-NOCL.
         12        TR30-NOCL11 PICTURE  X.
         12        TR30-NOCL12 PICTURE  XX.
         12        TR30-NOCL2  PICTURE  XX.
       11          TR30-NBLIV  PICTURE  9.
       11          TR30-QTLI   PICTURE  S9(5)V99
                   COMPUTATIONAL-3.
       11          TR30-GROUP
                   OCCURS       009
                   DEPENDING  ON        TR00-NBLIV.
         12        TR30-QULI   PICTURE  S9(5)V99
                   COMPUTATIONAL-3.
         12        TR30-DALI   PICTURE  X(6).

Terms of use | Feedback

This information center is powered by Eclipse technology. (http://www.eclipse.org)