埋め込みの説明
@1@ : DISCONNECT
例題
[SP8327.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. SP8327. 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 EXEC SQL END DECLARE SECTION END-EXEC. 000013 PROCEDURE DIVISION. 000014 EXEC SQL CONNECT TO DEFAULT END-EXEC 000015 EXEC SQL CALL SELECT1(:PRDCTNUM) END-EXEC 000016 EXEC SQL DISCONNECT END-EXEC 000017 .
SP8327.cob 16: JMN2633I-S SQL文に誤りがあります.ODBC-8327E “DISCONNECT”の前後に切断対象が指定されていません.
詳細な説明
DISCONNECT文に切断対象の指定がありません.切断対象を指定してください.