Перенос остатков по дисконтным картам (картам лояльности) в УТ 11

25.08.20

Учетные задачи - Оптовая торговля

Как перенести данные о накоплениях по дисконтным картам из других программ в УТ 11.

Скачать файл

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Наименование По подписке [?] Купить один файл
Перенос остатков по дисконтным картам (картам лояльности) в УТ 11:
.epf 8,59Kb
11
11 Скачать (1 SM) Купить за 1 850 руб.

В данной статье хочу поделиться опытом переноса данных о накплениях по дисконтным картам из 1С 7.7 ТиС (Excel) в УТ 11.

Прежде всего, в 1С 7.7 ТиС нет стандартного функционала работы с накопительными картами, поэтому каждый дописывает конфигурацию как хочет. В итоге перенос данных проводился с помощью Excel, что делает данный метод более универсальным.

Столкнувшись с такой проблемой впервые, я полез в интернет в поисках ответа. Результат оказался не очень информативным:

Накопление производится не по карте а по партнеру.
Соответственно, нужно просто ввести данные о продажах за предыдущий период.
Продажи хранятся в регистре ВыручкаИСебестоимостьПродаж

Это можно сделать корректировкой регистров.

С уважением,
отдел тех. поддержки "1С"

1С:Предприятие 8.2 (8.2.17.153) "Управление торговлей ", редакция 11.0 (11.0.9.15)
Ситуация: был переход с «Управление Торговлей» редакция, 10.3 на «Управление Торговлей» редакция,11.0. Необходимо внести в «Управление Торговлей» редакция,11.0 накопленные суммы скидок по накопительным картам. Подскажите, как внести эти данные

Весь процесс можно разделить на несколько этапов:

  1. Создаение контрагентов (партнеров). На этом шаге я подробно останавливаться не буду т.к. контрагенты создаются либо при типовом переносе данных из одной базы в другую, либо универсальной обработкой. Важно, что у всех партнеров должна стоять галочка "Клиент", иначе не будет доступа к картам лояльности
  2. Создание карт лояльности. На данном шаге так же можно воспользоваться универсальной обработкой по загрузке данных в справочник
  3. Создание ключей аналитик. По номенклатуре создаем предварительно руками. По партнерам ключи создаются автоматически обработкой
  4. Создание и заполнение документа Корректировка регистров

 Основная сложность всего этого процесса заключается в том, что мы не можем воспользоваться универсальной обработкой по загрузке в табличную часть документа т.к. табличной частью документа Корректировка регистров является состав регистров, а дальше формируется динамическая таблица.
Поэтому мне пришлось написать небольшую обработку, которой я и выполняю 3 и 4 пункт инструкции.

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

		Если перемНашли Тогда
			
		Иначе
			//надо поискать в справочнике ключей
			перемКлюч = Справочники.КлючиАналитикиУчетаПоПартнерам.НайтиПоНаименованию(текКлиент+"; "+перемОрганизация.Наименование+"; "+текКлиент);
			Если перемКлюч <> Справочники.КлючиАналитикиУчетаПоПартнерам.ПустаяСсылка() Тогда
				//у нас есть ключ в справочнике но нет в регистре
				//дальше нам надо эту запись закинуть и в регистр сведений
				НоваяЗапись = РегистрыСведений.АналитикаУчетаПоПартнерам.СоздатьМенеджерЗаписи();
				НоваяЗапись.Партнер = Справочники.Партнеры.НайтиПоНаименованию(текКлиент);
				НоваяЗапись.Организация = перемОрганизация;
				НоваяЗапись.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(текКлиент);
				НоваяЗапись.КлючАналитики = перемКлюч;
				НоваяЗапись.Записать(Истина);				
			Иначе
				//создаем ключ аналитики
				НовыйСпр = Справочники.КлючиАналитикиУчетаПоПартнерам.СоздатьЭлемент();
				НовыйСпр.Организация = Справочники.Организации.НайтиПоНаименованию("Наше ИП");
				НовыйСпр.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(текКлиент);
				НовыйСпр.Партнер = Справочники.Партнеры.НайтиПоНаименованию(текКлиент);
				НовыйСпр.Наименование = текКлиент+"; "+НовыйСпр.Организация.Наименование+"; "+текКлиент;
				НовыйСпр.Записать();
				перемКлюч = НовыйСпр.Ссылка;
				
				//дальше нам надо эту запись закинуть и в регистр сведений
				НоваяЗапись = РегистрыСведений.АналитикаУчетаПоПартнерам.СоздатьМенеджерЗаписи();
				НоваяЗапись.Партнер = Справочники.Партнеры.НайтиПоНаименованию(текКлиент);
				НоваяЗапись.Организация = перемОрганизация;
				НоваяЗапись.Контрагент = Справочники.Контрагенты.НайтиПоНаименованию(текКлиент);
				НоваяЗапись.КлючАналитики = перемКлюч;
				НоваяЗапись.Записать(Истина);
			КонецЕсли;
		КонецЕсли;
	
		СтрокаЗапись.АналитикаУчетаПоПартнерам = перемКлюч;
		СтрокаЗапись.ТипЗапасов = Перечисления.ТипыЗапасов.Товар;
		СтрокаЗапись.ВидЗапасов = Справочники.ВидыЗапасов.НайтиПоНаименованию("Собственный товар; Организация: Наше ИП");
		СтрокаЗапись.РазделУчета = Перечисления.РазделыУчетаСебестоимостиТоваров.ТоварыНаСкладах;
		СтрокаЗапись.СуммаВыручки = текСумма;
		СтрокаЗапись.СуммаВыручкиБезНДС = текСумма;
		СтрокаЗапись.ВалютаВзаиморасчетов = Справочники.Валюты.НайтиПоНаименованию("RUB");
		СтрокаЗапись.ВалютаДокумента = Справочники.Валюты.НайтиПоНаименованию("RUB");
		СтрокаЗапись.СуммаВВалютеВзаиморасчетов = текСумма;
		СтрокаЗапись.СуммаВВалютеДокумента = текСумма;
		СтрокаЗапись.СуммаВыручкиРегл = текСумма;
		СтрокаЗапись.СуммаВыручкиСНДСРегл = текСумма;
		СтрокаЗапись.ВидДеятельностиНДС = Перечисления.ТипыНалогообложенияНДС.ПродажаНеОблагаетсяНДС;
		СтрокаЗапись.ХозяйственнаяОперация = Перечисления.ХозяйственныеОперации.РеализацияКлиенту;
		СтрокаЗапись.НалогообложениеНДС = Перечисления.ТипыНалогообложенияНДС.ПродажаНеОблагаетсяНДС;
		
	КонецЦикла;

	док.Записать();
	
