引数の説明
関数の種類 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3359.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 A PIC S9(4)V9(4) BINARY.
000007 01 B PIC S9(8) PACKED-DECIMAL.
000008 01 C PIC X(8).
000009 01 D PIC S9(8)V9(8) BINARY.
000010 PROCEDURE DIVISION.
000011 P-START.
000012 COMPUTE D = FUNCTION MAX (A , B , C).
000013 END PROGRAM C3359.
C3359.cob (12) : JMN3359I-S FUNCTION MAXに引数が複数指定された場合,引数の型は全て同じでなければなりません.