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

2.3.9 JMN2008I-W

集団項目にSIGN句が指定された場合,従属する基本項目に一つ以上の符号付き外部10進項目が指定されなければなりません.
SIGN句は無効になります.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2008.
      000003 DATA           DIVISION.
      000004 WORKING-STORAGE SECTION.
      000005 01 G1  SIGN LEADING.
      000006   02 E1        PIC X(10).
      000007   02 E2        PIC 9(10).
      000008 PROCEDURE      DIVISION.
      000009 END PROGRAM    P2008.
    

P2008.cob (5) : JMN2008I-W 集団項目にSIGN句が指定された場合,従属する基本項目に一つ以上の符号付き外部10進項目が指定されなければなりません.SIGN句は無効になります.

詳細な説明

SIGN句は,数字項目の符号の形式と位置を指定するものですが,以下の場合には有効になりません.

  • 符号なしの数字項目

  • 明または暗にDISPLAY以外のUSAGE句が指定されている.

この診断メッセージが出力される場合,SIGN句は意味を持ちません.SIGN句を削除するべきです.