NetCOBOL V11.0 メッセージ集

2.6.23 JMN5117I-S

@1@句はEXTERNAL句を持つ項目またはその項目に従属する項目に指定できません． 書かれた通りに受け入れます．

埋め込みの説明

@1@ : USAGE OBJECT REFERENCE

例題

[P5117.cob]
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID.    P5117.
000003 DATA           DIVISION.
000004 WORKING-STORAGE SECTION.
000005 01 OBJA        USAGE OBJECT REFERENCE EXTERNAL.
000006 01 AA EXTERNAL.
000007   02 OBJB      USAGE OBJECT REFERENCE.
000008 PROCEDURE      DIVISION.
000009 END PROGRAM    P5117.

P5117.cob 5: JMN5117I-S USAGE OBJECT REFERENCE句はEXTERNAL句を持つ項目またはその項目に従属する項目に指定できません．書かれた通りに受け入れます．

P5117.cob 7: JMN5117I-S USAGE OBJECT REFERENCE句はEXTERNAL句を持つ項目またはその項目に従属する項目に指定できません．書かれた通りに受け入れます．