Este conteúdo não recebe atualizações, pois é referente a uma versão do sistema que foi descontinuada. Acesse a documentação da versão 6.10.3 aqui

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 Descrição
xNumEmp  Numérico Código da 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.

Exemplo: 

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.

Este artigo ajudou você?