CarregaSaldoProjeto

Carregar os Saldo e/ou Orçamento dos projetos passados conforme os parâmetros acima.

Sintaxe: Funcao CarregaSaldoProjeto(Alfa pCodEmp, Alfa pNumPrj, Alfa pCodFpj, Alfa pRotPpj, Alfa pCtaFin, Alfa pCodCcu, Numero pMesAnoIni, Numero MesAnoFim, Alfa pCarPos, Alfa pCarOrc, Alfa pCarCts, Alfa pCarCcs);

Parâmetros:

Nome Tipo Descrição
CodEmp Alfa Código da Empresa - obrigatório.
NumPrj Alfa Número do Projeto ) - obrigatório.
CodFpj Alfa Código da Fase.
RotPpj Alfa Código da Rotina – Se informado determinado valor, fará o filtro por determinada rotina.
CtaFin Alfa Conta Financeira.
CodCcu Alfa Centro de Custos .
DatIni Numero Data Inicial (Data).
DatFim Numero Data Final (Data).
CarPos Alfa Se está variável receber “Sim”, ela irá verificar se existe algo na tabela E615POS. Os valores podem ser "SIM" ou "NÃO".
CarOrc Alfa Se está variável receber “Sim”, ela irá verificar se existe algo na tabela E615ORC. Os valores podem ser "SIM" ou "NÃO".
CarCts Alfa Se está variável receber “Sim” irá trazer somente valores de Contas Financeiras “Sintéticas”. Se receber “Não” irá trazer somente valores de Contas Financeiras “Analíticas”. Se receber “Ambos”, irá trazer valores de Conta Financeira Sintéticas e Analíticas.Os valores podem ser "SIM" ou "NÃO".
CarCcs Alfa Se está variável receber “Sim” irá trazer somente valores de Centro de Custos “Sintéticos”. Se receber “Não” irá trazer somente valores de Centro de Custos “Analíticos”. Se receber “Ambos”, irá trazer valores de Centro de Custos Sintéticos e Analíticos. Os valores podem ser "SIM" ou "NÃO".

Exemplo 1:

Definir Alfa ECodEmpAlf;
Definir Alfa ENumPrjAlf;
Definir Alfa ECodFpjAlf;
Definir Alfa ERotPpjAlf;
Definir Alfa ECtaFinAlf;
Definir Alfa ECodCcuAlf;
Definir Data EMesAnI;
Definir Data EMesAnF;
CarregaSaldoProjeto(ECodEmpAlf, ENumPrjAlf, ECodFpjAlf, ERotPpjAlf, ECtaFinAlf, ECodCcuAlf, EMesAnI, EMesAnF, "SIM", "SIM", "NÃO", "NAO");

Exemplo 2: 

ERotPpj = 8;

     CUR_E091PLF.AbrirCursor();
     enquanto (CUR_E091PLF.Achou)

     inicio
         NCtaFin = CUR_E091PLF.CtaFin;
         IntParaAlfa(NCtaFin,ACtaFin);
         IntParaAlfa(NCodFpj,ACodFpj);         

         CarregaSaldoProjeto(ECodEmp,ENumPrj,ACodFpj,ERotPpj,ACtaFin,ECodCcu,EDatIni,EDatFim,"SIM","SIM",”NÃO”,”NÃO”);

     fim;

A chamada dessa função irá trazer valores respectivos das tabelas E615ORC E E615POS, trazendo somente Contas Financeiras/Centro de Custos Analíticos e valores da Rotina do Contas a Pagar.

Utilização da Função (dependentes): Nenhum dependente.

Observação 1: A função CarregaSaldoProjeto pode ser chamada mais de uma vez e com parâmetros diferentes. Após utilizar a função CarregaSaldoProjeto, pode-se utilizar a função SaldoProjeto. Não esquecer de liberar os dados carregados da função CarregaSaldoProjeto, utilizando a função LiberaSaldoProjeto.

Caso:

Observação 2: É Recomendado utilizar o Web Service de "com.senior.g5.co.mfi.prj.buscasaldofinanceiroprojetogrid: SaldoFinanceiroGrid" para buscar os dados de saldos dos projetos financeiros, pois o mesmo é mais performático e sua implementação é mais fácil e legível.

Este artigo ajudou você?