All pastes #351647 Raw Edit

Something

public text v1 · immutable
·published 2007-02-12 08:50 UTC
rendered paste body
PROC WC01

i = AC12;
	if (LF01(i)=1 or LF02(i)=1 or LF03(i)=1 or LF04(i)=1 or LF05(i)=1) and $=2 then
		errmsg("Person has been working.");
		reenter $;
	endif;