Редактирование табельного номера в лицевом счете

Программирование на Атлантисе (VIP, FCOM, ARD), FastReport

Модераторы: m0p3e, edward_K, Модераторы

Ответить
sol
Постоянный обитатель
Сообщения: 165
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Орловская обл. коммерческая организация

Редактирование табельного номера в лицевом счете

Сообщение sol »

Не подскажите какие таблицы нужно подцепить к Lschet для редактирования таб.номера в "Зарплате" и к Persons в "Кадрах"?
Может есть у кого готовое решение? Нужно упорядочить таб. номера,
а изобретать велосипед не хочется. Галактика-7.12.
edward_K
Заслуженный деятель интернет-сообщества
Сообщения: 5187
Зарегистрирован: 29 мар 2005, 17:49
Откуда: SPB galaxy spb

Сообщение edward_K »

в кадрах да и в зарплате есть фейс - замена табельных номеров.
забиваете новые и вперед - все сделают за вас, а так нужно апдейтить штук 60 таблиц(ищите по x$fields, tabn,tabnmb, apptabnmb).
Вообще там пашет паскалевская функция
InitChange;
...
if (getfirst LSCHET where ((TmpTabNPers.cLschet == LSCHET.NREC)) = tsOK)
{ ChangeClockNumber(LSCHET.NREC, TmpTabNPers.NTabN, LSCHET.CEX, true);
}

if (getfirst tmpAppoint = tsOk)
if (tmpAppoint.AppTabNmb <> TmpTabNPers.NTabN)
{ tmpAppoint.AppTabNmb:= TmpTabNPers.NTabN;
if (update current tmpAppoint <> tsOk){};
}

if (TmpTabNPers.PR = 'О') or (TmpTabNPers.PR = '')//Основное назначение
if (getfirst tmpPersons = tsOK)
if (tmpPersons.TabNmb <> TmpTabNPers.NTabN)
{ tmpPersons.TabNmb:= TmpTabNPers.NTabN;
if (update current tmpPersons <> tsOk){};
}
}

DoneChange;

tmpAppoint, tmpPersons - синонимы Appointments и Persons
Ged
Местный житель
Сообщения: 645
Зарегистрирован: 29 мар 2005, 17:49
Контактная информация:

Сообщение Ged »

Самому писать геморно..
Тем болеее существует возможность при подмене табельного номера в пакетном режиме нарваться на такой же табельный номер существующий.

А чем не нравится - Расчет зарплаты - сервисные функции - Переводы с начала месяца?
А потом в кадрах обновить табельные?
sol
Постоянный обитатель
Сообщения: 165
Зарегистрирован: 29 мар 2005, 17:49
Откуда: Орловская обл. коммерческая организация

Сообщение sol »

Да почти у 300 человек несовпадение таб.н. в зарплате и кадрах, кроме того таб.номера у некоторых зашкаливают за 6 цифр.
А чтобы не совпали таб. номера, думаю редактировать в 2 этапа: сначала присвоить таб. номера 6цифр+4 цифры, а потом проапдейтить по нормальному.
Ответить