ページの先頭行へ戻る
NetCOBOL V11.0 メッセージ集
FUJITSU Software

2.5.297 JMN3461I-S

FUNCTION STORED-CHAR-LENGTHの引数@1@は,英字項目,英数字項目,英数字編集項目,日本語項目または日本語編集項目のいずれかでなければなりません.

埋め込みの説明

@1@ : 関数の引数

例題

[C3461.cob]
000001 PROGRAM-ID.  C3461.
000002 ENVIRONMENT DIVISION.
000003 DATA DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 LEN PIC 9(3).
000006 01 GRP.
000007   02 X10 PIC X(10).
000008   02 X20 PIC X(20).
000009 01 NUM01 PIC S9(4).
000010 PROCEDURE  DIVISION.
000011     COMPUTE LEN = FUNCTION STORED-CHAR-LENGTH (GRP)
000012     COMPUTE LEN = FUNCTION STORED-CHAR-LENGTH (NUM01)
000013 END PROGRAM  C3461.

C3461.cob 11: JMN3461I-S FUNCTION STORED-CHAR-LENGTHの引数'GRP'は,英字項目,英数字項目,英数字編集項目,日本語項目または日本語編集項目のいずれかでなければなりません.

C3461.cob 12: JMN3461I-S FUNCTION STORED-CHAR-LENGTHの引数'NUM01'は,英字項目,英数字項目,英数字編集項目,日本語項目または日本語編集項目のいずれかでなければなりません.