埋め込みの説明
@1@ : GSS,GSW
@2@ : 関数名(コード指定)
例題
[P9910.cob] 000001 @OPTIONS FLAGSW(GSS) 000002 IDENTIFICATION DIVISION. 000003 PROGRAM-ID. P9910. 000004 ENVIRONMENT DIVISION. 000005 DATA DIVISION. 000006 WORKING-STORAGE SECTION. 000007 01 WDATE PIC X(20). 000008 01 WANS PIC S9(2)V999. 000009 01 WANGLE PIC S9(2)V999. 000010 PROCEDURE DIVISION. 000011 MOVE FUNCTION CURRENT-DATE TO WDATE 000012 COMPUTE WANS = FUNCTION SIN(WANGLE) 000013 END PROGRAM P9910.
P9910.cob 12: JMN9910I-E (GSS)OSIVシステムでは,FUNCTION SIN関数はサポートしていません.