Get the Exchange Rates for the given Currency using X++

Description:-

I did MSN search and found a public webservice; webservicex.net that provides a public currency converter webservice.Thiscode snippet accesses a public web service to get the exchange rate for a given currency using x++.

Code:-

static void GetExchangeRates(Args _args)
{
  com com = new com(‘microsoft.xmlhttp’);
  com com1;   
  XMLDocument xmlDoc;
  Dialog exchDialog = new Dialog("Exchange Rates");   
  DialogField   fromField;   
  DialogField   ToField;   
  str    url;
  ;   
  fromField = exchDialog.addField(Types::String, ‘Base Currency’);   
  fromField.value(CompanyInfo::find().CurrencyCode);   
  ToField   =exchDialog.addField(Types::String, ‘To Currency’);   
  if(exchDialog.run())
  {
    url = "http://www.webservicex.net/CurrencyConvertor.asmx/ConversionRate?&quot”;
    url += "FromCurrency=" +strupr(fromField.value())+"&ToCurrency="+strupr(ToField.value());        
    com.open("get",url);       
    com.send();       
    com1 = com.responsexml();
    xmlDoc = XmlDocument::newXml(com1.xml());       
    info("1 "+fromField.value() + " = " +xmlDoc.getNamedElement(‘double’).text() + " " +ToField.value());
  }
}

Author : Umesh Patel

Related Posts