NetCOBOL V11.0 メッセージ集

2.5.112 JMN3158I-I

INITIALIZE文で，初期値が代入される項目が一つもありません．

例題

[C3158.cob]
000001 IDENTIFICATION  DIVISION.
000002 PROGRAM-ID. C3158.
000003 ENVIRONMENT  DIVISION.
000004 DATA  DIVISION.
000005 WORKING-STORAGE SECTION.
000006   01 A PIC X(10).
000007 PROCEDURE  DIVISION.
000008   P-START.
000009     INITIALIZE A REPLACING NUMERIC BY 1
000010                            ALPHABETIC BY "A".
000011     STOP RUN.

C3158.cob 9: JMN3158I-I INITIALIZE文で，初期値が代入される項目が一つもありません．