引数の説明
FUNCTION ACOS,FUNCTION ASIN |
例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C3376. 000003 ENVIRONMENT DIVISION. 000004 DATA DIVISION. 000005 WORKING-STORAGE SECTION. 000006 01 RCV PIC S9V99. 000007 PROCEDURE DIVISION. 000008 P-START. 000009 COMPUTE RCV = FUNCTION ACOS(+2). 000010 END PROGRAM C3376.
C3376.cob (9) : JMN3376I-S FUNCTION ACOSの引数の値は,-1以上,+1以下でなければなりません.