English
Español
PPPRetAgAtEp
Função que retorna os Agentes carregados pela função PPPCarLocCarAti.
Sintaxe: Funcao PPPRetAgAtEp(Alfa TipOp,Numero End Ini,Numero End Fim,Numero End Org,Numero End Loc,Alfa End NLoc,Numero End Atv,Alfa End DAtv,Numero End Agt,Alfa End DAgt, Alfa End ConPPP,Alfa End InfInt);
Parâmetros:Nome | Tipo | Descrição |
TipOp | Alfa | Tipo de Operação a ser realizada. As possíveis operações estão abaixo:
|
Ini | Numérico | Retorna o período inicial do Agente. |
Fim | Numérico | Retorna o período final do Agente. |
Org | Numérico | Retorna o Organograma do Local onde o Agente está presente. |
Loc | Numérico | Retorna o Local onde o Agente está presente. |
NLoc | Alfa | Retorna a descrição do Local onde o Agente está presente (no nível do PGR). |
Atv | Numérico | Retorna a Atividade que contém o Agente. |
DAtv | Alfa | Retorna a descrição da Atividade que contém o Agente. |
Agt | Numérico | Retorna o Agente. |
DAgt | Alfa | Retorna a descrição do Agente. |
ConPPP | Alfa | Retorna se o Agente deve respeitar o LT. |
InfInt | Alfa | Retorna se o Agente trabalha com Intervalos no Laudo. |
<div class="Code"><p>/* carrega todas as alterações de Filial/Local/Cargo */<br></br>PPPCarLocCarAti (xnumemp, xtipcol, xnumcad, xperini, xperfim, "S", xAprFun, EAbrAgt, 0, 0, 0, "");<br></br>str_agrupa = ",CodAgt,TecUti,ConEfi,EPCEfi,CerApr,QuaAge,";<br></br>Se (xemidos = "S")<br></br> str_agrupa = str_agrupa + "QtdDos,";<br></br>Se (xemilim = "S")<br></br> str_agrupa = str_agrupa + "TolMax,";<br></br>/* Filtra e agrupa os Agentes carregados */<br></br>PPPFilAgruAgAtEp("P", xemiagt, str_agrupa);<br></br>xfilagru = PPPRetAgAtEp("I", ret_datini, ret_datfim, ret_taborg, ret_numloc, ret_nomloc, ret_codatv, ret_desatv, ret_codagt, ret_desagt, ret_conppp, ret_InfInt);<br></br>Se (xfilagru <> 0)<br></br>{<br></br> /* Retorna informações adicionais do Agente */<br></br> PPPRetAgAtEpEx1(ret_tipris, ret_subati, ret_emippp, ret_agtqua, ret_aprqua, ret_fatred, ret_quaage, ret_quacol, ret_nivaca, ret_limtol, ret_qtdcas, ret_qtddos, ret_QuaAte);<br></br> PPPRetAgAtEpEx2(ret_uniafe, ret_tecuti, ret_epiefi, ret_epcefi, ret_forexp, ret_codepi, ret_desepi, ret_cerapr);<br></br> Se (ret_tipris = 2)<br></br> xdesagt = ret_subati;<br></br> Senao<br></br> xdesagt = ret_desagt;<br></br>}</p></div>
Utilização: Gerador de relatórios.
Disponível para o módulo: SM.
English
Español
