Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
19 апр 2025, 11:51

Описание проводок, и списание кол-ых частей

Автор Sasha1C, 24 мар 2025, 20:28

0 Пользователей и 1 гость просматривают эту тему.

Sasha1C

Добрый вечер, есть задача "
При проведении документ «Сборка» формирует проводки:

Дт «Основное производство» - Kт «Материалы»

на количество и себестоимость списанных материалов. Себестоимость рассчитывается как средняя по номенклатурной позиции;

Дт «Товары» - Kт «Основное производство»

на количество получившихся изделий и его стоимость.

Стоимость готового изделия определяется как себестоимость списанных на его изготовление материалов плюс стоимость работ. "

У меня есть пробелы с проводками, и как я понимаю задачу надо решать так
PS  или мне кажется что она так решается)
// регистр Хозрасчетный
Движения.Хозрасчетный.Записывать = Истина;
Для Каждого ТекСтрокаСписокМатериалов Из СписокМатериалов Цикл
Движение = Движения.Хозрасчетный.Добавить();
Движение.СчетДт = ПланыСчетов.Расчеты.ОсновноеПроизводство;
Движение.СчетКт = ПланыСчетов.Расчеты.Материалы;
Движение.Период = Дата;
Движение.КоличествоДт = ТекСтрокаСписокМатериалов.Количество;
Движение.КоличествоКт = Себестоимость;
Движение.Субконто1 = ТекСтрокаСписокМатериалов.Материал;
КонецЦикла;

// регистр Хозрасчетный
Движения.Хозрасчетный.Записывать = Истина;
Для Каждого ТекСтрокаСписокМатериалов Из СписокМатериалов Цикл
Движение = Движения.Хозрасчетный.Добавить();
Движение.СчетДт = ПланыСчетов.Расчеты.Товары;
Движение.СчетКт = ПланыСчетов.Расчеты.ОсновноеПроизводство;
Движение.Период = Дата;
Движение.КоличествоДт = КоличествоИзделий;
//Движение.КоличествоКт = &Стоимость;
Движение.Субконто1 = Изделие;
КонецЦикла;

Составил запрос для получения этих данных
Запрос.Текст ="ВЫБРАТЬ
                | СборкаСписокМатериалов.Материал КАК Материал
                |ПОМЕСТИТЬ ВТноменклатура
                |ИЗ
                | Документ.Сборка.СписокМатериалов КАК СборкаСписокМатериалов
                |ГДЕ
                | СборкаСписокМатериалов.Ссылка = &Ссылка
                |;
                |
                |////////////////////////////////////////////////////////////////////////////////
                |ВЫБРАТЬ
                | ОстаткиНоменклатурыОстатки.Номенклатура КАК Номенклатура,
                | СУММА(ОстаткиНоменклатурыОстатки.СуммаОстаток) КАК ОбщаяСумма,
                | ОстаткиНоменклатурыОстатки.КоличествоОстаток КАК ОбщийОстаток,
                | СУММА(ОстаткиНоменклатурыОстатки.СуммаОстаток) / СУММА(ОстаткиНоменклатурыОстатки.КоличествоОстаток) КАК Себестоимость
                |ИЗ
                | РегистрНакопления.ОстаткиНоменклатуры.Остатки(
                | ,
                | Номенклатура В
                | (ВЫБРАТЬ
                | ВТноменклатура.Материал КАК Материал
                | ИЗ
                | ВТноменклатура КАК ВТноменклатура)) КАК ОстаткиНоменклатурыОстатки
                |ГДЕ
                | ОстаткиНоменклатурыОстатки.Номенклатура = &Номенклатура
                |
                |СГРУППИРОВАТЬ ПО
                | ОстаткиНоменклатурыОстатки.Номенклатура,
                | ОстаткиНоменклатурыОстатки.КоличествоОстаток";
Я запутался, в правильном ли направлении я двигаюсь?

Sasha1C

Регистр бухгалтерии имеет 2 реквизита:
КоличествоДт
КоличествоКт

Sasha1C

В итоге это мой готовый вариант, хотелось бы услышать это правильный подход к решению, или все же фикция. Буду очень признателен за объективную критику. Потому что я только начинаю работать.


Запрос = Новый Запрос; 
Запрос.УстановитьПараметр("Ссылка", ЭтотОбъект.Ссылка);
Запрос.Текст="ВЫБРАТЬ
             | СУММА(СборкаСписокМатериалов.Сумма) КАК СтоимостьГотовыхИзделий
             |ИЗ
             | Документ.Сборка.СписокМатериалов КАК СборкаСписокМатериалов
             |ГДЕ
             | СборкаСписокМатериалов.Ссылка = &Ссылка";
