Alan Leonidas da Silva

Olá a todos. Estou anexando nesse post 3 arquivos alterados para atender a seguinte necessidade: 1) Estamos utilizando o componente ACBrECFNaoFiscal (ACBrECFVirtualPrinter) para fazer o inicio de vendas, onde temos casos de itens arredondam e outros truncam; Ex: Combustível trunca e Demais produtos arredonda. No ECFVirtual por padrão arredondava sempre. Para resolver esse caso fiz a seguinte alteração no método vendaitem: Procedure VendeItem( Codigo, Descricao : String; AliquotaECF : String; Qtd : Double ; ValorUnitario : Double; ValorDescontoAcrescimo : Double = 0; Unidade : String = ''; TipoDescontoAcrescimo : String = '%'; DescontoAcrescimo : String = 'D'; CodDepartamento: Integer = -1 ) ; override ; Se as property ArredondaPorQtd e ArredondaItemMFD estiverem igual a False. O valor total será truncado (Trunca) do contrário irá arredondar (RoundABNT); Essa alteração foi feito em ambos fontes: ACBrECFNaoFiscal e ACBrECFVirtualPrinter. Dentro do ACBrUtil, criei a function Trunca. Em todos nossos testes resolveu e atendeu corretamente. Espero não ter feito nada de incorreto. Me coloco a disposição para quaisquer esclarecimento. Muito obrigado pela atenção e ajuda. ACBrECFNaoFiscal.pas ACBrECFVirtualPrinter.pas ACBrUtil.pas

Boa tarde a todos, Estou entrando em contato pelo meu usuário, pois não consigo acessar com a conta da TDP (SAC) estou tentando dificuldade em acessar com nosso usuário. Em um contato anterior com usuário da TDP Sistemas de Informação, falei com o Daniel Simões sobre algumas necessidades de alterações no ACBrSATExtratoESCPOS.pas; Não é erro que encontramos, apenas tivemos a necessidade de alterar o espaçamento. Foi criado nesse .pas em anexo as seguintes property: property LinhasEntItens : Integer read FLinhasEntItens write FLinhasEntItens default 0; property LinhasEntTotais : Integer read FLinhasEntTotais write FLinhasEntTotais default 0; property LinhasEntPagamentos : Integer read FLinhasEntPagamentos write FLinhasEntPagamentos default 0; property LinhasEntDadosEntrega : Integer read FLinhasEntDadosEntrega write FLinhasEntDadosEntrega default 0; property LinhasEntRodape : Integer read FLinhasEntRodape write FLinhasEntRodape default 0; Fizemos pois na Impressora Epson estava saindo muito junto a impressão. Não sei dizer como está saindo a Impressão na Bematech. Estou anexando para analise de vocês, pelo nossos testes está OK. Espero que tenha ajudado e não ter feito nada de errado. Desde já agradeço pela atenção. ACBrSATExtratoESCPOS.pas

Entendi, se você ver nos posts anteriores verá que a solução para esse problema foi ambas propriedades. Mas obrigado pela contribuição.

Olá, Mario Mesquita não entendi o que você quis me dizer... No meu caso quando estava com o problema defini as seguintes propriedades: LinhasBuffer = 100 IntervaloBuffer = 500 Dessa forma conseguia imprimir normalmente.

Carlos Boa noite, Agora estou sem o Drive em mãos na empresa acho que tenho o Drive; Mas se vc está com o mesmo problema, você tentou utilizar as propriedades: IntervaloBuffer e LinhasBuffer? Em meu caso e de "BigWings" resolveu.

Bom dia Régys. Concordo e entendo, você fez o correto. Eu que agradeço pela atenção. Mais uma vez muito obrigado pela ajuda. Até mais

Boa tarde Régys. Acabei de baixar a nova versão. Testei e funcionou normalmente. Acredito que o problema está na versão 02.51 da Daruma Dr700. Nesse caso a propriedade criada irá resolver o problema. Muito obrigado pelo empenho e por me ajudar. Desculpe a insistência. Até a próxima

Bom dia Regys. Fiz o Update do fonte e percebi que teve uma modificação no ACBrNFeDANFeESCPOS.pas. Percebi que foi colocado uma verificação: if not Self.Ativo then raise Exception.Create('Componente "ACBrNFeDANFeESCPOS" não está ativo!'); GravaLog('-- TX -> ' + AString, True); try // limpa o buffer de envio FDevice.Serial.Purge; // envia novo buffer FDevice.EnviaString(AString); except on E: Exception do begin GravaLog(''); GravaLog('-- ERRO -> ' + E.ClassName + ': ' + E.Message); GravaLog(''); raise; end; end; Essa Linha: FDevice.Serial.Purge; Se tento fazer comunicação com uma impressora na Rede Ex: \\Nome_da_Maquina\Compartilhamento Ele retorna um erro de comunicação. Na versão anterior ia normalmente. Fui fazer um teste com uma Epson TM 20, onde o driver que a veio junto com o equipamento não gera uma porta serial emulada. Fiz o mesmo teste com a Daruma DR700, via porta serial vai normalmente, mas via rede não imprimi. Se coloco um try except imprimi normalmente. Foi você que implementou esse tratamento? segue em anexo os .pas ACBrNFeDANFeESCPOSAtual.pas - É o arquivo atual que encontra-se no SVN (Com falha acima) ACBrNFeDANFeESCPOSAnterior.pas - É o arquivo versão anterior imprimi corretamente pois não tem a referencia acima. Obrigado mais uma vez pela ajuda e desculpe pelo incomodo; ACBrNFeDANFeESCPOSAnterior.pas ACBrNFeDANFeESCPOSAtual.pas ACBrNFeDANFeESCPOSAnterior.pas ACBrNFeDANFeESCPOSAtual.pas

Bom dia Régys, Desculpe-me pela demora. Segue abaixo os dados. Hardware: Sistema Operaciona: Windows 7 Ultimate 32-bits Intel Core i7-3770 CPU @ 3.40Ghz, 4,0GB RAM; (Versão atual da impressora abaixo não ocorre o erro. Versão que ocorria o erro 02.51.00) Impressora Dr700 L- Versão 01.21.00 Velocidade de impressão: 115.200 O Xml ja lhe enviei; A conexão utilizada está sendo USB, onde estou utilizando o driver da fabricante que emula uma porta serial (porta emulada COM2) : Segue em anexo o Driver utilizado: Driver_Spooler_700.exe Bom acho que o XML não precisa pois lhe enviei em uma mensagem anterior. Precisa de mais alguma informação Regys? Obrigado pela atenção. Driver_Spooler_700.zip Driver_Spooler_700.zip

Boa tarde Régys, Desculpe mas a pergunta acima foi para mim ou para Solivan?

OK, mais uma vez muito obrigado Régys, pela atenção.

Ok, Régys. Assim que tiver uma posição nos avise por favor. Você tentou fazer o teste com a propriedade que criei? Pois hoje estou utilizando essa solução. Acredito que BigWings deve estar utilizando a mesma solução. Obrigado mais uma vez pela solução.

Bom dia Régys. Estou anexando o XML com todos os itens que utilizei para teste. Uma observação, pode ser que o "Hardware" interfira nesse caso, por exemplo: Minha máquina é I7 com 4 de RAM, como o processador é "rápido" isso pode interferir no Buffer da impressora. Desculpe a pergunta, mas o teste que você fez foi em qual Hardware? Estou falando isso, pois tivemos problema em um clientes com Buffer de impressão, em um outro caso idêntico a esse mas em relatório feito por nossa empresa (Nada com o componente ACBR, apenas estou exemplificando). Sem a alteração feita por mim não consigo imprimir o DANFE até o final. Existe mais alguma informação que deseja que lhe passe? Algumas informações sobre a impressora: DR700 L; Testei a impressão com duas versões da Impressora a Versão: 02.51.00 com o erro que documentei acima; Sexta feira (17/04/2015) Mudei a versão da Impressora para poder utilizar via Spooler (Modificação feita pelo próprio suporte da Daruma). Versão: 01.21.00, com essa versão fiz alguns teste o erro não ocorreu. Qual seria a sua versão Régys. Pelo que vi a versão do [bigWings] está na na versão 02.51.00 também, acredito que a solução proposta por mim para essa versão corrige, para demais versões as propriedades criadas podem estar igual a 0; Mais uma vez muito obrigado pela atenção. 51150436934982000136650010000001489803359536-nfe.xml

