Another simple way is to apply the exact same filter to the report. eg.
var
r report
endvar
;assuming you've already set up filter in criteria
; load report hidden in design mode
r.load(-reportname-, winstylehidden)
; note: report must be .rsl not delivered
r. -tableframename- .setgenfilter(criteria)
; apply the filter to tableframe object (or other object)
r.run()
r.bringtotop()
hth,
Richie