leandroaoa

boa tarde da uma olhada ai

Voce esta usando o danfe do Fortes use o ACBrNFeDANFeESCPOS da uma olhado no exemplo do acbr

Opa boa tarde manda em escpos eu uso assim e não tenho problemas usando a mesma impressora

Poste o XML para teste

bom dia basta alterar o propriedade ExibeEAN para True

Bom dia ficou ok as atualizacoes obrigado

Bom dia eu acho que ja vi esse codigo em algum lugar. o codigo esta certo crie a funcao somar e chama ela no adicionar e no remover

Bom dia no seu caso voce deve fazer um loop no listbox para recalcular

Bom dia realizei uns ajuste na função LerRetorno400 onde esta pegando os dados de cedente errado. conforme trecho abaixo var ContLinha: Integer; Titulo : TACBrTitulo; Linha, rCedente, rCNPJCPF : String; begin if (copy(ARetorno.Strings[0],1,9) <> '02RETORNO') then raise Exception.Create(ACBrStr(ACBrBanco.ACBrBoleto.NomeArqRetorno + 'não é um arquivo de retorno do '+ Nome)); rCedente := trim(Copy(ARetorno[0],32,8)); //// AQUI ESTA ERRADO CONFORME MANUAL /////////// ajuste proposto var ContLinha: Integer; Titulo : TACBrTitulo; Linha, lNomeCedente, lCodigoCedente, rCNPJCPF : String; begin if (copy(ARetorno.Strings[0],1,9) <> '02RETORNO') then raise Exception.Create(ACBrStr(ACBrBanco.ACBrBoleto.NomeArqRetorno + 'não é um arquivo de retorno do '+ Nome)); lCodigoCedente := trim(Copy(ARetorno[0],32,8)) + trim(Copy(ARetorno[0],40,1)); lNomeCedente := trim(Copy(ARetorno[0],47,30)); segue unit alterada a manual do banco Sicoob 240_400.xls ACBrBancoBancoob.pas

primeiro apague o ACBr geral verifica realmente se nao tem nada depois abra o delphi e verifica a librarys path remove o que tiver la do acbr depois baixe novamente e instale fiz aqui e esta funcionando conforme imagens mesma versao do seus Delphi XE7

Boa tarde da uma olhada ai nesse link

adicione na uses ACBrETQClass

Voce deve criar uma variavel pra passar o nome var lNomeLogo : String; lNomeLogo := 'nomedalogo'; ACBrETQ.CarregarImagem( _logo, lNomeLogo );

Bom dia a tabela IBPT versão 22.1.F ainda esta errada conforme imagens abaixo Esse NCM 62011300 não existe mais, mas ele ainda consta nessa tabela, foi ate emitida uma nota por um cliente aqui e deu rejeição no NCM o NCM correto seria o 62013000 só que esse não existe na tabela IBPT e tem no siscomex conforme imagens acima

Sim ira resolver ai ja é sua regra de negocio

