引数の説明
関数の引数 |
例
000001 @OPTIONS RCS(UTF16)
000002 PROGRAM-ID. C3459.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 N20 PIC N(20).
000007 01 INTD PIC S9(9).
000008 PROCEDURE DIVISION.
000009 MOVE FUNCTION UCS2-OF (INTD) TO N20
000010 END PROGRAM C3459.
C3459.cob (9) : JMN3459I-S FUNCTION UCS2-OFの引数'INTD'は,英字項目,英数字項目または英数字編集項目のいずれかでなければなりません.