The included SQLIMSDA

Only COBOL is supported for the SQLIMSDA that is given by INCLUDE SQLIMSDA.

COBOL (IBM® COBOL only):

01 SQLIMSDA GLOBAL.                            
  02 SQLIMSDAID         PIC X(8).              
  02 SQLIMSDABC         PIC S9(9) COMP-5.      
  02 SQLIMSN            PIC S9(4) COMP-5.      
  02 SQLIMSD            PIC S9(4) COMP-5. 
  02 SQLIMSVAR OCCURS 0 TO 750 TIMES DEPENDING ON SQLIMSN.  
    03 SQLIMSVAR1.                             
      04 SQLIMSTYPE     PIC S9(4) COMP-5.      
      04 SQLIMSLEN      PIC S9(4) COMP-5.      
      04 FILLER REDEFINES SQLIMSLEN.           
        05 SQLIMSPRECISION PIC X.              
        05 SQLIMSSCALE     PIC X.              
      04 SQLIMSDATA     POINTER.               
      04 SQLIMSIND      POINTER.               
      04 SQLIMSNAME.                           
        49 SQLIMSNAMEL  PIC S9(4) COMP-5.      
        49 SQLIMSNAMEC  PIC X(30).             
    03 SQLIMSVAR2 REDEFINES SQLIMSVAR1.        
      04 SQLIMSVAR2-RESERVED-1                 
                        PIC S9(9) COMP-5.      
      04 SQLIMSLONGLEN REDEFINES               
             SQLIMSVAR2-RESERVED-1             
                       PIC S9(9) COMP-5.       
      04 SQLIMSVAR2-RESERVED-2 
                       PIC S9(9) COMP-5.   
      04 SQLIMSDATALEN     POINTER.         
      04 SQLIMSDATATYPE-NAME.               
        05 SQLIMSDATATYPE-NAMEL             
                       PIC S9(4) COMP-5.   
        05 SQLIMSDATATYPE-NAMEC PIC X(30).