juaumkiko

REVISÃO 1: Foi acrescentado a leitura dos eventos quando realizar a consulta da NFe. Novos fontes para testes esta no primeiro Post []´s

Bom Dia Utilize o SAC então. []´s

Bom Dia Até onde eu sei é exatamente isso. Somente a ultima CCe enviada tem valor. []´s

Só para não ser mal compreendido... Cada caso é um caso... Tenho casos que quando isso acontece o cliente simplesmente cancela a NFe, duplica a mesma (recurso do sistema), corrigi o erro e envia novamente. Tão simples e rápido quanto a fazer a CCe, visto que quem tera de fazer a CCe será normalmente a mesma pessoa que fez a NFe. OOOUUU ele faz a CCe... O ponto é que a CCe terá um volume de uso muito inferior ao de quando podia fazer correções de valor... mas isso ae... O importante é deixar a opção pros clientes... não deixa de ser uma opção interessante para quando (casos escassos) precisar. []´s

Olha... Você escreve oq esta sendo corrigido na NFe. Mas infelizmente somente campos que não envolvam valor ou mudança de destinatario e emitente podem ser alterados... Logo, ao meu ver, a CCe não serve para praticamente nada. Mas... esta implementada para o cliente usar... se quiser.... []´s

Boa Noite, Esta pergunta acabou de ser respondida, mas não ficou muito claro para mim, além de atualizar as unit's modificadas, tenho que atualizar algum arquivo de esquema? Obs: Atualmente utilizo os "Esquemas XML NF-e - Pacote de Liberação No. 6j - Sem Âncora (26/10/2011) (ZIP)" Tem que atualizar os Schemas. A pasta do ACBrNFeMonitor tem os schemas atualizados. []´s

Esse erro é muito comum nos eventos infelizmente... Para solucionar: uses DateUtils; ... var lDataHora: TDateTime; begin ... lDataHora := now; lDataHora := DateUtils.IncMinute(lDataHora,-1); //tira 1 minuto da hora infEvento.dhEvento := lDataHora; ... end; []´s

As mudanças de 01/07 é sobre a consulta que já esta disponivel no componente. Basta atualizar o componente. Essas mudanças que eu postei é para Unificar num unico lugar as chamadas ao webservice de eventos e para atender a obrigatoriedade do cancelamento por eventos que deve ser implementado nos sistemas até 01/12/2012. E começamos a atender tb a questão da Manifestação do Destinatário. []´s

Valeu... Lembrando que o Retorno se lê +/- assim: cStat := AcbrNFe1.WebServices.Eventos.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat; tpAmb := AcbrNFe1.WebServices.Eventos.EventoRetorno.tpAmb; lStr := String(AcbrNFe1.WebServices.Eventos.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo); protCanc := AcbrNFe1.WebServices.Eventos.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; dhRectoCanc := AcbrNFe1.WebServices.Eventos.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento; Chave := AcbrNFe1.WebServices.Eventos.EventoRetorno.retEvento.Items[0].RetInfEvento.chNFe; lXMLCanc := AcbrNFe1.WebServices.Eventos.EventoRetorno.retEvento.Items[0].RetInfEvento.XML; []´s João Henrique

Sobre a Unificação dos Eventos em uma unica rotina e testes do Evento de cancelamento, favor verificar o tópico: []´s João Henrique

