I have three pass through queries set up in my Access database that
are processed on a MSSQL server.  All three queries function properly
and process the data as expected.  My problem is that the parameters
(FromDate and ToDate) are being entered via three different forms--one
form for each query.  I would like for one form to execute all three
pass through queries.  How can I make this work?

Here is my code: (basically the same for each form with different
query identified)

Private Sub cmdRunqptRenewalRate_Click()

   Dim db As DAO.Database
   Dim strFromDate As String
   Dim strToDate As String
   Dim qd As DAO.QueryDef
   Dim strSQL As String

   ' Ensure date-string inputs exist.
   ' NOTE: The code requires that both dates
   ' are supplied.

   With Me!txtFromDate
       If IsNull(.Value) Then
           MsgBox "Please specify the first PaidThru date for the
report."
           .SetFocus
           Exit Sub
       Else
           strFromDate = Format(.Value, "YYYY-MM-DD")
       End If
   End With

   With Me!txtToDate
       If IsNull(.Value) Then
           MsgBox "Please specify the last PaidThru date for the
report."
           .SetFocus
           Exit Sub
       Else
           strToDate = Format(.Value, "YYYY-MM-DD")
       End If
   End With

   ' Build the SQL query.
   strSQL = _
       "exec  sp_NBAA_RenewRate '" & strFromDate & _
       "','" & strToDate & "'"

   Set db = CurrentDb()
   Set qd = CurrentDb.QueryDefs("qry_update1_UD_Renewals")
       qd.SQL = strSQL
       qd.Connect =
"ODBC;DSN=IMIS_NBAA_Prod;Database=DB_name;Uid=XXX;Pwd=****;"
              qd.ODBCTimeout = 300
       qd.ReturnsRecords = False

   DoCmd.OpenQuery "qry_update1_UD_Renewals"
   'DoCmd.RunSQL strSQL