NetCOBOL V11.0 メッセージ集

2.4.520 JMN2889I-S

符号付き外部10進項目のホスト変数にSIGN句を指定する場合，LEADING SEPARATE指定またはTRAILING指定でなければなりません．

例題

[P2889.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P2889.
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) SIGN TRAILING SEPARATE.
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    P2889.

P2889.cob 8: JMN2889I-S 符号付き外部10進項目のホスト変数にSIGN句を指定する場合，LEADING SEPARATE指定またはTRAILING指定でなければなりません．