//шк ean13 Попытка текНабор=РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей(); текНабор.Отбор.Владелец.Установить(ТекущийОбъект.Ссылка); текНабор.Отбор.ТипШтрихкода.Установить(ПланыВидовХарактеристик.ТипыШтрихкодов.Ean13); текНабор.Прочитать(); текНабор.Очистить(); новСтр=текНабор.Добавить(); новСтр.Владелец=ТекущийОбъект.Ссылка; новСтр.Штрихкод=ИсточникДанных.ШтрихкодEan13; новСтр.ТипШтрихкода=ПланыВидовХарактеристик.ТипыШтрихкодов.Ean13; текНабор.Записать(); Исключение КонецПопытки; //--- //шк ean8 Попытка текНабор=РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей(); текНабор.Отбор.Владелец.Установить(ТекущийОбъект.Ссылка); текНабор.Отбор.ТипШтрихкода.Установить(ПланыВидовХарактеристик.ТипыШтрихкодов.Ean8); текНабор.Прочитать(); текНабор.Очистить(); новСтр=текНабор.Добавить(); новСтр.Владелец=ТекущийОбъект.Ссылка; новСтр.Штрихкод=ИсточникДанных.ШтрихкодEan8; новСтр.ТипШтрихкода=ПланыВидовХарактеристик.ТипыШтрихкодов.Ean8; текНабор.Записать(); Исключение КонецПопытки; //--- //шк code39 Попытка текНабор=РегистрыСведений.Штрихкоды.СоздатьНаборЗаписей(); текНабор.Отбор.Владелец.Установить(ТекущийОбъект.Ссылка); текНабор.Отбор.ТипШтрихкода.Установить(ПланыВидовХарактеристик.ТипыШтрихкодов.Code39); текНабор.Прочитать(); текНабор.Очистить(); новСтр=текНабор.Добавить(); новСтр.Владелец=ТекущийОбъект.Ссылка; новСтр.Штрихкод=ИсточникДанных.ШтрихкодCode39; новСтр.ТипШтрихкода=ПланыВидовХарактеристик.ТипыШтрихкодов.Code39; текНабор.Записать(); Исключение КонецПопытки; //--- //цены Попытка текДок=Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру("00-00000002",ТекущаяДата()).ПолучитьОбъект(); новСтр=текДок.Товары.Добавить(); новСтр.Номенклатура=ТекущийОбъект.Ссылка; новСтр.Цена=ИсточникДанных.ЦенаЗакупочная; новСтр.ВидЦены=Справочники.ВидыЦен.НайтиПОНаименованию("закупочная"); текДок.Записать(); Исключение КонецПопытки; Попытка текДок=Документы.УстановкаЦенНоменклатуры.НайтиПоНомеру("00-00000002",ТекущаяДата()).ПолучитьОбъект(); новСтр=текДок.Товары.Добавить(); новСтр.Номенклатура=ТекущийОбъект.Ссылка; новСтр.Цена=ИсточникДанных.ЦенаРозница; новСтр.ВидЦены=Справочники.ВидыЦен.НайтиПОНаименованию("Розница"); текДок.Записать(); Исключение КонецПопытки; //--- //ЗАПИСЬ Контактных Данных Если ЗначениеЗаполнено(ИсточникДанных.ЮридическийАдрес) Тогда текЗапись=РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи(); текЗапись.Объект=ТекущийОбъект.Ссылка; текЗапись.Тип=Перечисления.ТипыКонтактнойИнформации.Адрес; текЗапись.Вид=Справочники.ВидыКонтактнойИнформации.ЮрАдресКонтрагента; текЗапись.Представление=СокрЛП(ИсточникДанных.ЮридическийАдрес); текЗапись.Записать(); КонецЕсли; Если ЗначениеЗаполнено(ИсточникДанных.ПочтовыйАдрес) Тогда текЗапись=РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи(); текЗапись.Объект=ТекущийОбъект.Ссылка; текЗапись.Тип=Перечисления.ТипыКонтактнойИнформации.Адрес; текЗапись.Вид=Справочники.ВидыКонтактнойИнформации.ФактАдресКонтрагента; текЗапись.Представление=СокрЛП(ИсточникДанных.ПочтовыйАдрес); текЗапись.Записать(); КонецЕсли; Если ЗначениеЗаполнено(ИсточникДанных.Телефоны) Тогда текЗапись=РегистрыСведений.КонтактнаяИнформация.СоздатьМенеджерЗаписи(); текЗапись.Объект=ТекущийОбъект.Ссылка; текЗапись.Тип=Перечисления.ТипыКонтактнойИнформации.Телефон; текЗапись.Вид=Справочники.ВидыКонтактнойИнформации.ТелефонКонтрагента; текЗапись.Представление=СокрЛП(ИсточникДанных.Телефоны); текЗапись.Записать(); КонецЕсли; //---