У меня есть примерно следующий программный блок
Процедура ПоискПТФ()
Расх = СоздатьОбъект("Документ.РасходнаяНакладная");
ТЗ = СоздатьОбъект ("ТаблицаЗначений");
Телефон_=СокрЛП(Телефон);
......................................................................
Пока Расх.ПолучитьДокумент()=1 Цикл
Если ((Найти(Расх.Телефон,Телефон_)>0)и(Расх.ПометкаУдаления()=0)) Тогда
.................................................................................
ТЗ.НоваяКолонка("Модель");
ТЗ.НоваяКолонка("СерийныйНомер");
...........................................................................
....................................................................................
Расх.ВыбратьДокументы(НачДата,КонДата);
Если ШД=0 Тогда
Если ДТ=0 Тогда
Пока Расх.ПолучитьДокумент()=1 Цикл
Если ((Найти(Расх.Телефон,Телефон_)>0)и(Расх.ПометкаУдаления()=0)) Тогда
ТЗ.НоваяСтрока();
ТЗ.Модель = Расх.Модель;
ТЗ.СерийныйНомер = Расх.СерийныйНомер;
ТЗ.Телефон = Расх.Телефон;
ТЗ.Контрагент=Расх.Контрагент;
ТЗ.ДопТелефон = Расх.ДопТелефон;
......................................................................................................................
......................................................................................................................
КонецПроцедуры
Затем мне нужно с этих же документов сделать выборку по другому условию. Например
Если ((Найти(Расх.Имя,Имя_)>0)и(Расх.ПометкаУдаления()=0)) Тогда
И далее все то же самое.
И так 4 раза по разным условиям.
Сейчас я пишу 4 почти одинаковых процедуры, которые идут одна за другой в модуле отчета.
Вопрос.
Как сделать так, чтобы процедура была одна, а программно менялись только условия в зависимости от нажатой кнопки в диалоге? Или, хотя бы, как сделать так, чтобы таблица значений и другие созданные объекты в одной процедуре, были видны в других процедурах? В пределах модуля.
Или это невозможно?
Спасибо!