Precisa de apoio?

RetornaFilialLocalCargo

Função que retorna as alterações de Filial, Local e Cargo que foram carregadas pela função PPPCarLocCarAti.

Importante

Esta função substitui a função PPPRetFilLocCar.

Sintaxe: RetornaFilialLocalCargo (Alfa TipOp,Numero End DtIni,Numero End DtFim,Numero End EAtu,Numero End CFil,Alfa End TFil,Numero End TIns,Alfa End NCGC,Numero End TOrg,Numero End Loc,Alfa End CodLoc,Alfa End NomLoc);

Parâmetros:

Nome Tipo Descrição
TipOp Alfa Tipo de Operação a ser realizada. As possíveis operações estão abaixo:

I - Início. Busca a primeira alteração de Filial/Local/Cargo;

P - Próximo. Busca a última alteração de Filial/Local/Cargo.
DtIni Numérico Retorna o período inicial da alteração de Filial/Local/Cargo.
DtFim Numérico Retorna o período final da alteração de Filial/Local/Cargo.
EAtu Numérico Retorna a Empresa da Filial.
CFil Numérico Retorna o código da Filial.
TFil Alfa Retorna o Tipo da Filial.
TIns Numérico Retorna o Tipo de Inscrição da Filial.
NCGC Alfa Retorna o Número da Inscrição da Filial.
TOrg Numérico Retorna o Organograma.
Loc Numérico Retorna o Local.
CodLoc Alfa Retorna o Local mascarado.
NomLoc Alfa Retorna a descrição do Local.

Exemplo:

/* Carrega todas as alterações de Filial/Local/Cargo */

PPPCarLocCarAti (xnumemp, xtipcol, xnumcad, xperini, xperfim, "S", xAprFun, EAbrAgt, 0, 0, 0, "");


/* Retorna as alterações de Filial, Local e Cargo */
ret_filloccar = RetornaFilialLocalCargo("I", ret_datini, ret_datfim, ret_empatu, ret_filemp, ret_nomfil, ret_tipins, ret_numcgc, ret_taborg, ret_numloc, ret_codloc, ret_nomloc);



Se (ret_filloccar <> 0)

{

    Se (ret_tipins = 1)

       AlteraControle("FCNPJLot", "Edição Campo", "Z99.999.999/9999.99");

    Senao

    Se (ret_tipins = 2)

       AlteraControle("FCNPJLot", "Edição Campo", "99.999.99999/99");

     Senao

     Se (ret_tipins = 3)

        AlteraControle("FCNPJLot", "Edição Campo", "999.999.999.99");

     Senao

     Se (ret_tipins = 4)

        AlteraControle("FCNPJLot", "Edição Campo", "ZZZZZZZZZZZZZZZZZZ9");

     FCNPJLot = ret_numcgc;

}

Utilização: Gerador de relatórios.

Disponível para os módulos: Segurança e Medicina e Administração de Pessoal.

Este artigo ajudou você?