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

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