2.4.222 JMN3386I-S

@1@の引数は，固定小数点項目または固定小数点定数でなければなりません．

引数の説明

@1@:

FUNCTION INTEGER, FUNCTION INTEGER-PART, FUNCTION REM

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.  C3386.
      000003 ENVIRONMENT  DIVISION.
      000004 DATA  DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006 01  A    COMP-2  VALUE +3.5.
      000007 01  RCV  PIC S9(4) BINARY.
      000008 PROCEDURE  DIVISION.
      000009     COMPUTE RCV = FUNCTION INTEGER( A ).
      000010 END PROGRAM  C3386.

C3386.cob (9) : JMN3386I-S FUNCTION INTEGERの引数は，固定小数点項目または固定小数点定数でなければなりません．