Если вы знаете, что в ваших данных нет «будущих» дат, вы можете использовать что-то вроде этого:
for each womf_worder of sfcf_au_ship where
womf_worder.word_production_status EQ "B" and
womf_worder.word_build_date GE today - 1 and
womf_worder.word_build_time GE tt_shift.shft_start_hour and
womf_worder.word_build_time LE tt_shift.shft_stop_hour
no-lock:
assign i = i + 1.
end.
Если вы не знакомы с данными, с которыми работаете, или хотите, чтобы они были более переносимыми:
for each womf_worder of sfcf_au_ship where
womf_worder.word_production_status EQ "B" and
womf_worder.word_build_time GE tt_shift.shft_start_hour and
womf_worder.word_build_time LE tt_shift.shft_stop_hour and
( womf_worder.word_build_date eq today - 1 or
womf_worder.word_build_date eq today )
no-lock:
assign i = i + 1.
end.