---

&НаКлиенте
Процедура Импорт(Команда)
	ОкноВыбора = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
	ОкноВыбора.МножественныйВыбор = Ложь;
	ОкноВыбора.Фильтр = "Текстовый документ(*.json)|*.json|";
	ОкноВыбора.Показать(Новый ОписаниеОповещения("ИмпортНаСервере", ЭтотОбъект, 
    Новый структура));
КонецПроцедуры

&НаСервере
Процедура ИмпортНаСервере(Результат, ДопПарам) Экспорт
	ПрочитатьИзФайла = Новый ЧтениеТекста(Результат[0], КодировкаТекста.UTF8);
	ТекстИзФайла = ПрочитатьИзФайла.Прочитать();
	//распознать как json
	РаспознатьJSON = Новый ЧтениеJSON;
	РаспознатьJSON.УстановитьСтроку(ТекстИзФайла);
	
	//работа с массивом
	МассивДанных = ПрочитатьJSON(РаспознатьJSON);
	Для каждого ЭлементМассива Из МассивДанных Цикл
	
		НайденныйЭлемент = Справочники.Заказчики.НайтиПоКоду(ЭлементМассива.id);
		Если НайденныйЭлемент.Пустая() Тогда
		
			НоваяЗапись = Справочники.Заказчики.СоздатьЭлемент();
			НоваяЗапись.Код = ЭлементМассива.id;
			НоваяЗапись.Наименование = ЭлементМассива.name;
			НоваяЗапись.inn = ЭлементМассива.inn;
			НоваяЗапись.addres = ЭлементМассива.addres;
			НоваяЗапись.phone = ЭлементМассива.phone;
			НоваяЗапись.salesman = ЭлементМассива.salesman;
			НоваяЗапись.buyer = ЭлементМассива.buyer;
			НоваяЗапись.Записать();
		
		КонецЕсли;
	
	КонецЦикла;
	ЭтаФорма.Элементы.Список.Обновить();
	
КонецПроцедуры