Gestão de Pessoas - Manual do Usuário > Customizações > Funções > AssociaUsuColab

AssociaUsuColab

Esta função pode ser utilizada para associar usuários a colaboradores. Clique aqui para ver o exemplo em uma regra.

Sintaxe: AssociaUsuColab(Numero aNumEmp, Numero aTipCol, Numero aNumCad, Numero aCriUsu, Numero aCodUsu);

Parâmetros:

Nome	Tipo	Descrição
aNumEmp	Numérico	Código da empresa.
aTipCol	Numérico	Código do tipo de colaborador.
aNumCad	Numérico	Cadastro do colaborador.
aCriUsu	Numérico	Código da opção para abrangência do usuário associado ao colaborador (Conforme lista R034USU.CriUsu).
aCodUsu	Numérico	Código do usuário que deverá ser associado ao colaborador.

Tipo do Retorno: Numérico. Se a associação for efetuada com sucesso, retornará 1. Caso contrário, retornará 0.

Exemplo:

vNumEmp = cUsuCol.NumEmp;
vTipCol = cUsuCol.TipCol;
vNumCad = cUsuCol.NumCad;

/* Se não houver usuário associado, efetua a associação com usuário com código igual ao cadastro do colaborador */
Se (RetCodUsuPorColab(vNumEmp, vTipCol, vNumCad) = 0)
AssociaUsuColab(vNumEmp, vTipCol, vNumCad, 2, vNumCad);

Utilização: Em todas as regras.