例
000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. C1329. 000003 DATA DIVISION. 000004 WORKING-STORAGE SECTION. 000005 01 PIC X IS GLOBAL. 000006 01 PIC 9 IS EXTERNAL. 000007 01 FILLER PIC X IS GLOBAL. 000008 01 FILLER PIC 9 IS EXTERNAL. 000009 END PROGRAM C1329.
C1329.cob (5) : JMN1329I-S 無名項目に対して,EXTERNAL句またはGLOBAL句を指定することはできません.EXTERNAL句またはGLOBAL句は,無効になります.
C1329.cob (6) : JMN1329I-S 無名項目に対して,EXTERNAL句またはGLOBAL句を指定することはできません.EXTERNAL句またはGLOBAL句は,無効になります.
C1329.cob (7) : JMN1329I-S 無名項目に対して,EXTERNAL句またはGLOBAL句を指定することはできません.EXTERNAL句またはGLOBAL句は,無効になります.
C1329.cob (8) : JMN1329I-S 無名項目に対して,EXTERNAL句またはGLOBAL句を指定することはできません.EXTERNAL句またはGLOBAL句は,無効になります.