Boa tarde Régys. Desculpe incomodá-lo mas você conseguiu ver o que lhe enviei, verificou se fiz algo de errado? Mais uma vez desculpe, e muito obrigado pela atenção

Bom dia Régys. Então devo estar preenchendo alguma configuração incorreta. Segue em anexo imagem de como fica o DANFE se deixar com 0 (Zero) na propriedade LinhasBuffer. Segue a configuração, e como fica na impressora. Mesmo colocando um valor na propriedade LinhasBuffer, ela fica da mesma forma ela não imprimi o Danfe por completo. Apenas quando preencho a propriedade IntervalBuffer (Criado por mim) que imprimi corretamente. Mais uma vez obrigado pela ajuda e atenção Régys; Atenciosamente, Alan Leônidas da Silva

Boa noite Régys, Foi com a Daruma DR700? Outra pergunta a cada quantas linhas você está solicitando a impressão? (LinhasBuffer = ?) Obrigado desde já pela atenção.

Olá a todos, Ainda sobre meu caso acima, não sei se fiz certo ou errado (Aos mestres ACBR me desculpe se estou errado). Resolvi, colocar um Sleep dentro da procedure TACBrNFeDANFeESCPOS.DoLinesChange(Sender: TObject); Após isso começou a imprimir o cupom por completo; Após o teste acima, resolvi criar uma propriedade no componente: IntervalBuffer, onde se o mesmo estiver maior que 0 (zero) irá ativar o Sleep com o tempo determinado por ele. procedure TACBrNFeDANFeESCPOS.DoLinesChange(Sender: TObject); begin if (FLinhasBuffer > 0) and (FBuffer.Count > FLinhasBuffer) then begin ImprimePorta(FBuffer.Text); FBuffer.Clear; if FIntervalBuffer > 0 Then Sleep(FIntervalBuffer); end; end; Segue em anexo o ACBrNFeDANFeESCPOS.pas alterado por mim. Novamente me desculpe se fiz alguma alteração desnecessária. Obrigado desde já pelo auxilio. Atenciosamente, Alan Leônidas da Silva. ACBrNFeDANFeESCPOS.pas

Bom dia Menezesbr, Pelo que entendi sim, mas ontem antes de enviar email para eles, antes de assinar o XML adicionei a tag: <?xml version="1.0" encoding="UTF-8"?> Mesmo assim no envio me retorna erro, não tive tempo de ver se é em outro lugar, vou precisar ler a nota técnica novamente para verificar se deixei passar algo como eles me orientaram. Mas muito estranho que MT vai normalmente, mesma nota mesmos itens. Vou dar continuidade no estudo amanhã, caso descubra algo nos avise por favor, pois estou ficando louco !!! kkkkkk Abç!!!

Bom dia a todos, Fiz alguns testes e não obtive sucesso, então resolvi mandar um email para suporte nfce daqui de são paulo. Obtive essa resposta: Resposta da Mensagem 6565994 Prezado(a) Senhor(a), O uso do UTF-8 está na NT: POST_https://srv72067.intra.fazenda.sp.gov.br/EPECws/RecepcaoEPEC.asmxHTTP/1.1 Accept-Encoding: gzip,deflate Content-Type: application/soap+xml;charset=UTF-8;action="_http://www.portalfiscal.inf.br/nfe/wsdl/NfeAutorizacao/nfeAutorizacaoLote" Content-Length: 3588 Host: srv72067.intra.fazenda.sp.gov.br Connection: Keep-Alive User-Agent: Apache-HttpClient/4.1.1 (java 1.5) Note que em charset está especificado o UTF-8. Agradecemos seu contato no "Fale Conosco" da Secretaria da Fazenda. Sua opinião é muito importante para nós. Por gentileza, clique no link abaixo e opine sobre este e-mail: Pesquisa de Satisfação Atenciosamente, Secretaria da Fazenda do Estado de São Paulo Mensagem Original: Rejeição: XML da área de dados com codificação dif Boa tarde, Estou com o seguinte problema na NFC-e, mesmo teste estou fazendo para um cliente do Estado do MT e está indo corretamente, mas aqui no estado de São Paulo me retorna: Rejeição: XML da área de dados com codificação diferente de UTF-8 O que posso fazer para saber o que está de errado em meu XML? Obrigado desde já pela atenção. Atenciosamente, Alan Leônidas da Silva NÃO RESPONDA ESTE E-MAIL Para fazer uma nova pergunta, clique aqui. Não vou continuar analisando. Obrigado.