КонецПроцедуры

&НаКлиенте
Процедура ВыполнитьЗагрузку(Команда)
	ВыполнитьЗагрузкуНаСервере();
КонецПроцедуры

Ключ учета номенклатуры я предварительно создал в справочнике (Ключи аналитики учета номенклатуры)


Элементы в справочнике Ключи анатилики учета по партнерам и Регистре сведений Аналитика учета по партнерам у меня предварительно ищутся по скольку клиент уже работал в данной базе на момент загрузки данных.
Данные о накоплениях по картам лояльности скопированы в макет обработки

В заключении хочу сказать, что в процессе работы обращался к нескольким статьям в интернете по заполнению документа Корректировка регистров, но не все они содержали достоверную информацию.

Кроме этого, очень много времени было потрачено из-за того, что я создавал элемент справочника Ключи аналитики учета по партнерам, но не делал соответствующую запись в регистр сведений Аналитика учета по партнерам. Об этом тоже мало где говориться на просторах всемирной паутины. 

И не забудьте подставлять корректные суммы в ресурсы, если ваша тоговля проходит с НДС

Код обработки писал "на коленке", поэтому на оптимальность не претендую. Цель статьи заключается в том, что бы помочь систематизировать знания о работе карт лояльности в УТ и о процессе их загрузки через документ Корректировка регистров, и указать на некоторые подводные камни

УТ 11 Карты лояльности

См. также

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

Универсальная обработка для обслуживания любых фискальных регистраторов (ККТ), в том числе Веб сервер АТОЛ. Работает в соответствии с 54-ФЗ. (ФФД 1.0, ФФД 1.05, ФФД 1.1, ФФД 1.2). Подключайте любую онлайн кассу к практически любой конфигурации. Нет необходимости обновлять 1С. Можно бесплатно скачать и протестировать. Может работать одновременно с несколькими онлайн-кассами, либо одной с разных рабочих мест. (через RDP, TCP\IP или веб-сервер) Позволяет разделить один чек сразу на несколько ККТ или на несколько систем налогообложения. Поддерживает разрешительный режим и маркировку. Можно настроить собственный шаблонов чека. Можно использовать эквайринг там, где он не поддерживается. Работает на LINUX и Windows

6000 руб.

27.02.2017    807474    5110    9713    

2917

Оптовая торговля Розничная торговля Обмен с ГосИС Бухгалтер Платформа 1С v8.3 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 Розничная и сетевая торговля (FMCG) Оптовая торговля, дистрибуция, логистика Рестораны, кафе и фаст-фуд Россия Бухгалтерский учет Управленческий учет Акцизы Платные (руб)

Автоматизация учета ЕГАИС в 1С для оптовой торговли, производства и импорта. Получение и отправка ТТН, отправка акта о постановке на баланс и акта о списании. Получение остатков. Загрузка и сопоставление номенклатуры и контрагентов. Оправка в ЕГАИС отчетов о производстве и импорте.

828 руб.

15.12.2015    171866    839    368    

404

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

Обработка осуществляет обслуживание ККТ АТОЛ, Штрих, Вики Принт и Меркурий для конфигураций "УТ 10.3", "КА 1.1", "УПП 1.3", "Розница 1.0", "БП 2.0" и других отраслевых решений, построенных на основе указанных выше конфигурациях. Поддерживает возможность параллельно пробития чеков на одной ККМ несколькими пользователями. Поддерживает Веб-сервер Атол. Соответствует требованиям 54-ФЗ. Поддерживает ФФД 1.0, 1.05, 1.1 и 1.2. Разделяет чеки по нескольким СНО. Поддерживает механизмы подключения ККТ по TCP/IP, для работы через RDP или интернет. Поддержка маркировки и разрешительного режима. Поддержка пробития чеков с новыми ставками НДС 5% и НДС 7%.

5880 руб.

25.05.2015    339718    2036    3107    

1055

SALE! 10%

Перенос данных 1C Взаиморасчеты Оптовая торговля Логистика, склад и ТМЦ Файловый обмен (TXT, XML, DBF), FTP Системный администратор Программист Платформа 1С v8.3 1С:Управление торговлей 10 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Управленческий учет Платные (руб)

Можно проверить до покупки, оставьте заявку! Воспользовались более 268 компаний! Перенос данных из УТ 10.3 в УТ 11 | из УТ 10.3 в КА 2 | из УТ 10.3 в ERP. Предлагаем качественное и проверенное временем решение для перехода с УТ 10.3. Можно перенести начальные остатки, нормативно-справочную информацию и все возможные документы. При выгрузке можно установить отбор по периоду, организациям и складам. При выходе новых релизов конфигураций 1C оперативно выпускаем обновление переноса данных.

55778 50200 руб.

24.04.2015    196320    156    244    

285

SALE! 20%

Загрузка и выгрузка в Excel Оптовая торговля Печатные формы Бухгалтер Пользователь Платформа 1С v8.3 Управляемые формы Платформа 1C v8.2 1C:Бухгалтерия 1С:Комплексная автоматизация 1.х 1С:Бухгалтерия 2.0 1С:Управление торговлей 10 1С:Розница 2 1С:Управление производственным предприятием 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Управление холдингом 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Бухгалтерский учет Управленческий учет Платные (руб)

Универсальная обработка для загрузки документов из Excel в 1С. Забудьте о ручном вводе: загружайте документы из Excel в 1С за секунды! Не требует указания параметров (номера колонок, номер первой строки таблицы и т.д.) и предварительной настройки. Просто выбираете файл Excel, документ 1С и нажимаете кнопку "Загрузить". Обработка сама находит таблицу в файле Excel, необходимые для загрузки данные в ней (номенклатура, количество, НДС, цена, сумма) и загружает ее в 1С.

6000 5100 руб.

09.11.2016    239211    1089    906    

1023

Загрузка и выгрузка в Excel Маркетплейсы Программист Бухгалтер Пользователь Платформа 1С v8.3 Бухгалтерский учет 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Бухгалтерский учет Управленческий учет Платные (руб)

Реальный помощник, с помощью которого Вы преобразуете необходимые документы для Wildberries, OZON, ЯндексМаркет, Мегамаркет, Aliexpress, Детский мир, МагнитЭкспресс (быв.Казань-Экспресс), Леруа Мерлен, ЭНФАНТА (Акушерство), ЛаМода, Летуаль, Твой дом, Золотое Яблоко в документы "Отчет комиссионера (агента) о продажах" и другие. Работает в 1С:БП 3.0, 1С:БП 3.0 КОРП, 1С:УТ 11, 1С:УНФ, 1С:КА 2, 1С:ERP Управление предприятием. Возможность подключить любые маркетплейсы. Анализ продаж ОZON. 30 дней БЕСПЛАТНОГО пользования!

5400 руб.

12.08.2021    36967    384    68    

166
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. VCPro 254 07.03.19 11:27 Сейчас в теме
(0) В общем смысле перенос данных о накоплениях по дисконтным картам происходит из электронный таблицы. Поэтому нужно только придумать каким образом достать данные из вашей изначальной базы (например написать отчет)
2. duck 368 20.02.20 08:02 Сейчас в теме
Добрый день!
В идеале бы еще и обработку приложить, чтобы не собирать ее самому из кода:)
3. ir-ish-ka 22.07.20 19:20 Сейчас в теме
Добрый день!
Не знаю, была ли такая возможность на момент написания статьи.
В документах "Ввод начальных остатков" есть "Розничные продажи за прошлые периоды"
Как раз он и делает движения по регистру "Выручка и себестоимость продаж"
axae; muskul; Spacer; +3 Ответить
7. muskul 30.12.20 04:30 Сейчас в теме
(3)Когда ИТС реально пригодился
4. mrlakec 24.08.20 14:11 Сейчас в теме
А возможно оформить в виде обработки?
5. VCPro 254 25.08.20 04:50 Сейчас в теме
(4) прикрепил к публикации
6. mrlakec 16.10.20 16:42 Сейчас в теме
(5) Спасибо. А не подскажете, каким отчетом лучше достать данные из УТ 10.3?
8. VCPro 254 30.12.20 08:55 Сейчас в теме
(6) в УТ 10.3 должен быть отчет "Продажи по дисконтным картам"
9. axae 110 15.09.21 10:55 Сейчас в теме
А у нас в УТ11 есть типовой документ ввода начальных остатков "Розничные продажи за прошлые периоды", там это делается. Хотя коммерческие директора в шоке от образовавшейся выручки, которая к тому же без себестоимости. Всё-таки лучше бы в УТ11 отдельно хранились бы эти накопления...
Оставьте свое сообщение