VerInterjornadaTrocaHorario

Verifica se existe uma inconsistência de interjornada ao incluir uma troca de horário. Depende do assinalamento “Interjornada” da Ficha Básica.

Sintaxe: Funcao VerInterjornadaTrocaHorario(Numero xnumemp,Numero xtipcol,Numero xnumcad,Data xdatini,Numero xcodhor,Alfa xIntOk);

Parâmetros:

Nome

Tipo

Descrição

xNumemp

Numérico

Código da empresa.

xTipcol

Numérico

Tipo do colaborador.

xNumcad

Numérico

Código do Cadastro.

xDatIni

Data

Data da Alteração.

xCodHor

Numérico

Horário para qual será alterado.

xIntOk

Alfa

Retorna Mensagem no caso de problemas com Interjornada. Se não tiver problema vem vazio.

Exemplo:

<div class="Code"><p>/* Exemplo para a regra por processo de inclusão de troca de horário. */</p><p></p><p>Definir Alfa xmsgInt;</p><p></p><p>xnumemp = r064thr.numemp;<br></br>xtipcol = r064thr.tipcol;<br></br>xnumcad = r064thr.numcad;<br></br>xdatini = r064thr.datini;<br></br>xcodhor = r064thr.codhor;</p><p></p><p>VerInterjornadaTrocaHorario(xnumemp,xtipcol,xnumcad,xdatini,xcodhor,xmsgInt);</p><p>Se (xmsgInt &#x3C;> "")<br></br> Inicio<br></br> xmsgInt = xmsgInt + " [&#x26;Ok]";<br></br> Mensagem(Retorna,xmsgInt);<br></br> Fim;</p></div>

Utilização: Em todas as regras.

Disponível para o módulo: Controle de Ponto e Refeitório.

Este artigo ajudou você?