NetCOBOL V11.0 メッセージ集

2.5.270 JMN3433I-S

2文字以上のALL定数の数字項目および数字編集項目への転記は，@1@ COBOLの廃要素です．

埋め込みの説明

@1@ : ANSI85

例題

[C3433.cob]
000001 CLASS-ID. C3433.
000002 ENVIRONMENT DIVISION.
000003 CONFIGURATION SECTION.
000004 REPOSITORY.
000005*
000006  OBJECT.
000007  DATA DIVISION.
000008  WORKING-STORAGE SECTION.
000009  PROCEDURE DIVISION.
000010    METHOD-ID. C3433-M.
000011    DATA DIVISION.
000012    WORKING-STORAGE SECTION.
000013    01 D908 PIC 9(8).
000014    LINKAGE SECTION.
000015    PROCEDURE DIVISION.
000016      MOVE  ALL '40'  TO  D908.
000017    END METHOD C3433-M.
000018  END OBJECT.
000019 END CLASS C3433.

C3433.cob 16: JMN3433I-S 2文字以上のALL定数の数字項目および数字編集項目への転記は，ANSI85 COBOLの廃要素です．