в первой строке программы поставьте тригер переднего фронта, на входе TRUE, по срабатыванию тригера инициализируйте переменные.
К примеру
R_TRIG(CLK:=TRUE, Q=> );
IF R_TRIG.Q THEN
i_1=1;
i_2=5;....
i_n=Z56;
END_IF