leandroaoa

ACBrNFe1.Configuracoes.WebServices.Visualizar:=false;

sugiro que de uma estuda nos exemplos que acompanha o acbr e se tiver alguma duvida vai postando aqui.

poste o xml para que possamos analisar..

se você estiver sugerindo uma correção anexe a unit que vc alterou assim fica mais facil um modeador subir sua correcao para o svn

o melhor mesmo é você verificar com o contador da empresa, pois existe n situações. Deixe essa responsabilidade de imposto sempre para o contador, o seu sistema deve emitir a nota o contador informar os impostos e etc que devem ir na nota..

bom dia Como o Juliomar disse voce deve atualizar a pasta toda pois esta variavel esta no ACBrNFeDANFEClass.pas utilize o ACBrInstall assim voce evita erro na hora de atualizar o acbr

eu que agradeço ..

estou enviando os novos arquivos atualizado com a revisao 8873 do svn. ACBrNFeDANFEClass.pas ACBrNFeDANFeESCPOS.pas ACBrNFeDANFEClass.pas ACBrNFeDANFeESCPOS.pas

estou enviando os novos arquivos contemplando as alterações proposta pelo Solivan. segue em anexo... ACBrNFeDANFEClass.pas ACBrNFeDANFeESCPOS.pas

Boa tarde Senhores Fiz mais uma alteração para contemplar os tributos separadamente acrescentei as seguintes propriedades na classe ACBrNFeDANFEClass FTributosSeparadamente : Boolean; //informação dos tributos separadamente FvTribFed: Currency; //total tributos federais FvTribEst: Currency; //total tributos estaduais FvTribMun: Currency; //total tributos municipais e fiz a seguinte alteracao na classe ACBrNFeDANFeESCPOS procedure TACBrNFeDANFeESCPOS.GerarTotTrib; begin if TributosSeparadamente = False then begin if FpNFe.Total.ICMSTot.vTotTrib > 0 then begin FBuffer.Add(cCmdFontePequena + ParseTextESCPOS(padS('Informação dos Tributos Totais Incidentes|' + FormatFloat('#,###,##0.00', FpNFe.Total.ICMSTot.vTotTrib), nColunasPapel, '|')) ); FBuffer.Add(cCmdFontePequena + ParseTextESCPOS('(Lei Federal 12.741/2012)')); FBuffer.Add(GetLinhaSimples); end; end else begin if (vTribFed > 0) or (vTribEst > 0) or (vTribMun > 0) then begin FBuffer.Add(cCmdFontePequena + ParseTextESCPOS('Informação dos Tributos Totais (Lei Federal 12.741/2012)')); FBuffer.Add(cCmdFontePequena + ParseTextESCPOS(padS('Tributos Federais R$ :-|' + FormatFloat('#,###,##0.00', vTribFed), nColunasPapel, '|'))); FBuffer.Add(cCmdFontePequena + ParseTextESCPOS(padS('Tributos Estaduais R$ :-|' + FormatFloat('#,###,##0.00', vTribEst), nColunasPapel, '|'))); FBuffer.Add(cCmdFontePequena + ParseTextESCPOS(padS('Tributos Municipais R$ :-|' + FormatFloat('#,###,##0.00', vTribMun), nColunasPapel, '|'))); FBuffer.Add(GetLinhaSimples); end; end; end; Se estiver correto, e de acordo, favor subir pro SVN Segue: Abraços ACBrNFeDANFEClass.pas ACBrNFeDANFeESCPOS.pas

Boa tarde Senhores Fiz uma alteração para contemplar o nome fantasia na impressao pelo ACBrNFeDANFeESCPOS alterei a procedure TACBrNFeDANFeESCPOS.GerarClicheEmpresa acrescentando esse novo campo; Se estiver correto, e de acordo, favor subir pro SVN Segue: Abraços ACBrNFeDANFeESCPOS.pas

Obrigado. vou alterar aqui pra tudo em minusculo então. grato.. Leandro

bom dia Italo obrigado por responder eu só alterei eu só alterei pois como disse acima quando gero o xml assino e valido ele gera com <chave>-nfe.xml e se eu precisar criar esse xml novamente utilizando a funcao savetofile ele salva assim <chave>-NFe.xml como utilizo um servidor linux e ele é case-sensitive faz diferenca esse <chave>-nfe.xml é diferente desse <chave>-NFe.xml entendeu como falei na unit esta salvando em um metodo todo minusculo e no outro maiúsculo e minusculo. não alterei em nada a chave do que diz no manual somente deixei como maisculo e minusculo. pois pra mim que salvo em um sevidor linux tem diferenca maisculo e minusculo.. grato pela atenção Leandro

Bom dia fiz uma correção na unit ACBrNFeNotasFiscais.pas na procedure.assinar linha 461 pois utilizo um servidor linux para salvar os arquivos xml e a característica do servidor é case-sensitive (diferencia maiúsculas de minúsculas) deixe da forma como abaixo pois na function.savetofile esta assim NFe.xml antes: if FConfiguracoes.Geral.Salvar then FConfiguracoes.Geral.Save(StringReplace(Self.Items.NFe.infNFe.ID, 'NFe', '', [rfIgnoreCase])+'-nfe.xml', vAssinada); Agora: if FConfiguracoes.Geral.Salvar then FConfiguracoes.Geral.Save(StringReplace(Self.Items.NFe.infNFe.ID, 'NFe', '', [rfIgnoreCase])+'-NFe.xml', vAssinada); se algum moderador puder subir essa alteração fico grato pois as vezes atualizo o acbr apagando tudo ai esqueco de alterar esse detalhe.. grato LeandroACBrNFeNotasFiscais.pas

bom dia segue os dados das URLs de homologação da versão 3.10 para o estado do Parana. NF-e: Versão 3.10 no Ambiente de Homologação A Coordenação da Receita do Estado informa que foi implantada a nova versão 3.10, no ambiente de homologação, do sistema autorizador de Nota Fiscal Eletrônica - NF-e, contemplando as alterações contidas na Nota Técnica 2013.005 – v1.02, relacionadas apenas a NF-e, modelo 55. Os novos endereços dos Web Services da versão 3.10 estão disponíveis noPortal do SPED/PR e são: https://homologacao.nfe.fazenda.pr.gov.br/nfe/NFeAutorizacao3 https://homologacao.nfe.fazenda.pr.gov.br/nfe/NFeRetAutorizacao3 https://homologacao.nfe.fazenda.pr.gov.br/nfe/NFeConsulta3 https://homologacao.nfe.fazenda.pr.gov.br/nfe/NFeInutilizacao3 https://homologacao.nfe.fazenda.pr.gov.br/nfe/NFeStatusServico3 https://hom ologacao.nfe2.fazenda.pr.gov.br/nfe/CadConsultaCadastro2 https://homologacao.nfe2.fazenda.pr.gov.br/nfe-evento/NFeRecepcaoEvento A Coordenação da Receita do Estado recomenda a realização dos testes no ambiente de homologação, pois em breve a versão 3.10 será implantada no ambiente de produção. Outras informações sobre o projeto NF-e estão disponíveis no Portal do SPED/PR.

Problema resolvido da seguinte forma : Entre no internet explorer vá em ferramentas / opções da internet selecione a aba Avançadas, depois role a barra de rolagem até o final marque a opção Usar SSL 2.0 e desmarque a opção Verificar revogação de certificados do servidor funcionou assim pra mim...

estou tendo o mesmo problema em alguns clientes que utilizam o windows xp SP3, no windows 7 esta normal até mesmo esses clientes do windows xp passei eles pro windows 7 e voltaram a funcionar. Alguém mais esta passando por isso tambem ? ou alguem conseguiu alguma solucao pois nao consigo falar com o pessoal do 0800.... como sempre né hehehe

Procedimento para Cancelamento de NF-e, Após 24 Horas No Ato COTEPE nº 33/2008 (DOU 01.10.2008), ficou estabelecido que a NF-e não poderá ser cancelada em prazo superior a 24 horas, contando-se do momento em que foi concedida a respectiva Autorização de Uso da NF-e, e desde que não tenha ocorrido a circulação da mercadoria ou a prestação do serviço. Nos casos em que a operação não tenha sido realizada e o cancelamento não tenha sido transmitido no prazo referido acima, a correção deve ser realizada através da emissão de NF-e de estorno, com as seguintes características: a) finalidade de emissão da NF-e (campo FinNFe) = “3 - NF-e de ajuste”; descrição da Natureza da Operação (campo natOp) = “999 - Estorno de NF-e não cancelada no prazo legal”; c) referenciar a chave de acesso da NF-e que está sendo estornada (campo refNFe); d) dados de produtos/serviços e valores equivalentes aos da NF-e estornada; e) códigos de CFOP inversos aos constantes na NF-e estornada; f) informar a justificativa do estorno nas Informações Adicionais de Interesse do Fisco (campo infAdFisco).” Também deverá lavrar um Termo no Livro Registro de Utilização de Documentos Fiscais e Termos de Ocorrências, modelo 6, explicando o ocorrido, e anexar uma declaração do destinatário de que não recebeu a mercadoria constante nessa NF-e.

segue a unit corrigida ACBrNFeConfiguracoes.pas

da uma olhada ai tem uma ideia do usuario Roberto.Godinho que podera te ajudar a adaptar as suas necessidades.

Alterar na Unit ACBrNFeConfiguracoes na linha 608 e 611 function TArquivosConf.GetPathEvento: String; var wDia, wMes, wAno : Word; Dir : String; begin if DFeUtil.EstaVazio(FPathMDe) then Dir := TConfiguracoes( Self.Owner ).Geral.PathSalvar else Dir := FPathMDe; o correto seria: function TArquivosConf.GetPathEvento: String; var wDia, wMes, wAno : Word; Dir : String; begin if DFeUtil.EstaVazio(FPathEvento) then Dir := TConfiguracoes( Self.Owner ).Geral.PathSalvar else Dir := FPathEvento;

Boa tarde Juliana Tamizou Acrescentei mais algumas alterações. na unit do ACBRBancoBasil e ACBRBoleto sendo.: o Banco do Brasil existe um campo para informar remessa em teste então crie no acbrboleto o Tipo de ambiente do boleto. no acbrbancodobrasil acrescentei a verificacao se o boleto esta sendo emitido em producao ou homologacao e alterei a forma como gera o nossonumero.. as alteracoes feitas por mim pra ser localizada estão com (*Alterado por Leandro 28/02/2012*) qualquer coisa vamos tirando duvidas por aqui, Atenção somente Banco do Brasil ACBrBancoBrasil.pas ACBrBoleto.pas

O Banco do Brasil tem algumas particularidades quanto a geração do Nosso Numero. existe a opção do Banco Gerar o nosso numero, e a opcao do cliente gerar o nosso numero Quando é o banco que gera o nosso numero o correto é vc passar somentes zeros nesse campo no arquivo de remessa. Ai no arquivo de retorno vem o nosso numero gerado pelo banco sem o digito verificador.. Verifique junto ao banco essas informações.

Boa tarde fiz algumas alterações no acbrboleto pra adequar aos codigos da FEBRABAN só fiz as alterações nas Units acbrboleto e acbrbancobrasil, pois no momento só tenho clientes que utilizam a cobrança do BB. mas se alguem quiser colocar nas outras Units, só acrescentei funcoes não alterei nada do que ja tem para não dar conflitos com os outros bancos... para localizar onde foram feitas as alterações : (*Alterado por Leandro 22/02/2012*) ACBrBoleto.pas ACBrBancoBrasil.pas

Imprimi o numero e data de protocolo da primeira nota em todas, não, pois ele mostra em um preview antes da impressão alguns clientes gostão de ver o preview antes..