// the JS extension for WebGep 3.x series
// (c) 2002-2004. Andras Kemeny, All rights reserved

var navVer = ((navigator.appName=="Microsoft Internet Explorer" || navigator.appName=="Netscape")) ? parseFloat(eval(navigator.appVersion.split("(",1))[0]) : parseFloat(0);
var winResizer = 1;
var ie4 = false; if(document.all) { ie4 = true; }

function WG_inArray( pElem, pArray ) {
 for( i=0;i<pElem.length;++i ) if ( pArray[i] == pElem ) return( true );
 return( false );
}

// expandable content based on a script from www.flooble.com
// Copyright 2002 Animus Pactum Consulting Inc.

function WG_getObject(id) {
	if (ie4) { return document.all[id]; }
	else { return document.getElementById(id); }
}

var WG_CollapsibleBoxes = new Array();

function WG_ClpBoxAdd( divId, initState )
{
	WG_CollapsibleBoxes[ divId ] = new Array(
		WG_getObject( divId ), initState );
	if ( initState == 'show' ) {
		WG_CollapsibleBoxes[ divId ][0].style.display = 'block';
	} else {
		WG_CollapsibleBoxes[ divId ][0].style.display = 'none';
	}
}
function WG_ClpBoxToggle( divId )
{
	if ( WG_CollapsibleBoxes[ divId ][1] == 'show' ) {
		WG_CollapsibleBoxes[ divId ][0].style.display = 'none';
		WG_CollapsibleBoxes[ divId ][1] = 'hide';
	} else {
		WG_CollapsibleBoxes[ divId ][0].style.display = 'block';
		WG_CollapsibleBoxes[ divId ][1] = 'show';
	}
}
function WG_ClpBoxSet( divId, sWhich )
{
	if ( sWhich == 'hide' ) {
		WG_CollapsibleBoxes[ divId ][0].style.display = 'none';
		WG_CollapsibleBoxes[ divId ][1] = 'hide';
	} else {
		WG_CollapsibleBoxes[ divId ][0].style.display = 'block';
		WG_CollapsibleBoxes[ divId ][1] = 'show';
	}
}

// HTML toolbar functions

var WG_HTMLEditors = new Array();
var WG_HTMLEditorCurrent = '';
var WG_HTMLEd_IntRedirect = 'index.php?WG_NODE=WebInternalRedirect&WG_OID=';

