NetCOBOL for .NET V7.0 メッセージ集

2.3.508 JMN2881I-S

ホスト変数が内部10進項目の場合，'P'を含まない項目でなければなりません．

例

      000001 IDENTIFICATION DIVISION.
      000002 PROGRAM-ID.    P2881.
      000003 ENVIRONMENT    DIVISION.
      000004 DATA           DIVISION.
      000005 WORKING-STORAGE SECTION.
      000006     EXEC SQL BEGIN DECLARE SECTION END-EXEC.
      000007 01 SQLSTATE    PIC X(5).
      000008 01 HVR1        PIC S9(5)P PACKED-DECIMAL.
      000009     EXEC SQL END   DECLARE SECTION END-EXEC.
      000010 PROCEDURE      DIVISION.
      000011     EXEC SQL
      000012       SELECT COL2 INTO :HVR1
      000013              FROM T1    WHERE COL1 = 0
      000014     END-EXEC
      000015 END PROGRAM    P2881.
    

P2881.cob (8) : JMN2881I-S ホスト変数が内部10進項目の場合，'P'を含まない項目でなければなりません．

詳細な説明

ホスト変数(データ部の埋込みSQL宣言節のデータ記述項)として内部10進項目を宣言する場合，そのPICTURE文字列は'P'(想定した位取りを示す文字)を含んではなりません．想定小数点(PICTURE文字の'V')は含めることができます．