The SQL For Today
SELECT Visits.TrackingNum, Visits.Date, Visits.DrugR,
     Visits.HIVR, Visits.AIDS Visits.HepatitisBR,
     Visits.ExceptR
FROM Visits
WHERE
(((Visits.TrackingNum)<>"") AND ((Visits.Date)=Date()) AND
((Visits.DrugR)=Yes)) OR
(((Visits.TrackingNum)<>"") AND ((Visits.Date)=Date()) AND
((Visits.HIVR)=Yes)) OR
(((Visits.TrackingNum)<>"") AND ((Visits.Date)=Date()) AND
((Visits.AIDSR)=Yes)) OR
(((Visits.TrackingNum)<>"") AND ((Visits.Date)=Date()) AND
((Visits.HepatitisBR)=Yes)) OR
(((Visits.TrackingNum)<>"") AND ((Visits.Date)=Date()) AND
((Visits.ExceptR)=Yes));