>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 >endifMatthew,
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'.