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

2.2.209 JMN1358I-W

REDEFINES句は,データ記述項の最初の句でなければなりません.
REDEFINES句は,有効になります.

      000001 IDENTIFICATION  DIVISION.
      000002 PROGRAM-ID.     C1358.
      000003 DATA            DIVISION.
      000004 WORKING-STORAGE SECTION.
      000005 01  A1  PIC X.
      000006 01  B1 GLOBAL REDEFINES A1.
      000007 END PROGRAM     C1358.
    

C1358.cob (6) : JMN1358I-W REDEFINES句は,データ記述項の最初の句でなければなりません.REDEFINES句は,有効になります.