strSQL = "DELETE FROM tblWork_OrdersTEMP"
CurrentDb.Execute strSQL, dbFailOnError
strSQL = ""
strSQL = strSQL & "INSERT INTO tblWork_OrdersTEMP ( WONROV, WONUM, [WOCU#], [WOCO#], [WODV#], [WOFR#], WOTYC, WOEDT, "
strSQL = strSQL & "WORCDT, WOSTT, [WOIA#], WOSTA, WOREA, WOPB1, WOPC1, WOPC2, WOAC2, WOCM1, WOCM2, WOCM3, WOIDT, WOQCD, "
strSQL = strSQL & "WOPOL, WOCTG, WOOSDT, WOCLS, WOHNUM, WOCAD, WONTK, WOPTT, CUNAM, [CUHO#], HOBLD, HOSTN, HOAPT, HOCIT, "
strSQL = strSQL & "HOSTC, HOCSL, HOZIP5 ) "
strSQL = strSQL & "SELECT WONROV, WONUM, [WOCU#], [WOCO#], [WODV#], [WOFR#], [WOTYC], [WOEDT], [WORCDT], WOSTT, [WOIA#], "
strSQL = strSQL & "WOSTA, WOREA, WOPB1, WOPC1, WOPC2, WOAC2, WOCM1, WOCM2, WOCM3, WOIDT, WOQCD, WOPOL, WOCTG, WOOSDT, WOCLS, "
strSQL = strSQL & "WOHNUM, WOCAD, WONTK, WOPTT, CUNAM, [CUHO#], HOBLD, HOSTN, HOAPT, HOCIT, HOSTC, HOCSL, HOZIP5 "
strSQL = strSQL & "FROM (WVALIVFILE_WORDMPF LEFT JOIN WVALIVFILE_CUMSTPF ON (WVALIVFILE_WORDMPF.[WOCU#]=WVALIVFILE_CUMSTPF.CUCNO) "
strSQL = strSQL & "AND (WVALIVFILE_WORDMPF.WONROV=WVALIVFILE_CUMSTPF.CUNROV)) LEFT JOIN WVALIVFILE_HOSTPF ON "
strSQL = strSQL & "(WVALIVFILE_CUMSTPF.[CUHO#]=WVALIVFILE_HOSTPF.HONUM) AND (WVALIVFILE_CUMSTPF.CUNROV=WVALIVFILE_HOSTPF.HONROV) "
strSQL = strSQL & "WHERE (WOIDT Between 1120601 And 1120622 And WOSTT='CP') Or (WOUDT=1120501 And WOSTT='CN') Or "
strSQL = strSQL & "(WOTYC In ('UP','IN','RS') And WOSTT Not In ('CP','CN'))"
CurrentDb.Execute strSQL, dbFailOnError