引数の説明
関数の引数 |
例
000001 @OPTIONS RCS(UTF16)
000002 PROGRAM-ID. C3460.
000003 ENVIRONMENT DIVISION.
000004 DATA DIVISION.
000005 WORKING-STORAGE SECTION.
000006 01 X20 PIC X(20).
000007 01 NGRP.
000008 02 N10 PIC N(10).
000009 PROCEDURE DIVISION.
000010 MOVE FUNCTION UTF8-OF (NGRP) TO X20
000011 END PROGRAM C3460.
C3460.cob (10) : JMN3460I-S FUNCTION UTF8-OFの引数'NGRP'は,日本語項目または日本語編集項目のいずれかでなければなりません.