IdealB

Resolvido, coisa boba como sempre: Configurei como Epson e não como Elgin. FExtrato.PosPrinter.Modelo:= ppEscPosEpson; Obrigado Alfeu. Acabei de descobrir. valew

Uma duvida: Qual seria a string de saída produzido pelo ACBr para a impressora? Abaixo está a string enviada para a impressora: '</zera></ce></logo>'#$D#$A'<n>TANCA</n>'#$D#$A'<c>TANCA INFORMATICA EIRELI'#$D#$A'RUA ENGENHEIRO JORGE OLIVA 73 VILA MASCOTE-SAO PAULO-43620-600'#$D#$A'</ae><c>CNPJ:08.723.218/0001-86 IE:149626224113 IM:'#$D#$A'</linha_simples>'#$D#$A'</fn></ce><n>Extrato No. 000000'#$D#$A'CUPOM FISCAL ELETRÔNICO - SAT</n>'#$D#$A' '#$D#$A' = T E S T E ='#$D#$A' '#$D#$A'>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>'#$D#$A'>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>'#$D#$A'>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>'#$D#$A'</linha_simples>'#$D#$A'</ae><c>CPF/CNPJ do Consumidor: 05.481.336/0001-37'#$D#$A'Razão Social/Nome: D.J. SYSTEM'#$D#$A'</ae><c></linha_simples>'#$D#$A'# COD DESC QTD UN VL UN R$ (VLTR R$)* VL ITEM R$'#$D#$A'</linha_simples>'#$D#$A'</ae><c>001 ACBR001 Assinatura SAC 1 UN X 120,000 (14,40) 120,00'#$D#$A'</ae><c></ae><c>desconto -1,00 119,00'#$D#$A'</ae><c>002 6291041500213 Outro produto Qu 1,1205 un X 1,210 (0,41) 1,36'#$D#$A'</ae><c></ae><c>acréscimo +2,00 3,36'#$D#$A'</ae><c>003 abc123 ACBrSAT rules 1,1205 un X 1,210 1,36'#$D#$A'<c>Subtotal 122,72'#$D#$A'<c>Descontos -6,00'#$D#$A'<c>Acréscimos +2,00'#$D#$A'</ae></fn><e>TOTAL R$ 118,72</e>'#$D#$A'<c>Dinheiro 50,00'#$D#$A'<c>Cartão de Crédito 100,00'#$D#$A'<c>Troco R$ 31,28'#$D#$A'<c> '#$D#$A'<c>xCampo1-xTexto1'#$D#$A'</fn></linha_simples>'#$D#$A'DADOS PARA ENTREGA'#$D#$A'<c>logradouro 112233 complemento bairro municipio'#$D#$A'D.J. SYSTEM'#$D#$A'</fn></linha_simples>'#$D#$A'OBSERVAÇÕES DO CONTRIBUINTE'#$D#$A'<c>Acesse www.projetoacbr.com.br para obter mais'#$D#$A'informacoes sobre o componente ACBrSAT'#$D#$A'Precisa de um PAF-ECF homologado?'#$D#$A'Conheca o DJPDV - www.djpdv.com.br'#$D#$A'<c>*Valor aproximado dos tributos do item'#$D#$A'<c>Valor aproximado dos tributos deste cupom R$ <n>1,23'#$D#$A'</n>(conforme Lei Fed. 12.741/2012)'#$D#$A'</fn></linha_simples>'#$D#$A'</ce>SAT No. <n>900002945</n>'#$D#$A'22/07/2015 10:16:28'#$D#$A'<c>3515 0708 7232 1800 0186 5990 0002 9450 0002 1078 7640</fn>'#$D#$A'<code128c>35150708723218000186599000029450000210787640</code128c>'#$D#$A'<qrcode_tipo>2</qrcode_tipo><qrcode_error>0</qrcode_error><qrcode>35150708723218000186599000029450000210787640|20150722101628|118.72|05481336000137|IA0Nd8uj4OCv0llpxnHp/Gt4TfWqY+5JbpbXNWvRBaQ2XRjp+G4XpX65GwGOSenl7vFlewK5cHPcjRUQihqw0plpoN77DPaSg1yXzF0WkQdEjm9LlKXd5t9cM6cG4Ct7YQK2wEWXhz/YFnlCzzTrhIzwsVRdeCNdv8vwVJw4ozCMSYU8MNeF1HRlcTPQ84GgFfOKbJbtAlVvTGQOtC6ZHtSJuolkhAEmRtK23bIZB0KBGEyL3GIesw3LDv0ysYpK64weiPU0dM9OVnUqS26egyw4l17S7MwQdTjz3emBbW/vBDC3X1xzHDpWobY/otKaKHwZqBtjSBaUx/ueffap+A==</qrcode><qrcode_tipo>2</qrcode_tipo><qrcode_error>0</qrcode_error>'#$D#$A'</pular_linhas>'#$D#$A

