Попробуй так, на нажатие кнопки или что там у тебя:
Report_Rtovar.RecordSource = "SELECT* FROM ZAKAZ"
где Rtovar - имя отчета;
ZAKAZ - имя таблицы.
Если вставить выполнение под условие то:
if a=1 then
Report_Rtovar.RecordSource = "SELECT* FROM ZAKAZ"
else
Report_Rtovar.RecordSource = "SELECT* FROM POZICII"
end if
Удачи!!!