Заполнение табличной части документа списание материалов из эксплуатации по МОЛ

@slavabatov · Регистрация: 23.05.2012

Author24 — интернет-сервис помощи студентам

Добрый день.
Есть ли у кого внешняя обработка для заполнения ТЧ документа Списание материалов из эксплуатации? У меня написана обработка которая без проблем заполняет (по МОЛ) Перемещение материалов и Возврат материалов, но хоть убей не хочет правильно заполнять (по МОЛ) (часть материалов не попадает, те которые были перемещены) Списание.

1C

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

@duk337 · 23.05.2012, 13:00

Некоторые остатки висят на других МОЛ или на пустых? Разумно привести в порядок остатки.
Вариант, что требуются остатки по истории миграции номенклатурин между физлицами. В этом случае надо побаловаться с движениями и датами, но при этом рационально исходить из ситуации в регистре.
Совет такой: откройте регистр МатериалыВЭксплуатации через Операции.РегистрыНакопления и посмотрите его потроха. Может, нарисуется дата, где все МОЛ правильные. Тогда надо будет взять текущие остатки с привязкой к МОЛ на эту дату. Ну, и так далее. Короче, определить ситуацию

@duk337 2955 / 1767 / 82 Регистрация: 03.11.2011 Сообщений: 8,280
	23.05.2012, 13:00	2
	Некоторые остатки висят на других МОЛ или на пустых? Разумно привести в порядок остатки. Вариант, что требуются остатки по истории миграции номенклатурин между физлицами. В этом случае надо побаловаться с движениями и датами, но при этом рационально исходить из ситуации в регистре. Совет такой: откройте регистр МатериалыВЭксплуатации через Операции.РегистрыНакопления и посмотрите его потроха. Может, нарисуется дата, где все МОЛ правильные. Тогда надо будет взять текущие остатки с привязкой к МОЛ на эту дату. Ну, и так далее. Короче, определить ситуацию 0