Шапка =Запрос.Выполнить().Выбрать();
Шапка.Следующий();

  Запрос.Текст ="ВЫБРАТЬ
                | СборкаСписокМатериалов.Материал КАК Материал
                |ПОМЕСТИТЬ ВТноменклатура
                |ИЗ
                | Документ.Сборка.СписокМатериалов КАК СборкаСписокМатериалов
                |ГДЕ
                | СборкаСписокМатериалов.Ссылка = &Ссылка
                |;
                |
                |////////////////////////////////////////////////////////////////////////////////
                |ВЫБРАТЬ
                | ОстаткиНоменклатурыОстатки.Номенклатура КАК Номенклатура,
                | СУММА(ОстаткиНоменклатурыОстатки.СуммаОстаток) КАК ОбщаяСумма,
                | ОстаткиНоменклатурыОстатки.КоличествоОстаток КАК ОбщийОстаток,
                | СУММА(ОстаткиНоменклатурыОстатки.СуммаОстаток) / СУММА(ОстаткиНоменклатурыОстатки.КоличествоОстаток) КАК Себестоимость
                |ИЗ
                | ВТноменклатура КАК ВТноменклатура
                | ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ОстаткиНоменклатуры.Остатки(
                | &Период,
                | Номенклатура В
                | (ВЫБРАТЬ
                | ВТноменклатура.Материал КАК Материал
                | ИЗ
                | ВТноменклатура КАК ВТноменклатура)) КАК ОстаткиНоменклатурыОстатки
                | ПО ВТноменклатура.Материал = ОстаткиНоменклатурыОстатки.Номенклатура
                |
                |СГРУППИРОВАТЬ ПО
                | ОстаткиНоменклатурыОстатки.Номенклатура,
                | ОстаткиНоменклатурыОстатки.КоличествоОстаток";
       
Запрос.УстановитьПараметр("Период", ЭтотОбъект.МоментВремени());   
   
Выборка = Запрос.Выполнить().Выбрать();
Выборка.Следующий();
 
// регистр Хозрасчетный
Движения.Хозрасчетный.Записывать = Истина;
Для Каждого ТекСтрокаСписокМатериалов Из СписокМатериалов Цикл
Движение = Движения.Хозрасчетный.Добавить();
Движение.СчетДт = ПланыСчетов.Расчеты.ОсновноеПроизводство;
Движение.СчетКт = ПланыСчетов.Расчеты.Материалы;
Движение.Период = Дата;
Движение.КоличествоДт = ТекСтрокаСписокМатериалов.Количество;
Движение.КоличествоКт = Выборка.Себестоимость;
Движение.Субконто1 = ТекСтрокаСписокМатериалов.Материал;
КонецЦикла;

// регистр Хозрасчетный
Движения.Хозрасчетный.Записывать = Истина;
Для Каждого ТекСтрокаСписокМатериалов Из СписокМатериалов Цикл
Движение = Движения.Хозрасчетный.Добавить();
Движение.СчетДт = ПланыСчетов.Расчеты.Товары;
Движение.СчетКт = ПланыСчетов.Расчеты.ОсновноеПроизводство;
Движение.Период = Дата;
Движение.КоличествоДт = КоличествоИзделий;
Движение.КоличествоКт = Шапка.СтоимостьГотовыхИзделий;
Движение.Субконто1 = Изделие;
КонецЦикла;

alexandr_ll

Sasha1C, Вы уверены, что расчет себестоимости для списания материалов следует вести по регистру накопления, а не по регистрам бухгалтерии?

Sasha1C

alexandr_ll, Есть задач, которую нужно выполнить, и это то, как я ее понял. Возможно, есть более рациональные пути ее решения. И если я правильно понимаю, то я и внес себестоимость в регистр бухгалтерии

Sasha1C

alexandr_ll, Я оставил базу. как мне кажется, то все должно работать так. Правильно ли я формирую проводки по заданию "При проведении документ «Сборка» формирует проводки:


Дт «Основное производство» - Kт «Материалы»


на количество и себестоимость списанных материалов. Себестоимость рассчитывается как средняя по номенклатурной позиции;

Дт «Товары» - Kт «Основное производство»

на количество получившихся изделий и его стоимость.

Стоимость готового изделия определяется как себестоимость списанных на его изготовление материалов плюс стоимость работ. " .      И еще один вопрос, каким образом сделать отчет, с учетом что регистр оборотов "Выпуск" создан, но в правильном ли направлении я двигаюсь, а то я еще не особо понимаю как построить связь для составления отчета "Необходимо построить отчет о производстве мебели за период. В отчете должен расчетным образом определяться средний состав каждого изделия, а также количество собранных изделий и их стоимость. Количество - для готового изделия это количество собранных изделий в отчетном периоде; для материала это среднее количество, пошедшее на изготовление одного изделия;
Сумма - для готового изделия это общая сумма собранных изделий в отчетном периоде: для материала это средняя себестоимость материалов, пошедших на изготовление одного изделия.
" Буду очень благодарен за любую помощь или хотя б направление, что бы выполнить поставленную задачу

alexandr_ll

Sasha1C, Я спрашивал про определение себестоимости при списании. Вы запросом находите сумму списания из регистра накопления, а проводки делаете по регистру бухгалтерии.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск