Update,
my failure
place the code inside the loop in a procedure outside
#if a=25
scan
do ExtProc()
endscan
else
do ExtProc()
endif
procedure extproc
endproc
Words are given to man to enable him to conceal his true feelings.
Charles Maurice de Talleyrand-Périgord
Weeks of programming can save you hours of planning.
OffThere is no place like [::1]