Ir para conteúdo
  • Cadastre-se

dev botao

ADM com NFC-e


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

Recommended Posts

Caros amigos, estou com uma dúvida quanto a chamar o ADM com o componente TEF utilizando NFC-e ja que não será feito a conexão com a impressora fiscal.

Quando é utilizado o ADM com a impressora fiscal conectado para fazer algum cancelamento de cartão e impresso normal o comprovante do cancelamento.

Com a nfc-e não temos mais a impressora fiscal

Alguem ja fez alguma alteração a respeito do ADM com a nfc-e, estou fazendo os testes utilizando o mesmo processo so que ele trava e não faz nada.

Segue os codigos para a NFC-e

          // seta o gerenciador padrão configurado na tabela CONF_ECF
            if (not F_Funcoes.ACBrTEFD_NFCe.TEF.Inicializado) then
              F_Funcoes.ACBrTEFD_NFCe.Inicializar(TACBrTEFDTipo(dm_Fiscal.CONF_ECFGP.AsInteger));

            // se o TEF está inicializado, então iniciar o procedimento
            if F_Funcoes.ACBrTEFD_NFCe.Inicializado then
            begin
              try
                // chamar o método ADM, todos os "checks" serão feitos por ele
                // retorno do método:
                // True = OK, False=problemas, qualquer outra coisa será levantada uma exceção

                if not F_Funcoes.ACBrTEFD_NFCe.ADM( TACBrTEFDTipo( dm_Fiscal.CONF_ECFGP.AsInteger )) then
                  ShowMessage('Não foi possível concluir a operação');
              except
                on E: Exception do
                begin
                  ShowMessage(E.Message);
                end;
              end;
            end
            else
              ShowMessage('Não foi possível inicializar o TEF.');
 

 

Link para o comentário
Compartilhar em outros sites

  • Solution

no evento OnInfoECF, 

 

No evento normal é passado dessa forma

    ineEstadoECF:
        RetornoECF := sEstadoECF; //Variavel Global
 

Para NFC-e segue abaixo o codigo

 

procedure TF_Relatorio_Fiscal_ECF.ACBrTEFD_NFCeInfoECF(Operacao: TACBrTEFDInfoECF; var RetornoECF: string);
begin
  case Operacao of
      ineSubTotal:
        begin
          RetornoECF := '0';
        end;

      ineTotalAPagar:
        RetornoECF := '0';   //Como informo Pagamento a Pagamento para o TEF não existe valor a pagar no meu programa.

      ineEstadoECF: RetornoECF := 'L';

  end;
end;

  • Curtir 2
Link para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 2568 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.