PPPRetFilLocCarEx

Retorna informações adicionais da alteração de Filial/Local/Cargo retornada pela função PPPRetFilLocCar. Esta função deve ser chamada após chamar a função PPPRetFilLocCar.

Sintaxe: Funcao PPPRetFilLocCarEx(Numero End Est,Alfa End Car,Alfa End Cbo,Alfa End TRed, Numero End OrgFun,Numero End Numfun,Alfa End LocFun,Alfa End NomFun,Numero End GFip,Numero End LocNiv,Alfa End CodNiv,Alfa End NomNiv);

Parâmetros:

Nome Tipo Descrição
Est Numérico Retorna a Estrutura de Cargo.
Car Alfa Retorna o Cargo.
Cbo Alfa Retorna o CBO do Cargo.
TRed Alfa Retorna o Título do Cargo.
OrgFun Numérico Retorna o Organograma o Local da Função.
Numfun Numérico Retorna o Local da Função.
LocFun Alfa Retorna o Local mascarado da Função.
NomFun Alfa Retorna a descrição do Local da Função.
GFip Numérico Retorna o código de GFIP .
LocNiv Numérico Retorna o Local conforme Nível do PGR (definido no organograma).
CodNiv Alfa Retorna o Local mascarado conforme Nível do PGR.
NomNiv Alfa Retorna a descrição do local conforme Nível do PGR.

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 = PPPRetFilLocCar("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;
    /* Carrega informações adicionais da alteração de Filial/Local/Cargo */
    PPPRetFilLocCarEx(ret_estcar, ret_codcar, ret_cbocar, ret_titred, ret_orgfun, ret_numfun, ret_locfun, ret_nomfun, ret_gfip, ret_locniv, ret_codniv,  ret_nomniv);
    lot_local = ret_codloc;
}

Utilização: Gerador de relatórios.

Disponível para o módulo: SM.

Este artigo ajudou você?