Jump to content

Search the Community

Showing results for tags 'nfc-e impressão'.

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Categories

There are no results to display.

Forums

  • Fórum Aberto - ACBr
    • ACBr News
    • Equipamentos testados
    • Base de Conhecimento
    • Dúvidas Gerais sobre o ACBr
    • ACBrSerial
    • ACBrSAT
    • ACBrNFe
    • ACBrDFe
    • Dúvidas sobre TEF
    • ACBrMonitor PLUS
    • ACBrTXT
    • ACBrBoleto
    • ACBrDiversos
    • ACBrTCP
    • ACBrFramework
    • ACBrLIB
  • ACBr Pro
    • Dúvidas gerais
    • ACBrMonitorPLUS
    • NFe/NFCe - Nota Fiscal Eletrônica
    • DFe - Documentos Fiscais Eletrônicos
    • SAT / MFE
    • TEF
    • Boleto
    • ACBrSPED
    • ACBrTXT
    • Paf-ECF
    • Requisitos Fiscais por UF
    • ACBrLIB
  • Outros Assuntos
    • ACBr's Pub
    • Legislação Fiscal e Tributária
    • Object Pascal - Delphi & Lazarus
    • Data Base
    • Classificados
    • Dúvidas não relacionadas ao ACBr

Categories

  • ACBr Pro
    • ACBrLib - PRO
    • ACBrMonitorPLUS - PRO
    • Utilitários - PRO
    • Dia do ACBr 1a edição
    • Dia do ACBr 2a edição
  • Free Download
    • ACBrLib - DEMO
    • ACBrMonitorPLUS - DEMO
    • Demos / Testes / Utilitários
    • Apresentações - Palestras

Calendars

  • Eventos - Palestras - Webinars
  • Prazos SEFAZ
  • Community Calendar
  • ACBr Papo Pro
  • Feriados Nacionais

Blogs

  • Daniel Simoes' Blog
  • André Ferreira de Moraes
  • Moderadores ACBr
  • Notícias do ACBr

Categories

  • Suporte Pago - PRO
    • Webinars
    • Video Aulas
  • Vídeos Abertos
    • Video Aulas
    • Comunicados
    • Dia do ACBr 1a Ediçao
    • Dia do ACBr 2a Ediçao
    • Dia do ACBr 3a Ediçao
    • Equipamentos Homologados ACBr
    • TEF ACBr PayGo
  • Campanhas promocionais

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website URL

Found 1 result

  1. Bom Dia. Consigo gera o xml no modelo 65 tudo certo, mais quando vai imprimir esta saindo no papel A4, acho que falta algum parâmetro para imprimir na impressora Daruma Dr800, o que esta errado no código abaixo ? fiz uma alteração no Demo do ACBR, segue o código abaixo com as tela Agradeço a todos que puder me ajudar __________________________________________________________________________________________________________________________________________ var vAux, vNumLote, vSincrono : String; Sincrono : boolean; begin if not(InputQuery('WebServices Enviar', 'Numero da Nota', vAux)) then exit; if not(InputQuery('WebServices Enviar', 'Numero do Lote', vNumLote)) then exit; vSincrono := '1'; if not(InputQuery('WebServices Enviar', 'Envio Síncrono(1=Sim, 0=Não)', vSincrono)) then exit; vNumLote := OnlyNumber(vNumLote); if Trim(vNumLote) = '' then begin MessageDlg('Número do Lote inválido.',mtError,[mbok],0); exit; end; if (Trim(vSincrono) <> '1') and (Trim(vSincrono) <> '0') then begin MessageDlg('Valor Inválido.',mtError,[mbok],0); exit; end; if (Trim(vSincrono) = '1') then Sincrono := True else Sincrono := False; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe; ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310; ACBrNFe1.Configuracoes.Geral.IdCSC := edtCSCId.Text; ACBrNFe1.Configuracoes.Geral.CSC := edtCSCNumero.Text; ACBrNFe1.Configuracoes.Geral.IncluirQRCodeXMLNFCe:=True; ACBrNFe1.DANFE.ViaConsumidor := chkViaConsumidor.Checked; ACBrNFe1.DANFE.ImprimirItens := not chkDanfeResumido.Checked; ACBrPosPrinter1.Device.Porta := cbxPorta.Text; ACBrPosPrinter1.CortaPapel:=True; ACBrPosPrinter1.Modelo := TACBrPosPrinterModelo(cbxModelo.ItemIndex); ACBrPosPrinter1.CortaPapel:=True; GerarNFCe(vAux); ACBrNFe1.Enviar(vNumLote,True,Sincrono); <========================= ACBrNFe1.NotasFiscais.Items[0].GravarXML(); if not Sincrono then begin MemoResp.Lines.Text := ACBrNFe1.WebServices.Retorno.RetWS; memoRespWS.Lines.Text := ACBrNFe1.WebServices.Retorno.RetornoWS; LoadXML(ACBrNFe1.WebServices.Retorno.RetWS, WBResposta); MemoDados.Lines.Add(''); MemoDados.Lines.Add('Envio NFCe'); MemoDados.Lines.Add('tpAmb: '+ TpAmbToStr(ACBrNFe1.WebServices.Retorno.TpAmb)); MemoDados.Lines.Add('verAplic: '+ ACBrNFe1.WebServices.Retorno.verAplic); MemoDados.Lines.Add('cStat: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cStat)); MemoDados.Lines.Add('cUF: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cUF)); MemoDados.Lines.Add('xMotivo: '+ ACBrNFe1.WebServices.Retorno.xMotivo); MemoDados.Lines.Add('cMsg: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cMsg)); MemoDados.Lines.Add('xMsg: '+ ACBrNFe1.WebServices.Retorno.xMsg); MemoDados.Lines.Add('Recibo: '+ ACBrNFe1.WebServices.Retorno.Recibo); MemoDados.Lines.Add('Protocolo: '+ ACBrNFe1.WebServices.Retorno.Protocolo); end else begin MemoResp.Lines.Text := ACBrNFe1.WebServices.Enviar.RetWS; memoRespWS.Lines.Text := ACBrNFe1.WebServices.Enviar.RetornoWS; LoadXML(ACBrNFe1.WebServices.Enviar.RetWS, WBResposta); MemoDados.Lines.Add(''); MemoDados.Lines.Add('Envio NFCe'); MemoDados.Lines.Add('tpAmb: '+ TpAmbToStr(ACBrNFe1.WebServices.Enviar.TpAmb)); MemoDados.Lines.Add('verAplic: '+ ACBrNFe1.WebServices.Enviar.verAplic); MemoDados.Lines.Add('cStat: '+ IntToStr(ACBrNFe1.WebServices.Enviar.cStat)); MemoDados.Lines.Add('cUF: '+ IntToStr(ACBrNFe1.WebServices.Enviar.cUF)); MemoDados.Lines.Add('xMotivo: '+ ACBrNFe1.WebServices.Enviar.xMotivo); //MemoDados.Lines.Add('cMsg: '+ IntToStr(ACBrNFe1.WebServices.Enviar.cMsg)); //MemoDados.Lines.Add('xMsg: '+ ACBrNFe1.WebServices.Enviar.xMsg); MemoDados.Lines.Add('Recibo: '+ ACBrNFe1.WebServices.Enviar.Recibo); //MemoDados.Lines.Add('Protocolo: '+ ACBrNFe1.WebServices.Enviar.Protocolo); end; ACBrNFe1.NotasFiscais.Clear; end;
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.