>Hi Igor,
>Thanx for the help -
>Report NoData was exactly what I needed to contain the code:
>Dim TEMPFLAG
>TEMPFLAG = MsgBox("No BlueCard Records!", 0, "All Records already processed.")
>Form!MAIN!cmdExportBC.Enabled = 0
>End
>
>and my Click became much shorter and sweeter...
>...
> DoCmd.OpenReport stDocName
>. . .
>Works like a charm - thanx again.
>Ed B

Igor? Maybe you intended to reply to him, or my name was so hard to spell that Igor seemed easier on the keyboard. :)