1 PERFORM 2 プロシージャー名-1 2.1? 2.1.0 THROUGH 2.1.0 THRU 2.1.1 プロシージャー名-2 2.1.2 %句 1 2.1.3 %句 2 2 %句 1 2.1 命令ステートメント-1 END-PERFORM 句 1: 1? WITH 1.1 TEST 1.2 BEFORE 1.2 AFTER 2 VARYING 3 ID-2 3 指標名-1 4 FROM 5 ID-3 5 指標名-2 5 リテラル-1 6 BY 7 ID-4 7 リテラル-2 8 UNTIL 条件-1 句 2: 1+ 1 AFTER 1.1 ID-5 1.1 指標名-3 1.2 FROM 1.3 ID-6 1.3 指標名-4 1.3 リテラル-3 1.4 %句 3 句 3: 1 BY 2 ID-7 2 リテラル-4 3 UNTIL 条件-2