function WG_HTMLEditor_Add( fName, oName, oParts, oPartMap ) {
 nit = WG_HTMLEditors.length;
 WG_HTMLEditors[nit] = new Array();
 WG_HTMLEditors[nit]["Name"] = oName;
 WG_HTMLEditors[nit]["Form"] = fName;
 WG_HTMLEditors[nit]["Parts"] = new Array();
 WG_HTMLEditors[nit]["ValueRef"] = 'document.'+fName+'.'+oName+'.value';
 for(i=0;i<oParts;++i) {
  if ( i<10 ) subStrand = '0'+i;
  else subStrand = i;
  baseName = fName+'_'+oName+'__EDXpart'+subStrand;
  WG_HTMLEditors[nit]["Parts"][i] = new Array();
  WG_HTMLEditors[nit]["Parts"][i]["Mode"] = 'WYSIWYG';
  WG_HTMLEditors[nit]["Parts"][i]["WriteMode"] = oPartMap.substr( i, 1 );
  WG_HTMLEditors[nit]["Parts"][i]["TBROpen"] = 0;
  WG_HTMLEditors[nit]["Parts"][i]["BaseName"] = baseName;
  WG_HTMLEditors[nit]["Parts"][i]["SrcEdRef"] = 'document.'+fName+'.'+baseName+'_SOURCE';
  WG_HTMLEditors[nit]["Parts"][i]["StylesRef"] = 'document.'+fName+'.'+baseName+'_STYLES';
  WG_HTMLEditors[nit]["Parts"][i]["FsizeRef"] = 'document.'+fName+'.'+baseName+'_FSIZE';
  wyd = WG_getObject( baseName );
  sed = WG_getObject( baseName+'_SRC' );
  tbr = WG_getObject( baseName+'_TBR' );
  wyd.style.display = 'block';
  sed.style.display = 'none';
  tbr.style.display = 'none';
 }
}
function WG_HTMLEditor_Compile() {
 for(i=0;i<WG_HTMLEditors.length;i++) {
  if ( WG_HTMLEditors[i]["Parts"].length == 1 ) {
   if ( WG_HTMLEditors[i]["Parts"][0]["Mode"] == 'WYSIWYG' ) {
    wyd = WG_getObject( WG_HTMLEditors[i]["Parts"][0]["BaseName"] );
    finalHtml = wyd.innerHTML;
   }
   else if ( WG_HTMLEditors[i]["Parts"][0]["Mode"] == 'SOURCE' ) {
    eval( 'finalHtml = '+WG_HTMLEditors[i]["Parts"][0]["SrcEdRef"]+'.value;' );
   }
  } else {
   finalHtml = '';
   for(j=0;j<WG_HTMLEditors[i]["Parts"].length;j++) {
    if ( WG_HTMLEditors[i]["Parts"][j]["Mode"] == 'WYSIWYG' ) {
     wyd = WG_getObject( WG_HTMLEditors[i]["Parts"][j]["BaseName"] );
     finalHtml += "^MPART "+WG_HTMLEditors[i]["Parts"][j]["WriteMode"]+" /MPART^"+wyd.innerHTML;
    }
    else if ( WG_HTMLEditors[i]["Parts"][j]["Mode"] == 'SOURCE' ) {
     eval( 'finalHtml += '+WG_HTMLEditors[i]["Parts"][j]["SrcEdRef"]+'.value;' );
    }
   }
  }
  eval( WG_HTMLEditors[i]["ValueRef"]+' = finalHtml;' );
 }
}
function WG_HTMLEditor_CloseToolbars() {
 for(i=0;i<WG_HTMLEditors.length;i++) {
  for(j=0;j<WG_HTMLEditors[i]["Parts"].length;j++) {
   WG_HTMLEditors[i]["Parts"][j]["TBROpen"] = 0;
   tbr = WG_getObject( WG_HTMLEditors[i]["Parts"][j]["BaseName"]+'_TBR' );
   tbr.style.display = 'none';
  }
 }
}
function WG_HTMLEditor_FindBaseName( baseName ) {
 for(i=0;i<WG_HTMLEditors.length;i++) {
  for(j=0;j<WG_HTMLEditors[i]["Parts"].length;j++) {
   if ( WG_HTMLEditors[i]["Parts"][j]["BaseName"] == baseName ) {
    rv = new Array( i, j );
    return( rv );
   }
  }
 }
 return( false );
}
function WG_HTMLEditorOpenToolbar( baseName ) {
 WG_HTMLEditor_CloseToolbars();
 ow = WG_HTMLEditor_FindBaseName( baseName );
 if ( ow == false ) return( false );
 WG_HTMLEditors[ow[0]]["Parts"][ow[1]]["TBROpen"] = 1;
 tbr = WG_getObject( WG_HTMLEditors[ow[0]]["Parts"][ow[1]]["BaseName"]+'_TBR' );
 tbr.style.display = 'block';
}
function WG_HTMLEditorSwitchWYSIWYG( baseName ) {
 WG_HTMLEditor_CloseToolbars();
 ow = WG_HTMLEditor_FindBaseName( baseName );
 if ( ow == false ) return( false );
 i = ow[0];
 j = ow[1];
 baseName = WG_HTMLEditors[i]["Parts"][j]["BaseName"];
 wyd = WG_getObject( baseName );
 sed = WG_getObject( baseName+'_SRC' );
 tbr = WG_getObject( baseName+'_TBR' );
 if ( WG_HTMLEditors[i]["Parts"][j]["Mode"] == 'WYSIWYG' ) {
  wyd.style.display = 'none';
  sed.style.display = 'block';
  eval( WG_HTMLEditors[i]["Parts"][j]["SrcEdRef"]+'.value = wyd.innerHTML;' );
  eval( WG_HTMLEditors[i]["Parts"][j]["SrcEdRef"]+'.focus();' );
  WG_HTMLEditors[i]["Parts"][j]["Mode"] = 'SOURCE';
 }
 else if ( WG_HTMLEditors[i]["Parts"][j]["Mode"] == 'SOURCE' ) {
  tbr.style.display = 'block';
  wyd.style.display = 'block';
  sed.style.display = 'none';
  eval( 'wyd.innerHTML = '+WG_HTMLEditors[i]["Parts"][j]["SrcEdRef"]+'.value;' );
  wyd.focus();
  WG_HTMLEditors[i]["Parts"][j]["Mode"] = 'WYSIWYG';
 }
 WG_HTMLEditor_Compile();
}
function WG_HTMLEditorActivate( baseName ) {
 WG_HTMLEditorOpenToolbar( baseName );
 WG_HTMLEditorCurrent = baseName;
 WG_imageGrapple = 'HTML';
 WG_htmlGrapple = 'HTML';
 WG_colorGrapple = 'HTML';
 WG_OIDGrapple = 'HTML';
}
function WG_HTMLEditorDeactivate( baseName ) {
 WG_HTMLEditor_CloseToolbars();
 WG_HTMLEditor_Compile();
 WG_HTMLEditorCurrent = '';
 WG_imageGrapple = '';
 WG_htmlGrapple = '';
 WG_colorGrapple = '';
 WG_OIDGrapple = '';
}
function WG_HTMLEditorFocusCurrent() {
 if ( WG_HTMLEditorCurrent == '' ) {
  alert( 'NO WYD AREA IN FOCUS. OPERATION NOT EXECUTABLE.' );
 } else {
  wyd = WG_getObject( WG_HTMLEditorCurrent );
  wyd.focus();
 }
}
function WG_imageGrapple_HTML ( folder, picture, dir, stitle ) {
 WG_HTMLEditorFocusCurrent();
 var sText = document.selection.createRange () ;
 if ( stitle != '' ) {
  if ( dir == 'L' ) mmakeHtml = "<table align=left border=0 cellspacing=0 cellpadding=0><tr><td class=WG_alairtKep_L>";
  else if ( dir == 'R' ) mmakeHtml = "<table align=right border=0 cellspacing=0 cellpadding=0><tr><td class=WG_alairtKep_R>";
  else if ( dir == 'C' ) mmakeHtml = "<center><table border=0 cellspacing=0 cellpadding=0><tr><td class=WG_alairtKep_C>";
  else mmakeHtml = "<table align=left border=0 cellspacing=0 cellpadding=0><tr><td class=WG_alairtKep_L>";
  mmakeHtml = mmakeHtml + "<img src='" + folder + '/' + picture + "' class=WG><br>" + stitle + "</td></tr></table>";
  if ( dir == 'C' ) mmakeHtml = mmakeHtml + '</center>';
 } else { 
  if ( dir == '' ) mmakeHtml = "<img src='" + folder + '/' + picture + "'>";
  else mmakeHtml = "<img src='" + folder + '/' + picture + "' class=WG_" + dir + ">";
  if ( dir == 'C' ) mmakeHtml = "<center>" + mmakeHtml + "</center>";
 }
 sText.pasteHTML ( mmakeHtml ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_htmlGrapple_HTML ( htmlText ) {
 WG_HTMLEditorFocusCurrent();
 var sText = document.selection.createRange () ;
 sText.pasteHTML ( htmlText ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_colorGrapple_HTML_FORE ( myColor ) {
 WG_HTMLEditorFocusCurrent();
 document.execCommand ( 'ForeColor', false, myColor ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_colorGrapple_HTML_BACK ( myColor ) {
 WG_HTMLEditorFocusCurrent();
 document.execCommand ( 'BackColor', false, myColor ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_OIDGrapple_HTML ( OID, objDesc ) {
 linkURL = WG_HTMLEd_IntRedirect+OID;
 WG_HTMLED_linkGrapple_HTML ( linkURL );
}
function WG_HTMLED_linkGrapple_HTML ( linkURL ) {
 WG_HTMLEditorFocusCurrent();
 document.execCommand ( 'CreateLink', false, linkURL ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_HTMLED_callFormatting ( sFormatString ) {
 WG_HTMLEditorFocusCurrent();
 document.execCommand ( sFormatString ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_HTMLED_callFormattingParam ( sFormatString, sParam ) {
 WG_HTMLEditorFocusCurrent();
 document.execCommand ( sFormatString, false, sParam ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_HTMLED_callDialogFormatting ( sFormatString ) {
 WG_HTMLEditorFocusCurrent();
 document.execCommand ( sFormatString, true ) ;
 WG_HTMLEditorFocusCurrent();
}
function WG_HTMLED_changeStyle() {
 WG_HTMLEditorFocusCurrent();
 var sText = document.selection.createRange();
 ow = WG_HTMLEditor_FindBaseName( WG_HTMLEditorCurrent );
 if ( ow == false ) return( false );
 eval( 'styleList = '+WG_HTMLEditors[ow[0]]["Parts"][ow[1]]["StylesRef"]+';' );
 if ( sText.text != "" )
  sText.parentElement().className = styleList.options[styleList.selectedIndex].value;
 styleList.selectedIndex = 0 ;
 WG_HTMLEditorFocusCurrent();
}
function WG_HTMLED_setStyle() {
 WG_HTMLEditorFocusCurrent();
 var sText = document.selection.createRange () ;
 ow = WG_HTMLEditor_FindBaseName( WG_HTMLEditorCurrent );
 if ( ow == false ) return( false );
 eval( 'styleList = '+WG_HTMLEditors[ow[0]]["Parts"][ow[1]]["StylesRef"]+';' );
 if ( sText.parentElement().className == "" )
  styleList.selectedIndex = 0 ;
 else
  styleList.value = sText.parentElement().className;
 WG_HTMLEditorFocusCurrent();
}

// Misc common WG functions

	
var WG_OpenSubWindows = new Array();

function WG_openWin( wName, wURL, wWidth, wHeight )
{
	WG_OpenSubWindows.push( window.open(wURL,wName,'toolbar=0,location=0,directories=0,status=1,menubar=0,scrollbars=0,resizable=1,width='+wWidth+',height='+wHeight) );
	WG_OpenSubWindows[WG_OpenSubWindows.length-1].focus();
}

function WG_openWinScroll( wName, wURL, wWidth, wHeight )
{
	WG_OpenSubWindows.push( window.open(wURL,wName,'toolbar=0,location=0,directories=0,status=1,menubar=0,scrollbars=1,resizable=1,width='+wWidth+',height='+wHeight) );
	WG_OpenSubWindows[WG_OpenSubWindows.length-1].focus();
}
function WG_shutSubWindows() {
	if ( WG_OpenSubWindows.length == 0 ) return( void(0) );
	for( i = 0; i < WG_OpenSubWindows.length; i++ ) WG_OpenSubWindows[i].close();
}

var WG_formGrapple = '';
var WG_formElementGrapple = '';
var WG_formSubElementGrapple = '';

var WG_imageGrapple = '';

function WG_RCVPICT( folder, picture, dir )
{
	if ( WG_imageGrapple != '' ) {
		eval( "WG_imageGrapple_" + WG_imageGrapple + "( folder, picture, dir, '' );" );
	}
}
function WG_RCVPICTwithTitle( folder, picture, dir, stitle )
{
	if ( WG_imageGrapple != '' ) {
		eval( "WG_imageGrapple_" + WG_imageGrapple + "( folder, picture, dir, stitle );" );
	}
}

var WG_htmlGrapple = '';

function WG_RCVHTML( htmlText )
{
	if ( WG_htmlGrapple != '' ) {
		eval( "WG_htmlGrapple_" + WG_htmlGrapple + "( htmlText );" );
	}
}

var WG_colorGrapple = '';

function WG_RCVColor( colorPar )
{
	if ( WG_colorGrapple != '' ) {
		eval( "WG_colorGrapple_" + WG_colorGrapple + "( colorPar );" );
	}
}

var WG_OIDGrapple = '';

function WG_RCVOID( OID, descName )
{
	if ( WG_OIDGrapple != '' ) {
		eval( "WG_OIDGrapple_" + WG_OIDGrapple + "( OID, descName );" );
	}
}

// selection list manipulators

function WG_spoolIt(oSpool,oFrom,multiSepar) {
	oSpool.value = '';
	for (var i = 0; i < oFrom.length; i++) {
		if (oFrom.options[i].value != '') {
			oSpool.value = oSpool.value + oFrom.options[i].value + multiSepar;
		}
	}
}
function WG_RankingHandler(oSpool,oLeft,pDir,multiSepar) {
	xsave = new Option();
	if (pDir == 1) {
		for (var i = 0; i < oLeft.length; i++) {
			if ((oLeft.options[i].selected)&&(oLeft.options[i].value!='')&&(i > 0)) {
				xsave.value = oLeft.options[i-1].value;
				xsave.text = oLeft.options[i-1].text;
				xsave.selected = oLeft.options[i-1].selected;
				xsave.defaultSelected = oLeft.options[i-1].defaultSelected;
				oLeft.options[i-1].value = oLeft.options[i].value;
				oLeft.options[i-1].text = oLeft.options[i].text;
				oLeft.options[i-1].selected = oLeft.options[i].selected;
				oLeft.options[i-1].defaultSelected = oLeft.options[i].defaultSelected;
				oLeft.options[i].value = xsave.value;
				oLeft.options[i].text = xsave.text;
				oLeft.options[i].selected = xsave.selected;
				oLeft.options[i].defaultSelected = xsave.defaultSelected;
			}
		}
	}
	else
	{
		for (var i = (oLeft.length-1); i > -1; i--) {
			if ((oLeft.options[i].selected)&&(oLeft.options[i].value!='')&&(i < (oLeft.length-1))) {
				xsave.value = oLeft.options[i+1].value;
				xsave.text = oLeft.options[i+1].text;
				xsave.selected = oLeft.options[i+1].selected;
				xsave.defaultSelected = oLeft.options[i+1].defaultSelected;
				oLeft.options[i+1].value = oLeft.options[i].value;
				oLeft.options[i+1].text = oLeft.options[i].text;
				oLeft.options[i+1].selected = oLeft.options[i].selected;
				oLeft.options[i+1].defaultSelected = oLeft.options[i].defaultSelected;
				oLeft.options[i].value = xsave.value;
				oLeft.options[i].text = xsave.text;
				oLeft.options[i].selected = xsave.selected;
				oLeft.options[i].defaultSelected = xsave.defaultSelected;
			}
		}
	}
	WG_spoolIt(oSpool,oLeft,multiSepar);
}
function WG_AddInSelectList(oSpool,oTo,oVal,oLabel,multiSepar) {
	cLen = oTo.length;
	insOpt = new Option();
	oTo.options[cLen]=insOpt;
	oTo.options[cLen].value = oVal;
	oTo.options[cLen].text = oLabel;
	oTo.options[cLen].selected = false;
	oTo.options[cLen].defaultSelected = false;
	oSpool.value = '';
	WG_spoolIt(oSpool,oTo,multiSepar);
}
function WG_RemoveFromSelectList(oSpool,oFrom,multiSepar) {
	for (var i = 0; i < oFrom.length; i++) {
		if ((oFrom.options[i].selected)&&(oFrom.options[i].value!='')) {
			for (var j = i; j < (oFrom.length-1); j++) {
				oFrom.options[j].value = oFrom.options[j+1].value;
				oFrom.options[j].text = oFrom.options[j+1].text;
				oFrom.options[j].selected = oFrom.options[j+1].selected;
				oFrom.options[j].defaultSelected = oFrom.options[j+1].defaultSelected;
			}
			oFrom.length -= 1;
			i -= 1;
		}
	}
	for (var i = 0; i < oFrom.length; i++) {
		oFrom.options[i].selected = false;
		oFrom.options[i].defaultSelected = false;
	}
	WG_spoolIt(oSpool,oFrom,multiSepar);
}
function WG_PassOverHandler(oSpool,oLeft,oRight,pDir,multiSepar) {
	if (pDir == 1) {
		oFrom = oLeft;
		oTo = oRight;
	} else {
		oFrom = oRight;
		oTo = oLeft;
	}
	for (var i = 0; i < oFrom.length; i++) {
		if ((oFrom.options[i].selected)&&(oFrom.options[i].value!='')) {
			cLen = oTo.length;
			insOpt = new Option();
			oTo.options[cLen]=insOpt;
			oTo.options[cLen].value = oFrom.options[i].value;
			oTo.options[cLen].text = oFrom.options[i].text;
			oTo.options[cLen].selected = false;
			oTo.options[cLen].defaultSelected = false;
			for (var j = i; j < (oFrom.length-1); j++) {
				oFrom.options[j].value = oFrom.options[j+1].value;
				oFrom.options[j].text = oFrom.options[j+1].text;
				oFrom.options[j].selected = oFrom.options[j+1].selected;
				oFrom.options[j].defaultSelected = oFrom.options[j+1].defaultSelected;
			}
			oFrom.length -= 1;
			i -= 1;
		}
	}
	for (var i = 0; i < oLeft.length; i++) {
		oLeft.options[i].selected = false;
		oLeft.options[i].defaultSelected = false;
	}
	for (var i = 0; i < oRight.length; i++) {
		oRight.options[i].selected = false;
		oRight.options[i].defaultSelected = false;
	}
	// window.history.go(0);
	WG_spoolIt(oSpool,oLeft,multiSepar);
/*	if (navVer >= 4) {
		self.resizeBy(winResizer,winResizer)
		winResizer *= -1;
	} */
	return true;
}

function WG_getSelectedItem( oFrom ) {
	for (var i = 0; i < oFrom.length; i++) {
		if ((oFrom.options[i].selected)&&(oFrom.options[i].value!='')) {
			return( oFrom.options[i].value );
		}
	}
	return( '' );
}
function WG_setFormValue( oObj, vVal ) {
	if ( oObj.type == 'checkbox' ) {
		if ( vVal == oObj.value ) oObj.checked = true;
		else oObj.checked = false;
	}
	else if ( oObj.type == 'radio' ) {
		for (var i in oObj ) {
			if ( oObj[i].value == vVal ) oObj[i].checked = true;
			else oObj[i].checked = false;
		}
	}
	else if ( oObj.type == 'select-one' ) {
		for (i=0;i<oObj.options.length;++i ) {
			if ( oObj.options[i].value == vVal ) oObj.options[i].selected = true;
			else oObj.options[i].selected = false;
		}
	}
	else if ( oObj.type == 'select-multiple' ) {
		for (i=0;i<oObj.options.length;++i ) {
			if ( WG_inArray( oObj.options[i].value, vVal ) ) oObj.options[i].selected = true;
			else oObj.options[i].selected = false;
		}
	}
	else if ( ( oObj.type == 'password' ) 
	 || ( oObj.type == 'text' ) || ( oObj.type == 'textarea' ) 
	 || ( oObj.type == 'button' ) || ( oObj.type == 'hidden' ) 
	 || ( oObj.type == 'file' ) )  {
	 	oObj.value = vVal;
	}
}
function WG_setChooserValue( oObj, vVal, vDesc ) {
	oObj.value = vVal;
	eval( 'oObj.form.'+oObj.name+"__DESC.value = vDesc;\n" );
}
function WG_GetImageClickCoords( oObjX, oObjY ) {
	oObjX.value = window.event.offsetX;
	oObjY.value = window.event.offsetY;
}
function WG_MlangInputGet( oValueStoreObj ) {
	var lvs = oValueStoreObj.value.split( ';' );
	var strgs = new Array();
	var langs = new Array();
	for( var i = 0; i < lvs.length; i++ ) {
		var xvs = lvs[i].split( ':', 2 );
		langs.push( xvs[0] );
		strgs.push( xvs[1] );
	}
	var rarr = new Array( langs, strgs );
	return( rarr );
}
function WG_MlangGetAsLang( oValueStoreObj, wLang ) {
	var zarg = WG_MlangInputGet( oValueStoreObj );
	for( i = 0; i < zarg[0].length; i++ ) if ( zarg[0][i] == wLang ) return( zarg[1][i] );
	return( '' );
}
function WG_MlangInputStore( oInputObj, oCurrLangObj, oValueStoreObj ) {
	var zarg = WG_MlangInputGet( oValueStoreObj );
	var plix = new Array();
	for( i = 0; i < zarg[0].length; i++ ) {
		if ( zarg[0][i] == oCurrLangObj.value ) plix.push( zarg[0][i]+':'+oInputObj.value );
		else plix.push( zarg[0][i]+':'+zarg[1][i] );
	}
	oValueStoreObj.value = plix.join( ';' );
}
function WG_MlangInputChange( oInputObj, oLangListObj, oCurrLangObj, oValueStoreObj ) {
	WG_MlangInputStore( oInputObj, oCurrLangObj, oValueStoreObj );
	var wlang = WG_getSelectedItem( oLangListObj );
	oCurrLangObj.value = wlang;
	zarg = WG_MlangInputGet( oValueStoreObj );
	for( i = 0; i < zarg[0].length; i++ ) if ( zarg[0][i] == oCurrLangObj.value ) oInputObj.value = zarg[1][i];
}