Добрый день!
После обновления программы (Зарплата и управление персоналом КОРП, редакция 3.1 (3.1.23.165) ) перестали проводится документы Начисление зарплаты и взносов.
Ошибка при выполнении обработчика — ‘ОбработкаПроведения’
по причине:
Значение индекса выходит за границы диапазона
{ОбщийМодуль.УчетСреднегоЗаработка.Модуль(5222)}: Начисления.Удалить(ИсключаемаяСтрока);
{ОбщийМодуль.УчетСреднегоЗаработка.Модуль(3405)}: РаспределитьВТНачисленияПоБазе(МенеджерВременныхТаблиц, Регистратор, ИсключатьВПериодКомандировок);
{ОбщийМодуль.УчетСреднегоЗаработка.Модуль(3009)}: ЗарегистрироватьНачисленияДляРасчетаОбщегоСреднегоЗаработка(Движения, Отказ, МенеджерВременныхТаблиц, ИсключатьВПериодКомандировок, ЗаписыватьДвижения);
{ОбщийМодуль.УчетСреднегоЗаработка.Модуль(237)}: ЗарегистрироватьДанныеОбщегоСреднегоЗаработка(Движения, Отказ, МенеджерВременныхТаблиц, ЗаписыватьДвижения);
{Документ.НачислениеЗарплаты.МодульМенеджера(265)}: УчетСреднегоЗаработка.ЗарегистрироватьДанныеСреднегоЗаработка(Движения, Отказ, ДанныеДляПроведения.НачисленияДляСреднегоЗаработка);
{Документ.НачислениеЗарплаты.МодульОбъекта(124)}: Документы.НачислениеЗарплаты.ПровестиПоУчетам(Ссылка, РежимПроведения, Отказ, Неопределено, Движения, ЭтотОбъект, ДополнительныеСвойства);
по причине:
Значение индекса выходит за границы диапазона
В чем может быть причина?
13.02.23 — 16:52
Прошу помочь решить проблему. После редактирования кода в модулях объекта документов Приходная накладная и Оказание услуг, при проведении документа Оказание услуг появляется следующая ошибка:
Ошибка при выполнении обработчика — ‘ОбработкаПроведения’
по причине:
Ошибка при вызове метода контекста (Выполнить)
{Документ.ОказаниеУслуги.МодульОбъекта(38)}:РезультатЗапроса = Запрос.Выполнить();
[ОшибкаВоВремяВыполненияВстроенногоЯзыка]
по причине:
{(18, 5)}: Ожидается выражение «ВЫБРАТЬ»
<<?>>ОказаниеУслугиПереченьНоменклатуры.НаборСвойств
Код модуля объекта Оказание услуг:
Процедура ОбработкаПроведения(Отказ, Режим)
Движения.ОстаткиМатериалов.Записывать = Истина;
Движения.СтоимостьМатериалов.Записывать = Истина;
Движения.Продажи.Записывать = Истина;
// Создать менеджер временных таблиц
МенеджерВТ = Новый МенеджерВременныхТаблиц;
#Область НоменклатураДокумента
Запрос = Новый Запрос;
// Укажем, какой менеджер временных таблиц использует этот запрос
Запрос.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос.Текст =
«ВЫБРАТЬ
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры
| КАК ВидНоменклатуры,
| ОказаниеУслугиПереченьНоменклатуры.НаборСвойств,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Количество)
| КАК КоличествоВДокументе,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.ОказаниеУслуги.ПереченьНоменклатуры
| КАК ОказаниеУслугиПереченьНоменклатуры
|ГДЕ
| ОказаниеУслугиПереченьНоменклатуры.Ссылка = &Ссылка
|СГРУППИРОВАТЬ ПО
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры;
| ОказаниеУслугиПереченьНоменклатуры.НаборСвойств»;
Запрос.УстановитьПараметр(«Ссылка», Ссылка);
РезультатЗапроса = Запрос.Выполнить();
#КонецОбласти
#Область ДвиженияДокумента
Запрос2 = Новый Запрос;
Запрос2.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос2.Текст = «ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура,
| НоменклатураДокумента.ВидНоменклатуры,
| НоменклатураДокумента.НаборСвойств,
| НоменклатураДокумента.КоличествоВДокументе,
| НоменклатураДокумента.СуммаВДокументе,
| ЕСТЬNULL(СтоимостьМатериаловОстатки.СтоимостьОстаток, 0) КАК Стоимость,
| ЕСТЬNULL(ОстаткиМатериаловОстатки.КоличествоОстаток, 0) КАК Количество
|ИЗ
| НоменклатураДокумента КАК НоменклатураДокумента
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.СтоимостьМатериалов.Остатки(
| ,
| Материал В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента))
| КАК СтоимостьМатериаловОстатки
| ПО НоменклатураДокумента.Номенклатура =
| СтоимостьМатериаловОстатки.Материал
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиМатериалов.Остатки(
| ,
| Материал В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента))
| КАК ОстаткиМатериаловОстатки
| ПО НоменклатураДокумента.Номенклатура =
| ОстаткиМатериаловОстатки.Материал»;
// Установим необходимость блокировки данных в регистрах СтоимостьМатериалов
// и ОстаткиМатериалов
Движения.СтоимостьМатериалов.БлокироватьДляИзменения = Истина;
Движения.ОстаткиМатериалов.БлокироватьДляИзменения = Истина;
// Запишем пустые наборы записей, чтобы читать остатки без учета данных в документе
Движения.СтоимостьМатериалов.Записать();
Движения.ОстаткиМатериалов.Записать();
РезультатЗапроса = Запрос2.Выполнить();
// ТЗ = РезультатЗапроса.Выгрузить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если ВыборкаДетальныеЗаписи.Количество = 0 Тогда
СтоимостьМатериала = 0;
Иначе
СтоимостьМатериала = ВыборкаДетальныеЗаписи.Стоимость
/ ВыборкаДетальныеЗаписи.Количество;
КонецЕсли;
Если ВыборкаДетальныеЗаписи.ВидНоменклатуры =
Перечисления.ВидыНоменклатуры.Материал Тогда
// Регистр ОстаткиМатериалов Расход
Движение = Движения.ОстаткиМатериалов.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Материал = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.НаборСвойств = ВыборкаДетальныеЗаписи.НаборСвойств;
Движение.Склад = Склад;
Движение.Количество = ВыборкаДетальныеЗаписи.КоличествоВДокументе;
// Регистр СтоимостьМатериалов Расход
Движение = Движения.СтоимостьМатериалов.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Материал = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Стоимость = ВыборкаДетальныеЗаписи.КоличествоВДокументе
* СтоимостьМатериала;
КонецЕсли;
// Регистр Продажи
Движение = Движения.Продажи.Добавить();
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Клиент = Клиент;
Движение.Мастер = Мастер;
Движение.Количество = ВыборкаДетальныеЗаписи.КоличествоВДокументе;
Движение.Выручка = ВыборкаДетальныеЗаписи.СуммаВДокументе;
Движение.Стоимость = СтоимостьМатериала *
ВыборкаДетальныеЗаписи.КоличествоВДокументе;
КонецЦикла;
Движения.Записать();
#КонецОбласти
#Область КонтрольОстатков
Если Режим = РежимПроведенияДокумента.Оперативный Тогда
// Проверить отрицательные остатки
Запрос3 = Новый Запрос;
Запрос3.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос3.Текст = «ВЫБРАТЬ
| ОстаткиМатериаловОстатки.Материал,
| ОстаткиМатериаловОстатки.НаборСвойств,
| ОстаткиМатериаловОстатки.КоличествоОстаток
|ИЗ
| РегистрНакопления.ОстаткиМатериалов.Остатки( , (Материал, НаборСвойств) В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура,
| НоменклатураДокумента.НаборСвойств
| ИЗ
| НоменклатураДокумента) И Склад = &Склад)
| КАК ОстаткиМатериаловОстатки
|ГДЕ
| ОстаткиМатериаловОстатки.КоличествоОстаток < 0″;
Запрос3.УстановитьПараметр(«Склад», Склад);
РезультатЗапроса = Запрос3.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Сообщение = Новый СообщениеПользователю();
Сообщение.Текст = «Не хватает » + Строка(- ВыборкаДетальныеЗаписи.КоличествоОстаток) +
» единиц материала «»» + ВыборкаДетальныеЗаписи.Материал + «»»» +
» из набора свойств «»» + ВыборкаДетальныеЗаписи.НаборСвойств + «»»»;
Сообщение.Сообщить();
Отказ = Истина;
КонецЦикла;
КонецЕсли;
#КонецОбласти
КонецПроцедуры
1 — 13.02.23 — 16:58
(0) Тебе написали, что реквизита НаборСвойств там где ты его ищешь нет
Проверь конструктором запроса (сам сделай запрос, а не копируй из учебника)
2 — 13.02.23 — 17:00
(0) В ТЧ ПереченьНоменклатуры есть у вас реквизит НаборСвойств? Какой тип реквизита?
3 — 13.02.23 — 17:05
Есть, тип реквизита СправочникСсылка.ВариантыНоменклатуры
4 — 13.02.23 — 17:12
(3) В конструктор запроса заходит?
5 — 13.02.23 — 17:18
Нет
6 — 13.02.23 — 17:21
В 18 строке точка с запятой вместо запятой
7 — 13.02.23 — 17:22
(6) +1
8 — 13.02.23 — 17:27
(6) Не помогло
9 — 13.02.23 — 17:39
(8) Покажите как исправили
10 — 13.02.23 — 17:40
(9) Запрос.Текст =
«ВЫБРАТЬ
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура;
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры
| КАК ВидНоменклатуры,
| ОказаниеУслугиПереченьНоменклатуры.НаборСвойств,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Количество)
| КАК КоличествоВДокументе,
| СУММА(ОказаниеУслугиПереченьНоменклатуры.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.ОказаниеУслуги.ПереченьНоменклатуры
| КАК ОказаниеУслугиПереченьНоменклатуры
|ГДЕ
| ОказаниеУслугиПереченьНоменклатуры.Ссылка = &Ссылка
|СГРУППИРОВАТЬ ПО
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура,
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры;
| ОказаниеУслугиПереченьНоменклатуры.НаборСвойств»;
11 — 13.02.23 — 17:40
(10) Ну и где вы ; убрали??
| ОказаниеУслугиПереченьНоменклатуры.Номенклатура.ВидНоменклатуры;
| ОказаниеУслугиПереченьНоменклатуры.НаборСвойств»;
12 — 13.02.23 — 17:41
Вам же все разжевали в (6) , и 1ска вам даже ругнулась на 18 строчку в модуле, где ошибка. Жмякаете Ctrl+G и вбиваете номер строчки. Будет видно где косяк.
13 — 13.02.23 — 17:45
(12) а ты посмотри внимательнее. Неправильно разжевали!)) ТС все сделал согласно инструкции: в 18 строке МОДУЛЯ поменял запятую на точку с запятой.
zane
14 — 13.02.23 — 17:48
Помогло, спасибо. (12) я не знал, что 18 строка это имеется ввиду строка запроса
Ошибка при выполнении обработчика — ‘ОбработкаПроведения’
Столкнулись с такой проблемой при проведении ЗП в бухгалтерии.
Ошибка при выполнении обработчика — ‘ОбработкаПроведения’
по причине:
{ОбщийМодуль.УчетНДФЛ.Модуль(1569)}: Ошибка при вызове метода контекста (Записать)
Движения.РасчетыНалогоплательщиковСБюджетомПоНДФЛ.Записать();
по причине:
Запись не верна! Значение поля «Дата получения дохода» не может быть пустым! (Регистр накопления: Расчеты налогоплательщиков с бюджетом по НДФЛ; Номер строки: 1)
Решение: нужно перепровести начисления за предыдущие месяцы. Как мы поняли это просто глюк, 1с не видит проведенные ранее доки.
Загрузка…
Ошибка при выполнении обработчика — ‘ОбработкаПроведения’
по причине:
{Документ.РасходнаяНакладная.МодульОбъекта(68)}: Ошибка при вызове метода контекста (Выполнить)
РезультатЗапроса = Запрос2.Выполнить();
по причине:
{(17, 28)}: Поле не найдено «НоменклатураДокумента.Номенклатура»
ПО НоменклатураДокумента.<<?>>Номенклатура = СтоимостьТоваровОстатки.Номенклатура
Процедура ОбработкаПроведения(Отказ, Режим)
Движения.ОстаткиТоваров.Записывать = Истина;
Движения.СтоимостьТоваров.Записывать = Истина;
Движения.Продажи.Записывать = Истина;
//Менеджер временных таблиц
МенеджерВТ = Новый МенеджерВременныхТаблиц;
Запрос = Новый Запрос;
Запрос.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос.Текст =
«ВЫБРАТЬ
| РасходнаяНакладнаяТовары.Товар,
| РасходнаяНакладнаяТовары.Товар.ВидНоменклатуры КАК ВидНоменклатуры,
| СУММА(РасходнаяНакладнаяТовары.Количество) КАК КоличествоВДокументе,
| СУММА(РасходнаяНакладнаяТовары.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.РасходнаяНакладная.Товары КАК РасходнаяНакладнаяТовары
|ГДЕ
| РасходнаяНакладнаяТовары.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| РасходнаяНакладнаяТовары.Товар,
| РасходнаяНакладнаяТовары.Товар.ВидНоменклатуры»;
Запрос.УстановитьПараметр(«Ссылка», Ссылка);
РезультатЗапроса = Запрос.Выполнить();
Запрос2 = Новый Запрос;
Запрос2.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос2.Текст =
«ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура,
| НоменклатураДокумента.ВидНоменклатуры,
| НоменклатураДокумента.КоличествоВДокументе,
| НоменклатураДокумента.СуммаВДокументе,
| ЕСТЬNULL(СтоимостьТоваровОстатки.СтоимостьОстаток, 0) КАК Стоимость,
| ЕСТЬNULL(ОстаткиТоваровОстатки.КоличествоОстаток, 0) КАК Количество
|ИЗ
| НоменклатураДокумента КАК НоменклатураДокумента
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.СтоимостьТоваров.Остатки(
| ,
| Номенклатура В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента)) КАК СтоимостьТоваровОстатки
| ПО НоменклатураДокумента.Номенклатура = СтоимостьТоваровОстатки.Номенклатура
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиТоваров.Остатки(
| ,
| Номенклатура В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента)) КАК ОстаткиТоваровОстатки
| ПО НоменклатураДокумента.Номенклатура = ОстаткиТоваровОстатки.Номенклатура»;
Движения.СтоимостьТоваров.Записать();
Движения.ОстаткиТоваров.Записать();
РезультатЗапроса = Запрос2.Выполнить();
//ТЗ = РезультатЗапроса.Выгрузить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если ВыборкаДетальныеЗаписи.Количество = 0 Тогда
СтоимостьТоваров = 0;
Иначе
СтоимостьТоваров = ВыборкаДетальныеЗаписи.Стоимость / ВыборкаДетальныеЗаписи.Количество;
КонецЕсли;
Если ВыборкаДетальныеЗаписи.ВидНоменклатуры = Перечисления.ВидНоменклатуры.Товар Тогда
Движение = Движения.ОстаткиТоваров.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Склад = Склад;
Движение.Количество = ВыборкаДетальныеЗаписи.Количество;
Движение = Движения.СтоимостьТоваров.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Стоимость = ВыборкаДетальныеЗаписи.СтоимостьТовара * ВыборкаДетальныеЗаписи.Количество;
КонецЕсли;
// Регистр Продажи
Движение = Движения.Продажи.Добавить();
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Товар;
Движение.Количество = ВыборкаДетальныеЗаписи.КоличествоВДокументе;
Движение.Сумма = ВыборкаДетальныеЗаписи.СуммаВДокументе;
Движение.Стоимость = ВыборкаДетальныеЗаписи.СтоимостьТовара * ВыборкаДетальныеЗаписи.КоличествоВДокументе;
КонецЦикла;
Движения.Записать();
Если Режим = РежимПроведенияДокумента.Оперативный Тогда
// Проверить отрицательные остатки
Запрос3 = Новый Запрос;
Запрос3.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос3.Текст = «ВЫБРАТЬ
| ОстаткиТоваровОстатки.Номенклатура,
| ОстаткиТоваровОстатки.КоличествоОстаток
|ИЗ
| РегистрНакопления.ОстаткиТоваров.Остатки(
| ,
| Номенклатура В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента)
| И Склад = &Склад) КАК ОстаткиТоваровОстатки
|ГДЕ
| ОстаткиТоваровОстатки.КоличествоОстаток < &КоличествоОстаток»;
Запрос3.УстановитьПараметр(«Склад», Склад);
РезультатЗапроса = Запрос3.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Сообщение = Новый СообщениеПользователю();
Сообщение.Текст = «Не хватает » + Строка(- ВыборкаДетальныеЗаписи.КоличествоОстаток) + » единиц товара «»» + ВыборкаДетальныеЗаписи.Номенклатура + «»»»;
Сообщение.Сообщить();
Отказ = Истина;
КонецЦикла;
КонецЕсли;
КонецПроцедуры
Не проводится документ. Как решить проблему?
Ошибка при выполнении обработчика — ‘ОбработкаПроведения’
по причине:
: Ошибка при вызове метода контекста (Выполнить)
РезультатЗапроса = Запрос2.Выполнить();
по причине:
: Поле не найдено «НоменклатураДокумента.Номенклатура»
ПО НоменклатураДокумента.<<?>>Номенклатура = СтоимостьТоваровОстатки.Номенклатура
Процедура ОбработкаПроведения(Отказ, Режим)
Движения.ОстаткиТоваров.Записывать = Истина;
Движения.СтоимостьТоваров.Записывать = Истина;
Движения.Продажи.Записывать = Истина;
//Менеджер временных таблиц
МенеджерВТ = Новый МенеджерВременныхТаблиц;
Запрос = Новый Запрос;
Запрос.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос.Текст =
«ВЫБРАТЬ
| РасходнаяНакладнаяТовары.Товар,
| РасходнаяНакладнаяТовары.Товар.ВидНоменклатуры КАК ВидНоменклатуры,
| СУММА(РасходнаяНакладнаяТовары.Количество) КАК КоличествоВДокументе,
| СУММА(РасходнаяНакладнаяТовары.Сумма) КАК СуммаВДокументе
|ПОМЕСТИТЬ НоменклатураДокумента
|ИЗ
| Документ.РасходнаяНакладная.Товары КАК РасходнаяНакладнаяТовары
|ГДЕ
| РасходнаяНакладнаяТовары.Ссылка = &Ссылка
|
|СГРУППИРОВАТЬ ПО
| РасходнаяНакладнаяТовары.Товар,
| РасходнаяНакладнаяТовары.Товар.ВидНоменклатуры»;
Запрос.УстановитьПараметр(«Ссылка», Ссылка);
РезультатЗапроса = Запрос.Выполнить();
Запрос2 = Новый Запрос;
Запрос2.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос2.Текст =
«ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура,
| НоменклатураДокумента.ВидНоменклатуры,
| НоменклатураДокумента.КоличествоВДокументе,
| НоменклатураДокумента.СуммаВДокументе,
| ЕСТЬNULL(СтоимостьТоваровОстатки.СтоимостьОстаток, 0) КАК Стоимость,
| ЕСТЬNULL(ОстаткиТоваровОстатки.КоличествоОстаток, 0) КАК Количество
|ИЗ
| НоменклатураДокумента КАК НоменклатураДокумента
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.СтоимостьТоваров.Остатки(
| ,
| Номенклатура В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента)) КАК СтоимостьТоваровОстатки
| ПО НоменклатураДокумента.Номенклатура = СтоимостьТоваровОстатки.Номенклатура
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиТоваров.Остатки(
| ,
| Номенклатура В
| (ВЫБРАТЬ
| НоменклатураДокумента.Номенклатура
| ИЗ
| НоменклатураДокумента)) КАК ОстаткиТоваровОстатки
| ПО НоменклатураДокумента.Номенклатура = ОстаткиТоваровОстатки.Номенклатура»;
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Если ВыборкаДетальныеЗаписи.Количество = 0 Тогда
СтоимостьТоваров = 0;
Иначе
СтоимостьТоваров = ВыборкаДетальныеЗаписи.Стоимость / ВыборкаДетальныеЗаписи.Количество;
Если ВыборкаДетальныеЗаписи.ВидНоменклатуры = Перечисления.ВидНоменклатуры.Товар Тогда
Движение = Движения.ОстаткиТоваров.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Склад = Склад;
Движение.Количество = ВыборкаДетальныеЗаписи.Количество;
Движение = Движения.СтоимостьТоваров.Добавить();
Движение.ВидДвижения = ВидДвиженияНакопления.Расход;
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Номенклатура;
Движение.Стоимость = ВыборкаДетальныеЗаписи.СтоимостьТовара * ВыборкаДетальныеЗаписи.Количество;
// Регистр Продажи
Движение = Движения.Продажи.Добавить();
Движение.Период = Дата;
Движение.Номенклатура = ВыборкаДетальныеЗаписи.Товар;
Движение.Количество = ВыборкаДетальныеЗаписи.КоличествоВДокументе;
Движение.Сумма = ВыборкаДетальныеЗаписи.СуммаВДокументе;
Движение.Стоимость = ВыборкаДетальныеЗаписи.СтоимостьТовара * ВыборкаДетальныеЗаписи.КоличествоВДокументе;
Если Режим = РежимПроведенияДокумента.Оперативный Тогда
// Проверить отрицательные остатки
Запрос3 = Новый Запрос;
Запрос3.МенеджерВременныхТаблиц = МенеджерВТ;
Запрос3.Текст ;
РезультатЗапроса = Запрос3.Выполнить();
ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать();
Пока ВыборкаДетальныеЗаписи.Следующий() Цикл
Сообщение = Новый СообщениеПользователю();
Сообщение.Текст = «Не хватает » + Строка(- ВыборкаДетальныеЗаписи.КоличествоОстаток) + » единиц товара «»» + ВыборкаДетальныеЗаписи.Номенклатура + «»»»;
Сообщение.Сообщить();
[ Вопрос дня ] Почему не удается провести документ “Реализация товаров и услуг” с заполненным направлением деятельности в 1С:Комплексная автоматизация 2.4?
Изменения типового функционала линейки конфигураций УТ, КА, ERP иногда вызывает всплеск активности в Мастер-группах. Так, изменения функционала использования направлений деятельности в документах в версиях 1С:УТ 11.4.5, 1С:КА 2.4.5, 1С:ERP 2.4.4, привело к появлению однотипных вопросов в рамках Мастер-группы курса Управленческий учет в типовых конфигурациях 1С (КА 2, УТ 11 и 1C:ERP) – Базовый курс.
Вопрос
Работаю в 1С:Комплексная автоматизация 2 (2.4.11.46). У меня не получается провести документ “Реализация товаров и услуг” с заполненным направлением деятельности без создания заказа покупателя. Система выдает ошибку, что в организации не хватает шкафов, стеллажей и т.п., хотя товар есть и он не в резерве. Если в документе не указывать направление деятельности или делать на основании заказа, то он проводится без проблем. Что я делаю не так, где ошибки в настройках?
Без указания направления деятельности мне по заданию не распределить расходы по амортизации пропорционально выручке.
Ответ
В новых релизах программы изменен функционал использования направлений деятельности в документах. Теперь для того, чтобы выполнить продажу с направлением деятельности (НД) у вас должны быть остатки под это направление деятельности. То есть в документе закупки товара в табличной части (ТЧ) “Товары” в колонке “Назначение” нужно указать направление деятельности (или заказ клиента) под которое выполняется закупка.
Для того, чтобы в документе закупки в ТЧ можно было указать “Назначение”, у вас должна быть включена функциональная опция “Обособленное обеспечение заказов” в разделе “НСИ и администрирование” – “Склад и доставка”.
В поступлении “Назначение” наследуется в аналитику учета по номенклатуре, а “Направление деятельности” (на закладке “Дополнительно”) – в аналитику учета по расчетам с партнерами.
Протестируйте качество нашей работы — получите первую консультацию в подарок.
Большинство вопросов на форумах по проблеме «долго проводятся документы», начинаются с перечисления технических характеристик серверов, сетевых параметров и т.д. А поскольку таких вопросов много, а технические характеристики, как правило, более чем солидные, можно сделать вывод, что «железо» здесь не причем. Рассмотрим другие причины долгого проведения документов в 1С.
Работая с одной из первых версий конфигурации УПП, вместе с бухгалтерами, мы ставили эксперимент – засекали время проведения документа «Реализация товаров и услуг». С момента нажатия кнопки до «отвисания» программы проходило больше 40 секунд. Версия программы была серверной, пользователи работали на сервере посредством RDP. Т.е. с технической точки зрения все было нормально. В базе была одна организация, отсутствовали ограничения в правах, и для «чистоты» эксперимента – только один пользователь. Такое время ожидания мы объясняли для себя так: документ проводился сразу в разрезе трех учетов, создавая огромное количество записей не только в регистрах накопления, но и «отмечаясь» в регистрах сведений. Но то была первая версия УПП. Прошло достаточно много времени, и разработчики должны были оптимизировать режим записи и хранения данных в своих учетных системах. С тех пор, однако, проблема в той или иной степени все-таки сохранилась.
Рис.1 Количество возможных движений в УПП 1.1
Рис.2 Количество возможных движений в конфигурации ERP
Рис.3 Количество возможных движений в БП 3.0
Такое количество регистров в первую очередь обусловлено слишком сложным регламентированным учетом. Упрости законодатель требования к учету, отпадет необходимость хранить данные в таком количестве разрезов. Но это лишь часть проблемы.
Избыточность кода
Если вы когда-нибудь использовали конструктор движений для документа в конфигураторе, то видели, как мало кода при этом создается, и как быстро проводится при этом документ. Но в реальности не все так просто. Необходимость ограничения попытки проведения, например, в прошлом периоде, сразу же рождает необходимость дополнить этот код. Как только у 1С появилась возможность вести учет по нескольким организациям, складам и подразделениям, сразу возникла необходимость в ограничении прав доступа различных пользователей к той или иной информации. И как следствие – ограничение прав доступа на уровне записи.
А как реализуется такая возможность? На каждом этапе проверки добавляется новый код. Возможности проведения, полнота заполнения данных, необходимость записывать документ в разных разрезах – вот причина того, что наш код растет как на дрожжах.
Поскольку все системные администраторы при этом руководствуются принципом «Все, что не запрещено – разрешено», разработчикам приходится выстраивать все новые и новые стены. И с нажатием кнопки «Провести и закрыть», проверки и проводки начинают свое долгое движение по лабиринту.
Рис.4 Код, созданный конструктором движений
Рис.5 Начало обработки проведения в Бухгалтерии предприятия 3.0.
Как видим, этот только «подготовка данных» для записи.
Рис.6 Непосредственное формирование движений в БП 3.0
В каждой строке, по сути, присутствует отсылка к глобальным модулям. Эти скачки между модулями также никак не добавляют скорости работы. Можно подумать: «Это же какие-то миллисекунды», – но именно из них в результате складываются десятки секунд ожидания. Скорость – это величина, характеризующаяся быстротой выполнения. В нашем случае, это скорость выполнения кода, а если кода слишком много, то и скорость выполнения невелика.
Какими бы мощными не были бы компьютеры, и как бы быстро они не реагировали на желания пользователя, они не могут научиться мгновенно преодолевать массы программного кода, выстроенного разработчиками. Защита от ошибок и получение максимально точных данных, вынуждают пользователя ожидать действий программы. Поскольку разработчики конфигураций 1С постоянно трудятся над оптимизацией своих решений, которые на сегодня становятся все более популярными в силу разных обстоятельств, можно надеяться на серьезные подвижки в этой области и на то, что проблема «долго проводятся документы» уйдет в прошлое. И да прибудет с нами код.