例題
[P2884.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2884. 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 GHVR. 000009 49 GHVRL PIC S9(5) BINARY. 000010 49 GHVRX PIC X(200). 000011 EXEC SQL END DECLARE SECTION END-EXEC. 000012 PROCEDURE DIVISION. 000013 EXEC SQL 000014 SELECT COL2 INTO :GHVR 000015 FROM T1 WHERE COL1 = 0 000016 END-EXEC 000017 END PROGRAM P2884.
P2884.cob 9: JMN2884I-S 可変長文字列型のホスト変数に従属する2進項目は,'P'および'V'を含まない4または9けたの項目でなければなりません.
詳細な説明
可変長文字列型のホスト変数に従属する2進項目には,可変長文字列の長さを格納します.このデータ項目は整数項目でなければなりません.また,桁数は4または9桁でなければなりません.