In ILE COBOL, INCLUDE SQLDA declarations are equivalent to the following:
Figure 13. INCLUDE SQLDA Declarations for ILE COBOL
1 SQLDA. 05 SQLDAID PIC X(8). 05 SQLDABC PIC S9(9) BINARY. 05 SQLN PIC S9(4) BINARY. 05 SQLD PIC S9(4) BINARY. 05 SQLVAR OCCURS 0 TO 409 TIMES DEPENDING ON SQLD. 10 SQLVAR1. 15 SQLTYPE PIC S9(4) BINARY. 15 SQLLEN PIC S9(4) BINARY. 15 FILLER REDEFINES SQLLEN. 20 SQLPRECISION PIC X. 20 SQLSCALE PIC X. 15 SQLRES PIC X(12). 15 SQLDATA POINTER. 15 SQLIND POINTER. 15 SQLNAME. 49 SQLNAMEL PIC S9(4) BINARY. 49 SQLNAMEC PIC X(30). 10 SQLVAR2 REDEFINES SQLVAR1. 15 SQLVAR2-RESERVED-1 PIC S9(9) BINARY. 15 SQLLONGLEN REDEFINES SQLVAR2-RESERVED-1 PIC S9(9) BINARY. 15 SQLVAR2-RESERVED-2 PIC X(28). 15 SQLDATALEN POINTER. 15 SQLDATATYPE-NAME. 49 SQLDATATYPE-NAMEL PIC S9(4) BINARY. 49 SQLDATATYPE-NAMEC PIC X(30). |
(C) Copyright IBM Corporation 1992, 2005. All Rights Reserved.