埋め込みの説明
@1@ : SQLSTATE.
例題
[P2890.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2890. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 EXEC SQL BEGIN DECLARE SECTION END-EXEC. 000007 01 SQLSTATE PIC X(40). 000008 EXEC SQL END DECLARE SECTION END-EXEC. 000009 PROCEDURE DIVISION. 000010 EXEC SQL 000011 SELECT * FROM S1 000012 END-EXEC 000013 END PROGRAM P2890.
P2890.cob 7: JMN2890I-S SQLSTATEは,5文字の英数字項目でなければなりません.
詳細な説明
埋め込みSQL文の実行時例外発生時の例外コードを受け取る領域であるSQLSTATEは次のように定義されていなければなりません.
01または77レベルのデータ項目
5文字の英数字項目