перенос номеров телефонов сотрудников из dbf файла
Внимание! Тема закрыта. Добавлять сообщения в закрытую тему запрещено.
По теме из базы знаний
- Перенос сотрудников из ЗиК в Бух (бюджет).
- Перенос данных и обмен из УТ 10.3 в УТ 11 / КА 2 / ERP 2. Переносятся документы, справочники и остатки
- Перенос данных из КА 1.1 в ERP 2. Переносятся остатки, документы и справочники
- Перенос данных из КА 1.1 в КА 2.5. Переносятся документы, остатки и справочники
- Переход и перенос данных из БП 2.0 в БП 3.0. Переносятся документы, остатки и справочники
Найденные решения
Остальные ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
короч теперь добавляет, но номер отображается только после того как в справочнике сотрудников откроешь номер телефона, потом укажешь телефон физлица, и нажмешь ок, теперь отображает, но у меня 24 тысячи сотруднкиов, как быть не знаю, вот код
Если ЗначениеЗаполнено(ТД.TELEFON) Тогда
мНаборЗаписей = РегистрыСведений.КонтактнаяИнформация.СоздатьНаборЗаписей();
мНаборЗаписей.Отбор.Объект.Значение = ФизЛицо.Ссылка;
мНаборЗаписей.Отбор.Объект.Использование = Истина;
мНаборЗаписей.Отбор.Тип.Значение = Перечисления.ТипыКонтактнойИнформации.Телефон;
мНаборЗаписей.Отбор.Тип.Использование = Истина;
ЗаписьНабора = мНаборЗаписей.Добавить();
ЗаписьНабора.Объект = ФизЛицо.Ссылка;
ЗаписьНабора.Тип = Перечисления.ТипыКонтактнойИнформации.Телефон;
ЗаписьНабора.Вид = Справочники.ВидыКонтактнойИнформации.ТелефонФизЛица;
ЗаписьНабора.Поле3 = СОКРЛП(ТД.TELEFON);
ЗаписьНабора.Представление = СОКРЛП(ТД.TELEFON);
мНаборЗаписей.Записать(Истина);
КонецЕсли;
Если ЗначениеЗаполнено(ТД.TELEFON) Тогда
мНаборЗаписей = РегистрыСведений.КонтактнаяИнформация.СоздатьНаборЗаписей();
мНаборЗаписей.Отбор.Объект.Значение = ФизЛицо.Ссылка;
мНаборЗаписей.Отбор.Объект.Использование = Истина;
мНаборЗаписей.Отбор.Тип.Значение = Перечисления.ТипыКонтактнойИнформации.Телефон;
мНаборЗаписей.Отбор.Тип.Использование = Истина;
ЗаписьНабора = мНаборЗаписей.Добавить();
ЗаписьНабора.Объект = ФизЛицо.Ссылка;
ЗаписьНабора.Тип = Перечисления.ТипыКонтактнойИнформации.Телефон;
ЗаписьНабора.Вид = Справочники.ВидыКонтактнойИнформации.ТелефонФизЛица;
ЗаписьНабора.Поле3 = СОКРЛП(ТД.TELEFON);
ЗаписьНабора.Представление = СОКРЛП(ТД.TELEFON);
мНаборЗаписей.Записать(Истина);
КонецЕсли;
попробуй групповой обработкой справочников задать нужные реквизиты...
Уверен что вид в справочнике Справочники.ВидыКонтактнойИнформации.ТелефонФизЛица?
может Вами созданный, ручками, а не предопределенный какой? тогда по коду.
Уверен что вид в справочнике Справочники.ВидыКонтактнойИнформации.ТелефонФизЛица?
может Вами созданный, ручками, а не предопределенный какой? тогда по коду.
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот