Observación: Esta página fue traducida utilizando recursos de automatización con el propósito de entregar contenido en su idioma de manera más rápida. Consecuentemente, ella puede tener errores gramaticales y situaciones similares. Si el contenido no es útil en este estado, en el pié de página usted puede acceder al material original en Portugués Brasileño y también dar opiniones sobre esta traducción.

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 Descripción
Dep 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 PPRA (definido no organograma).
CodNiv Alfa Retorna o Local mascarado conforme Nível do PPRA.
NomNiv Alfa Retorna a descrição do local conforme Nível do PPRA.

Ejemplo:

/* 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.

(missing or bad snippet)