Программа

GENERATE 500,100

ASSIGN KOLPOVT,8

В параметр P$KOLPOVT запишем требуемое количество повторений

цикла – 8.

CIKL SEIZE PK1

ADVANCE 20,7

RELEASE PK1

SEIZE PK2

ADVANCE 25,10

RELEASE PK2

LOOP KOLPOVT,CIKL

При поступлении транзакта в блок LOOP из параметра P$KOLPOVT вычитается единица и проверяется оставшееся содержимое. Если оно >0, то переходим на метку CIKL, то есть на начало цикла. В противном случае переходим к следующему блоку, повторения выполнений операторов цикла больше не требуется и мы переходим к третьему РК.

SEIZE PK3

ADVANCE 100,20

RELEASE PK3

TERMINATE 1

START 300