Gestão de Pessoas - Manual do Usuário > Customizações > Variáveis > CodPltOri

CodPltOri

Retorna o Código da Planta das marcações originais (R070CRI) do ponto do colaborador. Entre colchetes informa-se a posição do código que se quer saber. A função RetornaMarcacoesOriginais é quem carrega esta variável.

Tipo: Numérico.

Exemplo:

@ Retorna Marcações originais na data de processamento e se tiver Planta ou Coletor, busca Número Fiscal do Relógio @
RetornaMarcacoesOriginais(R034FUN.NumEmp, R034FUN.TipCol, R034FUN.NumCad, DatPro, DatPro);

Definir Cursor cNumFisRlg;

xCodPlt = CodPltOri[1];
xCodRlg = CodRlgOri[1];
cNumFisRlg.Sql" SELECT NUMFIS FROM R058RLG WHERE CODPLT = :xCodPlt AND CODRLG = :xCodRlg";
cNumFisRlg.AbrirCursor();
Se (cNumFisRlg.Achou)
AlfaParaInt(cNumFisRlg.NumFis, xNumFis);
Senao
xNumFis = 0;
cNumFisRlg.FecharCursor();

Utilização: Disponível para todas as regras.

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