「ストアドのレコードソース レポート」

小川＠アイ・オーシステムと申します。
早速ですが、ストアドのレコードソースの
レポートを作成していて、
下記のようにパラメータをセットしているにも
関わらず、レポートを開く手前でパラメータ入
力ダイアログが表示され、指定したパラメータ
が届いていません。
なぜでしょう。このような記述は不可能なのですか。
ご教授お願いいたします。

Private Sub 印刷cmd_Click()
On Error GoTo Err_印刷cmd_Click
    
    Dim cmd As New ADODB.Command
    Dim rst As New ADODB.Recordset
    
    cmd.ActiveConnection = Cnn
    Cnn.Errors.Clear            
    cmd.CommandText = "usp_請求書発行"
    cmd.CommandType = adCmdStoredProc
    cmd.Parameters.Refresh
    cmd.Parameters(1) = Me!締日
    Set rst = cmd.Execute
    
    Dim stDocName As String
    stDocName = "R_請求書"
    DoCmd.OpenReport stDocName, acNormal
    
    Set cmd = Nothing
    Set rst = Nothing

Exit_印刷cmd_Click:
    Exit Sub

Err_印刷cmd_Click:
    MsgBox Err.Description
    Resume Exit_印刷cmd_Click
    
End Sub


Server：WinNT WS4.0 SP5.0　MSDE（SQL7.0）
Client：Win98SE　Access2000Dev