******************************************************************
      * DCLGEN TABLE(ODWOWN01.LED_PERFORMANCE)                         *
      *        LIBRARY(OAAMS.DWUNIT.DCLGEN(ODWTS068))                  *
      *        ACTION(REPLACE)                                         *
      *        LANGUAGE(COBOL)                                         *
      *        NAMES(TS068-)                                           *
      *        STRUCTURE(LED-PERFORMANCE)                              *
      *        QUOTE                                                   *
      *        DBCSDELIM(NO)                                           *
      *        COLSUFFIX(YES)                                          *
      * ... IS THE DCLGEN COMMAND THAT MADE THE FOLLOWING STATEMENTS   *
      ******************************************************************
           EXEC SQL DECLARE LED_PERFORMANCE TABLE
           ( INT_LED_KEY                    CHAR(12) NOT NULL,
             TRANS_CODE                     CHAR(2) NOT NULL,
             TRANS_NUM_AGCY                 CHAR(3) NOT NULL,
             TRANS_NUM_NUM                  CHAR(11) NOT NULL,
             ACCEPTANCE_DATE                CHAR(8) NOT NULL,
             FISC_YEAR                      CHAR(4) NOT NULL,
             FISC_QUARTER                   CHAR(1) NOT NULL,
             FISC_MONTH                     CHAR(2) NOT NULL,
             PLANNING_YEAR                  CHAR(4) NOT NULL,
             PLANNING_QUARTER               CHAR(1) NOT NULL,
             PLANNING_MONTH                 CHAR(2) NOT NULL,
             AGENCY                         CHAR(3) NOT NULL,
             ORGANIZATION                   CHAR(4) NOT NULL,
             ACTIVITY                       CHAR(4) NOT NULL,
             JOB_NUMBER                     CHAR(8) NOT NULL,
             PERFORMANCE_CODE               CHAR(4) NOT NULL,
             PERFORMANCE_AMT                DECIMAL(15, 2) NOT NULL,
             LINE_DESC                      CHAR(30) NOT NULL,
             DOC_ACTION                     CHAR(1) NOT NULL
           ) END-EXEC.
      ******************************************************************
      * COBOL DECLARATION FOR TABLE ODWOWN01.LED_PERFORMANCE           *
      ******************************************************************
       01  LED-PERFORMANCE.
      *                       INT_LED_KEY
           10 TS068-INT-LED-KEY    PIC X(12).
      *                       TRANS_CODE
           10 TS068-TRANS-CODE     PIC X(2).
      *                       TRANS_NUM_AGCY
           10 TS068-TRANS-NUM-AGCY  PIC X(3).
      *                       TRANS_NUM_NUM
           10 TS068-TRANS-NUM-NUM  PIC X(11).
      *                       ACCEPTANCE_DATE
           10 TS068-ACCEPTANCE-DATE  PIC X(8).
      *                       FISC_YEAR
           10 TS068-FISC-YEAR      PIC X(4).
      *                       FISC_QUARTER
           10 TS068-FISC-QUARTER   PIC X(1).
      *                       FISC_MONTH
           10 TS068-FISC-MONTH     PIC X(2).
      *                       PLANNING_YEAR
           10 TS068-PLANNING-YEAR  PIC X(4).
      *                       PLANNING_QUARTER
           10 TS068-PLANNING-QUARTER  PIC X(1).
      *                       PLANNING_MONTH
           10 TS068-PLANNING-MONTH  PIC X(2).
      *                       AGENCY
           10 TS068-AGENCY         PIC X(3).
      *                       ORGANIZATION
           10 TS068-ORGANIZATION   PIC X(4).
      *                       ACTIVITY
           10 TS068-ACTIVITY       PIC X(4).
      *                       JOB_NUMBER
           10 TS068-JOB-NUMBER     PIC X(8).
      *                       PERFORMANCE_CODE
           10 TS068-PERFORMANCE-CODE  PIC X(4).
      *                       PERFORMANCE_AMT
           10 TS068-PERFORMANCE-AMT  PIC S9(13)V9(2) USAGE COMP-3.
      *                       LINE_DESC
           10 TS068-LINE-DESC      PIC X(30).
      *                       DOC_ACTION
           10 TS068-DOC-ACTION     PIC X(1).
      ******************************************************************
      * THE NUMBER OF COLUMNS DESCRIBED BY THIS DECLARATION IS 19      *
      ******************************************************************