Насколько я знаю, готового системного бита нет, но его несложно сформировать самому.
Если бит должен принимать значение TRUE только при первом проходе программы, то можно сделать так:
Код:xFirstScan: BOOL; xNextScan: BOOL; IF NOT(xFirstScan) AND NOT(xNextScan) THEN xFirstScan := TRUE; xNextScan := TRUE; ELSE xFirstScan := FALSE; END_IF