Quelle  sqlenv.cbl  Sprache: unbekannt

      * File: sqlenv.cbl
        01 SQL-DIR-ENTRY.
          05 STRUCT-ID              PIC 9(4) COMP-5.
          05 RELEASE-LVL            PIC 9(4) COMP-5.
          05 CODEPAGE               PIC 9(4) COMP-5.
          05 COMMENT                PIC X(30).
          05 FILLER                 PIC X.
          05 LDB                    PIC X(8).
          05 FILLER                 PIC X.
          05 TDB                    PIC X(18).
          05 FILLER                 PIC X.
          05 AR                     PIC X(32).
          05 FILLER                 PIC X.
          05 PARM                   PIC X(512).
          05 FILLER                 PIC X.
          05 FILLER                 PIC X(1).
      *