0
paren777
14.08.13
✎
10:56
|
При формировании печатной формы "Приложение к акту ИНВ-17" возникает ошибка: "Ошибка при вызове метода контекста (Выполнить): {(1, 1)}: Ожидается выражение "ВЫБРАТЬ"
Сделал остановку при ошибке выдает вот, что "Ошибка времени выполнения: {ВнешняяОбработка.ВнешняяФорма_СправкаИНВ17.МодульОбъекта(326)}: Ошибка при вызове метода контеста (Выполнить) в модуле ВнешняяОбработка.ВнешняяФорма_СправкаИНВ17.МодульОбъекта. строка 329.
Вот в этой строке останавливается выполнение программы:
"ТЗЗадолженности = Запрос.Выполнить().Выгрузить();"
Весь код:
"Функция РасшифроватьЗадолженность(Контрагент, СчетРасчетов, Шапка, Дебетовая = Истина)
Запрос = Новый Запрос;
Если Дебетовая Тогда
ТекстОстатка = "СуммаОстатокДт";
Иначе
ТекстОстатка = "СуммаОстатокКт";
КонецЕсли;
Если СчетРасчетов.ВидыСубконто.Количество() = 3 Тогда
Запрос.Текст = "ВЫБРАТЬ
| ХозрасчетныйОстатки.Субконто1 КАК Контрагент,
| ХозрасчетныйОстатки.Субконто2 КАК Договор,
| ХозрасчетныйОстатки.Субконто3 КАК ДокументРасчетов,
| ХозрасчетныйОстатки." + ТекстОстатка + " КАК СуммаОстаток,
| ХозрасчетныйОстатки.СуммаОстаток КАК СуммаОстатокАП
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.Остатки(
| &ДатаЗадолженности,
| Счет В ИЕРАРХИИ (&Счет),
| ,
| Организация = &Организация
| И Субконто1 = &Контрагент) КАК ХозрасчетныйОстатки";
ИначеЕсли СчетРасчетов.ВидыСубконто.Количество() = 2 Тогда
Запрос.Текст = "ВЫБРАТЬ
| ХозрасчетныйОстатки.Субконто1 КАК Контрагент,
| ХозрасчетныйОстатки.Субконто2 КАК Договор,
| ХозрасчетныйОстатки.Субконто2 КАК ДокументРасчетов,
| ХозрасчетныйОстатки." + ТекстОстатка + " КАК СуммаОстаток,
| ХозрасчетныйОстатки.СуммаОстаток КАК СуммаОстатокАП
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.Остатки(
| &ДатаЗадолженности,
| Счет В ИЕРАРХИИ (&Счет),
| ,
| Организация = &Организация
| И Субконто1 = &Контрагент) КАК ХозрасчетныйОстатки";
КонецЕсли;
Запрос.УстановитьПараметр("Контрагент", Контрагент);
Запрос.УстановитьПараметр("Организация", Шапка.Организация);
Запрос.УстановитьПараметр("Счет", СчетРасчетов);
Запрос.УстановитьПараметр("ДатаЗадолженности", КонецДня(Шапка.Дата));
ТЗЗадолженности = Запрос.Выполнить().Выгрузить();
Возврат ТЗЗадолженности;
КонецФункции"
|
|