Thanks E.,
Right now I am looping through like this:
dim rptSubRpt as CraxDrt.report
dim report as CraxDrt.report
For iint = 2 To 5
Set rptSubRpt = Report.OpenSubreport("rptSavPatientSumm" & iint)
rptSubRpt.Database.Tables(1).Location = "SQL.dbo.Proc(rptSavSum_pg" & iint & "NPar;1)"
Next iint
Since my stored proc names are, excepting a number, the same this seems to work. It will not be quite as simple if/when I am using different names but should be flexible enough to handle that as well. I am going to play around with the example you gave me, to see if I like it better. In the end I want this to be as straight forward as possible.
Thanks again,
Oliver