Ir para conteúdo
  • Cadastre-se

dev botao

erro ao gerar o registro 74


Ver Solução Respondido por Renato Rubinho,
  • Este tópico foi criado há 729 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Pessoal estou gerando o registro 74 da seguinte maneira:

  wregistro74 := TRegistro74.Create;

  ACBrSintegra.FileName := xnomarq;
  ACBrSintegra.VersaoValidador := vv524;

  GerarRegistro10;
  GerarRegistro11;

  QEstoque.First;
  while not(QEstoque.Eof) do
  begin
    if (QEstoqueSALPRO.AsFloat > 0) then
    begin
      with ACBrSintegra do
      begin
        wregistro74.Data := EDatbas2.DateValue;
        wregistro74.Codigo := QEstoqueCODIGOO.Value;
        wregistro74.Quantidade := QEstoqueSALDO.Value;
        wregistro74.ValorProduto := QEstoquePRECO.Value;
        wregistro74.CodigoPosse := '1';
        wregistro74.CNPJPossuidor := '';
        wregistro74.InscricaoPossuidor := '';
        wregistro74.UFPossuidor := '';

        Registros74.Add(wregistro74);
      end;
    end;

    QEstoque.Next;
  end;
  ACBrSintegra.GeraArquivo;

Na linha Registros74.Add(wregistro74), em determinando momento da o seguinte erro: Invalid pointer operation

Será que estou passando algum parametro errado, ou mesmo montando errado ?

Obrigado

 


  

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 729 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.