Ir para conteúdo
  • Cadastre-se

ermo

Membros
  • Total de ítens

    11
  • Registro em

  • Última visita

Posts postados por ermo

  1. Pessoal,

    Ao gerar uma Carta de Correção, o webservice me retorna a seguinte exceção : 493 - Rejeição: Evento não atende o Schema XML específico.

    Porém, ao informar a chave da NFe no Demo (ACBr) que gera a CCe, o retorno está OK ! OU seja, retorna status=135, "Evento registrado e vinculado a NF-e".

     

    com certeza é algo em meu fonte, mas não consigo descobrir ! Aliás, copiei o fonte demo, ams ainda assim, não deu certo ! A configuração do comp ACBRNFe também está identico !!!

     

    segue XML gerado pelo meu sistema :

     

     

    20-ped-eve.xml

    20-eve.xml

  2. Olá Sérgio,

     

    estou trabalhando com o emulador (por enquanto), muda alguma coisa ?

     

    Estou pegando o XMl da pasta Cfe\Enviados\, não é este ?

    ...      

    ACBrSAT1.CFe.LoadFromFile(ExtractFilePath(ParamStr(0))+'CFe\Enviados\'+tb_cancelamento.fieldbyname('SATChave').asstring+'.xml');
    ACBrSAT1.CancelarUltimaVenda;

     

    após isso, o fluxo vai para :

    Application.MessageBox(pchar(ACBrSAT1.Resposta.RetornoLst.Text), 'Erro',0);

     

     

    35151211111111111111591234567890000585529342.xml

  3. Estou exatamente com o mesmo problema. Basicamente o arq de log é igual. O erro persiste = "Erro de validação de conteúdo"

    trecho do código :

     

                   try
                       frm_principal.InicializaSAT(ACBrSAT1);
                       ACBrSAT1.CFe.Clear;
                       ACBrSAT1.CFeCanc.Clear;
                       ACBrSAT1.CFe.LoadFromFile(ExtractFilePath(ParamStr(0))+'CFe\Enviados\'+tb_cancelamento.fieldbyname('SATChave').asstring+'.xml');
                       ACBrSAT1.CancelarUltimaVenda;
                     except
                       on F:Exception do
                          begin
                            FreeAndNil(frmMensagem);
                            tb_cancelamento.active:=false;

                            MessageBox(0,pchar('Erro ao tentar cancelar CFe Nº '+tb_cancelamento.fieldbyname('nr_cupom').asstring+'.'+
                            chr(13)+'             Venda NÃO Cancelada !             '+chr(13)+chr(13)+
                                               F.Message),'Erro',mb_iconerror);
                            exit;
                          end;
                     end;

                     cancelaSAT:=TStringlist.Create;
                     cancelaSAT.Clear;

                     if ACBrSAT1.Resposta.codigoDeRetorno = 7000 then
                        begin
                          cancelaSAT.Text:=ACBrSAT1.CFeCanc.AsXMLString;
                          cancelaSAT.SaveToFile(ExtractFilePath(ParamStr(0))+'CFe\Cancelados\'+ACBrSAT1.CFeCanc.infCFe.ID+'.xml');
                          FreeAndNil(frmMensagem);
                          cancelaSAT.Free;
                          ACBrSAT1.ImprimirExtratoCancelamento;
                        end
                     else
                        begin
                          FreeAndNil(frmMensagem);
                          cancelaSAT.Free;
                          tb_cancelamento.active:=false;
                          Application.MessageBox(pchar(ACBrSAT1.Resposta.RetornoLst.Text), 'Erro',0);
                          exit;
                        end;
     

    algo errado nisso ?

     

     

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.