Astrogildo82

Como disse, acredito que seja um bug do Delphi 2010 ou isso ate pode ser do IDE Fix Pack que eu uso aqui. Mas agora está perfeito para mim - cabe aos eventuais usuários de outras versões do Delphi testarem ainda. No mais muito obrigado pelo seu rápido atendimento em comitar minha humilde contribuição. E parabéns a todos os envolvidos pelo excelente ACBR!

Ainda faltou a questão de não deixar como sendo a ultima unit dentro das diretivas. Anexei os dois pacotes com um merge das alterações que voce fez e as minhas. ACBrNFeDanfeRLpkg.zip

Juliomar, infelizmente do jeito que vc fez nao deu certo, pq faltou fechar algumas diretivas que vc adicionou e, conforme eu já vi em algumas units minhas onde tb uso diretivas, vc nao pode deixar uma unit dentro de diretiva e como sendo a ultima (acho que é um bug do Delphi 2010). Dai para poder compilar, onde vc colocou: soaprtl, {$IFDEF VER150} RLibWinD7vcl {$ENDIF} // D7 {$IFDEF VER210} RLibWinD2010 {$ENDIF} // D2010 {$IFDEF VER220} RLibWinDXE {$ENDIF // XE {$IFDEF VER230} RLibWinDXE2 {$ENDIF //XE2 {$IFDEF VER240} RLibWinDXE3 {$ENDIF //XE3 ; Tem que ser assim: {$IFDEF VER150} RLibWinD7vcl, {$ENDIF} // D7 {$IFDEF VER210} RLibWinD2010, {$ENDIF} // D2010 {$IFDEF VER220} RLibWinDXE, {$ENDIF} // XE {$IFDEF VER230} RLibWinDXE2, {$ENDIF} //XE2 {$IFDEF VER240} RLibWinDXE3, {$ENDIF} //XE3 soaprtl; Senao nem abre no Delphi.

Boa tarde, e só para complementar o que o Italo falou, o envio de email não é a única via para disponibilizar o XML, pois segundo o manual, isso pode ser feito também via download de um site do emitente por exemplo. Isso se deve ao fato de que existem empresas que nem sabem o que é uma conta de email! Isso pode soar ridículo para alguns, mas infelizmente é um fato que eu já vi acontecer com alguns clientes de uma distribuidora que eu atendo. Imagina aquele dono da unica mercearia lá do interior onde nem telefone tem e que vai pra "cidade grande" uma vez por mes repor o estoque dele... Não me pergunte como eles fazem a contabilidade dessas NFe e a obrigação fiscal de ter que armazenar o arquivo XML durante o prazo decadencial. Acredito que seja a contabilidade (terceirizada é claro) que pega os Danfes dos fornecedores deles, acessa o site da Receita e baixa manualmente os arquivos, que por serem poucos, não implicam no bloqueio por excesso de uso do webservice. Para isentar o teu cliente (do teu sistema) nesses casos, o mais fácil é disponibilizar o download do XML via site e colocar o endereço e as instruções nas informações complementares do Danfe, não havendo assim a comunicação por email.

Boa tarde. Eu uso o danfe do Fortes Report no Delphi 2010 e para poder instalar esse pacote, tenho que mudar o requires da RLibWinD7vcl para RLibWinD2010, sempre que baixo os fontes do SVN. Não sei se tem mais alguem que usa o Danfe do Fortes em outra versão do Delphi, mas eu coloquei diretivas de compilação para resolver isso no Delphi 7 e no Delphi 2010. Peço ao pessoal commiter avaliar e, se estiver ok, subir pro SVN. ACBrNFeDanfeRLpkg.zip

Pelo que pude entender, vc gera o FCI antes de emitir uma NFe que tenha produtos importados ou com mais de 40% de insumos importados no seu valor e, conforme o § 2º do ajuste SINIEF 19: "Deverá ser apresentada nova FCI toda vez que houver alteração em percentual superior a 5 % (cinco por cento) no Conteúdo de Importação ou que implique alteração da alíquota interestadual aplicavel à operação." Então não é uma FCI para cada NFe, mas como o Conteudo de importação é o % resultante entre o valor da parte importada e o valor final do produto, me parece que toda vez que houver uma mudança de mais de 5% no preço dos insumos importados ou da mercadoria final, tem que se fazer uma nova FCI. O mesmo se aplica quando muda em mais de 5% a qde dos insumos importados na composição desse produto. Entao podemos ter produtos com Numeros de FCI repetidos ou nao em diferentes NFe - dependera do seu Conteudo de importação... O protocolo de recebimento irá retornar num arquivo TXT que tem os mesmos campos que vc mandou e acrescido dos que a receita informa (Protocolo, data de recebimento, validação, etc). Com esse protocolo vc irá consultar o Numero de FCI de cada um dos produtos e esses sim, vc ira informar em cada NFe que tiver produtos com as caracteristicas acima. Simples neh? hehehe http://www.fazenda.gov.br/confaz/confaz/ajustes/2012/aj_019_12.htm

Obrigado André - agora está aceitando IE em branco.

Bom dia. Eu uso o procedimento sugerido pelo Isaque, mas se olharmos na pagina 156 do manual do contribuinte, no quadro de Observações desse campo, temos: Pesquisando a respeito disso, descobri que pessoa física em alguns casos pode ser considerada como contribuinte sem inscrição (ISENTO). Mas e nos casos em que não for nem contribuinte? Atualmente estou colocando "ISENTO" também, pois ao contrário do que diz no manual, nao aceita em branco. Mas isso não pode dar problema em alguma auditoria futura?

Bom dia. Esse código está meio estranho, pois vc está tentando usar a NFe antes de carrega-la do XML selecionado e o mesmo esta acontecendo com a variável VAux. Além disso vc está dando o comando de cancelamento pelo modo antigo e pelo evento também. Tente fazer assim: NumeroLote := StrToInt(FormatDateTime('yymmddhhmm', NOW)); OpenDialog1.Title := 'Selecione a NFE'; OpenDialog1.DefaultExt := '*-nfe.XML'; OpenDialog1.Filter := 'Arquivos NFE (*-nfe.XML)|*-nfe.XML|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := nfe.Configuracoes.Geral.PathSalvar; if OpenDialog1.Execute then begin nfe.NotasFiscais.Clear; nfe.NotasFiscais.LoadFromFile(OpenDialog1.FileName); NFe.EventoNFe.idLote := NumeroLote; with NFe.EventoNFe.Evento.Add do begin infEvento.dhEvento := now; infEvento.tpEvento := teCancelamento; infEvento.cOrgao := 91; infEvento.detEvento.nProt := NFe.NotasFiscais.Items[0].NFe.procNFe.nProt; if not(InputQuery('WebServices Cancelamento', 'Justificativa', vAux)) then exit; infEvento.detEvento.xJust := vAux; end; NFe.EnviarEventoNFe(NumeroLote); end;

Para mim já ficou perfeito agora, Obrigado!

Boa noite. No meu caso uso o Danfe em Fortes Report onde está apenas 'PRODUTOS', mas pelo que vi no RaveCB e no QuickReport, lá também está dessa forma.

Boa tarde Italo. Acredito que seja a mesma necessidade que tem em alguns clientes meus, em cujas cidades é possível emitir NF-e mista, com produtos e serviços, sem a obrigatoriedade de ser uma NFS-e.

Eu que agradeço a oportunidade André, e parabéns pelo excelente trabalho de toda a equipe. Quanto a sua dúvida Carlos, o CStat 110 é na verdade o motivo da rejeição da NFe (uso denegado), enquanto que 301 e 302 são os motivos da Denegação (irregularidade fiscal do emitente ou do destinatário). Posso estar enganado quanto a isso, mas acredito que o 110 vai dar somente na hora que vc tentar autorizar a NFe e os outros CStat quando vc depois consultar a NFe Denegada.

Bom dia KarlusHeidrich. Ainda não foi atualizada.

Só um pequeno BUMP pro pessoal uploader nao esquecer, qdo tiver um tempinho.

Boa noite. Comigo também aconteceu essa situação em um cliente que teve uma NFe denegada, sendo que ai pude fazer testes desse problema relatado pela Darlana. Na verdade eu apenas precisei mudar a linha 152 da unit pcnRetConsSitNFe.pas para "case FcStat of 100,101,110,150,151,155,301,302:". Ou seja, adicionei as cstat de denegação que pelo que pesquisei, podem ser 110, 301 ou 302, e usei o case, já que o operador in não funciona com numeros inteiros maiores que 255. Talvez a Darlana não obteve sucesso por testar com uma NFe que tinha cstat = 301 ou 302, que ela não tinha adicionado na sua alteração. Pelos meus testes com essa alteração até o danfe sai com a tarja "NF-e DENEGADA" após consultar a NFe assim (o que nao acontecia antes). Segue a unit alterada em anexo para o pessoal responsável avaliar e upar, se for o caso. Desculpem se fui exageradamente detalhista... pcnRetConsSitNFe.pas

Pessoal, estou enganado ou o comando ACBrNFe1.Consultar é só para consultar as NFe que eu mesmo emiti (onde eu sou o dono do certificado a qual se refere a UF emitente da msg)? Para as NFe emitidas por fornecedores contra mim, a consulta não deveria ser pelo comando ACBrNFe1.ConsultaNFeDest(...)?

Olá a todos. Fiz as correções do erro acima e também a alteração para usar os comandos do DFeUtil. Segue em anexo a Unit alterada para conferencia e posterior atualização do repositório por parte dos administradores do projeto. ACBrNFSeDANFSeRLRetrato.zip

Acredito que tenha havido um erro na fonte onde o Socho obteve essa lista, pois os municipios de Brusque (SC) e Indaial(SC) não são atendidas pela Betha Sistemas, mas sim pela IPM: http://portal.pmbrusque.com.br/atendenet/ http://189.45.201.251:8888/atendenet/ Descobri isso por que preciso desenvolver o modulo NFSE no padrão IPM para o municipio de Indaial e vi que esse municipio passou a constar no componente sem que houvesse sido feita a criação da unit para o padrão IPM. Para confirmar se um municipio usa o padrao Betha o jeito é fazer a consulta de prestadores habilitados no site deles: https://e-gov.betha.com.br/e-nota/pesqu ... ores.faces Se o município tiver prestadores cadastrados, é porque a prefeitura em questão usa o padrão Betha - é uma forma bem tosca, mas acredito que seja a mais confiável de momento. Essas empresas que vendem a solução de NFS-e para as prefeituras não costumam fornecer informações para quem quer desenvolver um aplicativo próprio por que tem a mentalidade medieval de que isso diminui o uso da opção online deles (talvez até por que devem receber um valor por NFS-e emitida dessa forma). Quero estar enganado quanto a isso, mas vamos ver se os que pediram a listagem para a Betha terão sucesso... hehehe