ローカル データ項目は、手続き部本文で宣言されるデータ項目 (変数とも呼ばれる) です。
01 names pic x(10) typedef. procedure division. declare i1 as binary-long declare name-list as names occurs 3 *> オプションで、変数をインラインで初期化可能 declare c2 as binary-long = 5 display c2 perform varying k as binary-long from 4 by 1 until K > 6 display k end-perform