Reports from query

[gooberoot]

Here's my basic setup:

I have a finite (<10) Doctors with a list of patients & all their
associated data.
I have set up and concatnated a bunch of this patient data in a query
and have set the layout in a report.

This report is grouped by Doctor, and prints out ALL the patients for
ALL the Doctors. I need to set up a report for each Doctor that will
print only the patients for a particular Doctor.

Is the best way:
A) to create a seperate query and report for each doctor
B) to "re-link" the report to a seperate query using the "control
source" for the Doctor field - how do you do this if so?
C) something else?

Thanks.

-ernie

[pietlinden]

Create a query joining doctor and patient. Don't filter it, because
you can do that in the Open event of the report.

Then group by Doctor.

[gooberoot]

thanks,

doctor and patient are all joined in the query.
everything is set up already in the report.

I just need a way to limit the print / exporting to a particular doctor.

[pietlinden]

gooberoot wrote:

thanks,

doctor and patient are all joined in the query.
everything is set up already in the report.

I just need a way to limit the print / exporting to a particular

doctor.

If you only want to see a particular doctor's records, then specify the
criteria in the open event of the report...

One way to do it is to have an unbound combobox on a form where the
rowsource for the combobox is something like this:

SELECT DISTINCT tblTransaction.Ticker FROM tblTransaction;

so I get only unique Ticker values in my list, and then I have a button
with this code to open the filtered report:

Option Compare Database

Private Sub cmdOpenReport_Click()
On Error GoTo Err_cmdOpenReport_Click

Dim stDocName As String

stDocName = "rptTransaction"
DoCmd.OpenReport stDocName, acPreview, , "[Ticker]='" &
Me.cboTicker & "'"

Exit_cmdOpenReport_Click:
Exit Sub

Err_cmdOpenReport_Click:
MsgBox Err.Description
Resume Exit_cmdOpenReport_Click

End Sub

The only part I modified from what the wizard built was adding the
WHERE clause argument to the openreport event. Filters fine. then you
can export that to Word or whatever if you want.