function do_link(module,page,params){
	//alert(params);	 
	var array_params=Array();
	var i=0;
	var send_params='';
	var param=Array();
	array_params=params.split('&');
	while (i < array_params.length){
		
		param=array_params[i].split("=");	
		send_params=send_params+param[0]+'__'+param[1];
		if(i < array_params.length-1){
			send_params=send_params+'~';
		}
		i++;
  	}
    	
    if (send_params){	
    	DaLink=path+"/"+module+"__"+page+"~"+send_params+'.html';
    }
    else {
    	DaLink=path_index+"/"+module+"__"+page;
    }	   
    //alert(path);
    //alert(DaLink);    
    return DaLink;
}

function show_errors(err_list){

        err_log = err_list.join(" \n ");

           if(err_log.length==0){
                err_log=" No details available ";
           }

          alert(err_log);

}

function set_radio(radio_name,form_name,selected_value)
{
    eval("var rad = document." + form_name + "." + radio_name);
    for(i=0; i<rad.length; i++){
        if(rad[i].value == selected_value){
            rad[i].checked = true;
            return true;
        }
    }
    return false;
}

function set_select(sel_name,form_name,sel_index){

sel_length=eval("document."+form_name+"."+sel_name+".length");

for (optionCounter = 0; optionCounter < sel_length; optionCounter++){

         if (eval("document."+form_name+"."+sel_name+".options[optionCounter].value=='"+sel_index+"'")){

            eval("document."+form_name+"."+sel_name+".selectedIndex=optionCounter");

         }

}

}

function set_navigation(sel_name,form_name,sel_index){
	eval("document."+form_name+"."+sel_name+".value=sel_index");
}

function upload_win(pkd,max,rst){

        window.open(path_index+'?_init=global.upload&pp=up&PKD='+pkd+'&max='+max+'&rst='+rst,'upload','width=400,height=400,directories=no,location=no,menubar=no,scrollbars=yes,status=no,toolbar=no,resizable=no,left=0,top=0,screenx=50,screeny=50');

}

function set_checked(check_name,form_name,checked_mode){
        if(checked_mode){
                eval("document."+form_name+"."+check_name+".checked=true");
        }
}

function url_escape(string){

        out = "/";
        add = "&#47;";
        temp = "" + string;

        while (temp.indexOf(out)>-1) {
                pos= temp.indexOf(out);
                temp = "" + (temp.substring(0, pos) + add +
                temp.substring((pos + out.length), temp.length));
        }
        temp=escape(temp);
        return temp;

}

function check_input(user,pass,pass_retype,email){
   if(user==''){
      alert("Username missing!");
      return false;
   }
   else if(pass==''){
      alert("Password missing!");
      return false;
   }
   else if(pass_retype!=pass){
      alert("Passwords does not match!");
      return false;
   }
   else if(email==''){
      alert("Email address missing!");
      return false;
   }
   else{
      return true;
   }
}

function WinOpen(mypage,myname,w,h,win_position,Scrool){
        var win = null;
        if(win_position=="topright"){
           LeftPosition = (screen.width) ? (screen.width-w-12) : 0;
           TopPosition = 20;
        }
        else if(win_position=="center"){
           LeftPosition = (screen.width) ? (screen.width-w)/2 : 0;
           TopPosition = (screen.height) ? (screen.height-h)/2 : 0;
        }

        settings ='height='+h+',width='+w+',top='+TopPosition+',left='+LeftPosition+',scrollbars='+Scrool+',resizable=no'
        win = window.open(mypage,myname,settings)
}

function replaceSubstring(inputString, fromString, toString) {
   // Goes through the inputString and replaces every occurrence of fromString with toString
   var temp = inputString;
   if (fromString == "") {
      return inputString;
   }
   if (toString.indexOf(fromString) == -1) { // If the string being replaced is not a part of the replacement string (normal situation)
      while (temp.indexOf(fromString) != -1) {
         var toTheLeft = temp.substring(0, temp.indexOf(fromString));
         var toTheRight = temp.substring(temp.indexOf(fromString)+fromString.length, temp.length);
         temp = toTheLeft + toString + toTheRight;
      }
   } else { // String being replaced is part of replacement string (like "+" being replaced with "++") - prevent an infinite loop
      var midStrings = new Array("~", "`", "_", "^", "#");
      var midStringLen = 1;
      var midString = "";
      // Find a string that doesn't exist in the inputString to be used
      // as an "inbetween" string
      while (midString == "") {
         for (var i=0; i < midStrings.length; i++) {
            var tempMidString = "";
            for (var j=0; j < midStringLen; j++) { tempMidString += midStrings[i]; }
            if (fromString.indexOf(tempMidString) == -1) {
               midString = tempMidString;
               i = midStrings.length + 1;
            }
         }
      } // Keep on going until we build an "inbetween" string that doesn't exist
      // Now go through and do two replaces - first, replace the "fromString" with the "inbetween" string
      while (temp.indexOf(fromString) != -1) {
         var toTheLeft = temp.substring(0, temp.indexOf(fromString));
         var toTheRight = temp.substring(temp.indexOf(fromString)+fromString.length, temp.length);
         temp = toTheLeft + midString + toTheRight;
      }
      // Next, replace the "inbetween" string with the "toString"
      while (temp.indexOf(midString) != -1) {
         var toTheLeft = temp.substring(0, temp.indexOf(midString));
         var toTheRight = temp.substring(temp.indexOf(midString)+midString.length, temp.length);
         temp = toTheLeft + toString + toTheRight;
      }
   } // Ends the check to see if the string being replaced is part of the replacement string or not
   return temp; // Send the updated string back to the user
} // Ends the "replaceSubstring" function

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}

function get_element_by_id(id)
{
	var obj;

	if (document.all){
		eval('obj = document.all("' + id + '")');
	}
	else if (document.layers){		
		eval('obj = document.layers["' + id + '"]');
	}
	else if (document.getElementById){	
		eval ('obj = document.getElementById ("' + id + '")');
	}
	
	return obj;
}