English
Español
VerInterjornadaEscala
Verifica se tem inconsistência de interjornada ao incluir um histórico/troca de escala. Depende do assinalamento “Interjornada” da Ficha Básica.
Sintaxe: VerInterjornadaEscala(Numero xnumemp, Numero xtipcol, Numero xnumcad, Data xdatini, Data xdatfim, Numero xcodesc, Numero xcodtma, 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 Inicial da Alteração. |
xDatFim | Data | Data Final da Alteração (para históricos de escala deve ser passado zero). |
xCodEsc | Numérico | Escala para qual será alterado. |
xCodTma | Numérico | Código da Turma para qual será alterado. |
xIntOk | Alfa | Retorna Mensagem no caso de problemas com Interjornada. Se não tiver problema vem vazio. |
<div class="Code"><p>/* Exemplo para a regra por processo de inclusão de troca de escala. */</p><p></p><p>Definir alfa xIntOk;</p><p></p><p>xnumemp = r064tes.numemp;<br></br>xtipcol = r064tes.tipcol;<br></br>xnumcad = r064tes.numcad;<br></br>xdatini = r064tes.datini;<br></br>xdatfim = r064tes.datfim;<br></br>xcodesc = r064tes.codesc;<br></br>xcodtma = r064tes.codtma;</p><p></p><p>VerInterjornadaEscala(xnumemp, xtipcol, xnumcad, xdatini, xdatfim, xcodesc, xcodtma, xIntOk);</p><p>Se (xIntOk <> "")<br></br> Inicio<br></br> xIntOk = xIntOk + " [&Ok]";<br></br> Mensagem(Retorna,xIntOk);<br></br> Fim;</p></div>
Utilização: Em todas as regras.
Disponível para o módulo: Controle de Ponto e Refeitório.
English
Español
