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

2.4.109 JMN3158I-I

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

      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文で,初期値が代入される項目が一つもありません.