例
000001 IDENTIFICATION DIVISION.
000002 PROGRAM-ID. P5772.
000003 ENVIRONMENT DIVISION.
000004 CONFIGURATION SECTION.
000005 REPOSITORY.
000006 CLASS INTARY AS "System.Int32[]".
000007 DATA DIVISION.
000008 WORKING-STORAGE SECTION.
000009 01 WARY OBJECT REFERENCE INTARY.
000010 01 WPX POINTER.
000011 PROCEDURE DIVISION.
000012 PERFORM VARYING WPX THRU WARY
000013 DISPLAY WPX
000014 END-PERFORM
000015 END PROGRAM P5772.
P5772.cob (12) : JMN5772I-S PERFORM文のVARYING-THRU指定のVARYINGに続くデータ名は，ポインタ，指標，集団項目または1桁を越えるブール項目であってはなりません．
詳細な説明
VARYING指定のデータ名は，THRU指定の一意名が参照するコレクションから取り出した要素を格納するために使用されます.
データ名が以下のいずれかの場合は，コレクションから取り出した要素を格納することができません.
ポインタ項目
指標項目
集団項目
サイズが1の場合を除くブール項目