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.