Procedure XMLConverteUrl(LOCAL Url)

//: = %3A
/// = %2F
//? = %3F
//= = %3D
//& = %26

//Info(XMLConverteUrl("http://www.touroperator.com.br/webservice/ws.asmx/ConsultaProduto?IdWS=IDWS&&CodSite=CodSite&&TpoProduto=TpoProduto&&CodProduto=CodProduto"))

//Info("http://www.touroperator.com.br/webservice/ws.asmx/ConsultaProduto?IdWS=IDWS&&CodSite=CodSite&&TpoProduto=TpoProduto&&CodProduto=CodProduto")

Url = Replace(Url,":","%3A")
Url = Replace(Url,"/","%2F")
Url = Replace(Url,"?","%3F")
Url = Replace(Url,"=","%3D")
Url = Replace(Url,"&","%26")

RESULT(Url)