Нужна помощь. Списание материалов на основании авансового отчета.
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Должна пройти проводка с 71.1 на 10.х потом с 10.х на 25(26), лучше бы было чтоб просто в авансовом отчете был флаг и номер счета списания, но я думаю проще сделать документ перемещение материалов (в производство), но в принципе разницы большой нет.
lachinov Написал:
-------------------------------------------------------
> Должна пройти проводка с 71.1 на 10.х потом с 10.х на 25(26), лучше бы было чтоб просто в авансовом > отчете был флаг и номер счета списания,
А почему бы сразу на затраты не кидать
> но я думаю
> проще сделать документ перемещение материалов (в
> производство), но в принципе разницы большой нет.
так будет правильнее.
для этого в можуль формы документа "требовательная накладная" добавь процедуру ВводНаОсновании() в ней опиши какие строки должны попасть из ав. отчета в треб. наклдную
-------------------------------------------------------
> Должна пройти проводка с 71.1 на 10.х потом с 10.х на 25(26), лучше бы было чтоб просто в авансовом > отчете был флаг и номер счета списания,
А почему бы сразу на затраты не кидать
> но я думаю
> проще сделать документ перемещение материалов (в
> производство), но в принципе разницы большой нет.
так будет правильнее.
для этого в можуль формы документа "требовательная накладная" добавь процедуру ВводНаОсновании() в ней опиши какие строки должны попасть из ав. отчета в треб. наклдную
Добавил в документ Требование.Накладная след:
Функция Заполнить(ДокОсн)
Если ДокОсн.Вид()="АвансовыйОтчет" Тогда
УдалитьСтроки();
МестоХранения = ДокОсн.Субконто2;
ДокОсн.ВыбратьСтроки();
Пока ДокОсн.ПолучитьСтроку() = 1 Цикл
НоваяСтрока();
НазначитьТип("Материал", "Справочник.Материалы");
Материал = ДокОсн.Субконто1;
КоличествоЗатребовано = ДокОсн.Количество;
КоличествоОтпущено = ДокОсн.Количество;
Сумма = ДокОсн.Сумма;
КонецЦикла;
КонецЕсли;
Возврат 1;
КонецФункции // Заполнить()
Процедура ВводНаОсновании(ДокОсн)
Новый = 1;
ВерсияОбъекта = Константа.НомерРелиза;
Если Заполнить(ДокОсн) = 0 Тогда
СтатусВозврата(0);
Возврат;
КонецЕсли;
КонецПроцедуры // ВводНаОсновании()
Посмотрите, может что не так.
ПОДСКАЖИТЕ, пожалуйста, как организовать сам вызов процедуры Ввод на основании (заполнение требования.накладной):
1.вызов из авансового отчета - как сделать?
2.вызов из требования накладной - как сделать?
Функция Заполнить(ДокОсн)
Если ДокОсн.Вид()="АвансовыйОтчет" Тогда
УдалитьСтроки();
МестоХранения = ДокОсн.Субконто2;
ДокОсн.ВыбратьСтроки();
Пока ДокОсн.ПолучитьСтроку() = 1 Цикл
НоваяСтрока();
НазначитьТип("Материал", "Справочник.Материалы");
Материал = ДокОсн.Субконто1;
КоличествоЗатребовано = ДокОсн.Количество;
КоличествоОтпущено = ДокОсн.Количество;
Сумма = ДокОсн.Сумма;
КонецЦикла;
КонецЕсли;
Возврат 1;
КонецФункции // Заполнить()
Процедура ВводНаОсновании(ДокОсн)
Новый = 1;
ВерсияОбъекта = Константа.НомерРелиза;
Если Заполнить(ДокОсн) = 0 Тогда
СтатусВозврата(0);
Возврат;
КонецЕсли;
КонецПроцедуры // ВводНаОсновании()
Посмотрите, может что не так.
ПОДСКАЖИТЕ, пожалуйста, как организовать сам вызов процедуры Ввод на основании (заполнение требования.накладной):
1.вызов из авансового отчета - как сделать?
2.вызов из требования накладной - как сделать?
> как организовать сам вызов процедуры Ввод на основании
Нажатием на клавиатере Alt+F9 или кнопку в меню действие
> 1.вызов из авансового отчета - как сделать?
можно сделать кнопку, через ОткрытьФорму(...)
Я бы добавил проверку на значение корсчета в авансовом отчете. Что загружать только еслми счет - 10
Нажатием на клавиатере Alt+F9 или кнопку в меню действие
> 1.вызов из авансового отчета - как сделать?
можно сделать кнопку, через ОткрытьФорму(...)
Я бы добавил проверку на значение корсчета в авансовом отчете. Что загружать только еслми счет - 10
Всё получилось. Огромное спасибо sashulyT за дельные советы! В последнем вопросе всё решилось правым кликом по авансовому отчету в конфигураторе и установкой галки - служит основанием для требование.накладная
И правда говорят, что все просто (когда есть кому подсказать)
И правда говорят, что все просто (когда есть кому подсказать)
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот