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!

LeMemListDIPIClaFis

Ler a lista de dados montada pela função "SelecionaDadosDIPI".

Sintaxe: LeMemListDIPIClaFis(Numero pPos, Numero pOrd, Numero End pFim, Alfa End CodNbm, Alfa End NomMer, Numero End Valor)

Parâmetros:

Nome Tipo Descrição
pPos Numero Variável que indica a posição da lista que se quer ler.
pOrd Numero Variável utilizada para indicar como deve ser efetuada a leitura e montagem do nome da mercadoria nos quadros DADOS DE ENTRADA e DADOS DE  SAÍDA, podendo ser seu conteúdo 0 (pelo código do produto) ou 1 (pela descrição do produto).
pFim Numero Variável que retorna 1 quando tiver acabado a lista.
CodNbm Alfa Variável que retorna o código da classificação fiscal .
NomMer Alfa Variável que retorna o nome da mercadoria.
Valor Numero Variável que retorna o valor movimentado por esta classificação fiscal.

Tipo de retorno: 

pFim: Variável numérica que retorna 1 quando tiver acabado a lista.

CodNbm:  Variável alfanumérica que retorna o código da classificação fiscal .

NomMer: Variável alfanumérica que retorna o nome da mercadoria.

Valor: Variável numérica que retorna o valor movimentado por esta classificação fiscal.

Exemplo:

Definir Data vDatIni; @Calculada no inicio do relatorio@

Definir Data VDatFim; @Calculada no inicio do relatorio@

Definir Alfa VClaFis;

Definir Alfa VDesClf;

Definir Alfa VCodTns;

Definir Alfa VIniCodTns;

VCodEmp = ECodEmp;

VCodFil = ECodFil;

/**A funcao abaixo seleciona os 20 maiores grupos de classificação fiscal por ordem decrescente de valor***/

SelecionaDadosDIPI("DadosEntradas",VCodEmp,VCodFil,VDatIni,VDatFim,20);

FimMemList = 0;

Pos = 0;

Enquanto (FimMemList = 0)

    inicio

    LeMemListDIPIClaFis(Pos,0,FimMemList,VClaFis,VDesClf,FVlrNbmFor);

    Se (FimMemList = 0)

        Inicio

        AlteraControle("DClaFis","Descrição",VClaFis);

        AlteraControle("DDesClf","Descrição",VDesClf);

        ListaSecao("Adicional_dados09");

        Pos = Pos + 1;

        Fim;

    Fim;

Utilização da Função (dependentes): SelecionaDadosDIPI

Observações: Esta função serve para ler a lista de dados montada pela função  "SelecionaDadosDIPI". Se a lista que estiver em memória for a de NFs de Entrada, será lida esta, se estiver em memória a de Saída, serve para ler esta outra. A Função  "SelecionadadosDIPI" deve preceder esta função de leitura.

Este artigo ajudou você?