埋め込みの説明
@1@ : FROMまたはBY.
例題
[P2525.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2525. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 WLOOP PIC S9(9) BINARY. 000007 PROCEDURE DIVISION. 000008 PERFORM TEST AFTER 000009 VARYING WLOOP FROM 1 BY 000010 UNTIL WLOOP = 10 000011 DISPLAY WLOOP 000012 END-PERFORM 000013 END PROGRAM P2525.
P2525.cob 10: JMN2525I-S BY句の作用対象が記述されていないか,または誤っています.作用対象として,1が指定されたとみなします.