PERFORM ステートメント - 形式 2

1 PERFORM
2 プロシージャー名-1
2.1? 
2.1.0 THROUGH
2.1.0 THRU
2.1.1 プロシージャー名-2
2.1.2 %句 1
2 %句 1
2.1 命令ステートメント END-PERFORM

句-1:

1 ID-1
1 整数-1
2 TIMES