OAAMS.DWPROD.ODW115I2  TABLE LED_JV

      ******************************************************************        
      * DCLGEN TABLE(LED_JV)                                           *        
      *        LIBRARY(OAAMS.DWUNIT.DCLGEN(ODWTS223))                  *        
      *        ACTION(REPLACE)                                         *        
      *        LANGUAGE(COBOL)                                         *        
      *        NAMES(TS223-)                                           *        
      *        STRUCTURE(LED-JV)                                       *        
      *        QUOTE                                                   *        
      *        DBCSDELIM(NO)                                           *        
      *        COLSUFFIX(YES)                                          *        
      * ... IS THE DCLGEN COMMAND THAT MADE THE FOLLOWING STATEMENTS   *        
      ******************************************************************        
           EXEC SQL DECLARE LED_JV TABLE                                        
           ( INT_LED_KEY                    CHAR(12) NOT NULL,                  
             FISC_YEAR                      CHAR(4) NOT NULL,                   
             FISC_MONTH                     CHAR(2) NOT NULL,                   
             BUDGET_FISC_YEAR               CHAR(4) 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,                   
             ACCOUNT_TYPE                   CHAR(2) NOT NULL,                   
             FUND                           CHAR(4) NOT NULL,                   
             AGENCY                         CHAR(3) NOT NULL,                   
             ORGANIZATION                   CHAR(4) NOT NULL,                   
             SUB_ORG                        CHAR(2) NOT NULL,                   
             APPR_UNIT                      CHAR(9) NOT NULL,                   
             ACTIVITY                       CHAR(4) NOT NULL,                   
             FUNCTION                       CHAR(4) NOT NULL,                   
             BS_ACCOUNT                     CHAR(4) NOT NULL,                   
             OBJECT                         CHAR(4) NOT NULL,                   
             SUB_OBJECT                     CHAR(2) NOT NULL,                   
             REVENUE_SRC                    CHAR(4) NOT NULL,                   
             SUB_REV_SRC                    CHAR(2) NOT NULL,                   
             JOB_NUMBER                     CHAR(8) NOT NULL,                   
             REPORTING_CAT                  CHAR(4) NOT NULL,                   
             INTERNAL_FUND                  CHAR(4) NOT NULL,                   
             REFERENCE_AGENCY               CHAR(3) NOT NULL,                   
             BANK_ACCOUNT_CODE              CHAR(2) NOT NULL,                   
             VEND_CUST_CODE                 CHAR(10) NOT NULL,                  
             VEND_CUST_ADDR_IND             CHAR(1) NOT NULL,                   
             VEND_CUST_NAME                 CHAR(30) NOT NULL,                  
             DOC_ACTION                     CHAR(1) NOT NULL,                   
             LINE_ACTION                    CHAR(1) NOT NULL,                   
             LINE_DESC                      CHAR(30) NOT NULL,                  
             LINE_AMT                       DECIMAL(15, 2) NOT NULL,            
             DEBIT_CREDIT_IND               CHAR(1) NOT NULL,                   
             DOC_DESC                       CHAR(12) NOT NULL,                  
             FISC_QUARTER                   CHAR(1) NOT NULL,                   
             FED_AID_NUM                    CHAR(12) NOT NULL,                  
             PROJECT_5                      CHAR(5) NOT NULL,                   
             SUB_PROJECT                    CHAR(2) NOT NULL,                   
             PHASE                          CHAR(1) NOT NULL,                   
             BUDGET_OBJ_CLS                 CHAR(3) NOT NULL,                   
             RECORD_DATE                    CHAR(8) NOT NULL,                   
             APPR_ORG                       CHAR(4) NOT NULL,                   
             ALLOT_ORG                      CHAR(4) NOT NULL,                   
             EXP_BUDG_ORG                   CHAR(4) NOT NULL,                   
             REV_BUDG_ORG                   CHAR(4) NOT NULL,                   
             REF_TRANS_CODE                 CHAR(2) NOT NULL,                   
             REF_TRANS_AGCY                 CHAR(3) NOT NULL,                   
             REF_TRANS_NUMBER               CHAR(11) NOT NULL,                  
             REF_TRANS_LINE_NUM             CHAR(2) NOT NULL                    
           ) END-EXEC.                                                          
      ******************************************************************        
      * COBOL DECLARATION FOR TABLE LED_JV                             *        
      ******************************************************************        
       01  LED-JV.                                                              
      *                       INT_LED_KEY                                       
           10 TS223-INT-LED-KEY    PIC X(12).                                   
      *                       FISC_YEAR                                         
           10 TS223-FISC-YEAR      PIC X(4).                                    
      *                       FISC_MONTH                                        
           10 TS223-FISC-MONTH     PIC X(2).                                    
      *                       BUDGET_FISC_YEAR                                  
           10 TS223-BUDGET-FISC-YEAR                                            
              PIC X(4).                                                         
      *                       TRANS_CODE                                        
           10 TS223-TRANS-CODE     PIC X(2).                                    
      *                       TRANS_NUM_AGCY                                    
           10 TS223-TRANS-NUM-AGCY                                              
              PIC X(3).                                                         
      *                       TRANS_NUM_NUM                                     
           10 TS223-TRANS-NUM-NUM  PIC X(11).                                   
      *                       ACCEPTANCE_DATE                                   
           10 TS223-ACCEPTANCE-DATE                                             
              PIC X(8).                                                         
      *                       ACCOUNT_TYPE                                      
           10 TS223-ACCOUNT-TYPE   PIC X(2).                                    
      *                       FUND                                              
           10 TS223-FUND           PIC X(4).                                    
      *                       AGENCY                                            
           10 TS223-AGENCY         PIC X(3).                                    
      *                       ORGANIZATION                                      
           10 TS223-ORGANIZATION   PIC X(4).                                    
      *                       SUB_ORG                                           
           10 TS223-SUB-ORG        PIC X(2).                                    
      *                       APPR_UNIT                                         
           10 TS223-APPR-UNIT      PIC X(9).                                    
      *                       ACTIVITY                                          
           10 TS223-ACTIVITY       PIC X(4).                                    
      *                       FUNCTION                                          
           10 TS223-FUNCTION       PIC X(4).                                    
      *                       BS_ACCOUNT                                        
           10 TS223-BS-ACCOUNT     PIC X(4).                                    
      *                       OBJECT                                            
           10 TS223-OBJECT         PIC X(4).                                    
      *                       SUB_OBJECT                                        
           10 TS223-SUB-OBJECT     PIC X(2).                                    
      *                       REVENUE_SRC                                       
           10 TS223-REVENUE-SRC    PIC X(4).                                    
      *                       SUB_REV_SRC                                       
           10 TS223-SUB-REV-SRC    PIC X(2).                                    
      *                       JOB_NUMBER                                        
           10 TS223-JOB-NUMBER     PIC X(8).                                    
      *                       REPORTING_CAT                                     
           10 TS223-REPORTING-CAT  PIC X(4).                                    
      *                       INTERNAL_FUND                                     
           10 TS223-INTERNAL-FUND  PIC X(4).                                    
      *                       REFERENCE_AGENCY                                  
           10 TS223-REFERENCE-AGENCY                                            
              PIC X(3).                                                         
      *                       BANK_ACCOUNT_CODE                                 
           10 TS223-BANK-ACCOUNT-CODE                                           
              PIC X(2).                                                         
      *                       VEND_CUST_CODE                                    
           10 TS223-VEND-CUST-CODE                                              
              PIC X(10).                                                        
      *                       VEND_CUST_ADDR_IND                                
           10 TS223-VEND-CUST-ADDR-IND                                          
              PIC X(1).                                                         
      *                       VEND_CUST_NAME                                    
           10 TS223-VEND-CUST-NAME                                              
              PIC X(30).                                                        
      *                       DOC_ACTION                                        
           10 TS223-DOC-ACTION     PIC X(1).                                    
      *                       LINE_ACTION                                       
           10 TS223-LINE-ACTION    PIC X(1).                                    
      *                       LINE_DESC                                         
           10 TS223-LINE-DESC      PIC X(30).                                   
      *                       LINE_AMT                                          
           10 TS223-LINE-AMT       PIC S9(13)V9(2) USAGE COMP-3.                
      *                       DEBIT_CREDIT_IND                                  
           10 TS223-DEBIT-CREDIT-IND                                            
              PIC X(1).                                                         
      *                       DOC_DESC                                          
           10 TS223-DOC-DESC       PIC X(12).                                   
      *                       FISC_QUARTER                                      
           10 TS223-FISC-QUARTER   PIC X(1).                                    
      *                       FED_AID_NUM                                       
           10 TS223-FED-AID-NUM    PIC X(12).                                   
      *                       PROJECT_5                                         
           10 TS223-PROJECT-5      PIC X(5).                                    
      *                       SUB_PROJECT                                       
           10 TS223-SUB-PROJECT    PIC X(2).                                    
      *                       PHASE                                             
           10 TS223-PHASE          PIC X(1).                                    
      *                       BUDGET_OBJ_CLS                                    
           10 TS223-BUDGET-OBJ-CLS                                              
              PIC X(3).                                                         
      *                       RECORD_DATE                                       
           10 TS223-RECORD-DATE    PIC X(8).                                    
      *                       APPR_ORG                                          
           10 TS223-APPR-ORG       PIC X(4).                                    
      *                       ALLOT_ORG                                         
           10 TS223-ALLOT-ORG      PIC X(4).                                    
      *                       EXP_BUDG_ORG                                      
           10 TS223-EXP-BUDG-ORG   PIC X(4).                                    
      *                       REV_BUDG_ORG                                      
           10 TS223-REV-BUDG-ORG   PIC X(4).                                    
      *                       REF_TRANS_CODE                                    
           10 TS223-REF-TRANS-CODE                                              
              PIC X(2).                                                         
      *                       REF_TRANS_AGCY                                    
           10 TS223-REF-TRANS-AGCY                                              
              PIC X(3).                                                         
      *                       REF_TRANS_NUMBER                                  
           10 TS223-REF-TRANS-NUMBER                                            
              PIC X(11).                                                        
      *                       REF_TRANS_LINE_NUM                                
           10 TS223-REF-TRANS-LINE-NUM                                          
              PIC X(2).                                                         
      ******************************************************************        
      * THE NUMBER OF COLUMNS DESCRIBED BY THIS DECLARATION IS 50      *        
      ******************************************************************