埋め込みの説明
@1@ : SQL機能
例題
[C1692.cob] 000001 IDENTIFICATION DIVISION. 000002 CLASS-ID. C1692. 000003 FACTORY. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 EXEC SQL BEGIN DECLARE SECTION END-EXEC. 000007 01 HOSTVAR PIC X(100). 000008 EXEC SQL END DECLARE SECTION END-EXEC. 000009 END FACTORY. 000010 END CLASS C1692.
C1692.cob 6: JMN1692I-S SQL機能はプログラム定義,オブジェクト定義またはオブジェクトメソッド定義内で指定しなければなりません.次の認識できるEND-EXEC,節または部まで無効になります.
C1692.cob 8: JMN1692I-S SQL機能はプログラム定義,オブジェクト定義またはオブジェクトメソッド定義内で指定しなければなりません.次の認識できるEND-EXEC,節または部まで無効になります.