Страница 1 из 1
Соответствие профессия-КПС
Добавлено: 08 фев 2005, 16:09
Alexandra
Как по профессии получить соответствующий ей КПС?
Соответствие "профессия-подразделение-особые условия-КПС" заполняется в модуле "управление персоналом" при выборе соответствующего пункта меню и наверняка хранится в какой-то из таблиц БД, но в какой именно? Помогите плиз кто знает.
Re: Соответствие профессия-КПС
Добавлено: 08 фев 2005, 17:56
Seybukan
Select
PostCat.Name, // Должность
PodrCat.Name, // Подразделение
VredCat.Name, // КПС
UslCat.Name // Вид вредности
from
Advises,
Synonym Catalogs PostCat,
Synonym Catalogs PodrCat,
Synonym Catalogs VredCat,
Synonym Catalogs UslCat
Where
((
Advises.Person == PostCat.Nrec and
Advises.Sertificate == PodrCat.Nrec and
Advises.Executor == VredCat.Nrec and
Advises.Recommendation == UslCat.Nrec
))
;
Re: Соответствие профессия-КПС
Добавлено: 08 фев 2005, 17:56
Seybukan
Select
PostCat.Name, // Должность
PodrCat.Name, // Подразделение
VredCat.Name, // КПС
UslCat.Name // Вид вредности
from
Advises,
Synonym Catalogs PostCat,
Synonym Catalogs PodrCat,
Synonym Catalogs VredCat,
Synonym Catalogs UslCat
Where
((
Advises.Person == PostCat.Nrec and
Advises.Sertificate == PodrCat.Nrec and
Advises.Executor == VredCat.Nrec and
Advises.Recommendation == UslCat.Nrec
))
;
Re: Соответствие профессия-КПС
Добавлено: 09 фев 2005, 09:51
Alexandra
Дважды спасибо!
Re: Соответствие профессия-КПС
Добавлено: 08 янв 2016, 14:24
VarankDA
Подскажите связь между advises и KLCHILD4 (подклассами)
Re: Соответствие профессия-КПС
Добавлено: 11 янв 2016, 10:19
edward_K
1. Getifccurrentfieldname там где вы сие наблюдаете.
2. При наличии соотв. лицензии на сапорт можно подсмотреть в консоле управления
3. Сходу нашел только это
Код: Выделить всё
//******************************************************************************
// функция возвращает процент взносов по тарифу
// wYear_ - год, wPodKlass - подкласс условий труда
//******************************************************************************
function fdoGetTarif(wYear_, wPodKlass_: word): double;
{
fdoGetTarif := 0;
if ( Getfirst KLChild4 where (( wPodKlass_ == KLChild4.YearInt and
wYear_ == KLChild4.MonthInt and
1 == KLChild4.Pmama
)) = tsOk )
fdoGetTarif := KlChild4.VidOpl/100
else
if ( GetLast KLChild4 where (( 1 == KLChild4.Pmama and
wPodKlass_ == KLChild4.YearInt
)) = tsOk )
fdoGetTarif := KlChild4.VidOpl/100;
}
//******************************************************************************
// функция возвращает процент взносов по тарифу
// wYear_ - год, wPodKlass - подкласс условий труда
//******************************************************************************
function fsGetKlass(wYear_, wPodKlass_: word): string[20];
{
fsGetKlass := '';
if ( Getfirst KLChild4 where (( wPodKlass_ == KLChild4.YearInt and
wYear_ == KLChild4.MonthInt and
1 == KLChild4.Pmama
)) = tsOk )
fsGetKlass := KlChild4.LastUser
else
if ( GetLast KLChild4 where (( 1 == KLChild4.Pmama and
wPodKlass_ == KLChild4.YearInt
)) = tsOk )
fsGetKlass := KlChild4.LastUser;
}