SELECT tblProjectPractices.ProjectPracticeID, Format([tblProjectPractices].[PracticeGPID],"000000") AS GPID,
tblODSPractices.MainContact, qryReminderLetter_StartDates.EvTypeID AS s, 
tblProjectPractices.nAg AS x 
FROM (tblProjects INNER JOIN (((tblProjectPatients INNER JOIN 
tblProjectPatientEvents ON tblProjectPatients.ProjectPatientID = tblProjectPatientEvents.ProjectPatientID) INNER JOIN
tblProjectPractices ON tblProjectPatients.PracticeEID = tblProjectPractices.PracticeEID) LEFT JOIN
qryReminderLetter_StartDates ON tblProjectPractices.ProjectPracticeID = qryReminderLetter_StartDates.ProjectPracticeID) ON
(tblProjects.ProjectID = tblProjectPatients.ProjectID) AND (tblProjects.ProjectID = tblProjectPractices.ProjectID)) INNER JOIN
tblODSPractices ON tblProjectPractices.PracticeEID = tblODSPractices.PracticeEID 
WHERE (((tblProjectPractices.ProjectID)=[forms]![frmScheduler]![txtProjects]) AND 
((tblProjectPractices.PracticeGPID) Like [forms]![frmScheduler]![txtGPID] & "*") AND
((tblProjectPatients.[No])=-1)) OR (((tblProjectPractices.ProjectID)=[forms]![frmScheduler]![txtProjects]) AND
((tblProjectPractices.PracticeGPID) Like [forms]![frmScheduler]![txtGPID] & "*") AND ((tblProjectPatients.InD)=-1)) 
GROUP BY tblProjectPractices.ProjectPracticeID, Format([tblProjectPractices].[PracticeGPID],"000000"), 
tblODSPractices.MainContact, qryReminderLetter_StartDates.EvTypeID, tblProjectPractices.nAg 
ORDER BY Format([tblProjectPractices].[PracticeGPID],"000000");