Definir eDocs.Download.BaixarXmlv2 BaixarXmlv2;
Definir Alfa xCodigoRetorno;
Definir Alfa xMensagemRetorno;
Definir Alfa xSucessoRetorno;
Definir Alfa xXmlRetorno;
Definir Alfa xXmlDecodificadoOriginal;
Definir alfa xBuscaRefNfe;
Definir numero xPosIniRefNfe;
Definir alfa xXmlDecodificadoRefNfe;
Definir alfa xTextoSubstituir;
Definir alfa xxxXml;
Definir alfa xChavesXml;

BaixarXmlv2.usuario="sde";
BaixarXmlv2.senha="sde";
BaixarXmlv2.cnpjCpfFilial="80680093000181";
BaixarXmlv2.tipodocumento=1;
BaixarXmlv2.tipoProcessamento=2;
BaixarXmlv2.chave="42200380680093000181553290008045901818102469";
BaixarXmlv2.gerarManifestacao=0;
BaixarXmlv2.marcarRetorno=0;

@MarcarEnvioEmail.ModoExecucao = 1;@
BaixarXmlv2.Executar();

xCodigoRetorno = BaixarXmlv2.BaixarXmlv2Result.Codigo;
xSucessoRetorno = BaixarXmlv2.BaixarXmlv2Result.Sucesso;
xMensagemRetorno = BaixarXmlv2.BaixarXmlv2Result.Mensagem;
xXmlRetorno = BaixarXmlv2.BaixarXmlv2Result.Xmls.String;
       

Base64DEcode(xXmlRetorno,xXmlDecodificadoOriginal);

Mensagem(Retorna, xXmlDecodificadoOriginal);


xBuscaRefNfe = "<refNFe>";

xTextoSubstituir = "R_E_T_I_R_A_D_O";

xXmlDecodificadoRefNfe = xXmlDecodificadoOriginal;

PosicaoStr(xBuscaRefNfe,xXmlDecodificadoOriginal,xPosIniRefNfe);

xChavesXml = "";

Enquanto (xPosIniRefNfe <> 0)
Inicio
      
      CopiarStr(xXmlDecodificadoRefNfe,xPosIniRefNfe,61);
      xChavesXml = xChavesXml + " | " + xXmlDecodificadoRefNfe;
      SubstAlfaUmaVez(xXmlDecodificadoRefNfe,xTextoSubstituir,xXmlDecodificadoOriginal);
      PosicaoStr(xBuscaRefNfe,xXmlDecodificadoOriginal,xPosIniRefNfe);
      xXmlDecodificadoRefNfe = xXmlDecodificadoOriginal;
      
fim

Mensagem(Retorna, xChavesXml);

x=y;