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

2.4.14 JMN3013I-W

算術式中でゼロのゼロ乗を計算しようとしています.ここでいうゼロとは,値ゼロの数字定数,表意定数ZERO,演算の中間結果で有効けたがすべて消失した場合のいずれかです.
結果をゼロとして処理を続けます.

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.  C3013.
      000003 DATA DIVISION.
      000004 WORKING-STORAGE SECTION.
      000005 01  ED01  PIC  S9(18).
      000006 PROCEDURE  DIVISION.
      000007     COMPUTE ED01 = 0 ** 0.
      000008 END PROGRAM  C3013.
    

C3013.cob (7) : JMN3013I-W 算術式中でゼロのゼロ乗を計算しようとしています.ここでいうゼロとは,値ゼロの数字定数,表意定数ZERO,演算の中間結果で有効けたがすべて消失した場合のいずれかです.結果をゼロとして処理を続けます.