>>CREATE CURSOR tempsCheck (driver C(30), helper1 C(30),helper2 C(30), helper3 C(30), helper4 C(30),; >> truck_num C(10), dwrk_order C(6),dwrk_sdate D) >>SELECT presched.driver, presched.helper1, presched.helper2, presched.helper3, presched.helper4,; >> presched.truck_num,presched.dwrk_order, presched.dwrk_sdate; >>FROM presched; >>WHERE presched.dwrk_sdate = date() + 1; >>AND alltrim(presched.driver) = alltrim(thisform.list3.value) OR; >> alltrim(presched.helper1) = alltrim(thisform.list3.value) OR; >> alltrim(presched.helper2) = alltrim(thisform.list3.value) OR; >> alltrim(presched.helper3) = alltrim(thisform.list3.value) OR; >> alltrim(presched.helper4) = alltrim(thisform.list3.value); >>ORDER BY presched.dwrk_truck, presched.dwrk_men, presched.dwrk_stime; >>into cursor tempsCheck >>select tempsCheck >>if !eof() and !bof() >> why = "Already Assigned To " +truck_num >> messagebox(why, 16, "E") >> use >> return >>endif>
>SELECT presched.driver, presched.helper1, presched.helper2, ; > presched.helper3, presched.helper4,; > presched.truck_num,presched.dwrk_order, presched.dwrk_sdate; > FROM presched; > WHERE presched.dwrk_sdate = date() + 1 AND ; > presched.driver == thisform.list3.value OR; > presched.helper1 == thisform.list3.value OR; > presched.helper2 == thisform.list3.value OR; > presched.helper3 == thisform.list3.value OR; > presched.helper4 == thisform.list3.value ; > ORDER BY presched.dwrk_truck, presched.dwrk_men, presched.dwrk_stime; > into cursor tempsCheck nofilter >if _Tally > 0 > why = "Already Assigned To " +truck_num > messagebox(why, 16, "E") > use in 'tempsCheck' > return >endifCheck where parentheses would go in 'where'.