spacer

Webref WebRef   Sitemap · Experts · Tools · Services · Newsletters · About i.com

home / experts / javascript / column61


Introducing WML and WMLScript

Developer News
Mandrake Linux Founder Back, Virtually
Amazon: We're a Technology Company
Sun Expands MySQL With Closed Source

The WMLScript Code

/*
 * Return the date when the data was generated.
 *
 *@param varName - the variable to store the results 
 */
extern function getInfoDate(varName) {

	WMLBrowser.setVar(varName,"October 29 1998");
	WMLBrowser.refresh();
}

/*
 * Calculate the exchange rate
 *
 *@param varName - the variable to store the results 
 *@param amount - the amount to convert
 *@param from - the original currency
 *@param to - the currency to convert to
 *@return a string containing the converted amount; or an error
 * 	      if "from" and/or "to" is not supported.
 */
extern function convert(varName,from,to,amount) {

	var multiplier = 0.0;
	var returnString = "Not Available";
	var result;

	if (from == "DEM") {
		/* 
		 * German Mark 
		 */
		var DEM_FIM = 0.328728;
		var DEM_FRF = 0.298331;
		var DEM_USD = 1.653500;

		if (to == "DEM")
			multiplier = 1.0;
		else if (to == "FIM")
			multiplier = DEM_FIM;
		else if (to == "FRF")
			multiplier = DEM_FRF;
		else if (to == "USD")
			multiplier = DEM_USD;
	} else if (from == "FIM") {
		/*
		 * Finnish Markka
		 */
		var FIM_DEM = 3.042032;
		var FIM_FRF = 0.907533;
		var FIM_USD = 5.030000;

		if (to == "FIM")
			multiplier = 1.0;
		else if (to == "DEM")
			multiplier = FIM_DEM;
		else if (to == "FRF")
			multiplier = FIM_FRF;
		else if (to == "USD")
			multiplier = FIM_USD;
	} else if (from == "FRF") {
	/*
	 * French Franc
	 */
		var FRF_DEM = 3.351981;
		var FRF_FIM = 1.101889;
		var FRF_USD = 5.542500;

		if (to == "FRF")
			multiplier = 1.0;
		else if (to == "FIM")
			multiplier = FRF_FIM;
		else if (to == "DEM")
			multiplier = FRF_DEM;
		else if (to == "USD")
			multiplier = FRF_USD;
	} else if (from == "USD") {
		/*
		 * US Dollar
		 */
		var USD_DEM = 0.604778;
		var USD_FIM = 0.198807;
		var USD_FRF = 0.180424;

		if (to == "USD")
			multiplier = 1.0;
		else if (to == "FIM")
			multiplier = USD_FIM;
		else if (to == "FRF")
			multiplier = USD_FRF;
		else if (to == "DEM")
			multiplier = USD_DEM;
	} 

	if (multiplier != 0.0) {
		/*
		 * Make the calcualtion
		 */
		 result = amount / multiplier;
		 returnString = String.toString(result);
		 returnString = String.format("%.2f", returnString);
	}
 	
	/*
	 * Return the results to the browser
	 */
	WMLBrowser.setVar(varName,returnString);
	WMLBrowser.refresh();
}

Next: The WMLScript Code

http://www.internet.com

Produced by Yehuda Shiran and Tomer Shiran

internet.comearthweb.comDevx.commediabistro.comGraphics.com

Search:

Jupitermedia Corporation has two divisions: Jupiterimages and JupiterOnlineMedia

Jupitermedia Corporate Info

Legal Notices, Licensing, Reprints, Permissions, Privacy Policy.
Advertise | Newsletters | Tech Jobs | Shopping | E-mail Offers

Whitepapers and eBooks

Intel Whitepaper: Comparing Two- and Four-Socket Platforms for Server Virtualization
IBM Solutions Brief: Go Green With IBM System xTM And Intel
HP eBook: Simplifying SQL Server Management
IBM Contest: Are You the Next Superstar? Join the "Search for the XML Superstar" Contest to Find Out
Microsoft PDF: Top 10 Reasons to Move to Server Virtualization with Hyper-V
Microsoft PDF: Six Reasons Why Microsoft's Hyper-V Will Overtake Vmware
Microsoft Step-by-Step Guide: Hyper-V and Failover Clustering
Intel PDF: Quad-Core Impacts More Than the Data Center
Intel PDF: Virtualization Delivers Data Center Efficiency
Go Parallel Article: PDC 2008 in Review
Microsoft PDF: Top 11 Reasons to Upgrade to Windows Server 2008
Avaya Article: Communication-Enabled Mashups: Empowering Both Business Owners and IT
Intel Whitepaper: Building a Real-World Model to Assess Virtualization Platforms
  PDF: Intel Centrino Duo Processor Technology with Intel Core2 Duo Processor
Microsoft Article: Build and Run Virtual Machines with Hyper-V Server 2008
Go Parallel Article: Q&A with a TBB Junkie
IBM Whitepaper: Innovative Collaboration to Advance Your Business
Internet.com eBook: Real Life Rails
IBM eBook: The Pros and Cons of Outsourcing
Internet.com eBook: Best Practices for Developing a Web Site
IBM CXO Whitepaper: The 2008 Global CEO Study "The Enterprise of the Future"
Avaya Article: Call Control XML in Action - A CCXML Auto Attendant
IBM CXO Whitepaper: Unlocking the DNA of the Adaptable Workforce--The Global Human Capital Study 2008
Adobe Acrobat Connect Pro: Web Conferencing and eLearning Whitepapers
HP eBook: Guide to Storage Networking
MORE WHITEPAPERS, EBOOKS, AND ARTICLES
webref The latest from WebReference.com Browse >
Popular JavaScript Framework Libraries: An Overview - Part 3 · Accessing Your MySQL Database from the Web with PHP · Working with the DOM Stylesheets Collection
Sitemap · Experts · Tools · Services · Email a Colleague · Contact FREE Newsletters 
 The latest from internet.com
Crucial Triples Up With New Three-Channel DDR3 Kits · Meet the Finalists: Excellence in Technology Awards · Tealeaf Offers Insight to Mobile Customer Behavior


Created: May 8, 2000
Revised: May 8, 2000

URL: http://www.webreference.com/js/column61/9.html