Автоматическое создание Заказа поставщику
Здравствуйте! У меня есть обработка, которая выводит товары, которые проданны за определенный период, дальше я хотел бы при нажатии кнопки Создать заказ поставщику и чтобы туда попали все эти товары, которые в Объект.ТЧ. Какой код нужно написать для этого? Обработку прикрепляю, буду очень благодарен!
Управление торговлей для Украины, редакция 3.1 (3.1.6.1)
1С 8.3
Управление торговлей для Украины, редакция 3.1 (3.1.6.1)
1С 8.3
Прикрепленные файлы:
1_10_09_АвтоматическаяЗакупкаТовара.epf
По теме из базы знаний
- Автоматическое создание заказов поставщику по статистическим данным продаж в 1С 7.7 ТиС
- Платформа для дропшиппинга. Рабочее место закупки: модуль автоматизации снабжения. Создание заказов поставщикам в 1С
- Формирование заказов поставщикам в рамках ГОЗ с учетом минимальной партии в 1С: ERP
- Создание заказов товара поставщикам для Альфа-Авто 5
- Анализ закупок и автоматическое создание Заказа поставщику
Найденные решения
(1) Вам смогут помочь только те, у кого такая конфигурация есть.
Если не привязываться к конфигурации, то Вам нужно зайти в модуль объекта "заказ поставщику" и найти "ОбработкаЗаполнения"
Если там будет написано что-то вроде этого,
то достаточно будет вызывать обработку заполнения, передавая в форму параметр "Основание" с данными для заполнения
Если не привязываться к конфигурации, то Вам нужно зайти в модуль объекта "заказ поставщику" и найти "ОбработкаЗаполнения"
Если там будет написано что-то вроде этого,
Если ТипДанныхЗаполнения = Тип("Структура") И ТипДанныхЗаполнения .Свойство("Товары") Тогда
ЗаполнитьДокументПоОтбору(ДанныеЗаполнения);
то достаточно будет вызывать обработку заполнения, передавая в форму параметр "Основание" с данными для заполнения
ПараметрыФормы = Новый Структура;
Основание = Новый Структура("Товары", АдресВременногоХранилищаСТоварами);
ПараметрыФормы.Вставить("Основание", Основание );
ОткрытьФорму("Документы.ЗаказПоставщику.Форма.ФормаДокумента", параметрыФормы, ЭтаФорма);
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
(1) Вам смогут помочь только те, у кого такая конфигурация есть.
Если не привязываться к конфигурации, то Вам нужно зайти в модуль объекта "заказ поставщику" и найти "ОбработкаЗаполнения"
Если там будет написано что-то вроде этого,
то достаточно будет вызывать обработку заполнения, передавая в форму параметр "Основание" с данными для заполнения
Если не привязываться к конфигурации, то Вам нужно зайти в модуль объекта "заказ поставщику" и найти "ОбработкаЗаполнения"
Если там будет написано что-то вроде этого,
Если ТипДанныхЗаполнения = Тип("Структура") И ТипДанныхЗаполнения .Свойство("Товары") Тогда
ЗаполнитьДокументПоОтбору(ДанныеЗаполнения);
то достаточно будет вызывать обработку заполнения, передавая в форму параметр "Основание" с данными для заполнения
ПараметрыФормы = Новый Структура;
Основание = Новый Структура("Товары", АдресВременногоХранилищаСТоварами);
ПараметрыФормы.Вставить("Основание", Основание );
ОткрытьФорму("Документы.ЗаказПоставщику.Форма.ФормаДокумента", параметрыФормы, ЭтаФорма);
(2)Там такая ОбработкаЗаполнения
Процедура ОбработкаЗаполнения(ДанныеЗаполнения, СтандартнаяОбработка)
ТипДанныхЗаполнения = ТипЗнч(ДанныеЗаполнения);
НеобходимаИнициализация = Истина;
Если ТипДанныхЗаполнения = Тип("Структура") Тогда
ЗаполнитьДокументПоОтбору(ДанныеЗаполнения);
ИначеЕсли ТипДанныхЗаполнения = Тип("СправочникСсылка.Партнеры") Тогда
ЗаполнитьДокументНаОснованииПартнера(ДанныеЗаполнения);
ИначеЕсли ТипДанныхЗаполнения = Тип("СправочникСсылка.СоглашенияСПоставщиками") Тогда
ЗаполнитьДокументНаОснованииСоглашенияСПоставщиком(ДанныеЗаполнения);
ИначеЕсли ТипДанныхЗаполнения = Тип("СправочникСсылка.СделкиСКлиентами") Тогда
ЗаполнитьДокументНаОснованииСделки(ДанныеЗаполнения);
ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЗаказКлиента") Тогда
ЗаполнитьДокументНаОснованииЗаказа(ДанныеЗаполнения);
ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЗаявкаНаВозвратТоваровОтКлиента") Тогда
ЗаполнитьДокументНаОснованииЗаявкиНаВозврат(ДанныеЗаполнения);
ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЗаказНаПеремещение") Тогда
ЗаполнитьДокументНаОснованииЗаказаНаПеремещение(ДанныеЗаполнения);
ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЗаказНаВнутреннееПотребление") Тогда
ЗаполнитьДокументНаОснованииЗаказаНаВнутреннееПотребление(ДанныеЗаполнения);
ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ЗаказНаСборку") Тогда
ЗаполнитьДокументНаОснованииЗаказаНаСборку(ДанныеЗаполнения);
ИначеЕсли ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ИзменениеАссортимента") Тогда
ИнициализироватьДокумент(ДанныеЗаполнения);
НеобходимаИнициализация = Ложь;
ЗаполнитьДокументНаОснованииИзмененияАссортимента(ДанныеЗаполнения);
КонецЕсли;
Если НеобходимаИнициализация Тогда
ИнициализироватьДокумент(ДанныеЗаполнения);
КонецЕсли;
ДополнительныеСвойства.Вставить("НеобходимостьЗаполненияКассыПриФОИспользоватьНесколькоКассЛ ожь", Ложь);
ДополнительныеСвойства.Вставить("НеобходимостьЗаполненияСчетаПриФОИспользоватьНесколькоСчето вЛожь", Ложь);
ЗаполнениеСвойствПоСтатистикеСервер.ЗаполнитьСвойстваОбъекта(ЭтотОбъект, ДанныеЗаполнения);
Если НЕ ТипДанныхЗаполнения = Тип("Структура") Тогда
СкладГруппа = Справочники.Склады.ЭтоГруппаИСкладыИспользуютсяВТЧДокументовПродажи(Склад);
СкладыСервер.ЗаполнитьСкладыВТабличнойЧасти(Склад, СкладГруппа, Товары, Ложь);
КонецЕсли;
КонецПроцедуры
Показать
(3) Как сильно похоже на наше ерп
Вот в эту сторону попробуй пойти
&НаКлиенте
Процедура СоздатьЗаказПоставщику(Команда)
Форма = ПолучитьФорму("Документ.ЗаказПоставщику.ФормаОбъекта");
ДокОбъект = Форма.Объект;
ОткрытьФормуНезаписанногоДокументаНаСервере(ДокОбъект);
КопироватьДанныеФормы(ДокОбъект, Форма.Объект);
Форма.Открыть();
КонецПроцедуры
&НаСервере
Процедура ОткрытьФормуНезаписанногоДокументаНаСервере(ДокОбъект)
НовыйДокумент = Документы.ЗаказПоставщику.СоздатьДокумент();
Таблица = объект.ТЧ.Выгрузить();
ДанныеЗаполнения = Новый Структура;
ДанныеЗаполнения.Вставить("Товары", Таблица);
ДанныеЗаполнения.Вставить("Склад", Объект.Склад);
НовыйДокумент.Заполнить(ДанныеЗаполнения);
ЗначениеВДанныеФормы(НовыйДокумент, ДокОбъект);
КонецПроцедуры
ПоказатьВот в эту сторону попробуй пойти
(7) Написал в 6 сообщении. Номенклатура не должна быть строкой. Количество не доолжно быть строкой, должно быть числом
Сделай так, чтобы типы были одинаковые
http://prntscr.com/p47ldk
Сделай так, чтобы типы были одинаковые
(2)Я сделал так, как вы сказали
&НаКлиенте
Процедура СоздатьЗаказПоставщику(Команда)
ПараметрыФормы = Новый Структура;
Основание = Новый Структура("Товары", Объект.ТЧ);
ПараметрыФормы.Вставить("Основание", Основание );
ОткрытьФорму("Документ.ЗаказПоставщику.Форма.ФормаДокумента", параметрыФормы, ЭтаФорма);
Прикрепленные файлы:
(4) http://prntscr.com/p47idm
У меня номенклатура с типом строка. Если было бы с типом справочника номенклатура, то все было бы хорошо
У меня номенклатура с типом строка. Если было бы с типом справочника номенклатура, то все было бы хорошо
(12) Либо
&НаСервере
Процедура ОткрытьФормуНезаписанногоДокументаНаСервере(ДокОбъект)
Для Каждого Стр Из Объект.ТЧ Цикл
НоваяСтрока = ДокОбъект.Товары.Добавить();
ЗаполнитьЗначенияСвойств(НоваяСтрока, Стр);
СтруктураДействий = Новый Структура;
СтруктураДействий.Вставить("ПересчитатьКоличествоУпаковок");
ОбработкаТабличнойЧастиСервер.ОбработатьСтрокуТЧ(НоваяСтрока, СтруктураДействий, Неопределено);
КонецЦикла;
КонецПроцедуры
Показать
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот