引数の説明
DCSQL |
プログラム定義 |
例
000001 IDENTIFICATION DIVISION.
000002 CLASS-ID. C1690.
000003 ENVIRONMENT DIVISION.
000004 STATIC.
000005 DATA DIVISION.
000006 WORKING-STORAGE SECTION.
000007 EXEC DCSQL BEGIN DECLARE SECTION END-EXEC.
000008 01 SQLSTATE PIC X(5).
000009 EXEC DCSQL END DECLARE SECTION END-EXEC.
000010 PROCEDURE DIVISION.
000011 END STATIC.
000012 END CLASS C1690.
C1690.cob (7) : JMN1690I-S DCSQL機能はプログラム定義以外には指定できません.次の認識できるEND-EXEC,節または部まで無効になります.
C1690.cob (9) : JMN1690I-S DCSQL機能はプログラム定義以外には指定できません.次の認識できるEND-EXEC,節または部まで無効になります.