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. |
Exemplo:
/* Exemplo para a regra por processo de inclusão de troca de escala. */
Definir alfa xIntOk;
xnumemp = r064tes.numemp;
xtipcol = r064tes.tipcol;
xnumcad = r064tes.numcad;
xdatini = r064tes.datini;
xdatfim = r064tes.datfim;
xcodesc = r064tes.codesc;
xcodtma = r064tes.codtma;
VerInterjornadaEscala(xnumemp, xtipcol, xnumcad, xdatini, xdatfim, xcodesc, xcodtma, xIntOk);
Se (xIntOk <> "")
Inicio
xIntOk = xIntOk + " [&Ok]";
Mensagem(Retorna,xIntOk);
Fim;
Utilização: Em todas as regras.
Disponível para o módulo: Controle de Ponto e Refeitório.
English
Español
