例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. SP8410.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 EXEC SQL BEGIN DECLARE SECTION END-EXEC.
000006 01 STOCK-TABLE.
000007 02 PRDCTNUM PIC S9(4) COMP-5.
000008 02 PRDCTNAM PIC X(20).
000009 01 SQLSTATE PIC X(5).
000010 01 SQLMSG PIC X(128).
000011 01 VAR-IND PIC S9(4) COMP-5.
000012 01 RTCD PIC S9(4) COMP-5.
000013 EXEC SQL END DECLARE SECTION END-EXEC.
000014 PROCEDURE DIVISION.
000015 EXEC SQL
000016 CALL SELECT1(:PRDCTNUM:VAR-IND) RETURNING RTCD
000017 END-EXEC
000018 .
SP8410.cob (16) : JMN2633I-S SQL文に誤りがあります．ODBC-8410E 引数リストの後に誤った指定があります．
詳細な説明
CALL文の引数リストの右括弧の直後に無効な語があります．