CA Datacom/DB SQL Preprocessors › SQL Work Area (SQLWA) › SQLWA Examples › SQLWA - CA Datacom/DB Format (PL/I)

SQLWA - CA Datacom/DB Format (PL/I)

Following is the CA Datacom/DB format of the PL/I version of an SQLWA. In the example, n represents the number for each SQLWA generated by the Preprocessor.

 DCL 1 SQLWAn,
     5 SQLWAn_EYE_CATCH             CHAR(8) INIT('SQLWA***'),
     5 SQLWAn_LEN                   FIXED BINARY(31) INIT(48),
     5 SQLWAn_COMMAND               CHAR(5) INIT('QEXEC'),
     5 SQLWAn_FLAGS                 BIT(8) INIT(0),
     5 SQLWAn_FILLER                CHAR(2) INIT(' '),
     5 SQLWAn_PROC_NAME             CHAR(8) INIT(' '),
     5 SQLWAn_STAMP                 FIXED BINARY(31) INIT(nnnnnnnn),
     5 SQLWAn_STMT_ID               FIXED BINARY(31) INIT(nnnn),
     5 SQLWAn_ADDR_HOST_DESC        POINTER,
     5 SQLWAn_END_CATCH             CHAR(8) INIT('ENDSQLWA'),
     5 HOST_VARn_AREA,
         10 HOST_VARn_LEN           FIXED BINARY(31) INIT(nnn),
         10 HOST_VARn_NBR_ENT       FIXED BINARY(15) INIT(nn),
         10 HOST_VARn_FILLER        CHAR(2) INIT(' '),
         10 HOST_VARn_DESC,
             /* host field name m */
             15 HOST_VARn_m_TYPE    FIXED BINARY(15) INIT(%t),
             15 HOST_VARn_m_LEN     FIXED BINARY(15) INIT(%u),
             15 HOST_VARn_m_DATA    POINTER,
             15 HOST_VARn_m_IND     POINTER,
             15 HOST_VARn_m_DIR     CHAR(1) INIT('d'),
             15 HOST_VARn_m_FILR    CHAR(3) INIT('   '),