var cookiename="DHLClientInfo";
var ccode="";

function getCookie(name)
{
  var search = name + "="
  if (0 < document.cookie.length)
  {
    offset = document.cookie.indexOf(search) 
    if (offset != -1)
    {
      offset += search.length 
      end = document.cookie.indexOf(";", offset) 
      if (end == -1) 
        end = document.cookie.length
      return document.cookie.substring(offset, end)
    } 
  }
  return "";
}
function getParm(pname)
{
  string=getCookie(cookiename);
  ind1=string.indexOf(pname+":");
  if(ind1==-1) return "";
  ind2=string.indexOf("&",ind1);
  if(ind2==-1) ind2=string.length;
  return unescape(string.substring(ind1+pname.length+1,ind2));
}
function setCookie(value,expire,path)
{
  document.cookie=cookiename+"="+value+((path==null)?"":"; path="+path)+((expire==null)?"":("; expires="+expire));
}
function setParms(form)
{
  sub=1;
  if(typeof(form)=="undefined"||typeof(form.elements)=="undefined") {form=document.forms[0];sub=0}
  optst=form.ccode.options[form.ccode.selectedIndex].value;
  if( optst == "" )
  {
    if( sub == 1 )
      alert( "Please choose a country" );
    return false;
  }
  opts=new Array();
  i=0;
  while( optst.indexOf("!") != -1 )
  {
    pos=optst.indexOf("!");
    opts[i++]=optst.substring(0,pos);
    tmp=optst.substring(pos+1,optst.length);
    optst=tmp;
  }
  opts[i]=optst;
  str="CNAME:"+escape(form.ccode.options[form.ccode.selectedIndex].text) +
    "&REG:"+escape(opts[0]) +
    "&CCODE:"+escape(opts[1]) +
    "&CSERV:"+escape(opts[2]) +
    "&WEBS:"+escape(opts[3]) +
    "&UNAME:"+escape(form.elements["uname"].value) +
    "&EMAIL:"+escape(form.email.value);
  setCookie(str,"Saturday, 25-Dec-2010 00:00:00 GMT","/");
  return true;
}
function setSelect(sel,parm1,parm2)
{
  name1=getParm(parm1);
  name2=getParm(parm2);
  for(i=0;i<sel.options.length;i++)
    if( sel.options[i].text.toLowerCase().indexOf(name1.toLowerCase()) != -1 )
    {
      sel.selectedIndex=i;
      return;
    }
  for(i=0;i<sel.options.length;i++)
    if( sel.options[i].value.toLowerCase()==name2.toLowerCase() )
    {
      sel.selectedIndex=i;
      return;
    }
}
function setForm(form,loc,nam,eml,reg)
{
  if(typeof(form)=="undefined"||typeof(form.elements)=="undefined") form=document.forms[0];
  if(typeof(loc)=="undefined") loc="ccode"; if(loc=="") loc="ccode";
  if(typeof(nam)=="undefined") nam="uname"; if(nam=="") nam="uname";
  if(typeof(eml)=="undefined") eml="email"; if(eml=="") eml="email";
  if(typeof(reg)=="undefined") reg="region"; if(reg=="") reg="region";
  if(typeof(form.elements[loc])!="undefined") setSelect(form.elements[loc],"CNAME","CCODE");
  if(typeof(form.elements[nam])!="undefined") form.elements[nam].value=getParm("UNAME");
  if(typeof(form.elements[eml])!="undefined") form.elements[eml].value=getParm("EMAIL");
  if(typeof(form.elements[reg])!="undefined") form.elements[reg].value=getParm("REG");
}
function setParmsA()
{
  if( typeof(codes) != "object" ) return false;
  name1=getParm("CCODE");
  index=-1;
  for(i=0;i<codes.length;i++)
    if( codes[i].substring(3,5).toLowerCase()==name1.toLowerCase() )
    {
      index=i;
      break;
    }
  if( index == -1 ) return false;
  opts=new Array();
  i=0;
  optst=codes[index];
  while( optst.indexOf("!") != -1 )
  {
    pos=optst.indexOf("!");
    opts[i++]=optst.substring(0,pos);
    tmp=optst.substring(pos+1,optst.length);
    optst=tmp;
  }
  opts[i]=optst;
  str="CNAME:"+escape(opts[4]) +
    "&REG:"+escape(opts[0]) +
    "&CCODE:"+escape(opts[1]) +
    "&CSERV:"+escape(opts[2]) +
    "&WEBS:"+escape(opts[3]) +
    "&UNAME:"+escape(getParm("UNAME")) +
    "&EMAIL:"+escape(getParm("EMAIL"));
  setCookie(str,"Saturday, 25-Dec-2010 00:00:00 GMT","/");
  return true;
}