Devido à descontinuação da versão 5.10.3, que ocorrerá em 30/09/2025, informamos que este manual não receberá atualizações a partir desta data. Para mais informações sobre a evolução do Gestão Empresarial | ERP, acesse a documentação sobre a PCVV - Política do Ciclo de Vida das Versões.

Informamos que as funcionalidades da Reforma Tributária estão disponíveis apenas a partir da versão 5.10.4 do Gestão Empresarial.
Acesse o Portal de Exigências Legais da Senior para saber como preparar o seu negócio!

LeMemListPosPorAnal

Esta função tem como finalidade carregar os dados da grade Analítica da tela do C. Receber - Posição de títulos por portador em determinada data base.

Sintaxe: Funcao LeMemListPosPorAnal(Numero NP, Numero End pFM, Numero End pCodFil, Alfa End pNumTit, Alfa End pCodTpt, Numero End pDatBas,Alfa End pCodPor,Alfa End pCodCrt, Numero End pVlrVen, Numero End pVlrAve);

Parâmetros:

Nome Tipo Descrição
NP Numero Posição atual da lista em memória.
pFM Numero Indicativo se é o final da lista ou não (0-Não e 1-Sim).(Retorno)
pCodFil Numero Código da Filial do título.(Retorno)
pNumTit Alfa Número do Título.(Retorno)
pCodTpt Alfa Tipo do Título.(Retorno)
pDatBas Numero Data Base.(Retorno)
pCodPor Alfa Código do portador do título.(Retorno)
pCodCrt Alfa Código da carteira do título.(Retorno)
pVlrVen Numero Valor a vencer.(Retorno)
pVlrAve Numero Valor vencido.(Retorno)

Tipo de retorno:

pFM: Indicativo se é o final da lista ou não (0-Não e 1-Sim);
pCodFil: Código da Filial do título;
pNumTit: Número do Título;
pCodTpt: Tipo do Título;
pDatBas: Data Base;
pCodPor: Código do portador do título;
pCodCrt: Código da carteira do título;
pVlrVen: Valor a vencer;
pVlrAve: Valor vencido;

Exemplo:

PosMemList = 0;
FimMemList = 0;
Enquanto (FimMemList = 0)
Inicio
   LeMemListPosPorAnalPosMemList,FimMemList,VCodFil,VNumTit,VCodTpt,VDatBas,VCodPor,VCodCrt,VVlrVen,VVlrAve);
   Se (FimMemList = 0)
   Inicio
      ListaSecao("Adicional_1");
      PosMemList++;
   Fim;
Fim;

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

Este artigo ajudou você?