Из ФизЛиц в Сотрудники
28.10.2005
19:30
#1
Я пока любитель помогите пожалуйста написать обработку с помощью которой можно добавить в справочник Сотрудники всех из справочника ФизЛица причем КОД в справочнике сотрудников должен соответсвовать ТАБЕЛЬНОМУ НОМЕРУ в справочнике Сотрудники
29.10.2005
11:18
#2
"Я в своей конфе - просто удалил справочник "ФизЛица". На его место поставил "Сотрудники". Также как справочник "Фирмы" и "СвоиЮрЛица".
Хорошо хоть справочник "Номенклатура" в единственном экземпляре, а то могли бы продублировать, например, "Справочник.Товары"
//Перенос справочника:
ФЛ=СоздатьОбъект("Справочник.ФизЛица");
Сотр=СоздатьОбъект("Справочник.Сотрудники");
ФЛ.ВыбратьЭлементы();
Пока ФЛ.ПолучитьЭлемент()=1 Цикл
Сотр.Новый();
Сотр.Код=ФЛ.ТекущийЭлемент().Код;
Сотр.Наименование=ФЛ.ТекущийЭлемент().Наименование;
.......
Сотр.Пол.Установить('01.01.2005',ФЛ.ТекущийЭлемент().Пол.Получить('01.01.2005'));//Для периодических реквизитов
.......
.......
.......
Сотр.Записать();//ОБЯЗАТЕЛЬНО!
КонецЦикла;
Если ФЛ в группах, тогда сложнее.
Сначала надо перетащить группы, затем присвоить элементу справочника группу-родитель."
Хорошо хоть справочник "Номенклатура" в единственном экземпляре, а то могли бы продублировать, например, "Справочник.Товары"
//Перенос справочника:
ФЛ=СоздатьОбъект("Справочник.ФизЛица");
Сотр=СоздатьОбъект("Справочник.Сотрудники");
ФЛ.ВыбратьЭлементы();
Пока ФЛ.ПолучитьЭлемент()=1 Цикл
Сотр.Новый();
Сотр.Код=ФЛ.ТекущийЭлемент().Код;
Сотр.Наименование=ФЛ.ТекущийЭлемент().Наименование;
.......
Сотр.Пол.Установить('01.01.2005',ФЛ.ТекущийЭлемент().Пол.Получить('01.01.2005'));//Для периодических реквизитов
.......
.......
.......
Сотр.Записать();//ОБЯЗАТЕЛЬНО!
КонецЦикла;
Если ФЛ в группах, тогда сложнее.
Сначала надо перетащить группы, затем присвоить элементу справочника группу-родитель."
Читают тему
(гостей: 1)