埋め込みの説明
@1@ : FUNCTION LOG,FUNCTION LOG10
例題
[C3380.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3380. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 RCV PIC S9(5)V9(5) BINARY. 000007 PROCEDURE DIVISION. 000008 P-START. 000009 COMPUTE RCV = FUNCTION LOG(-1.5). 000010 END PROGRAM C3380.
C3380.cob 9: JMN3380I-S FUNCTION LOGの引数の値は,0より大きい数字でなければなりません.