Форум программистов, компьютерный форум, киберфорум
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.77/22: Рейтинг темы: голосов - 22, средняя оценка - 4.77
0 / 0 / 0
Регистрация: 23.05.2012
Сообщений: 12

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

23.05.2012, 11:30. Показов 4373. Ответов 1
Метки нет (Все метки)

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

1C
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
Процедура Инициализировать(Объект,ИмяТабличнойЧасти,ТабличноеПолеОбъекта) Экспорт
   
   Если Объект.Модифицированность() Тогда
      Сообщить("Документ должен быть записан!");
      Возврат;
   КонецЕсли;
   
   МОЛ = Справочники.ФизическиеЛица.ПустаяСсылка();
   
   Если ВвестиЗначение(МОЛ, "Выберите получателя") Тогда
      
      Объект.Материалы.Очистить();
      
      Запрос = Новый Запрос;
      Запрос.Текст = 
      "ВЫБРАТЬ
      |   МатериалыВЭксплуатацииОстатки.Подразделение,
      |   МатериалыВЭксплуатацииОстатки.Номенклатура,
      |   МатериалыВЭксплуатацииОстатки.ХарактеристикаНоменклатуры,
      |   МатериалыВЭксплуатацииОстатки.СерияНоменклатуры,
      |   МатериалыВЭксплуатацииОстатки.ФизЛицо,
      |   СУММА(МатериалыВЭксплуатацииОстатки.КоличествоОстаток) КАК КоличествоОстаток,
      |   СУММА(МатериалыВЭксплуатацииОстатки.бтСуммаОстаток) КАК бтСуммаОстаток,
      |   ВложенныйЗапрос.НазначениеИспользование КАК НазначениеИспользования
      |ИЗ
      |   РегистрНакопления.МатериалыВЭксплуатации.Остатки(&Период, ФизЛицо = &ФизЛицо) КАК МатериалыВЭксплуатацииОстатки
      |      ЛЕВОЕ СОЕДИНЕНИЕ (ВЫБРАТЬ
      |         МАКСИМУМ(НазначенияИспользования.Ссылка) КАК НазначениеИспользование,
      |         НазначенияИспользования.Владелец КАК Номенклатура
      |      ИЗ
      |         Справочник.НазначенияИспользования КАК НазначенияИспользования
      |      
      |      СГРУППИРОВАТЬ ПО
      |         НазначенияИспользования.Владелец) КАК ВложенныйЗапрос
      |      ПО МатериалыВЭксплуатацииОстатки.Номенклатура = ВложенныйЗапрос.Номенклатура
      |
      |СГРУППИРОВАТЬ ПО
      |   МатериалыВЭксплуатацииОстатки.Подразделение,
      |   МатериалыВЭксплуатацииОстатки.Номенклатура,
      |   МатериалыВЭксплуатацииОстатки.ХарактеристикаНоменклатуры,
      |   МатериалыВЭксплуатацииОстатки.СерияНоменклатуры,
      |   МатериалыВЭксплуатацииОстатки.ФизЛицо,
      |   ВложенныйЗапрос.НазначениеИспользование";
      
      Запрос.УстановитьПараметр("Период", Объект.Дата);
      Запрос.УстановитьПараметр("ФизЛицо", МОЛ);
      
      Выборка = Запрос.Выполнить().Выбрать();
      
      Пока Выборка.Следующий() Цикл
         
         СтрокаТЧ = Объект.Материалы.Добавить();
         
         СтрокаТЧ.Номенклатура             = Выборка.Номенклатура;
         СтрокаТЧ.ХарактеристикаНоменклатуры = Выборка.ХарактеристикаНоменклатуры;
         СтрокаТЧ.СерияНоменклатуры          = Выборка.СерияНоменклатуры;
         СтрокаТЧ.ФизЛицо                = Выборка.ФизЛицо;
         СтрокаТЧ.Количество             = Выборка.КоличествоОстаток;
         СтрокаТЧ.ЕдиницаИзмерения          = Выборка.Номенклатура.ЕдиницаХраненияОстатков;
         СтрокаТЧ.Коэффициент             = Выборка.Номенклатура.ЕдиницаХраненияОстатков.Коэффициент;
         СтрокаТЧ.НазначениеИспользования   = Выборка.НазначениеИспользования;
         СтрокаТЧ.ТипСтоимости            = Перечисления.ВидыНормативнойСтоимостиПроизводства.Рассчитывается;
         
      КонецЦикла;  
      
   КонецЕсли;
   
КонецПроцедуры
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
23.05.2012, 11:30
Ответы с готовыми решениями:

Заполнение табличной части одного документа из табличной части другого документа
Здравсвуйте. 1С 8.2. Есть документ Приход и документ Расход. Оба документа имеют табличные части - Товары. В табличной части документа...

Заполнение табличной части одного документа из табличной части этого же документа
Здравсвуйте. 1С 8.2. Есть документ в этом документе 2 табличные части В 1 табличной части считается общая стоимость запчастей по...

Автоматическое заполнение табличной части документа из табличной части другого
Добрый день. Совсем недавно начал изучать 1С и пока не могу найти решения собственной задачи) Помогите с кодом. Есть документ...

1
 Аватар для duk337
2956 / 1768 / 84
Регистрация: 03.11.2011
Сообщений: 8,280
23.05.2012, 13:00
Некоторые остатки висят на других МОЛ или на пустых? Разумно привести в порядок остатки.
Вариант, что требуются остатки по истории миграции номенклатурин между физлицами. В этом случае надо побаловаться с движениями и датами, но при этом рационально исходить из ситуации в регистре.
Совет такой: откройте регистр МатериалыВЭксплуатации через Операции.РегистрыНакопления и посмотрите его потроха. Может, нарисуется дата, где все МОЛ правильные. Тогда надо будет взять текущие остатки с привязкой к МОЛ на эту дату. Ну, и так далее. Короче, определить ситуацию
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
23.05.2012, 13:00
Помогаю со студенческими работами здесь

Программное заполнение табличной части документа из табличной части справочника
Доброго! Ситуация, поставившая меня в тупик. Имеем 1с 8.2 УФ Имеем справочник "Работ" Имеем документ с табличной частью,...

Заполнение Табличной Части документа из Табличной Части другого документа
Здравсвуйте. 1С 8.2 Есть два документа ТоварнаяНакладная.Накладная с реквизитами МассаБрутто и МассаНетто и документ...

Заполнение реквизита табличной части документа (строки, из справочника наименования, внутри документа)
Здравствуйте. Волею судеб нужно сваять пару документов в 1с 77. Вроде бы как все шло нормально, но наткнулся на нерешаемую для себя...

Автоматическое заполнение табличной части документа при изменении реквизита этого документа
Здравствуйте. Делаю свою конфу на 1с 8.3.5. Добавил справочник "Сотрудники" и подчиненный ему справочник "КритерииОценки", где ...

Заполнение табличной части документа
Всем привет. Народ, помогите пожалуйста. Такой вопрос: создал документ, добавил туда табличную часть, добавил кнопку для заполнения...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI
Eddy_Em 18.02.2026
Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .
Символьное дифференцирование
igorrr37 13.02.2026
/ * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru