Копирование сотрудников из ЗиК в Бухгалтерию

Опубликовал Андрей Чунихин (ApocalypseNTC) в раздел Обработки - Обработка справочников

Подключается как внешняя печатная форма справочника "Сотрудники", соединяется с базой ЗиК через OLE, находит сотрудника по части ФИО и переносит выбранного сотрудника в базу Бухгалтерии.

У нас на предприятии до сих пор используется 1с Предприятие 7.7 конфигурации Зарплата и кадры и Бухгалтерия. Бухгалтерам захотелось копировать элементы справочника "Сотрудники" из Зарплаты и кадры в Бухгалтерию выборочно, при этом особо не заморачиваясь с поиском оного.

Конфигурацию менять было не желательно, поэтому я написал внешнюю обработку, которую подключал как внешнюю печатную форму в форму списка справочника "Сотрудники". 

В обработке нужно указать часть ФИО искомого сотрудника. Если будет найдено более одного соответствия, то будет предложено выбрать нужного сотрудника.

В результате будет перенесен один сотрудник из ЗиК в Бухгалтерию, без особых усилий и изменений в конфигурации.

Проверено на Бухгалтерии 7.7.515 и ЗиК 7.7.296. Связь с базой ЗиК через OLE. Обе базы на SQL.  

Скачать файлы

Наименование Файл Версия Размер
Внешняя печатная форма
.ert 69,00Kb
21.06.10
133
.ert 69,00Kb 133 Скачать

См. также

Добавить вознаграждение
Комментарии
1. Александр Рытов (Арчибальд) 2651 22.06.10 07:39 Сейчас в теме
Оказывается, пол Сергея Безрукова - женский :o
СергейКа; +1 Ответить
2. Денис Плясовских (Denizzz) 22.06.10 08:56 Сейчас в теме
3. Андрей Чунихин (ApocalypseNTC) 642 22.06.10 09:04 Сейчас в теме
Ну вот так базу у нас ведут кадры :)
4. Стрелков Александр (Культурный) 4 22.06.10 11:34 Сейчас в теме
Учитывая, что последний релиз ЗиК 297, а Бухгалтерии 515 проверялась обработка на Зик 296 и Бух 515?
ApocalypseNTC; +1 Ответить
5. Андрей Чунихин (ApocalypseNTC) 642 22.06.10 11:53 Сейчас в теме
Действительно ошибка вышла. Исправил.
6. Галина (galkael) 24.06.10 01:23 Сейчас в теме
У меня вылетела ошибка:
СпрСотрудники.Подразделение = глЗначениеПоУмолчанию<<?>>("ОсновноеПодразделение");
{D:\Z20100608\ZPNOV\EXTFORMS\ПОИСКПОЗИК.ERT(129)}: Функция не обнаружена (глЗначениеПоУмолчанию)
Релиз ЗиК 296
8. Андрей Чунихин (ApocalypseNTC) 642 24.06.10 18:57 Сейчас в теме
Эту обработку надо запускать в бухгалтерии. В коде надо указать путь до базы ЗиК, имя пользователя, который имеет право подключаться к ЗиК и его пароль. После этого будет работать.

В первых же строках кода:

//Подключаемся к базе данных ЗиК
V7 = СоздатьОбъект("V77S.Application");
Пользователь = "ИмяПользователяЗиК";
Пароль = "ПарольПользователяЗиК";
Попытка
Если V7.Initialize(V7.RMTrade, "/d" + СокрЛП("ПутьДоБазыЗиК") + " /N" + СокрЛП(Пользователь) + " /P" + СокрЛП(Пароль), "NO_SPLASH_SHOW") = 0 Тогда
Предупреждение("Ошибка подключения");
Возврат;
КонецЕсли;
Исключение
Сообщить("Не удалось подключиться к базе данных зарплата и кадры. Обратитесь за помощью в службу технической поддержки или попробуйте еще раз.");
КонецПопытки;

Отредактировано ApocalypseNTC 24.06.2010 08:10
9. Галина (galkael) 30.06.10 09:13 Сейчас в теме
V7 = СоздатьОбъект("V77S.Application");
{D:\BO20100215\B021202\EXTFORMS\ПОИСКПОЗИК.ERT(6)}: Неудачная попытка создания объекта (V77S.Application)
10. Владимир (mvd2) 14.10.11 10:18 Сейчас в теме
очень нужная обработка, рекомендую