Bom dia a Todos, Desculpe se estou abrindo um tópico que já existe no fórum, procurei muito, e fora procurar algo no fonte do componente. Bom vamos ao meu problema. Estou implementando a NFC-e no sistema da empresa em que trabalho e me deparei com o seguinte caso: Estou utilizando a impressora Daruma DR700, no caso dela estou utilizando o ACBrNFeDANFeESCPOS; Se faço uma NFC-e com mais de 200 Itens, ela não imprimi o DANFE por completo. Então encontrei a propriedade: LinhasBuffer. Mesmo assim após informar uma certa quantidade de linhas não imprimi por completo. Testei com LinhasBuffer: 100 , 50 , 20 , 10, 1; mesmo assim não saia o danfe por completo. Existe alguma solução para isso? Obrigado desde já pelo auxilio. Atenciosamente, Alan Leônidas da Silva.

Olá, Não sei se ainda estão com problema: "Venda de combustível sem informação de Transportador" Enfrentei esse problema na migração da NFe 2.00 para 3.10; Após muitos teste descobri que não estava enviando a TAG: <CNPJ> ou <CPF> Transporta.CNPJCPF. Após informar esse campo corretamente comecei a transmitir normalmente. Espero ter ajudado, Abraços

Boa tarde italosouza. Desculpe se estou respondendo alguma coisa fora da sua duvida. Vamos la vamos ver se consigo lhe ajudar, pelo que entendi você está com duvida nessa coluna OK? "NFe35141012889863000140550010000000011600556007"? Também estou em fase de homologação da NFCe, em meus testes, não tive problema com essa nomenclatura. Como fiquei com duvidas fui ver o fonte: Aparentemente o componente joga NFe mesmo, se você olhar o fonte: pcnNFeW. na function GerarXML. [function TNFeW.GerarXml: Boolean;] Há um trecho de código onde se joga "Fixo" [NFe], de acordo com o manual essa tag tem que ser precedida de NFe e não consegui localizar nenhuma nota técnica que retifique essa tag. [imagem em anexo] Mas não sei ao certo se estou correto em minha conclusão. Se não tem nada haver, me desculpe. Até a próxima.

Saudações a todos. Juliomar Marchetti, resolveu meu problema, estava tentando reinstalar o componente ACBR para poder ter acesso ao componente ESCPOS para NFC-e, e não estava conseguindo reinstalar pois estava dando erro ao Compilar alguns pacotes. Executando o apagarAcbr.bat dentro da pasta raiz do projeto ACBR resolveu o problema e instalou com sucesso. Agradeço pela ajuda Juliomar.

Bom dia André Luiz. Isso mesmo que você entendeu as Operações são distintas, Numeração diferente, série diferente. Aqui na empresa em que trabalho temos um módulo de emissão de NFe, como a estrutura é praticamente a mesma, estamos adequando nosso emissor para que possa gerar os dois arquivos em um único emissor. Ex: Cliente irá gerar a NFe vai utilizar o mesmo módulo, apenas habilitamos os parâmetros da NFe como: ModeloDF = moNFe e demais coisas que a NFe utiliza que já estamos todos acostumados. Caso seja uma Operação de NFC-e o cliente irá utilizar o mesmo módulo, iremos carregar os parâmetros da NFCe: ModeloDF = moNFCe, Token, DanfeNFCe... e demais informações, carregamos no arquivo XML apenas os dados que é da NFCe. Não sei se consegui esclarecer sua duvida. Espero ter lhe ajudado.

Boa tarde a todos. Primeiramente desculpe se estiver fazendo uma pergunta "Idiota". Estou implementando a NFC-e estou com uma duvida na linha [pagXXX], para ser mais exato no campo CNPJ. Quando informo o código de autorização do cartão, informo a bandeira do cartão tem esse campo CNPJ. Esse CNPJ é da empresa que autorizou ou mais precisamente do meu cliente?! Mais uma vez desculpe se for uma pergunta "Idiota" Muito Obrigado a todos pela ajuda. Att. Alan Leônidas.