Обработка загрузки контрагентов и договоров в УТ

Доброго времени суток, уважаемые коллеги! Выкладываю обработку, которая загружает контрагентов и договоры через буфер обмена в базу данных 1С Управления торговлей, версии 11.5.7.351 и Управление торговлей для Казахстана, версия 3.4.4.96 на управляемых формах. Обработка позволяет загрузить данные, скопировав их в буфер обмена. В прошлый раз была выложена неплохая обработка для загрузки по платежным картам.

Внешний вид обработки для загрузки контрагентов и договоров из УТ:

Внешний вид обработки для загрузки контрагентов и договоров в УТ

Описание работы загрузки контрагентов и договоров в УТ

Обработка позволяет загрузить данные, скопировав их из файла Excel в буфер обмена.

  • Скачайте обработку по ссылке в конце статьи.
  • Затем откройте её в режиме 1С:Предприятие 8.
  • Перейдите к пункту меню «Файл» | «Открыть…» (Ctrl+O).
  • Выберите организацию.
  • После этого нужно открыть файл Excel, который приложен к загрузке обработки, затем выделить ячейки с данными которые вы хотите загрузить.
  • Перейти в 1С и нажать на кнопку Загрузить, чтобы были созданы элементы справочника Контрагенты, Партнёры и Договоры контрагентов.

Из буфера обмена для справочника Контрагенты и Партнёры, заполняются реквизиты Наименование и ИНН. Для справочника Договоры контрагентов заполняются реквизиты Наименование и Тип договора. Шаблон файла Excel состоит из пяти колонок: Наименование, Валюта, Контрагент, БИН и Вид договора.

Обработка работает в следующем порядке: сначала происходит поиск контрагента по ИНН, если контрагент найден, то его данные и данные соответствующего ему партнёра обновляются, если не найден, то создается новый контрагент и партнёр.

Затем происходит поиск договора, по контрагенту, наименованию и валюте, если такой договор есть, то его данные обновляются, если нет, то создаётся новый. Обработка работает в управляемом режиме.

Часть программного кода обработки на встроенном языке 1С

Когда вы нажимаете кнопку Загрузить срабатывает процедура ЗагрузитьНаСервере и выполняется следующий код:

&НаСервере
Процедура ЗагрузитьНаСервере(ТекстИзБуфера)	
	Сообщение = Новый СообщениеПользователю;
	Структура = ПрочитатьБуферОбмена(ТекстИзБуфера, Символы.Таб);
	Заголовки = Структура.Заголовки;
	МассивКол = Структура.Результат;
	Если ЗначениеЗаполнено(МассивКол) Тогда
		Для каждого Товар из МассивКол Цикл
			ИмяДоговора 	 = СокрЛП(Товар[0]);
			КодВалюты   	 = СокрЛП(Товар[1]);
			Наименование     = СокрЛП(Товар[2]);
			ИИНКонтрагента   = СокрЛП(Товар[3]);
			ВидДоговора      = СокрЛП(Товар[4]);
			Валюта			 = Справочники.Валюты.НайтиПоНаименованию(КодВалюты);
			СтруктураРеквизитов = Новый Структура("Контрагент, Наименование, ИНН");
			Контрагент = Справочники.Контрагенты.НайтиПоРеквизиту("ИНН", ИИНКонтрагента); 
			Партнер    = Справочники.Партнеры.ПустаяСсылка();
			Если НЕ Контрагент.Пустая() Тогда
		    	СтруктураРеквизитов.Контрагент = Контрагент;
			КонецЕсли;
			СтруктураРеквизитов.Наименование = Наименование;
			СтруктураРеквизитов.ИНН = ИИНКонтрагента;
			ЗаполнитьРеквизитыКонтрагента(СтруктураРеквизитов, Контрагент, Партнер);
			
			// Создание договора
			...			
			ОбъектДоговор.Записать();		
		КонецЦикла;	
	КонецЕсли;
	ТекстСообщения = "Контрагенты записаны!";	
	Сообщение.Текст = ТекстСообщения;
	Сообщение.Сообщить();
КонецПроцедуры

Конечно, здесь опубликован не весь программный код обработки для загрузки контрагентов и договор из буфера обмена в УТ. Но его можно увидеть, да и опробовать саму эту обработку, если скачать по ссылке. Если вы хотите загружать документы реализации в бухгалтерию, тогда обратите внимание на обработку документов Реализация товаров из Excel. Если у вас другие данные или другая конфигурация, то мы можем помочь изменить обработку под ваши нужды, обращайтесь.

Демонстрация работы обработки 1С для загрузки контрагентов и договоров в УТ

ПОДПИСКА