Daniel, obrigado pelo retorno porem, ja tinha feito o teste com o SATTeste e o resultado foi o mesmo. Lembrando que também o SATTeste tive que fazer algumas alterações. As mesmas citadas acima, propriedade Device movida para o objeto PosPrinter Abaixo o código utilizado. Detalhe: Minha impressora é a Elgin i9 no qual foi instalada e compartilhada. Para apontar a impressora no componente, uso o compartilhamento.Funcionava antes da trunk2. Alguém vê algo de errado? ACBrSAT1 := TACBrSAT.Create(Self) ; ACBrSATExtratoESCPOS1 := TACBrSATExtratoESCPOS.Create(ACBrSAT1) ; With ACBrSAT1 do begin Extrato := ACBrSATExtratoESCPOS1; NomeDLL := 'SAT.DLL'; Config.infCFe_versaoDadosEnt := 0.06; Config.ide_numeroCaixa := 0; Config.ide_tpAmb := taHomologacao; Config.emit_cRegTrib := RTSimplesNacional; Config.emit_cRegTribISSQN := RTISSMicroempresaMunicipal; Config.emit_indRatISSQN := irSim; Config.EhUTF8 := True; Config.PaginaDeCodigo := 65001; Rede.tipoInter := infETHE; Rede.seg := segNONE; Rede.tipoLan := lanDHCP; Rede.proxy := 0; Rede.proxy_porta := 0; end; with ACBrSATExtratoESCPOS1 do begin Mask_qCom := '0.0000'; Mask_vUnCom := '0.000'; end ; ACBrSAT1.CFe.LoadFromFile('CFe35150708723218000186599000029450000210787640.xml'); ACBrSATExtratoESCPOS1.PosPrinter.Device.Porta := '\\Compartilhamento\NomeImpressora'; ACBrSATExtratoESCPOS1.PosPrinter.Device.Ativar; ACBrSATExtratoESCPOS1.ImprimeQRCode := True; ACBrSAT1.ImprimirExtrato;

Vamos lá... Na alteração para o trunk2, o componente Extrato ganhou uma nova propriedade chamada PosPrinter que por sua vez ganhou o componente Device que era da propriedade Extrato. Basicamente essas foram as alterações que fiz. Estava assim: FExtrato.Device.Porta := FECFConfig.Porta; FExtrato.Device.Ativar; mudou para: FExtrato.PosPrinter.Device.Porta := FECFConfig.Porta; FExtrato.PosPrinter.Device.Ativar; Clientes meus que ainda NÂO atualizei, estão imprimindo o cupom normalmente pois não tinha migrado ainda para a trunk2. Peguei um XML validado que está imprimindo na versão antigo do meu sistema e tentei reimprimi-lo na nova versão(compilado com na trunk2) e o resultado é a imagem acima.

Só atualizei para o ACBr da trunk2. Alterei algumas propriedades que foram removidas. O envio está perfeito, apenas a impressão desconfigurou e não imprime o Código de Barras nem QrCode.

Pessoal, após atualizar o ACBr, a impressão do cupom SAT ficou completamente desconfigurada. Alguém esta passando por isso? Impressora: Elgin9 Extrato: TACBrSATExtratoESCPOS grato.

Desculpa! Não encontro o NCM na tabela CEST

Bom dia. O que fazer se não encontrarmos na planilha o numero do NCM?

Obrigado pelo retorno Laercio. Meus fontes estão atualizados porem, não vejo essa unit. Poderia me dizer em qual diretório ela está? grato

Alguem pode me informar se a classe TACBrEscElginVOX citada acima foi implementada? Não achei no repositório! Caso não tenha sido, de que forma o caso foi resolvido? grato.

Comentei o código FProdutosPorPagina := 20, configurei a mesma propriedade para 25 itens por folha, então emiti uma nota com 104 produtos. Na primeira folha, imprimiu 23 itens, mesmo configurando para 25. Correto, o componente calculou e entendeu que não caberia os 25 produtos. Na segunda folha imprimiu 60 itens. Correto, ele não repetiu dados do cabeçalho, como transporte, impostos, etc. por esse motivo teve espaço para tantos itens. mas cabe mais uns 10 itens. Na terceira folha imprimiu o restante dos itens. lembrando que esse teste foi feito no modo retrato.

Pessoal, estou tendo problemas com a DANFE no FortesReport. Mesmo configurando a propriedade ProdutosPorPagina = 25, o componente insiste em imprimir apenas 20 itens por DANFE. O problema está na linha abaixo onde fixaram em 20 produtos por folha desrespeitando a propriedade acima. também não entendi porque a partir da segunda pagina a quantidade de produtos aumenta para 60. Comentando a linha FProdutosPorPagina := 20 ele assume o valor real da propriedade. Alguém vê problema nisso? procedure TfrlDANFeRLRetrato.rlbItensBeforePrint(Sender: TObject; var PrintIt: Boolean); begin // Controla os itens por página if RLNFe.PageNumber >= 2 then FProdutosPorPagina := 60 else FProdutosPorPagina := 20; ...

No trunk2 só temos a opção de imprimir via FortesReport? Existe outro gerenciador ? grato

o código abaixo deveria gerar 2 paginas no Fortes Report? procedure TForm1.Button1Click(Sender: TObject); begin RLReport.NextReport; RLReport.PreviewModal; end;

Você está se referindo a pasta citada pelo Leandro? Pois essa pasta não existe pra mim mesmo! Sabe me dizer se tem outra alternativa? Meus clientes estão reclamando pois para imprimir 300 NFs está demorando quase 1 hora. A Impressora para entre um documento e outro. Qualquer ajuda é bem vinda

Desculpa Juliomar, não entendi sua resposta! Quer dizer que futuramente não será mais compatível?

Leandro, era assim que usávamos antes de atualizarmos para o trunk2. Ao recompilarmos o nosso projeto tive que tirar o Rave como gerador de DANFE e colocar o Fortes devido a erros. Sabe me dizer se ainda consigo usar o Rave como DANFE no trunk2? alguém sabe?

Estávamos usando o rave no trunk, é possível usá-lo no trunk2 para impressão da NFe? teriamos que criar toda a rotina do ACBr para a DANFE no rave? Antes podíamos escolher se a impressão seria pelo Quick ou pelo Rave agora só temos pelo Fortes? Isso? grato.

Só para completar, segue o código de impressão: While(I <= FNFiscalList.Count-1) do begin ... FNFe.NotasFiscais.LoadFromFile(APathXML); Inc(I); End; if (I > 0) then FNFe.NotasFiscais.Imprimir; Detalhe: Tenho clientes que imprimem 300 NFs de uma unica vez.

Perdão, FortesReport. obrigado pelo retorno.

Antes de atualizarmos para o trunk2, ao imprimir varias DANFEs, o sistema colocava todas no mesmo documento de impressão ficando muito mais rápido, após atualizado o ACbr cria um documento de impressão por DANFE. Tem algum parâmetro que altera essa característica? grato.

Obrigado Sérgio pelo retorno, na verdade minha duvida era quanto ao componente de impressão que antes eu usava o ACBrNFeDANFERave. Mas consegui resolver só que apareceu outro problema.Texto muito grande não quebra linha na impressão. veja imagem. grato.

Alguém pode me ajudar quanto a Impressão da Carta de Correção - Trunk2? Estou migrando para o trunk2 aos poucos conforme orientação e ao imprimir a carta de correção com um texto longo, ele não está quebrando linha. grato.

Não. Meus fontes provem do svn abaixo, apesar de desde segunda-feira que ele esta com problema. https://svn.code.sf.net/p/acbr/code/trunk/Fontes Não encontrei esse comando nos meus fontes!! Tem otra forma que eu possa atualizá-los? grato.

Ao imprimir o extrato na impressora Elgin modelo i9, o Qrcode era impresso corretamente podem, a guilhotina estava cortando o papel justamente no meio dele. A impressora não estava executando o comando "PulaLinhas" corretamente. Alterei a linha 494 da Unit ACBrSATExtratoESCPOS e funcionou. De: FBuffer.Add(''); Para: FBuffer.Add(' '); <-- Espaço Existem outras partes dessa Unit que devem ser alteradas também caso a solução que encontrei seja a correta. Valew.