Ошибка инициализации модуля: Документ.ОказаниеУслуг.МодульОбъекта по причине:
Помогите пожалуйста
При создании "оказание услуг" в "оказание услуг" выдает ошибку:
Ошибка инициализации модуля: Документ.ОказаниеУслуг.МодульОбъекта
по причине:
{Документ.ОказаниеУслуг.МодульОбъекта(16,26)}: Пропущен символ '"' (двойная кавычка)
| КАК ВидНоменклатуры,"";<<?>>
{Документ.ОказаниеУслуг.МодульОбъекта(16,26)}: Ожидается символ ';'
| КАК ВидНоменклатуры,"";<<?>>
{Документ.ОказаниеУслуг.МодульОбъекта(17,48)}: Неопознанный оператор
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств<<?>>,
{Документ.ОказаниеУслуг.МодульОбъекта(31,36)}: Ожидается идентификатор
ОказаниеУслугиПереченьНоменклатуры.<<?>>НаборСвойств";
{Документ.ОказаниеУслуг.МодульОбъекта(31,49)}: Неопознанный оператор
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств"<<?>>;
{Документ.ОказаниеУслуг.МодульОбъекта(40,26)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
| НоменклатураДокумента."<<?>>ВидНоменклатуры";
{Документ.ОказаниеУслуг.МодульОбъекта(75,38)}: Ошибка в выражении
РезультатЗапроса = Запрос2.Выполнить(<<?>>);
{Документ.ОказаниеУслуг.МодульОбъекта(139,29)}: Ожидается ключевое слово 'КонецЕсли' ('EndIf')
| ОстаткиМатериаловОстатки."<<?>>Материал",
{Документ.ОказаниеУслуг.МодульОбъекта(164,12)}: Обнаружено логическое завершение исходного текста модуля
КонецЦикла;<<?>>
При создании "оказание услуг" в "оказание услуг" выдает ошибку:
Ошибка инициализации модуля: Документ.ОказаниеУслуг.МодульОбъекта
по причине:
{Документ.ОказаниеУслуг.МодульОбъекта(16,26)}: Пропущен символ '"' (двойная кавычка)
| КАК ВидНоменклатуры,"";<<?>>
{Документ.ОказаниеУслуг.МодульОбъекта(16,26)}: Ожидается символ ';'
| КАК ВидНоменклатуры,"";<<?>>
{Документ.ОказаниеУслуг.МодульОбъекта(17,48)}: Неопознанный оператор
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств<<?>>,
{Документ.ОказаниеУслуг.МодульОбъекта(31,36)}: Ожидается идентификатор
ОказаниеУслугиПереченьНоменклатуры.<<?>>НаборСвойств";
{Документ.ОказаниеУслуг.МодульОбъекта(31,49)}: Неопознанный оператор
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств"<<?>>;
{Документ.ОказаниеУслуг.МодульОбъекта(40,26)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
| НоменклатураДокумента."<<?>>ВидНоменклатуры";
{Документ.ОказаниеУслуг.МодульОбъекта(75,38)}: Ошибка в выражении
РезультатЗапроса = Запрос2.Выполнить(<<?>>);
{Документ.ОказаниеУслуг.МодульОбъекта(139,29)}: Ожидается ключевое слово 'КонецЕсли' ('EndIf')
| ОстаткиМатериаловОстатки."<<?>>Материал",
{Документ.ОказаниеУслуг.МодульОбъекта(164,12)}: Обнаружено логическое завершение исходного текста модуля
КонецЦикла;<<?>>
#Область НоменклатураДокумента
Запрос = Новый Запрос;
// Укажем, какой менеджер временных таблиц использует этот запрос
Запрос.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос.Текст =
"ВЫБРАТЬ
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры
| КАК ВидНоменклатуры,
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Количество)
| КАК КоличествоВДокументе,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.ОказаниеУслуги.ПереченьНоменклатуры
| КАК ОказаниеУслугиПереченьНоменклатуры
|ГДЕ
| ОказаниеУслугиПереченьНоменклатуры.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры";
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств";
Запрос.УстановитьПараметр("Ссылка", Ссылка);
РезультатЗапроса = Запрос.Выполнить();
#КонецОбласти
ПоказатьОтветы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1) пропущен символ продолжения строки. Нужно так:
Запрос.Текст =
"ВЫБРАТЬ
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры
| КАК ВидНоменклатуры,
| ОказаниеУслугиПереченьНоменклатуры.НаборСвойств,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Количество)
| КАК КоличествоВДокументе,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.ОказаниеУслуги.ПереченьНоменклатуры
| КАК ОказаниеУслугиПереченьНоменклатуры
|ГДЕ
| ОказаниеУслугиПереченьНоменклатуры.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры";
Показать
(2)Ошибка инициализации модуля: Документ.ОказаниеУслуг.МодульОбъекта
по причине:
{Документ.ОказаниеУслуг.МодульОбъекта(31,36)}: Ожидается идентификатор
ОказаниеУслугиПереченьНоменклатуры.<<?>>НаборСвойств";
{Документ.ОказаниеУслуг.МодульОбъекта(31,49)}: Неопознанный оператор
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств"<<?>>;
{Документ.ОказаниеУслуг.МодульОбъекта(40,26)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
| НоменклатураДокумента."<<?>>ВидНоменклатуры";
{Документ.ОказаниеУслуг.МодульОбъекта(75,38)}: Ошибка в выражении
РезультатЗапроса = Запрос2.Выполнить(<<?>>);
{Документ.ОказаниеУслуг.МодульОбъекта(139,29)}: Ожидается ключевое слово 'КонецЕсли' ('EndIf')
| ОстаткиМатериаловОстатки."<<?>>Материал",
{Документ.ОказаниеУслуг.МодульОбъекта(164,12)}: Обнаружено логическое завершение исходного текста модуля
КонецЦикла;<<?>>
по причине:
{Документ.ОказаниеУслуг.МодульОбъекта(31,36)}: Ожидается идентификатор
ОказаниеУслугиПереченьНоменклатуры.<<?>>НаборСвойств";
{Документ.ОказаниеУслуг.МодульОбъекта(31,49)}: Неопознанный оператор
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств"<<?>>;
{Документ.ОказаниеУслуг.МодульОбъекта(40,26)}: Ожидается ключевое слово 'КонецПроцедуры' ('EndProcedure')
| НоменклатураДокумента."<<?>>ВидНоменклатуры";
{Документ.ОказаниеУслуг.МодульОбъекта(75,38)}: Ошибка в выражении
РезультатЗапроса = Запрос2.Выполнить(<<?>>);
{Документ.ОказаниеУслуг.МодульОбъекта(139,29)}: Ожидается ключевое слово 'КонецЕсли' ('EndIf')
| ОстаткиМатериаловОстатки."<<?>>Материал",
{Документ.ОказаниеУслуг.МодульОбъекта(164,12)}: Обнаружено логическое завершение исходного текста модуля
КонецЦикла;<<?>>
#Область НоменклатураДокумента
Запрос = Новый Запрос;
// Укажем, какой менеджер временных таблиц использует этот запрос
Запрос.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос.Текст =
"ВЫБРАТЬ
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры
| КАК ВидНоменклатуры,
| ОказаниеУслугиПереченьНоменклатуры.НаборСвойств,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Количество)
| КАК КоличествоВДокументе,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.ОказаниеУслуги.ПереченьНоменклатуры
| КАК ОказаниеУслугиПереченьНоменклатуры
|ГДЕ
| ОказаниеУслугиПереченьНоменклатуры.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры";
ОказаниеУслугиПереченьНоменклатуры.НаборСвойств";
Запрос.УстановитьПараметр("Ссылка", Ссылка);
РезультатЗапроса = Запрос.Выполнить();
#КонецОбласти
Показать
Нашла ответ
Процедура ОбработкаПроведения(Отказ, Режим)
Движения.ОстаткиМатериалов.Записывать = Истина;
Движения.СтоимостьМатериалов.Записывать = Истина;
Движения.Продажи.Записывать = Истина;
// Создать менеджер временных таблиц
МенеджерВТ = Новый МенеджерВременныхТаблиц;
#Область НоменклатураДокумента
Запрос = Новый Запрос;
// Укажем, какой менеджер временных таблиц использует этот запрос
Запрос.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос.Текст =
"ВЫБРАТЬ
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры
| КАК ВидНоменклатуры,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Количество)
| КАК КоличествоВДокументе,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.ОказаниеУслуги.ПереченьНоменклатуры
| КАК ОказаниеУслугиПереченьНоменклатуры
|ГДЕ
| ОказаниеУслугиПереченьНоменклатуры.Ссылка = &Ссылка
| СГРУППИРОВАТЬ ПО
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры";
Запрос.УстановитьПараметр("Ссылка", Ссылка);
РезультатЗапроса = Запрос.Выполнить();
#КонецОбласти
#Область ДвиженияДокумента
Запрос2 = Новый Запрос;
Запрос2.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос2.Текст = "ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура,
| НоменклатураДокумента.ВидНоменклатуры,
| НоменклатураДокумента.КоличествоВДокументе,
| НоменклатураДокумента.СуммаВДокументе,
| ЕСТЬNULL(СтоимостьМатериаловОстатки.СтоимостьОстаток, 0) КАК Стоимость,
| ЕСТЬNULL(ОстаткиМатериаловОстатки.КоличествоОстаток, 0) КАК Количество
|ИЗ
| НоменклатураДокумента КАК НоменклатураДокумента
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.СтоимостьМатериалов.Остатки(
| ,
| Материал В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента))
| КАК СтоимостьМатериаловОстатки
| ПО НоменклатураДокумента.Номенклатура =
| СтоимостьМатериаловОстатки.Материал
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиМатериалов.Остатки(
| ,
| Материал В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента))
| КАК ОстаткиМатериаловОстатки
| ПО НоменклатураДокумента.Номенклатура =
| ОстаткиМатериаловОстатки.Материал";
// Установим необходимость блокировки данных в регистрах СтоимостьМатериалов
// и ОстаткиМатериалов
Движения.СтоимостьМатериалов.БлокироватьДляИзменения = Истина;
Движения.ОстаткиМатериалов.БлокироватьДляИзменения = Истина;
// Запишем пустые наборы записей, чтобы читать остатки без учета данных в документе
Движения.СтоимостьМатериалов.Записать();
Движения.ОстаткиМатериалов.Записать();
РезультатЗапроса = Запрос2.Выполнить();
// ТЗ = РезультатЗапроса.Выгрузить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если ВыборкаДетальныеЗаписи.Количество = 0 Тогда
СтоимостьМатериала = 0;
Иначе
СтоимостьМатериала = ВыборкаДетальныеЗаписи.Стоимость
/ ВыборкаДетальныеЗаписи.Количество;
КонецЕсли;
Если ВыборкаДетальныеЗаписи.ВидНоменклатуры =
Перечисления.ВидыНоменклатуры.Материал Тогда
// Регистр ОстаткиМатериалов Расход
Движение = Движения.ОстаткиМатериалов.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Материал = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Склад = Склад;
Движение.Количество = ВыборкаДетальныеЗаписи.КоличествоВДокументе;
// Регистр СтоимостьМатериалов Расход
Движение = Движения.СтоимостьМатериалов.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Материал = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Стоимость = ВыборкаДетальныеЗаписи.КоличествоВДокументе
* СтоимостьМатериала;
КонецЕсли;
// Регистр Продажи
Движение = Движения.Продажи.Добавить();
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Клиент = Клиент;
Движение.Мастер = Мастер;
Движение.Количество = ВыборкаДетальныеЗаписи.КоличествоВДокументе;
Движение.Выручка = ВыборкаДетальныеЗаписи.СуммаВДокументе;
Движение.Стоимость = СтоимостьМатериала *
ВыборкаДетальныеЗаписи.КоличествоВДокументе;
КонецЦикла;
Движения.Записать();
#КонецОбласти
#Область КонтрольОстатков
Если Режим = РежимПроведенияДокумента.Оперативный Тогда
// Проверить отрицательные остатки
Запрос3 = Новый Запрос;
Запрос3.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос3.Текст = "ВЫБРАТЬ
| ОстаткиМатериаловОстатки.Материал,
| ОстаткиМатериаловОстатки.КоличествоОстаток
|ИЗ
| РегистрНакопления.ОстаткиМатериалов.Остатки(
| ,
| Материал В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента)
| И Склад = &Склад) КАК ОстаткиМатериаловОстатки
|ГДЕ
| ОстаткиМатериаловОстатки.КоличествоОстаток < 0";
Запрос3.УстановитьПараметр("Склад", Склад);
РезультатЗапроса = Запрос3.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Сообщение = Новый СообщениеПользователю();
Сообщение.Текст = "Не хватает " + Строка(-
ВыборкаДетальныеЗаписи.КоличествоОстаток) +
" единиц материала """ + ВыборкаДетальныеЗаписи.Материал + """";
Сообщение.Сообщить();
Отказ = Истина;
КонецЦикла;
КонецЕсли;
#КонецОбласти
КонецПроцедуры
Показать
Здравствуйте,
а у меня ошибка такая:
Ошибка инициализации модуля: Документ.ОказаниеУслуг.МодульОбъекта
по причине:
{Документ.ОказаниеУслуг.МодульОбъекта(36,11)}: Процедура или функция с указанным именем уже определена (ОбработкаПроведения)
Процедура <<?>>ОбработкаПроведения(Отказ, Режим)
[ОшибкаКомпиляцииВстроенногоЯзыка]
Подскажите как можно исправть
а у меня ошибка такая:
Ошибка инициализации модуля: Документ.ОказаниеУслуг.МодульОбъекта
по причине:
{Документ.ОказаниеУслуг.МодульОбъекта(36,11)}: Процедура или функция с указанным именем уже определена (ОбработкаПроведения)
Процедура <<?>>ОбработкаПроведения(Отказ, Режим)
[ОшибкаКомпиляцииВстроенногоЯзыка]
Подскажите как можно исправть
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот