RetCodHor

Retorna o código do horário do colaborador em uma data.

Sintaxe: RetCodHor (Numero xNumEmp, Numero xTipCol, Numero xNumCad, Numero xDatHor, Numero end xcodhor)

Parámetros:

Nome	Tipo	Descripción
xNumEmp	Numérico	Código de la Empresa.
xTipCol	Numérico	Tipo do Colaborador.
xNumCad	Numérico	Número do Cadastro.
xDatHor	Numérico	Data de referência.
xCodHor	Numérico	Retorna o código do horário.

Ejemplo:

Definir Alfa wCodHor;
Definir Alfa wTexto;

RetCodHor(R034FUN.NumEmp, R034FUN.TipCol, R034FUN.NumCad, DatSis, xcodhor);

IntParaAlfa(xcodhor, wCodHor);
wTexto = "Horário: " + wCodHor;
Mensagem(Retorna, wTexto);

Utilização: Gerador de Relatórios e Regras.

Disponível para os módulos: Administração de Pessoal, SM e CS.