Help! Why won't this just print ONE record by TransID?

[Lumpierbritches]

In Access 97 the stWhere works great, but in A2000, it won't stop. It wants to
print ALL records, not just the current Transaction. HELP Please!

Private Sub cmdPrintTop_Cli ck()
On Error GoTo Err_cmdPrintTop _Click

Dim stDocName As String
Dim stWhere As String

stDocName = "CheckPrint Top"
stWhere = "TransID=" & Me!TransID
DoCmd.OpenRepor t stDocName, acNormal, , stWhere

Exit_cmdPrintTo p_Click:
Exit Sub

Err_cmdPrintTop _Click:
MsgBox Err.Description
Resume Exit_cmdPrintTo p_Click

End Sub