Salvar Xml no Banco de dados para Cancelar

[Leonardo Baccari Ortigoza]

Estou precisando cancelar um sat, e não estou conseguindo salvar minha xml

 

ListBox2.Items.Text := ACBrSAT1.CFe.AsXMLString; 

ParamByName('XmlSat').AsMemo := ListBox2.Items.Text;

 

acabou dando erro, é melhor utilizar

 ListBox2.Items.Text :=  ACBrSAT1.CFe.GerarXML( True );

 

abraços.

[Sérgio Assunção]

Tente dessa forma:

ParamByName('XmlSat').AsString := ACBrSAT1.CFeCanc.XMLOriginal;

[Leonardo Baccari Ortigoza]

Opa Seérgio, o problema é que eu preciso salvar o xml primeiro para depois cancelar futuramente, acredito que não tenha explicado bem, desculpe.

 

no caso essa primeira parte é para eu armazenar no banco o xml do SAT  e futuramente usa-lo para cancelar.

[Sérgio Assunção]

Eu faço dessa forma:

   qGravaSat.ParamByName('XML_CFE').AsString := QuotedStr(ACBrSAT.CFe.XMLOriginal);
   qGravaSat.ExecSQL;

Ai tenho o XML da venda armazenado no banco.

[FABRICIO DOS SANTOS BRITO]

Bom dia Sergio, 

 

Gostaria de pegar o xml no banco de dados e trazer para o acbrsat para cancelar. 

está correto dessa forma? 

 FORM1.ACBrSAT1.CFe.LoadFromFile(qr_Nf.FieldByName('DSC_ARQ_XML').AsString);

[Sérgio Assunção]

1 hora atrás, FABRICIO DOS SANTOS BRITO disse:

Bom dia Sergio, 

 

Gostaria de pegar o xml no banco de dados e trazer para o acbrsat para cancelar. 

está correto dessa forma? 

 FORM1.ACBrSAT1.CFe.LoadFromFile(qr_Nf.FieldByName('DSC_ARQ_XML').AsString);

O LoadFromFile é para você carregar um arquivo. Se o conteúdo esta no banco de dados, isso não vai funcionar.

Tente dessa forma:

FORM1.ACBrSAT1.CFe.AsXMLString := qr_Nf.FieldByName('DSC_ARQ_XML').AsString;

[FABRICIO DOS SANTOS BRITO]

3 horas atrás, Sérgio Assunção disse:

O LoadFromFile é para você carregar um arquivo. Se o conteúdo esta no banco de dados, isso não vai funcionar.

Tente dessa forma:

FORM1.ACBrSAT1.CFe.AsXMLString := qr_Nf.FieldByName('DSC_ARQ_XML').AsString;

Posso enviar dessa forma?

  FORM1.ACBrSAT1.CFeCanc.AsXMLString :=qr_Nf.FieldByName('DSC_ARQ_XML').AsString;
    FORM1.ACBrSAT1.CancelarUltimaVenda;  

 

 ou tenho que informar a chave? FORM1.ACBrSAT1.CancelarUltimaVenda( FORM1.edChaveCancelamento.Text, FORM1.mCancelamentoEnviar.Lines.Text );