УНФ. Партионный учет для списания материалов в документе "Сборка заказов". Версия 0.01

24.12.09

Разработка - Механизмы типовых конфигураций

Документ заполняется материалами по спецификации, но графа партии не заполняется. Теперь под словом Партия 1с понимает чисто управленческий учет. Партия как качество или особенность номенклатуры. Поэтому даже не планируется списание этих управленческих партий каким либо автоматическим методом. Партию надо выбирать вручную ! Данная доработка заполняет табличную часть документа Сборка заказов по спецификации методом ФИФО.

Жду ваших комментариев и предложений по совершенствованию

Алгоритм пока не рабочий. Остатки по документу поступления (регистратору) не видны.

 

Документ заполняется материалами по спецификации, но графа партии не заполняется. Теперь под словом Партия 1с понимает чисто управленческий учет. Партия как качество или особенность номенклатуры. Поэтому даже не планируется списание этих управленческих партий каким либо автоматическим методом. Партию надо выбирать вручную ! Данная доработка заполняет табличную часть документа Сборка заказов по спецификации методом ФИФО.

 

Жду ваших комментариев и предложений по совершенствованию.

Алгоритм пока не рабочий. Остатки по документу поступления (регистратору) не видны.

 

  1. Изменил процедуру формы документа.

 

&НаСервере

// Процедура заполняет Запасы по спецификации.

//

Процедура ЗаполнитьПоСпецификацииНаСервере()

           

            Документ = РеквизитФормыВЗначение("Объект");

            Документ.ЗаполнитьТабличнуюЧастьПоСпецификации();

           

            //изменено нач

            ТЗМатериаловДляСписания = Документ.Запасы.Выгрузить(,"Номенклатура,Количество,ЕдиницаИзмерения");

           

            Запрос = Новый Запрос;

    МенеджерВТ = Новый МенеджерВременныхТаблиц;

    Запрос.МенеджерВременныхТаблиц = МенеджерВТ;

           

            Запрос.УстановитьПараметр("Организация", Документ.Организация);

            Запрос.УстановитьПараметр("СтруктурнаяЕдиница", Документ.СтруктурнаяЕдиница);

            Запрос.УстановитьПараметр("СчетУчета", ПланыСчетов.Управленческий.СырьеИМатериалы);

            Запрос.УстановитьПараметр("МоментВремени", Документ.МоментВремени());

            Запрос.УстановитьПараметр("ТЗМатериаловДляСписания", ТЗМатериаловДляСписания);

           

            Запрос.Текст =

                        "ВЫБРАТЬ

                        |           ТЗ.Номенклатура КАК Номенклатура,

                        |           ТЗ.Количество КАК Количество,

                        |           ТЗ.ЕдиницаИзмерения

                        |ПОМЕСТИТЬ Номенклатурка

                        |ИЗ

                        |           &ТЗМатериаловДляСписания КАК ТЗ

                        |

                        |ИНДЕКСИРОВАТЬ ПО

                        |           Номенклатура";

            Запрос.Выполнить();

                       

            Документ.ЗапасыОчистить();

                       

            Запрос.Текст =

                        "ВЫБРАТЬ

                        |           МАКСИМУМ(ВложенныйЗапрос.КолДляСписания) КАК КолДляСписания,

                        |           ВложенныйЗапрос.Регистратор КАК Регистратор,

                        |           ВложенныйЗапрос.Номенклатура КАК Номенклатура,

                        |           ВложенныйЗапрос.Партия КАК Партия,

                        |           МАКСИМУМ(ВложенныйЗапрос.КоличествоКонечныйОстаток) КАК КоличествоКонечныйОстаток,

                        |           ВложенныйЗапрос.ЕдиницаИзмерения КАК ЕдиницаИзмерения

                        |ИЗ

                        |           (ВЫБРАТЬ

                        |                       МАКСИМУМ(ВложенныйЗапрос.Количество) КАК КолДляСписания,

                        |                       ЗапасыОстаткиИОбороты.Регистратор КАК Регистратор,

                        |                       ЗапасыОстаткиИОбороты.Номенклатура КАК Номенклатура,

                        |                       ЗапасыОстаткиИОбороты.Партия КАК Партия,

                        |                       МАКСИМУМ(ЗапасыОстаткиИОбороты.КоличествоКонечныйОстаток) КАК КоличествоКонечныйОстаток,

                        |                       ВложенныйЗапрос.ЕдиницаИзмерения КАК ЕдиницаИзмерения

                        |           ИЗ

                        |                       (ВЫБРАТЬ

                        |                                   Номенклатурка.Номенклатура КАК Номенклатура,

                        |                                   Номенклатурка.Количество КАК Количество,

                        |                                   Номенклатурка.ЕдиницаИзмерения КАК ЕдиницаИзмерения

                        |                       ИЗ

                        |                                   Номенклатурка КАК Номенклатурка) КАК ВложенныйЗапрос

                        |                                   ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.Запасы.ОстаткиИОбороты(, &МоментВремени, Регистратор, ДвиженияИГраницыПериода, Номенклатура В (&ТЗМатериаловДляСписания)) КАК ЗапасыОстаткиИОбороты

                        |                                   ПО ВложенныйЗапрос.Номенклатура = ЗапасыОстаткиИОбороты.Номенклатура

                        |          

                        |           СГРУППИРОВАТЬ ПО

                        |                       ЗапасыОстаткиИОбороты.Регистратор,

                        |                       ЗапасыОстаткиИОбороты.Номенклатура,

                        |                       ЗапасыОстаткиИОбороты.Партия,

                        |                       ВложенныйЗапрос.ЕдиницаИзмерения) КАК ВложенныйЗапрос

                        |

                        |СГРУППИРОВАТЬ ПО

                        |           ВложенныйЗапрос.Номенклатура,

                        |           ВложенныйЗапрос.Регистратор,

                        |           ВложенныйЗапрос.Партия,

                        |           ВложенныйЗапрос.ЕдиницаИзмерения

                        |ИТОГИ ПО

                        |           Номенклатура,

                        |           Регистратор,

                        |           Партия,

                        |           ЕдиницаИзмерения";

 

            //Запрос.УстановитьПараметр("Номенклатура", ТЗМатериаловДляСписания);

           

            Результат = Запрос.Выполнить();

 

           

            ВыбНом = Результат.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

            Пока ВыбНом.Следующий() Цикл

                       

                        Нужно = ВыбНом.КолДляСписания;

                       

                        ВыбРег = ВыбНом.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

                        Пока ВыбРег.Следующий() Цикл

                                  

                                   Если Нужно <=  0 Тогда

                                               Продолжить;   

                                   КонецЕсли;

                                  

                                   ВыбПартия = ВыбРег.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

                                   Пока ВыбПартия.Следующий() Цикл

 

                                               ВыбПартияЕдИзм = ВыбПартия.Выбрать(ОбходРезультатаЗапроса.ПоГруппировкам);

                                       ВыбПартияЕдИзм.Следующий();

                                              

                                               ДоступноДляСписания = ВыбПартияЕдИзм.КоличествоКонечныйОстаток;

                                               Если Нужно >  ДоступноДляСписания Тогда

                                                           Документ.ДобавляемСтрокуЗатратПартия(ВыбПартияЕдИзм,ДоступноДляСписания);

                                                           Нужно = Нужно - ДоступноДляСписания;        

                                               Иначе

                                                           //списываем остаток

                                                           ДоступноДляСписания = Нужно;

                                                           Документ.ДобавляемСтрокуЗатратПартия(ВыбПартияЕдИзм,ДоступноДляСписания);

                                                           Нужно = 0;

                                               КонецЕсли;

                                              

                                   КонецЦикла;

                                  

                        КонецЦикла;

                       

            КонецЦикла;

            //изменено Кон

           

            ЗначениеВРеквизитФормы(Документ, "Объект");

            Модифицированность = Истина;

           

 

КонецПроцедуры // ЗаполнитьМатериальныеЗатратыПоСпецификацииНаСервере()    

 

  1. Добавил свои процедуры в модуль документа

 

//изменено

Процедура ДобавляемСтрокуЗатратПартия(СтрокаВыборки, КолДляСписания) Экспорт

           

            НоваяСтрока = Запасы.Добавить();

                                  

            ЗаполнитьЗначенияСвойств(НоваяСтрока, СтрокаВыборки);

            НоваяСтрока.Количество = КолДляСписания;

           

КонецПроцедуры

 

Процедура ЗапасыОчистить() Экспорт

            Запасы.Очистить();

КонецПроцедуры

 

 

См. также

Расширяем возможности дополнительных обработок и настраиваем их отладку

БСП (Библиотека стандартных подсистем) Механизмы типовых конфигураций Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Уже не одна веб-страница исписана знаниями о дополнительных обработках, как создать, как подключить. Есть масса вариантов, как их можно отладить. Я разобрался в кишках работы библиотеки и покажу, как можно расширить возможности дополнительных отчетов, а также покажу удобный способ отладки.

07.02.2024    2354    YA_418728146    11    

40

Регистры накопления в 1С:КА2 и 1С:ERP для расчета НДФЛ, страховых взносов и взаиморасчетов с сотрудниками на январь 2024 года. Краткое описание

Зарплата Механизмы типовых конфигураций Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет НДФЛ Абонемент ($m)

Для расчета зарплаты и соответствующих налогов в конфигурациях 1С:КА2 и 1С:ERP используется 22 регистра накопления, 7 регистров сведений, 1 регистр расчета и бухгалтерские проводки. В таблице приведены названия этих регистров, указаны основные регистраторы и виды движений приход/расход. В описании приводится краткое функциональное назначение регистров в основных зарплатных процессах. Описание регистров родилось из черновиков при написании различных отчетов и обработок при эксплуатации 1С-овских конфигураций и исправлении ошибок по НДФЛ, взаиморасчетов с сотрудниками и прочих. Информация не претендует на полноценное описание работы регистров, скорее это дискуссионный материал. Но, возможно, кому-то пригодится и сократит время при подготовке отчетности за непростой (в плане учета зарплаты) 2023 год. А возможно, кто-то поделится своим опытом.

1 стартмани

10.01.2024    1020    6    2ncom    3    

8

Шаблоны новых объектов 1С для 1С:Бухгалтерии предприятия

Инструментарий разработчика БСП (Библиотека стандартных подсистем) Механизмы типовых конфигураций Платформа 1С v8.3 1С:Бухгалтерия 3.0 Бесплатно (free)

Используются для создания новых объектов в конфигурации, чтобы не забыть, что нужно сделать. Сделано на примере 1С:Бухгалтерия предприятия, в других конфигурациях могут быть другие, а могут быть и похожие объекты.

28.12.2023    4836    mrXoxot    11    

99

Ключи аналитик учета в ЕРП, КА, УТ

Механизмы типовых конфигураций Платформа 1С v8.3 1С:ERP Управление предприятием 2 Россия Управленческий учет Бесплатно (free)

Разбираемся, зачем в системе ЕРП созданы справочники: ключи аналитик учета, зачем созданы аналогичные по набору измерений регистры сведений. Какие проблемы они решают, какие создают новые и что с этим делать.

08.11.2023    7062    ids79    25    

74

Распределение по базе среднего в ЗИКГУ 3.1

Зарплата Механизмы типовых конфигураций Платформа 1С v8.3 1С:Зарплата и кадры государственного учреждения 3 Россия Бюджетный учет Абонемент ($m)

Результат расчета начислений (отпуск, БЛ и т.д.) может распределятся по базе среднего заработка. У таких начислений на вкладке "Налоги, взносы, бухучет" стоит галка "По базе среднего заработка". Но бывают случаи, что данное распределение необходимо скорректировать.

1 стартмани

14.09.2023    445    2    Vlx    0    

1

Расширение типового механизма настройки заполнения бухгалтерской отчетности (на примере конфигурации 1С:ERP. Управление холдингом 3.1.8.15)

Механизмы типовых конфигураций Платформа 1С v8.3 1С:Управление холдингом 1С:Франчайзи, автоматизация бизнеса Россия Бесплатно (free)

В статье приведен алгоритм доработок типового механизма настройки заполнения бухгалтерской отчетности на примере конфигурации 1С:ERP. Управление холдингом (3.1.8.15). Цель доработок - сделать процесс настроек более гибким и удобным для пользователей

11.09.2023    1929    ICL-Soft    3    

12

Разбор механизма "Настройки полей формы" в 1С:ERP. Управление холдингом

Механизмы типовых конфигураций Платформа 1С v8.3 1С:ERP Управление предприятием 2 Бесплатно (free)

В данной статье я постараюсь разобрать механизм, который Вам может встретиться на просторах типовой конфигурации 1С:ERP. Управление холдингом. Я не могу гарантировать, что этот механизм не исключат из следующих версий конфигурации (как, собственно, и любой другой). К сожалению, мне не удалось найти его ни в одном модуле конфигурации "Библиотеки стандартных подсистем". Мне он показался интересным, и захотелось более детально во всем этом разобраться.

18.07.2023    2157    it_box    1    

7

Работа с контактной информацией. Часть 2

Механизмы типовых конфигураций Платформа 1С v8.3 Конфигурации 1cv8 Бесплатно (free)

Во второй части статьи рассмотрим вопрос преобразования адреса из старого формата в новый. Рассмотрим реальные задачи, связанные с контактной информацией.

05.06.2023    6960    biimmap    4    

41
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. scanner1980 266 12.10.22 13:47 Сейчас в теме
хороший пример, только привязки к продукции нет в итоговой таблице запасы
Оставьте свое сообщение