function TPP(cURL) {
 var is_teleport = (!qs_is_teleport=="undefined")?qs_is_teleport:(!parent.qs_is_teleport=="undefined")?parent.qs_is_teleport:"0";
 return (is_teleport=="1")?cURL.replace(/\?Open/gi,"-Open"):cURL;
};

function ltrim(txt) {
 while (txt.charAt(0)==" ") txt=txt.substring(1,txt.length);
 return txt;
};

function rtrim(txt) {
 while (txt.charAt(txt.length-1)==" ") txt=txt.substring(0,txt.length-1);
 return txt;
};

function alltrim(txt) {
 return ltrim(rtrim(txt));
};

function strtran(txt,s1,s2) {
 var p=0;
 while ((p=txt.indexOf(s1))>=0) {
  if (p==0){
   txt=s2+txt.substring(parseInt(p)+s1.length);
  } else if (p>0) {
   txt=txt.substring(0,p)+s2+txt.substring(parseInt(p)+s1.length);
  };
 };
 return txt;
};

function domino_pic(pic) {return (pic.indexOf("/")<0) ? pic+"/$file/"+pic : pic};

function doc_write_spacer(name,pic,heig) {
  var wid0 = (is_ie)?document.clientWidth:window.innerWidth;
  var wid1=wid0-Math.floor(wid0/105)*105+3;
  pic=domino_pic(pic);
  document.write('<img name="'+name+'" s'+'rc="'+pic+'" height="'+heig+'" width="'+wid1+'">')
};

function doc_write_spacer_bybrowser(name,pic,addtxt,ns_wid,ns_heig,ie_wid,ie_heig) {
    pic=domino_pic(pic);
    var txt = "";
    if (is_ie) {
        txt=(ie_wid==0 | ie_heig == 0)?"":'<img name="'+name+'" s'+'rc="'+pic+'" width="'+ie_wid+'" height="'+ie_heig+'">'+addtxt;
    } else {
        txt=(ns_wid==0 | ns_heig == 0)?"":'<img name="'+name+'" s'+'rc="'+pic+'" width="'+ns_wid+'" height="'+ns_heig+'">'+addtxt;
    };
    document.write(txt);
};

function set_pic (name,pic) {
  var img=refImage(name);
  pic=domino_pic(pic);
  img.src=pic;
};

var arr_piclist = new Array();
var cnt_piclist = 0;

function load_piclist (path,piclist,defext) {
    var pics = piclist.split(";");
    var nam;
    for (var i = 0;i<pics.length;i++) {
        nam=pics[i];
        if (nam.indexOf(".")<0) nam=nam+defext;
        if (nam.indexOf("/")<0) nam=path+nam;
        arr_piclist[++cnt_piclist]=new Image();
        arr_piclist[cnt_piclist].src=nam;
    };
};

function write_image(pic,wid,heig) {
  var wid0 = (is_ie)?document.clientWidth:window.innerWidth;
  var heig0 = (is_ie)?document.clientHeight:window.innerHeight;
  var wid1 = (wid<1)?wid0+wid:wid;
  var heig1 = (heig<1)?heig0+heig:heig;
  pic=domino_pic(pic);
  pic=pic.split('"').join("");
  document.write('<img s'+'rc="'+pic+'" width="'+wid1+'" height="'+heig1+'">');
};

function switchLanguage(lang) {
  if (window.parent.name=="mainframeset") {
  var currloc = window.parent.fr_main.location;
  var server = currloc.protocol+"//"+currloc.host;

  var loc_main = currloc.href.split("/pages_en/").join("/pages_#lang#/").split("&lang=en").join("&lang=#lang#");
  loc_main=loc_main.split("/pages_de/").join("/pages_#lang#/").split("&lang=de").join("&lang=#lang#").split("#lang#").join(lang);

  var path = currloc.pathname;
  var i = path.lastIndexOf("/");
  path = (i<0)?path:path.substring(0,i+1);
  path = path.split("/pages_en/").join("/pages_#lang#/").split("&lang=en").join("&lang=#lang#");
  path = path.split("/pages_de/").join("/pages_#lang#/").split("&lang=de").join("&lang=#lang#").split("#lang#").join(lang);

  var loc_flags=server+path+"nav_flags.htm";
  var loc_bott=server+path+"nav_bott.htm";

  var toploc = window.parent.location;
  var loc_top = toploc.href.split("/pages_en/").join("/pages_#lang#/").split("&lang=en").join("&lang=#lang#");
  loc_top=loc_top.split("/pages_de/").join("/pages_#lang#/").split("&lang=de").join("&lang=#lang#").split("#lang#").join(lang);

  window.parent.fr_main.location.replace(loc_main);
  window.parent.fr_flags.location.replace(loc_flags);
  window.parent.fr_bott.location.replace(loc_bott);
  //window.parent.location.replace(loc_top);
  };
  return false;
};

var timerSet = 0;
function fixNS4Position() {
  var is_ns4=(document.layers)?true:false;
  if (is_ns4 && timerSet == 0) {
  timerSet = 1;
  if (window.location.href.indexOf("&fix")<0) {
  window.setTimeout("fixNS4PositionTimer()",100);
  };
  };
};

function fixNS4PositionTimer() {
  var is_ns4=(document.layers)?true:false;
  if (is_ns4) {
  var loc = window.location.href;
  if (loc.indexOf("&fix")<0) {
  if (loc.indexOf("?")<0) {loc=loc+"?Open&type=.htm"};
  if (loc.indexOf("&typ")<0) {
  loc=loc+"&fix&type=.htm";
  } else {
  loc=loc.split("&typ").join("&fix&typ");
  };
  window.location.href=loc;
  };
  };
};
