Previous Topic: Warning Arrays - PL/I, Assembler, CNext Topic: SQLCA - DB2 Format (PL/I)


SQLCA - DB2 Format (COBOL)

01  SQLCA.
    05  SQLCAID                  PIC X(08).
    05  SQLCABC                  PIC S9(9) COMP VALUE +136.
    05  SQLCODE                  PIC S9(9) COMP VALUE +0.
    05  SQLERRM.
        49  SQLERRML             PIC S9(4) COMP.
        49  SQLERRMC             PIC X(70).
    05  SQLERRP                  PIC X(08).
    05  SQLERRD                  PIC S9(9) COMP OCCURS 6 TIMES.
    05  SQLWARN.
        10  SQLWARN0             PIC X.
        10  SQLWARN1             PIC X.
        10  SQLWARN2             PIC X.
        10  SQLWARN3             PIC X.
        10  SQLWARN4             PIC X.
        10  SQLWARN5             PIC X.
        10  SQLWARN6             PIC X.
        10  SQLWARN7             PIC X.
    05  SQLEXT.
        10  SQLWARN8             PIC X(1).
        10  SQLWARN9             PIC X(1).
        10  SQLWARNA             PIC X(1).
        10  SQLSTATE             PIC X(5).