Pesquisar na Comunidade

Saudações. Perdão por recriar um tópico semelhante, mas não encontrei a resposta em outros tópicos abertos com o assunto desejado. Estou gerando nfce normalmente. Funciona. Ok. Sem problemas. Vou executar o cancelamento de uma nfce e ele me retorna erro de que o certificado digital não foi carregado. Segue abaixo código fonte. if qvndvndEmitiuNfce.AsString = 'Sim' then begin ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(qvndvndnomenfce.AsString); Danfenfce.FastFile := 'C:\Posirelo\relat\nfcesimples - modelo 2.fr3'; Danfenfce.MostrarPreview := true; ACBrNFe1.Configuracoes.Geral.IdToken := cfgcfgidtoken.AsString; ACBrNFe1.Configuracoes.Geral.Token := cfgcfgtoken.AsString; // numero do lote de envio (somente um exemplo, pode-se utilizar seu proprio controle) NumeroLote := 0; Protocolo := qvndvndnprot.AsString; // carregar o xml da nota fiscal eletronica, pode ser omitido // showmessage(copy(qvndvndnomenfce.AsString, 28, 52)); { if not ACBrNFe1.NotasFiscais.LoadFromString(qvndvndnomenfce.AsString) then raise Exception.Create('Não foi possível carregar o XML da Nota Fiscal Eletrônica correspondente!'); } // Criar o cancelamento ACBrNFe1.EventoNFe.idLote := NumeroLote; with ACBrNFe1.EventoNFe.Evento.Add do begin InfEvento.tpAmb := ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpAmb; InfEvento.chNFe := copy(qvndvndnomenfce.AsString, 27, 44); InfEvento.CNPJ := cfgcfgdoc1.AsString; InfEvento.cOrgao := ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.cUF; InfEvento.dhEvento := now; InfEvento.nSeqEvento := 1; InfEvento.tpEvento := teCancelamento; InfEvento.detEvento.nProt := Protocolo; InfEvento.detEvento.xJust := motivo; ACBrNFe1.EnviarEventoNFe(NumeroLote); end; O erro ocorre no arquivo acbrnfeconfiguracoes, linha 458. fonte abaixo if (PCertCarregado <> nil) and (NumCertCarregado = FNumeroSerie) then Result := PCertCarregado else begin CoInitialize(nil); // PERMITE O USO DE THREAD try if DFeUtil.EstaVazio(FNumeroSerie) then raise EACBrNFeException.Create('Número de Série do Certificado Digital não especificado !'); Result := nil; A questão que me toca é: Se eu tenho funcionando a emissao do NFCE, o certificado não carregaria junto?? Ou devo carregar o certificado de forma diferente. Se sim, como ou onde?? Bem perdido por aqui. No aguardo de uma resposta ou idéia, Claudiomir

Olá, bom dia. Estou com um problema ao cancelar uma NFS-e em ambiente de homologação pelo provedor Coplan. Observei que o XML do pedido de cancelamento não está preenchendo o Código de Cancelamento, o restante das informações parecem estar corretas. A forma de preencher estou fazendo da seguinte maneira: function TFrmCadPedido.CancelarNFSe: boolean; var vCodigo, vMotivo: String; begin try try Result := False; if OpenDialogNFSe.Execute then begin DMNFSe.ObjetoNFSe.NotasFiscais.Clear; DMNFSe.ObjetoNFSe.NotasFiscais.LoadFromFile(OpenDialogNFSe.Filename); // Codigo de Cancelamento // 1 - Erro de emissão // 2 - Serviço não concluido // 3 - RPS Cancelado na Emissão //if not(InputQuery('Cancelar NFSe', // 'Código de Cancelamento:' + #13 + // '1 - Erro de emissão' + #13 + // '2 - Serviço não concluído' + #13 + // '3 - RPS Cancelado na Emissão', vCodigo)) then // Exit; // Provedor Equiplano é obrigatório o motivo de cancelamento // if not(InputQuery('Cancelar NFSe', 'Motivo de Cancelamento', vMotivo)) then // Exit; //DMNFSe.ObjetoNFSe.NotasFiscais.Items[0].NFSe.MotivoCancelamento:= vMotivo; DMNFSe.ObjetoNFSe.WebServices.CancNfse.CodigoCancelamento := '2'; DMNFSe.ObjetoNFSe.WebServices.CancNfse.MotivoCancelamento := 'SERVIÇO NÃO CONCLUÍDO'; DMNFSe.ObjetoNFSe.WebServices.CancNfse.CNPJ := '06137422000190'; DMNFSe.ObjetoNFSe.WebServices.CancNfse.IM := '4147'; DMNFSe.ObjetoNFSe.WebServices.CancNfse.CodigoMunicipio := '5102678'; DMNFSe.ObjetoNFSe.WebServices.CancNfse.NumeroNFSe := '283'; Result := DMNFSe.ObjetoNFSe.WebServices.CancelaNFSe(vCodigo, False); // Result := DMNFSe.ObjetoNFSe.CancelarNFSe(vCodigo); end; except on E: Exception do begin Result := False; end; end; finally end; end; O XML do Pedido de Cancelamento gerado é esse: <?xml version="1.0"?> -<CancelarNfseEnvio xmlns="http://www.abrasf.org.br/nfse.xsd" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> -<Pedido> -<InfPedidoCancelamento Id="pedidoCancelamento_061374220001904147283"> -<IdentificacaoNfse> <Numero>283</Numero> -<CpfCnpj> <Cnpj>06137422000190</Cnpj> </CpfCnpj> <InscricaoMunicipal>4147</InscricaoMunicipal> <CodigoMunicipio>5102678</CodigoMunicipio> </IdentificacaoNfse> <CodigoCancelamento/> </InfPedidoCancelamento> </Pedido> </CancelarNfseEnvio> O erro gerado é o seguinte: Código Erro: E9999 Mensagem: Erro Desconhecido Correção: For input string: "" Provedor: Coplan Código Erro: Mensagem: Correção: Provedor: Coplan O que pode estar ocorrendo? Obrigado.

Ola galera bom dia, Pode ser que esse problema ja tenha sido velho conhecido, porem hoje meu cliente foi cancelar uma nfe emitida ontem as 15:55 e obeteve esse erro: Rejeição: Pedido de Cancelamento para NF-e com CT-e; Alguem poderia pelo menso me dizer o porque pra eu dar uma resposta a meu cliente, por que ate meu entendimento o prazo é de 24 horas. agradeço desde ja a teanção de todos

Bom dia pesso Estou com o erro anexo sempre que tento cancelar uma nota via evento... ja verifique a conexão com a net, recompilei o programa e mesmo assim o erro persiste. Por favor, alguem de vocês sabe me dizer o que pode estar causando esse erro? Muito Obrigado.