LeMemListExtCli2

Esta função lê uma lista em memória criada na Consulta Extrato de Clientes.

Sintaxe: Funcao LeMemListExtCli2(Numero pPos,Numero End pFim,Numero End pVlrJrs,Numero End pVlrMul,Numero End pVlrDsc,Numero End pVlrCor, Numero End pVlrEnc,Numero End pVlrOac,Numero End pVlrOde,Numero End pVlrLiq);

Parâmetros:

Nome	Tipo	Descrição
pPos	Numero
pFim	Numero
pVlrJrs	Numero
pVlrMul	Numero
pVlrDsc	Numero
pVlrCor	Numero
pVlrEnc	Numero
pVlrOac	Numero
pVlrOde	Numero
pVlrLiq	Numero

Exemplo:

Se (IniciouRel=0)
   Inicio
   IniciouRel=1;
   PosMemList = 0;
   CodCliAux = 0;
   Enquanto (FimMemList = 0)
      Inicio
      LeMemListExtCli2(PosMemList,FimMemList,FVlrJrs,FVlrMul,FVlrDsc,FVlrCor,FVrlEnc,VVlrOac,FVlrOde,VVlrLiq);
      Se (FimMemList = 0)
         Inicio
         Se (CodCliAux <> FCodCli)
            Inicio
            CodCliAux = FCodCli;
            ListaSecao("Adicional_2");
            Fim;
         ListaSecao("Adicional_1");
         PosMemList++;
         Fim;
      Fim;
   Fim;

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

Observações: O relatório que utiliza esta função só funcionará através da Consulta Extrato de Clientes.

PORTAL DE DOCUMENTAÇÃO
Gestão Empresarial \| ERP - versão 5.10.3 (XTended)