Ir para conteúdo
  • Cadastre-se

dev botao

Dados Ultima Reducao Z


  • Este tópico foi criado há 3103 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Pessoal, boa tarde!

Minha dificuldade é a seguinte em uma Impressora fiscal Bematech MP 4000 TH F1:

Referente ao Procedimento DadosUltimaReducaoZ, estou tendo problemas em dois casos bem isolados para armazenar os dados da redução Z para fins de sped fiscal:

// dados gerais
   MyTbReducoesNumeroCOOInicial.AsString := ReducaoZ.NumeroCOOInicial;

NumeroCOOInicial, não retorna nenhum valor para posta em minha tabela.

Em Meios de Pagameto também não obtenho resultado algum:

  // MEIOS DE PAGAMENTO ******************************************************
  MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamento.Active := true;

  for I := 0 to ReducaoZ.MeiosDePagamento.Count - 1 do
  begin
    with ReducaoZ.MeiosDePagamento[I] do
    begin

      MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamento.Insert;
      MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamentoreducao_id.
        AsInteger := MyTbReducoesid.AsInteger;
      MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamentoIndice.AsString
        := Indice;
      MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamentoDescricao.AsString
        := Descricao;

      if PermiteVinculado = true then
      begin
        MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamentoPermiteVinculado.
          AsInteger := 1;
      end
      else
      begin
        MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamentoPermiteVinculado.
          AsInteger := 0;
      end;

      MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamentoData.
        AsDateTime := Data;
      MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamentoTipoDoc.AsString
        := TipoDoc;
      MyTbecf_dados_reducao_ecf_dados_reducao_meiosdepagamento.Post;

    end;
  end;

Existe alguma outra forma de conseguir os dados das formas de pagamento? 
 

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Isso depende muito do retorno do ECF...

Nem todos os modelos, retornam o COO Inicial na leitura de Dados da última redução Z...

Uma sugestão para esse caso, é computar o mesmo, usando a sua base de dados...

COOInicial = COO_ReducaoZ_Movimento_anterior + 1

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Sim

Citar

Uma sugestão para esse caso, é computar o mesmo, usando a sua base de dados.

Por favor crie um tópico para cada caso...

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3103 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.

The popup will be closed in 10 segundos...