埋め込みの説明
@1@ : 関数の種類
例題
[C3367.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3367. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 A PIC S9(8) BINARY. 000007 PROCEDURE DIVISION. 000008 PERFORM FUNCTION INTEGER( A ) TIMES 000009 COMPUTE A = A - 1 000010 END-PERFORM 000011 END PROGRAM C3367.
C3367.cob 8: JMN3367I-S PERFORM文中のFUNCTION INTEGERは,整数または整数項目でなければなりません.