gifts2017

Поступление на основании отрицательных остатков (с ГТД из реализаций)

Опубликовал Алексей Новиков (novav) в раздел Обработки - Обработка документов

Формирует док ПоступлениеТМЦ на основании отрицательных остатков на определённую дату.

Указываем период , дату расчета остатков, наценку, контрагента.

После выполнения ставим док на день начала периода и проводим

Скачать файлы

Наименование Файл Версия Размер Кол. Скачив.
-
.1246047733 34,00Kb
25.09.09
83
.1246047733 34,00Kb 83 Скачать

См. также

Подписаться Добавить вознаграждение

Комментарии

1. Сергей (Che) Коцюра (CheBurator) 27.06.09 17:48
Складывается впечатление, что автор не знает как работать с агрегатными объектами данных..???
.
Склад=CreateObject("Справочник.Склады");
Склад.НайтиПоНаименованию(Склад1,0);
- при условии что Склад1 - поле ввода с типом Справочник.Склады
???
.
Если Ост.Фирма.Наименование=ВыбФирма.Наименование Тогда
Если Ост.Склад.Наименование=Склад1.Наименование Тогда
- ???
.
Совет автору: замена условия на ппротивоположное позволит избежать многоэтажных конструкций если...
- Если ост.Количество > 0 Тогда Продолжить; КонецЕсли; - парочка замен по такому типу позволит превратить код в линейный и легко читаемый/воспринимаемый...

2. Сергей (Che) Коцюра (CheBurator) 27.06.09 17:49
Если ДокР.Номенклатура.Код = Номенклатура.Код
- ???
3. Сергей (Che) Коцюра (CheBurator) 27.06.09 17:54
Наводит на нехорошие мысли
Если ПустоеЗначение(Партия1) = 1 Тогда
- если создаем документ поступления то партии новые создаем всегда, а не используем какие-то другие - ???
4. Сергей (Che) Коцюра (CheBurator) 27.06.09 17:57
+ типовая ошибка: неопределена сумма взаиморасчетов создаваемого документа - без спецдействий получим косяки в регистре взаиморасчетов.
.
Работа с извлечением инофрмации по партиям - гораздо проще делается запросами к регистру партий (это просто к слову... на любителя.)
5. Сергей (Che) Коцюра (CheBurator) 27.06.09 17:58
Итого: беглый осмотр показал - использовать данную разработку следует с большой осторожностью. Конечно же - имхо...
6. kubiky (kubiky) 01.07.09 09:02
????????????? Если ДокРНН.СуммаВклНДС=1 Тогда
Цен=Цен+ДокРНН.Сумма/ДокРНН.Количество;
Иначе
Цен=Цен+ДокРНН.Сумма/ДокРНН.Количество;
КонецЕсли;

7. Алексей Новиков (novav) 01.07.09 11:55
(6) Заплатка, на ранее разработанный код... Тут НДС выделялся раньше...
8. Dina Rakhimova (Dinkin) 21.10.11 12:14
У меня что-то не работает. Создается пустая номенлатура.
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа