Инструменты пользователя

Инструменты сайта


dev1c:ref_1cpark_integration

Это старая версия документа!


Интеграция 1СПАРК Риски в произвольный справочник

Настройка объектов подсистемы

Настроить типы справочников контрагентов в определяемых типах подсистемы «Базовая функциональность Интернет-поддержки»:

  • Включить в состав определяемого типа КонтрагентБИП один или несколько типов ссылки справочника контрагентов: СправочникСсылка.<Имя справочника>;
  • Включить в состав определяемого типа КонтрагентБИПОбъект один или несколько типов объектов справочника контрагентов: СправочникОбъект.<Имя справочника>;
  • (пропустил) Включить в состав определяемого типа ШаблонСообщенияБИП один или несколько типов объектов справочника контрагентов: СправочникОбъект.<Имя справочника ШаблоныСообщений>;

В общем модуле СПАРКРискиПереопределяемый:

  • Заполнить реализацию метода ПриОпределенииСвойствСправочниковКонтрагентов(). Заполнение реализации метода обязательно для работы подсистемы;
  • Заполнить реализацию методов ПараметрыНачальногоЗаполненияДанных1СПАРКРискиЮридическихЛиц() и ПараметрыНачальногоЗаполненияДанных1СПАРКРискиИндивидуальныхПредпринимателей(). Методы вызывается при переходе на новую версию конфигурации с внедренной подсистемой 1СПАРК Риски и выполняется начальное заполнение данных подсистемы. Заполнение реализации метода обязательно для работы подсистемы;

В общем модуле СПАРКРискиКлиентСерверПереопределяемый:

  • Элемент ненумерованного спискаЗаполнить реализацию метода ПриОпределенииСвойствКонтрагентаВОбъекте(). Заполнение реализации метода требуется для корректной работы подсистемы;

Настройка форм справочников контрагентов и документов

Внедрение функциональности в формы

Создать в форме реквизиты ИндексыСПАРКРиски и НастройкиСПАРКРиски, назначить тип Произвольный.

В обработчик ПриСозданииНаСервере() вставить фрагмент кода:

	// ИнтернетПоддержкаПользователей.СПАРКРиски
	Контрагент = ?(Параметры.Ключ.Пустая(), Объект.ИНН, Объект.Ссылка);
	
	ВидКонтрагентаСПАРКРиски = ВидКонтрагентаСПАРКРиски(Объект.ИНН);
	
	ПараметрыПроцедуры = Новый Структура("ВариантОтображения", "Многострочный");
	СПАРКРиски.ПриСозданииНаСервере(
		ЭтотОбъект,
		Объект,
		Контрагент,
		ВидКонтрагентаСПАРКРиски,
		ПараметрыПроцедуры);
	// Конец ИнтернетПоддержкаПользователей.СПАРКРиски

Для отображения стандартным способом (см. р. «Вариант стандартного отображения индексов в формах») допускаются значения параметра ВариантОтображения:

  • «Многострочный» - отображение индексов в многострочном варианте;
  • «Однострочный» - отображение индексов в однострочном (компактном варианте).

Для определения типа проверки, необходимо передавать ВидКонтрагента. Значение вида контрагента определяется перечислением ВидыКонтрагентовСПАРКРиски.
Если в форме нет реквизита ВидКонтрагента, то нужно добавить функции ВидКонтрагентаПоИНН и ВидКонтрагентаСПАРКРиски

&НаКлиентеНаСервереБезКонтекста
Функция ВидКонтрагентаПоИНН(ИНН)
	Если СтрДлина(СокрЛП(ИНН)) = 10 тогда
		Возврат "ЮрЛицо";
	ИначеЕсли СтрДлина(СокрЛП(ИНН)) = 10 тогда
		Возврат "ИндивидуальныйПредприниматель";
	Иначе
		Возврат "";
	КонецЕсли;
КонецФункции // ВидКонтрагентаПоИНН()

&НаКлиентеНаСервереБезКонтекста
Функция ВидКонтрагентаСПАРКРиски(ИНН)
	ЮрФизЛицо = ВидКонтрагентаПоИНН(ИНН);
	Если ЮрФизЛицо = "ЮрЛицо" Тогда
		ВидКонтрагента = ПредопределенноеЗначение("Перечисление.ВидыКонтрагентовСПАРКРиски.ЮридическоеЛицо");
	ИначеЕсли ЮрФизЛицо = "ИндивидуальныйПредприниматель" Тогда
		ВидКонтрагента = ПредопределенноеЗначение("Перечисление.ВидыКонтрагентовСПАРКРиски.ИндивидуальныйПредприниматель");
	Иначе
		ВидКонтрагента = ПредопределенноеЗначение("Перечисление.ВидыКонтрагентовСПАРКРиски.ПустаяСсылка");
	КонецЕсли;
	Возврат ВидКонтрагента;
КонецФункции

В обработчик ПриОткрытии() вставить фрагмент кода:

	// ИнтернетПоддержкаПользователей.СПАРКРиски
	СПАРКРискиКлиент.ПриОткрытии(ЭтотОбъект, Объект);
	// Конец ИнтернетПоддержкаПользователей.СПАРКРиски

В обработчик ОбработкаОповещения() вставить фрагмент кода:

	// ИнтернетПоддержкаПользователей.СПАРКРиски
	СПАРКРискиКлиент.ОбработкаОповещения(ЭтотОбъект, Объект, ИмяСобытия, Параметр, Источник);
	// Конец ИнтернетПоддержкаПользователей.СПАРКРиски

В обработчик ПослеЗаписиНаСервере() вставить фрагмент кода:

	ПараметрыЗаписиСПАРКРиски = ПараметрыЗаписи;
	// ИнтернетПоддержкаПользователей.СПАРКРиски
	СПАРКРиски.ПослеЗаписиНаСервере(ЭтотОбъект, ТекущийОбъект, ПараметрыЗаписиСПАРКРиски);
	// Конец ИнтернетПоддержкаПользователей.СПАРКРиски
dev1c/ref_1cpark_integration.1694773608.txt.gz · Последнее изменение: 2023/09/15 10:26 — admin16

Donate Powered by PHP Valid HTML5 Valid CSS Driven by DokuWiki