K
KiR
Ошибка:
Если ПодчДок.ВыбратьПодчиненныеДокументы(,,Запрос.ЗаявкаПокупателя.ТекущийДокумент()) = 1 Тогда
{\\192.168.1.100\D$\KIR\АНУЛИРОВАНИЕ ЗАЯВОК.ERT(42)}: Не выбран документ!
ругается на код
в принципе все работает правильно но очень смущает наличие строки err в табло. проверял отладчиком Заявка.выбран() = 1
Если ПодчДок.ВыбратьПодчиненныеДокументы(,,Запрос.ЗаявкаПокупателя.ТекущийДокумент()) = 1 Тогда
{\\192.168.1.100\D$\KIR\АНУЛИРОВАНИЕ ЗАЯВОК.ERT(42)}: Не выбран документ!
ругается на код
Код:
Запрос = СоздатьОбъект("Запрос");
ЗапросТекст =
"//{{ЗАПРОС(Запрос)
|Период с НачДата по ВыбДата;
|ЗаявкаПокупателя = Документ.ЗаявкаПокупателя.ТекущийДокумент;
|Автор = Документ.ЗаявкаПокупателя.Автор;
|Группировка ЗаявкаПокупателя;
|Условие(Автор = Менеджер);
|"//}}ЗАПРОС
;
Если Запрос.Выполнить(ЗапросТекст) = 0 Тогда
Возврат;
КонецЕсли;
Пока Запрос.Группировка() = 1 Цикл //Заявка.ПолучитьДокумент() = 1 Цикл
Заявка = Запрос.ЗаявкаПокупателя;
//Если (Заявка.Проведен() = 1) И (Заявка.Автор = Менеджер) Тогда
Отгружен = 0;
[b]Если ПодчДок.ВыбратьПодчиненныеДокументы(,,Заявка) = 1 Тогда[/b]