Régys Silveira

O parâmetro é a chave da NF-e e não o caminho do XML.

Estamos aguardando os acertos no FortesReport para acertar o ACBr, então ainda não foram efetuados os acertos.

GetNumLoja aqui está normal, retornando o que está na impressora. Quanto a MFD não consegui testar ainda estou correndo hoje com algumas entregas, assim que finalizar já testo.

O XMl enviado está em modo de homologação, até onde sei estava com problemas no webservice se já não voltou.

Então está fácil, basta remover a unit que lhe passei anteriormente e fazer os acertos devidos que tudo vai funcionar. O que estiver dentro de verificarnecessidades não deve ser usado com o trunk2, mantivemos somente para efeito de conversão do antigo para o novo se caso necessário para uma consulta ao código por exemplo, logo será removido.

A sintaxe correta do comando CancelarNFe para o ACBrMonitorPlus é: NFe.CancelarNFe(cChaveNFe, cJustificativa, cCNPJ, nEvento)

Preciso saber como estão enviando os comandos para poder ajudar e verificar.

Na raiz do trunk2 existem um pdf ("Bem_Vindo_ao_Trunk2.pdf") explicando as mudanças do trunk2.

Tente o seguinte: var DataHoraEvento: TDateTime; NumeroLote: Integer; begin // numero do lote de envio DataHoraEvento := NOW; NumeroLote := StrToInt(FormatDateTime('yymmddhhmm', NOW)); // carregar xml da nota fiscal eletronica para ser atualizado ACBrNFe1.NotasFiscais.LoadFromFile(<caminho do xml da nota que for cancelar>); // ou //ACBrNFe1.NotasFiscais.LoadFromString(<conteudo do xml da nota que for cancelar, geralmente usado quando lê o XML do banco>); // montagem do cancelamento ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.idLote := NumeroLote; with ACBrNFe1.EventoNFe.Evento.Add do begin infEvento.CNPJ := CNPJ_EMPRESA; infEvento.dhEvento := DataHoraEvento; infEvento.tpEvento := teCancelamento; infEvento.chNFe := ACBrNFe1.NotasFiscais[0].NFe.procNFe.chNFe; infEvento.detEvento.nProt := ACBrNFe1.NotasFiscais[0].NFe.procNFe.nProt; infEvento.detEvento.xJust := <TEXTO_JUSTIFICATIVA>; end; if ACBrNFe1.EnviarEventoNFe(NumeroLote) then begin with ACBrNFe1.WebServices do begin if EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat <> 135 then begin raise Exception.CreateFmt( 'Ocorreu o seguinte erro ao cancelar a nota fiscal eletrônica:' + sLineBreak + 'Código:%d' + sLineBreak + 'Motivo: %s', [ EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat, EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo ]); end; try // Informações retornadas para o evento, usadas para gravar no banco de dados se quiser // EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.dhRegEvento // EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt // EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat // EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo // EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML Application.MessageBox('Cancelamento efetuado com sucesso!', 'Cancelamento', MB_ICONINFORMATION + MB_OK); except on E: Exception do begin raise Exception.Create( 'Ocorreram erros ao gravar o evento no banco de dados' + sLineBreak + E.Message ); end; end; end; end else begin with ACBrNFe1.WebServices.EnvEvento do begin raise Exception.Create( 'Ocorreram erros ao tentar efetuar o cancelamento:' + sLineBreak + 'Lote: ' + IntToStr(EventoRetorno.idLote) + sLineBreak + 'Ambiente: ' + TpAmbToStr(EventoRetorno.tpAmb) + sLineBreak + 'Orgao: ' + IntToStr(EventoRetorno.cOrgao) + sLineBreak + 'Status: ' + IntToStr(EventoRetorno.cStat) + sLineBreak + 'Motivo: ' + EventoRetorno.xMotivo ); end; end; end;

Este logo está programado na impressora fiscal, para trocar você precisa utilizar o utilitário próprio do fabricante.

Trunk ou Trunk2? Você fez a instalação do ACBr corretamente utilizando o ACBrInstall? Marcou no ACBrInstall para copiar todas as dlls necessárias (primeira página do instalador)?

Remova "ACBrCTeUtil" de qualquer uses no seu aplicativo e utilize a nota unit "pcteConversaoCTe", serão necessárias outras trocas de units, você deve ir compilando e acertando o seu aplicativo, muita coisa foi reestruturada.

Poste o XML para que possamos ver como está sendo gerado e tentar ajudar. Você chegou a valida-lo no validador da sefaz/rs? https://www.sefaz.rs.gov.br/nfe/nfe-val.aspx?

Provavelmente eles estão falando apenas dos registros 60M, 60A e correlatos que são referentes ao ECF.

Poderia passar como está enviando o comando?

Acabei de enviar o demo do ACBrNFe já compatibilizado para o Trunk2, basta atualizar.

Imagino que com a conversão o link se quebrou, lembro que haviam hospedado a classe no sourceforge se não estou enganado.

Você está usando o componente ou monitor? Importei com o componente e está normal, importou sem erros, então provavelmente o monitor também importará.

Seu componente se encontra atualizado? Eu tenho Caixa em produção aqui em cliente e também interno e está tudo normal.

Aqui está em produção também, tudo funcionando perfeitamente com o FastReport, somente a NFS-e e a GNRE que ainda não.

Anexe um arquivo texto que esteja tentando importar e que deu erro para testes por favor.

Bem quanto a informação, provavelmente um outro usuário fara como você, informará no fórum o que fez para dar certo. No dia a dia, basta configurar um ou outro e testar.

O teste foi feito no ACBrMonitorPlus?

Limpe seu library path, tem algo muito errado com eles, está abarrotado de caminhos e caminhos gigantes.

A diferença é a forma como a pilha de chamada de paramêtros é limpa ao final da chamada do método, então é preciso acertar a chamada do método da dll a forma que o fabricante compilou a dll.