埋め込みの説明
@1@ : SQLCODE,SQLERRD.
例題
[P2893.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2893. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 EXEC SQL BEGIN DECLARE SECTION END-EXEC. 000007 01 SQLSTATE PIC X(5). 000008 01 SQLCODE PIC 9(9) BINARY. 000009 01 SQLINFOA. 000010 02 SQLERRD PIC S9(4) BINARY. 000011 01 HVAR1 PIC S9(2)V9(2). 000012 01 HVAR2 PIC X(8). 000013 EXEC SQL END DECLARE SECTION END-EXEC. 000014 PROCEDURE DIVISION. 000015 EXEC SQL 000016 SELECT CL1,CL2 INTO :HVAR1, :HVAR2 FROM TBL 000017 END-EXEC. 000018 END PROGRAM P2893.
P2893.cob 8: JMN2893I-S SQLCODEは'P'および'V'を含まない9けたの符号付き2進項目でなければなりません.
P2893.cob 10: JMN2893I-S SQLERRDは'P'および'V'を含まない9けたの符号付き2進項目でなければなりません.
詳細な説明
埋込みSQL文の実行時例外発生時の例外コードを受け取る領域である以下のデータ項目は,いずれもPまたはVを含まない9桁の符号付き2進項目符号である必要があります.
SQLCODE
SQLERRD