Falae Galera... Fiz umas modificações no projeto do ítalo, para consumir os webservices de eventos, que esta no Branches e estou solicitando voluntários para testes. Os arquivos fontes alterados já estão no TRUNK do componente (revisão 3728) Fiz o teste com CCe e Cancelamento com OpenSSL e esta funcionando normalmente. Manifestação do destinatário precisa testar. O DEMO do componente foi alterado para exemplificar a utilização deste novo processo de consumo de EVENTOS. No DEMO do Componente tem a pasta SCHEMAS atualizada com os schemas mais recentes que deverá ser atualizada nas aplicações Vejam como Fica para consumir os webservices de CCe e Cancelamento por EVENTOS... AVISO MUITO IMPORTANTE: Os webservices antigos de Cancelamento e Carta de Correção serão mantidos para efeito de compatibilidade. Mas é provável que os mesmos sejam eliminados do componente no futuro. Assim a única maneira de cancelar uma NFe e enviar uma CCe será adaptando os códigos como segue: Carta de Correção: ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Clear; ACBrNFe1.EnvEvento.EnvEventoNFe.idLote := StrToInt(idLote) ; with ACBrNFe1.Evento.Eventos.Evento.Add do begin infEvento.chNFe := Chave; //se carregar o XML antes, não precisa especificar este campo infEvento.CNPJ := CNPJ; //se carregar o XML antes, não precisa especificar este campo infEvento.dhEvento := now; infEvento.tpEvento := teCCe; infEvento.nSeqEvento := StrToInt(nSeqEvento); //se não especificar será 1 infEvento.detEvento.xCorrecao := Correcao; end; ACBrNFe1.EnviarEventoNFe(StrToInt(idLote)); Cancelamento: ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Clear; ACBrNFe1EnvEvento.EnvEventoNFe.idLote := StrToInt(idLote) ; with ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Add do begin infEvento.chNFe := Chave; //se carregar o XML antes, não precisa especificar este campo infEvento.CNPJ := CNPJ; //se carregar o XML antes, não precisa especificar este campo infEvento.dhEvento := now; infEvento.tpEvento := teCancelamento; infEvento.nSeqEvento := StrToInt(nSeqEvento); //se não especificar será 1 infEvento.detEvento.xJust := Justificativa; infEvento.detEvento.nProt := nProtocolo; //Protocolo de Autorização da Nfe que esta desejando cancelar //se carregar o XML Autorizado antes, não precisa especificar este campo end; ACBrNFe1.EnviarEventoNFe(StrToInt(idLote)); Para consultar os eventos, basta realizar a consulta da NFe e Ler as propriedades da mesma. Exemplo Após o Envio do evento: cStat := AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat; tpAmb := AcbrNFe1.WebServices.EnvEvento.EventoRetorno.tpAmb; lStr := String(AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo); protCanc := AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; dhRectoCanc := AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento; Chave := AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.chNFe; lXMLCanc := AcbrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML; Exemplo na Consulta da NFe: if loACBrNFe.WebServices.Consulta.cStat <> 0 then begin cStat := loACBrNFe.WebServices.Consulta.cStat; lSTR := String(loACBrNFe.WebServices.Consulta.Msg); nProt := loACBrNFe.WebServices.Consulta.protNFe.nProt; dhRecto := loACBrNFe.WebServices.Consulta.protNFe.dhRecbto; nProtCanc := loACBrNFe.WebServices.Consulta.retCancNFe.nProt; dhRectoCanc := loACBrNFe.WebServices.Consulta.retCancNFe.dhRecbto; if trim(nProtCanc)='' then begin for I := 0 to loACBrNFe.WebServices.Consulta.procEventoNFe.Count-1 do begin if loACBrNFe.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.InfEvento.tpEvento = teCancelamento then begin if loACBrNFe.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.retEvento.Count > 0 then begin nProtCanc := loACBrNFe.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.retEvento.Items[0].RetInfEvento.nProt; dhRectoCanc := loACBrNFe.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.retEvento.Items[0].RetInfEvento.dhRegEvento; end; end; end; end; Chave := loACBrNFe.WebServices.Consulta.protNFe.chNFe; end; A propriedade loACBrNFe.WebServices.Consulta.procEventoNFe é uma lista com todos os eventos associados a NFe. []´s

Fiz umas mudanças no componente, amanhã farei os testes e posto os resultados. Valeu JuaumKiko

Muito bom... Observem que agora a Consulta retorna os serviços vinculados a NFe, como a(s) Carta(s) de Correção(ões). Falta agora incluir no componente a leitura desses resultados que o WebService nos fornece. Para isso gostaria de saber se, sobre os eventos, os administradores estão pensando em alguma classe unificada para eles? Assim já podemos ir trabalhando as ideias e ir colocando em pratica isso. Visto que a grande tendência é a receita ir inventando novos eventos, se já pensarmos em adotar um classe específica para os eventos, poderemos ganhar tempo nessas futuras inclusões de eventos que a receita poderá fazer. Oq Acham? João Henrique

Bom Dia Acabei de fazer o teste do exemplo e ainda esta funcional, então enviei aquele projeto para a pasta Projetos do Componente. Atualizem o componente e verifiquem. (versao 3645) Att João Henrique

Pressumindo que vc utiliza Delphi 7. Seu Rave deve ser INFERIOR ao 5.0.8. Se for vc terá de atualizar o seu RAVE. http://www.4shared.com/file/z-w6vsEI/rave_be_5_0_8.html Antes de atualizar vc precisa desinstalar o rave atual... para isso utilize o cd de instalação do Delphi 7 []´s

Minha resposta se baseou na pergunta dele que era pela instalação manual. As duas opções estão disponíveis. Ele pode usar o ACBrInstall ou a Instalação Manual. Vai de cada um... []´s

Alguns pontos mencionados por vc: Procure pela pasta Pacotes\Delphi e abra o arquivo ACBrComum.dpk e clique em compile. ESTE PACOTE AGORA NECESSITA SER INSTALADO TAMBÉM Procure pela pasta Pacotes\Delphi e abra o arquivo PCN.dpk e clique em compile. Procure pela pasta Pacotes\Delphi e abra o arquivo ACBr_NFe.dpk e clique em compile e depois clique em Install. Ambos pacotes estão na pasta: ..Pacotes\Delphi\ACBrNFe2 e os pacotes que vc tem que compilar são PCN2.dpk e ACBr_NFe2.dpk (este vc deve instalar tb) []´s

Desinstale por completo o componente e apague as BPLs do ACBr. Atualize os fontes e reinstale o COMP. []´s

Já olhou as propriedades Tamanho Fonte do componente Danfe em Rave CB????

Quando isso acontecer, sempre consulte a disponibilidade do serviço... seja através do Consultar Status do Serviço no componente ou pelo site: http://www.nfe.fazenda.gov.br/portal/disponibilidade.aspx?versao=2.00 Se tempo de espera estiver maior q 1 segundo é problema com a referida SEFAZ na certa. []´s

Já fui obrigado a fazer muitos processos parecidos com o que o ITALO explicou, porém com a diferença que o cliente não faz a devolução fisica do produto. Mesmo pq a logistica para isso é cara. Ele escreve no verso do Danfe que esta devolvendo os produtos por nao estar em acordo o preco unitario por exemplo, e me devolve o Danfe. Emitimos uma NFe de entrada dessa "devolvida" (vinculando a NFe de saída nela) e depois uma nova NFe de saida com o preco correto e mandamos por email. Dae pergunto... oq adianta a receita colocar esses "bloqueios" se podemos fazer isso? É praticamente o mesmo processo de cancelar a NFe errada e emitir a nova. Respondo: pq assim ela tem um jeito de te cobrar mais alguma multa. []´s

Tente utilizar o Danfe com Rave Code Base para sabermos se o problema esta com o Danfe em Rave Arquivo. Eu uso o danfe com rave arquivo e nunca passei por esse problema, pois eu crio e destruo os componentes em tempo de execução e encorajo todos a fazerem o mesmo. []´s

Lentidão normalmente é o servidor da receita.

A atualização é do projeto COMPILADO. Ou seja... do projeto que vc NÃO precisa compilar (vc mesmo) o Executável. Veja a pasta COMPILADO do Projeto e leia o arquivo LEIAME.TXT do Projeto ACBrDANFe. Nesse arquivo tem o nome dos pacotes que vc precisa instalar caso deseja compilar vc mesmo o ACBrDanfe. []´s

Vc tem que ter instalado o Danfe com Rave Code Base e o Danfe em Fortes Reports... pois o ACBrDanfe possibilita usar uma dessas três opções de Danfe. De qualquer maneira, acabei de disponibilizar uma versão do ACBrDanfe Compilado atualizada. []´s