引数の説明
関数の引数 |
例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. C3397.
000003 ENVIRONMENT DIVISION.
000004 INPUT-OUTPUT SECTION.
000005 DATA DIVISION.
000006 WORKING-STORAGE SECTION.
000007 01 A PIC X(4).
000008 01 B PIC X(4).
000009 PROCEDURE DIVISION.
000010 MOVE FUNCTION CAST-ALPHANUMERIC( A ) TO B.
000011 STOP RUN.
C3397.cob (10) : JMN3397I-S FUNCTION CAST-ALPHANUMERICの引数'A'は,日本語項目または日本語編集項目でなければなりません.