... into cursor tempsCheck NOFILTER if _TALLY > 0 why = "Already Assigned To " +truck_num messagebox(why, 16, "E") use return endifBTW, 'CREATE CURSOR ...' command before SELECT is useless because SELECT creates new cursor anyway.
>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