例題
[P2931.cob] 000001 IDENTIFICATION DIVISION. 000002 PROGRAM-ID. P2931. 000003 ENVIRONMENT DIVISION. 000004 CONFIGURATION SECTION. 000005 SPECIAL-NAMES. 000006 PRINTING MODE PM1 FOR MOCS 000007 PRINTING MODE PM2 FOR MOCS. 000008 DATA DIVISION. 000009 WORKING-STORAGE SECTION. 000010 01 WGRP EXTERNAL 000011 CHARACTER TYPE PM1 PM2 000012 DEPENDING ON WMODE. 000013 02 WDX PIC X(10). 000014 02 WDN PIC N(10). 000015 01 WMODE PIC S9(4). 000016 PROCEDURE DIVISION. 000017 END PROGRAM P2931.
P2931.cob 12: JMN2931I-S DEPENDING ON指定のCHARACTER TYPE句が外部属性を持つレコード中に指定されている場合，DEPENDING ON指定のデータ名も同じデータ部中の外部属性を持つ項目でなければなりません．
詳細な説明
外部属性を持つレコード(EXTERNAL句を指定した項目またはそれに従属する項目)は，実行単位中で1つの記憶領域が割り当てられ，実行単位中のすべてのプログラムから参照することができます．
外部データレコードにDEPENDING ON指定付きのCHARACTER TYPE句が指定された場合，この外部データレコードに適用される印字モードがDEPENDING ON指定に指定したデータ項目の値によって決定されるので，DEPENDING ON指定のデータ項目も外部属性を持たなければなりません．
