Erro gerando nfce comunication error 1

[João Bosco Pinotte]

Ao enviar NFCe da erro na impressora Daruma, Dr800: "Erro gerando NFCe comunication  error 1 Função incorreta."

Alguém sabe me respondor.

Obrigado!

 

[José M. S. Junior]

Bom dia,

Qual comando está passando? realizou testes com a impressora fora da aplicação? Se possível passe mais detalhes para que possamos ajudar...

[RicardoVoigt]

Em 08/01/2018 at 14:40, João Bosco Pinotte disse:

Ao enviar NFCe da erro na impressora Daruma, Dr800: "Erro gerando NFCe comunication  error 1 Função incorreta."

Alguém sabe me respondor.

Obrigado!

 

Que configurou na porta ?

Att

Ricardo

[João Bosco Pinotte]

Citar

 

     try
       CriarNFCe;                                       // RETIRAR
       formDMod.ACBrNFe1.NotasFiscais.GerarNFe;         // RETIRAR
       formDMod.ACBrNFe1.Enviar(0, False, true);        // RETIRAR
      // SalvaXMLNFe;                                     // RETIRAR
      // GravaVenda;
      // GravaProtocolo;                                    // RETIRAR
       formdMod.ACBrNFe1.NotasFiscais[0].Imprimir;      // RETIRAR
     except on Exc: Exception
         do showMessage('Erro gerando NFC-e. ' + Exc.Message);
    end;
 

Porta, de acordo com com instalada e velocidade 115200

[João Bosco Pinotte]

Segue a configuração e o comando impressão:

 

     try
       CriarNFCe;                                      
       formDMod.ACBrNFe1.NotasFiscais.GerarNFe;
       formDMod.ACBrNFe1.Enviar(0, False, true);      

     // SalvaXMLNFe;                                  
      // GravaVenda;
      // GravaProtocolo;                              

       formdMod.ACBrNFe1.NotasFiscais[0].Imprimir;      

     except on Exc: Exception
         do showMessage('Erro gerando NFC-e. ' + Exc.Message);
    end;

Configuração

  if sModelo = 'NFCe' then
   begin
      ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe;
      ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
      ACBrNFe1.Configuracoes.Geral.CSC := sqlParams.FieldByName('CSC').asstring;
      ACBrNFe1.Configuracoes.Geral.IdCSC := sqlParams.FieldByName('IdCSC').asstring;
      ACBrNFe1.DANFE.ViaConsumidor := true;
      ACBrNFe1.DANFE.ImprimirItens := true;
      if sqlParams.fieldByName('ImpNFCe').Asstring = '0'
         then ACBrNFe1.DANFE := ACBrNFeDANFeESCPOS      // Imprime na impressora Pequena
         else ACBrNFe1.DANFE := ACBrNFeDANFCeFortesA41; // Imprime no impressora Laser
      ACBrPosPrinter1.ControlePorta := True; // True faz com que o componente abra e feche a porta conforme a necessidade automaticamente
      ACBrPosPrinter1.Device.Porta := sqlParams.FieldByName('PortaImp').asstring;
      ACBrPosPrinter1.Device.Baud := strToInt(sqlParams.FieldByName('Velocidade').asstring);
      ACBrPosPrinter1.IgnorarTags := false;
      ACBrNFeDANFeESCPOS.ImprimeEmUmaLinha := true;
      ACBrNFeDANFeESCPOS.ImprimeDescAcrescItem := false;

      if sqlParams.FieldByName('ModeloImp').asstring = 'ppTexto'
         then ACBrPosPrinter1.Modelo := ppTexto;
      if sqlParams.FieldByName('ModeloImp').asstring = 'ppEscPosEpson'
         then ACBrPosPrinter1.Modelo := ppEscPosEpson;
      if sqlParams.FieldByName('ModeloImp').asstring = 'ppEscBematech'
         then ACBrPosPrinter1.Modelo := ppEscBematech;
      if sqlParams.FieldByName('ModeloImp').asstring = 'ppEscDaruma'
         then ACBrPosPrinter1.Modelo := ppEscDaruma;
      if sqlParams.FieldByName('ModeloImp').asstring = 'ppEscElgin'
         then ACBrPosPrinter1.Modelo := ppEscElgin;
      if sqlParams.FieldByName('ModeloImp').asstring = 'ppEscDiebold'
         then ACBrPosPrinter1.Modelo := ppEscDiebold;
   end;
 

[José M. S. Junior]

Bom dia, consegue imprimir com essa impressora utilizando o Demo do ACBrPosPrinter? Se não tem problemas com o demo, valide os valores que estão sendo passados para o componente nesta rotina... para tentar identificar exatamente onde o erro ocorre. Parece não estar conseguindo se comunicar com a porta serial.

[João Bosco Pinotte]

Testei, com o EscPos na minha máquina e está funcionando. Depois do almoço vou testar no cliente.

Depois volto ao problema.

Obrigado!

 

[João Bosco Pinotte]

Em um cliente está imprimindo, sem QrCode. Nos outros dois que estava dando problema, vou verificar amanhã.

Um segundo detalhe que observei, mesmo fazendo ACBrNFe1.DANFE.ViaConsumidor := true, não coloca se é Via da empresa ou Via do Cliente.

Um terceiro detalhe que observei, também não está colocando acento nas palavras.

Na configuração fiz:    ACBrPosPrinter1.ControlePorta := False;  senão da erro na impressão. 

Amanhã que vou responder com mair precisão.

Obrigado!

 

 

[José M. S. Junior]

Bom dia

Dê uma olhada no tópico abaixo, sobre a homologação desta impressora junto ao ACBr. Pode validar as configurações... 

 

[João Bosco Pinotte]

Pessoal, ainda não conseguimos identificar o problema. Está acontecendo tanto no Windows 7, e 10. O pior que já perdi quase dois dias, e o cliente pensa que é problema meu. Em outro computador deu erro até no EscPos. Já estou ficando preocupado.

Se alguêm puder me ajudar eu agradeço.

 

[streetacbr]

13 horas atrás, João Bosco Pinotte disse:

Pessoal, ainda não conseguimos identificar o problema. Está acontecendo tanto no Windows 7, e 10. O pior que já perdi quase dois dias, e o cliente pensa que é problema meu. Em outro computador deu erro até no EscPos. Já estou ficando preocupado.

Se alguêm puder me ajudar eu agradeço.

 

Já tive esse problema aqui. Não consegui de jeito nenhum imprimir utilizando a porta onde a impressora está instalada. Resolvi compartilhando a impressora (nas configurações do Windows) e depois utilizando o caminho de rede no lugar da porta (exemplo : porta = \\NOMECOMPUTADOR \NOMEIMPRESSORA) 

[João Bosco Pinotte]

Continuo sem solução definida. Não sei se a resposta que vou dar é correta. Estou respondendo, para não deixar o tópico em aberto. No meu caso, imprimi no modo texto uns dois cupons e depois configurei para ppDaruma, até agora está funcionando.  Se alguém encontrar a solução certa, favor me responder. Não sei se o windows guarda a porta anterior, mas dessa forma funcionou.

Obrigado!