var lValor : Double; lValorD: Double; begin lValor := 245.70 + 36.75 + 6.13 + 19.25 + 95.20 + 8.92 + 11.38; lValorD := 245.70 + 36.75 + 6.125 + 19.25 + 95.20 + 8.925 + 11.375; Showmessage('Valor duas casas SEM ABNT : '+FloatToStr(lValor)+#13+ 'Valor duas casas COM ABNT : '+FloatToStr(RoundABNT(lValor, -2))+#13+#13+ 'Valor tres casas SEM ABNT : '+FloatToStr(lValorD)+#13+ 'Valor tres casas COM ABNT : '+FloatToStr(RoundABNT(lValorD, -2)) ); olha o ultimo exemplo da norma abaixo ele que diz respeito ao seu caso conforme esse valor 423,325. Pelo que entendi voce deve estar arredondando o valor nos itens e somando o total com tres casas, se voce passa os itens ja arredondado tem que somar igual se nao vai dar diferenca mesmo Norma ABNT sobre Regras de Arredondamento na Numeração Decimal Devido as dúvidas da forma de cálculo referente aos Fundos, seguem as Regras da ABNT/NBR 5891/2014 que dispõem sobre o arredondamento da numeração decimal: ➡ Quando o algarismo a ser conservado for seguido de algarismo inferior a 5, permanece o algarismo a ser conservado e retiram-se os posteriores. EXEMPLO: 1,333 3 arredondado à primeira decimal torna-se 1,3 ➡ Quando o algarismo a ser conservado for seguido de algarismo superior a 5, ou igual a 5 seguido de no mínimo um algarismo diferente de zero, soma-se uma unidade ao algarismo a ser conservado e retiram-se os posteriores. EXEMPLO 1: 1,666 6 arredondado à primeira decimal torna-se 1,7 EXEMPLO 2: 4,850 5 arredondado à primeira decimal torna-se 4,9 ➡ Quando o algarismo a ser conservado for ímpar, seguido de 5 e posteriormente de zeros, soma-se uma unidade ao algarismo a ser conservado e retiram-se os posteriores EXEMPLO: 4,550 0 arredondado à primeira decimal torna-se 4,6 ➡ Quando o algarismo a ser conservado for par, seguido de 5 e posteriormente de zeros, permanece o algarismo a ser conservado e retiram-se os posteriores. EXEMPLO: 4,850 0 arredondado à primeira decimal torna-se 4,8 Fonte: ABNT

chegou a depurar pra ver o valor que esta chegando. Muda o seu codigo pra esse frmnotafiscal_menu.qrnota.fieldbyname('VALOR_ICMS').AsFloat := RoundABNT( frmnotafiscal_menu.qrnota.fieldbyname('VALOR_ICMS').AsFloat + qrnotafiscal_item.fieldbyname('VALOR_ICMS').AsFloat, -2 );

var lValor : Double; begin lValor := 245.70 + 36.75 + 6.13 + 19.25 + 95.20 + 8.92 + 11.38; Showmessage(FloatToStr(RoundABNT(lValor, -2)));

ficou muito vago isso passa como voce chegou a isso item a item qual valor que esta na sua base de dados se multiplica e a funcao que voce usa pra arredondar

esse post é antigo o seu erro deve estar relacionado a link abaixo

da uma olhada ai vai encotrar seu problema

Se você usa certificado A1, recomendo fortemente o seguinte: Use a configuração para OpenSSL Isso exigirá as DLLs do OpenSSL. Copie TODAS as DLLs do Link abaixo na mesma pasta do seu .EXE, http://svn.code.sf.net/p/acbr/code/trunk2/DLLs/OpenSSL/1.1.1.10/X86/

Bom dia Atualiza o ACBr pois minas gerais teve mudanca no webservice. Atualiza seu EXE pois ele deve estar na versão antiga -<infNFeSupl> <qrCode>https://portalsped.fazenda.mg.gov.br/portalnfce/sistema/qrcode.xhtml?p=31220407552723000142650010000056151074864614|2|1|1|504261BC71FEAE016727DBA47085DD7D935E5922</qrCode> <urlChave>http://nfce.fazenda.mg.gov.br/portalnfce</urlChave> ****** AQUI NOTA AUTORIZADA </infNFeSupl> ----------------------------------- -<infNFeSupl> <qrCode>https:https://portalsped.fazenda.mg.gov.br/portalnfce/sistema/qrcode.xhtml?p=31220407552723000142650010000056151870181665|2|1|1|E734532C7CCEC8E87A94FDC2DFC0CE21943693ED</qrCode> <urlChave>http:https://portalsped.fazenda.mg.gov.br/portalnfce/sistema/qrcode.xhtml</urlChave> ****** AQUI NOTA REJEITADA </infNFeSupl>

bom dia TABELA A – Código de Regime Tributário – CRT 1 – Simples Nacional 2 – Simples Nacional – excesso de sublimite da receita bruta 3 – Regime Normal NOTAS EXPLICATIVAS: O código 1 será preenchido pelo contribuinte quando for optante pelo Simples Nacional. O código 2 será preenchido pelo contribuinte optante pelo Simples Nacional mas que tiver ultrapassado o sublimite de receita bruta fixado pelo estado/DF e estiver impedido de recolher o ICMS/ISS por esse regime, conforme arts. 19 e 20 da LC 123/06. O código 3 será preenchido pelo contribuinte que não estiver na situação 1 ou 2. O Código de Situação da Operação no Simples Nacional – CSOSN será usado na Nota Fiscal Eletrônica exclusivamente quando o Código de Regime Tributário – CRT for igual a “1”, e substituirá os códigos da Tabela B – Tributação pelo ICMS do Anexo Código de Situação Tributária – CST do Convênio s/nº de 15 de dezembro de 1970.

bom dia