Mario Inacio

Tentei tambem, mas emite sem formatação nenhuma.

Tentei em todos os modelos e quando emitia, fazia da mesma forma. Consegui contato com o fornecedor, e após analise, o mesmo relatou que esse modelo de placa específico dessa impressora está descontinuado e não atende os novos requisitos. Aquele dilema do cliente, quer comprar barato. Obrigado pela atenção.

Bom dia Daniel. Sim o modelo ppEscDiabold . Emitiu dessa forma. Estou em contato com o fornecedor, pois pelo manual, o firmware nele citado está diferente do atual da impressora. Qualquer novidade, posto aqui.

Boa tarde. Sei que é um tópico antigo, mas foi um dos únicos que encontrei falando de Diebold. Meu cliente comprou 6 impressoras dessas no mercado livre. Pela configuração impressora, é possível saber se o PosPrinter é compatível? Pois até imprime, mas sem formatação nenhuma, e muito menos QrCode.

Boa tarde. Era isso mesmo, os demais clientes emitindo normalmente.

Bom dia. Vocês também estão recebendo essa rejeição em NFC-e hoje em SC ? Alguma confirmação de que há erro na data do servidor da fazenda?

Boa tarde. Estou com erro ao imprimir em Raw. O demo imprime normal, então fiz um teste criando o método que uso dentro do demo e emite normal, colei o mesmo trecho no meu sistema apresenta o erro no spooler da impressora: Código testado no demo e no meu sistema, no demo funciona: var LocalPosPrinter: TACBrPosPrinter; SL: TStringList; begin try LocalPosPrinter := TACBrPosPrinter.Create(nil); SL := TStringList.Create; sl.Add('teste de impressao'); with LocalPosPrinter do begin Porta := 'RAW:Daruma DR700 Spooler'; Modelo := ppEscDaruma; Ativar ; Buffer.Text := SL.Text; Imprimir; end; finally sl.free; LocalPosPrinter.Free ; end; end; Alguém já passou por isso?

Olá. Realmente, meu método estava para Assincrono. Alterei para Sincrono e autorizou normalmente. Obrigado pela ajuda. Abração

Bom dia. Mais alguém nessa situação?

Boa tarde. Com componente devidamente atualizado, estou recendo a rejeição "Rejeicao: Tipo Autorizador do Recibo diverge do Orgao Autorizador" na NFC-e. Chegaram a se depara com o problema? Esqueci de mencionar que está ocorrendo tanto em SC quanto no RS em homologação

Não tinha me atentado no teu primeiro exemplo no parâmetro do tipo TACBrDFe . Agora ficou bom e centralizadas todas as configurações. Obrigado pela ajuda

Ola. Ainda não é assim que imagino, pois o parâmetro dessa função pode ser NFe, CTe ou MDFe. Deveria ser variant. procedure CarregaComponente(vComponente: variant); begin vComponente.Configuracoes.Geral.idCSC := <idCSC>; vComponente.Configuracoes.Geral.VersaoQrCode := veqr200; end;

Ola Big. Não vou usar apenas NF-e, quero chamar para todos os DF-e e parametrizar em um único local. Seria assim as chamadas: CarregaComponente(ACBrNfe) ou CarregaComponente(ACBRCte) ou CarregaComponente(AcbrMDfe) Dentro da função CarregaComponente identificaria o componente que chamou e usaria com "with"

Boa tarde. Estou alterando a forma de configurar o componente em minha aplicação e estava tentando fazer uma função genérica, mas precisava de classe/função que identificasse o componente que chegou ali. Da seguinte forma: procedure CarregaComponente(vComponente: variant); begin // essa funcao abaixo precisaria identificar o componente que chamou with ClasseQueIdentificaOComponenteQueChamou(vComponente) do begin with Configuracoes.Geral do begin SSLLib := TSSLLib(fieldbyname('SSLLib').asInteger); SSLCryptLib := TSSLCryptLib(fieldbyname('CryptLib').asInteger); SSLHttpLib := TSSLHttpLib(fieldbyname('HttpLib').asInteger); SSLXmlSignLib := TSSLXmlSignLib(fieldbyname('XmlSign').asInteger); Salvar := True; ExibirErroSchema := True; RetirarAcentos := True; FormaEmissao := TpcnTipoEmissao(fieldbyname('formaemissao').asInteger); ModeloDF := TpcnModeloDF(1); VersaoDF := TpcnVersaoDF(fieldbyname('versao').asInteger); IdCSC := fieldbyname('idtokenhom').asString; CSC := Trim(fieldbyname('tokenhom').asString); if fieldbyname('ambiente').asInteger = 0 then begin //producao IdCSC := fieldbyname('idtoken').asString; CSC := fieldbyname('token').asString; end; VersaoQRCode := veqr200; end; end; end; Teria alguma nesse sentido?

Bom dia. Também estou na mesma situação, em que o QrCode direciona para hom.sat.sef.sc.gov.br/nfce/consulta, sendo que neste endereço, não existe a NFC-e emitida normalmente, apenas no ambiente https://dfe-portal.svrs.rs.gov.br/Nfce/Consulta Há algo que possamos alterar no componente para o QrCode direcionar ?

Podem encerrar o tópico por favor. Estava copiando os schemas e deixando todos com letra minuscula, sendo que a função de busca é case sensitive.

Schemas iguais ao SVN

Acabei esquecendo de citar. Testando em Homologação em SC

Boa tarde. Até procurei ajuda em outros tópicos semelhantes e adotei as dicas mas continuo com o mesmo problema. Consigo autorizar a NFC-e sem problemas, verificar status, mas quando vou cancelar a NFC-e ocorre o erro "Arquivo de Schema não especificado" Testei deixando a propriedade "Configuracoes.Arquivos.PathSchemas" em branco, sendo que ocorre o erro correto, que não existem schemas nessa pasta, pois não utilizo na raiz da aplicação.

Foi em Homologação. Podem subir a mudança das urls para SVN ?

Bom dia. Em contato com a Tecnospeed, já que por eles tambem ocorria, relataram que alteraram as urls para "https". Após a mudança, autorizei a nfc-e abaixo. Resta alterar a url para o ACBR.

Perfeito. Obrigado

Boa tarde. Estou configurando no estado de SC a NFC-e. Ocorre erro no campo "IndIntermed", sendo que fiz um teste pela tecnospeed e autoriza com os mesmo conteúdos nos campos. Nota aprovada Tecnospeed - 42210304632696000120650090000016471414284080-nfce.xml Nota Rejeitada ACBR - 42210304632696000120650090000016471707481416-nfe.xml

Bom dia. Segue alteração: Unit: ACBrCTeDACTeRLRetrato Função: rlb_09_ObsBeforePrint Código alterado: if fpCTe.Ide.tpAmb = taHomologacao then begin if rlmObs.Lines.Count < 5 then begin rlmObs.Lines.BeginUpdate; for i:=rlmObs.Lines.Count to 5 do rlmObs.Lines.Add(''); rlmObs.Lines.EndUpdate; end; if fpCTe.procCTe.nprot = '' then rllMsgTeste.Caption := ACBrStr('CT-e não enviado, sem Valor Fiscal - Homologação') else rllMsgTeste.Caption := ACBrStr('AMBIENTE DE HOMOLOGAÇÃO - SEM VALOR FISCAL'); rllMsgTeste.Visible := True; rllMsgTeste.Enabled := True; end ACBrCTeDACTeRLRetrato.pas ACBrCTeDACTeRLRetrato.dfm

Ficaria melhor assim