埋め込みの説明
@1@ : SQLSTATE,SQLCODE,SQLMSGまたはSQLERARY.
例題
[P2741.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2741. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 EXEC SQL BEGIN DECLARE SECTION END-EXEC. 000007 01 STCD. 000008 02 SQLSTATE PIC X(5). 000009 02 SQLMSG PIC X(80). 000010 77 HVAR3 PIC S9(9) BINARY. 000011 EXEC SQL END DECLARE SECTION END-EXEC. 000012 PROCEDURE DIVISION. 000013 EXEC SQL 000014 SELECT CL1 INTO :HVAR3 FROM TBL 000015 END-EXEC. 000016 END PROGRAM P2741.
P2741.cob 8: JMN2741I-S 'SQLSTATE'はレベル番号が01または77の項目でなければなりません.
P2741.cob 9: JMN2741I-S 'SQLMSG'はレベル番号が01または77の項目でなければなりません.
詳細な説明
SQLSTATE,SQLCODE,SQLMSGまたはSQLERARYは,埋込みSQL文の実行結果を応用プログラムに通知するための連絡域です.これらは,レベル番号01または77の項目として宣言してください.