// LABRAWEB  SCRIPTS - ISIMODE - ALL RIGHTS RESERVED -

var oFom = null;	
var oIpt = null;	
var bSr = 0;	
function Is() {
	var agent = navigator.userAgent.toLowerCase();
	this.major = parseInt(navigator.appVersion);
	this.minor = parseFloat(navigator.appVersion);
	this.ns  = ((agent.indexOf('mozilla')!=-1) && ((agent.indexOf('spoofer')==-1) && (agent.indexOf('compatible') == -1)));
	this.ns2 = (this.ns && (this.major == 2));
	this.ns3 = (this.ns && (this.major == 3));
	this.ns4 = (this.ns && (this.major == 4));
	this.ns6 = (this.ns && (this.major >= 5));
	this.ie   = (agent.indexOf("msie") != -1);
	this.ie3  = (this.ie && (this.major == 2));
	this.ie4  = (this.ie && (this.major >= 4));
  this.ie6 = (agent.indexOf("msie 6") != -1);
	this.op3 = (agent.indexOf("opera") != -1);
	this.mac = (agent.indexOf("mac") != -1);
	this.win = (agent.indexOf("win") != -1);
  this.saf = (agent.indexOf("safari") != -1);
  this.ffx = (agent.indexOf("firefox") != -1);
 if (this.saf) {this.ns=false; this.ns6=false; this.ie=true; this.ie6=true; this.mac=true; this.win=false;}
 if (this.ffx) {this.ns=false; this.ns6=false; this.ie=true; this.ie6=true; }
}
var is = new Is()
if(is.ns4) {doc = "document"; sty = ""; htm = ".document";} 
else if(is.ie4) {doc = "document.all"; sty = ".style"; htm = "";} 
else if(is.ns6) {doc = "document"; sty = ""; htm = ".document";} 
else if(is.op3) {doc = "document.all"; sty = ".style"; htm = "";this.ie4=true;} 
else if(is.ns3) {doc = "document.all"; sty = ".style"; htm = ""} 
else { doc = "document.all"; sty = ".style"; htm = "" }
function rsz()
{ if(is.ns4){ location.reload();}}
var fsw=0;
function getfsw(){return fsw;}
var fsh=0;
function getfsh(){return fsh;}
function Lt(n,v,l,t,w,h) {
this.n = n;
this.v = v;
this.l = l;
this.t = t;
this.w = w;
this.h = h;
}
var lt = new Array();
function httl(n,v,l,t,w,h)
{
	var s;
	if(is.ns4){
		lt[lt.length] = new Lt(n,v,l,t,w,h);document.write('<img src="/PICT3/PB00.gif" width="'+w+'" height="'+h+'" border="0">');}
	else{
if(is.ie ){
 s='<DIV ID="'+n+'" STYLE="width: '+w+'px; height: '+h+'px; z-index: 1; visibility: visible; overflow: hidden; position: relative;">'+v+'</DIV>';
}else{ 		
 s='<DIV ID="'+n+'" STYLE="width: '+w+'px; height: '+h+'px; z-index: 1; visibility: visible; overflow: hidden; position: absolute;">'+v+'</DIV>';
	}
	if(bSr==0){
		document.write(v);
	}
	else {
		return s;
	}}
}
function httlo(n)
{
	if(is.ns4){
		for(i=0;i<lt.length;++i){
			document.write('<LAYER ID="'+lt[i].n+'" left='+lt[i].l+' top='+lt[i].t+' width='+lt[i].w+' height='+lt[i].h+' z-index=1 CLIP="0,0,'+lt[i].w+','+lt[i].h+'"');document.write('>'+lt[i].v);document.write('</LAYER>');
		}
	}
}
function sfsly(f)
{
if(is.ns4){ fsw=is.mac?document.fsly.clip.width*2:document.fsly.clip.width; fsh=document.fsly.clip.height; }
else if(is.ie) { fsw=fsly.offsetLeft>0?fsly.offsetLeft:fsly.offsetHeight; fsh=fsly.offsetHeight; fsly.innerHTML = "";}
else if(is.ns6) { fsw=document.getElementById("fsly").offsetWidth; fsh=document.getElementById("fsly").offsetHeight;}
else if(is.op3) { fsw=document.getElementById("fsly").offsetWidth; fsh=document.getElementById("fsly").offsetHeight;} 
else if(is.ns3) { fsw=6; fsh=6;} 
else { fsw=fsly.offsetLeft>0?fsly.offsetLeft:fsly.offsetHeight; fsh=fsly.offsetHeight; fsly.innerHTML = ""; }
}
var tbia = new Array();
var tbiatimerid=-1;
function iaCstr(name,picnm,srcout,srcovr,srcclk,srcanm,anim,fsbmt)
{	if (String(srcovr) == "undefined") srcovr="";
	if (String(srcanm) == "undefined") srcanm="";
	if (String(srcclk) == "undefined") srcclk="";
	this.name = name;
	this.picnm = picnm;
	this.srcout = new Image();
	this.srcovr = new Image();
	this.srcanm = new Image();
	this.srcclk = new Image();
	this.srcout.src = srcout;       
	this.srcovr.src = srcout;      
	this.srcanm.src = srcout;     
	this.srcclk.src = srcout;    	
	this.anm = anim;                 
	this.selected = false;           
	this.fsbmt = fsbmt;   
	this.temp = new temp(srcovr,srcanm, srcclk);
	this.temp.ovr = srcovr;
	this.temp.anm = srcanm;
	this.temp.clk = srcclk;
	tbia[tbia.length] = this; 
	return this; }
function temp(ovr,anm,clk)
{	this.ovr = ovr;
	this.anm = anm;
	this.clk = clk;
	return this; }
function flpovr (cod) {flp(cod,"ovr");}
function flpout (cod) {flp(cod,"out");}
function flpclk (cod) {flp(cod,"clk");}
function flp (atn, sts)
{	pic = eval("document." + atn.picnm);
  if(String(pic) != "undefined") {
	if ((atn.srcovr.src=="") && (sts=="ovr")) return true;
  pic.src =  eval("atn.src" + sts + ".src");
	if (sts == "ovr") atn.selected = true;
	else atn.selected = false; 
  if (sts=="clk")
		setTimeout("flp("+atn.name+",'ovr');",100);}}
function swap()
{   for (i=0 ; i < tbia.length ; i++){ btn = tbia[i];
	if ((btn.anm) && (btn.selected == false)) flp(btn,"anm");}	
    tbiatimerid = setTimeout("Do_Swap()",1000); }
function Do_Swap()
{ 	var btn;
	for (i=0 ; i< tbia.length ; i++){ btn = tbia[i];
		if ((btn.anm) && (btn.selected == false)) flp(btn,"out");}}
function LoadOvr ()
{   var btn;
   for (i=0 ; i < tbia.length ; i++){ btn = tbia[i];
	if (btn.temp.ovr != "") btn.srcovr.src = btn.temp.ovr; }}
function LoadAnm ()
{  var btn;
   for (i=0 ; i < tbia.length ; i++){ btn = tbia[i];
	if (btn.temp.anm != "") btn.srcanm.src = btn.temp.anm; }}
function LoadClk()
{  var btn;
   for (i=0 ; i < tbia.length ; i++){ btn = tbia[i];
	if (btn.temp.clk != "") btn.srcclk.src = btn.temp.clk; }}
function EndLoad ()
{ 	LoadOvr();
	LoadAnm();
	LoadClk();}

var ScrRecCount=0;
function ScrRec(f,t,a,w,h,b,e)
{
	this.f = f;
	this.t = t;
	this.w = w;
	this.h = h;
	this.c = 0;
	this.d = 0;
this.ns4b=(b!=null)&&(b!="")?b:'<table cellSpacing="0" cellPadding="0" border="0" BACKGROUND="/PICT3/PB00.gif"><tr><td width='+(w-18)+' height='+h+'>';
		this.ns4e=(e!=null)&&(e!="")?e:'</td><td vAlign=bottom bgcolor="#B0B0B0"><a HREF="JavaScript:srUp('+a+');"><img src="/PICT3/PC10.gif" border="0"></a><BR><a HREF="JavaScript:srDown('+a+');"><img src="/PICT3/PC20.gif" border="0"></a></td></tr></table>';
	this.n = 0;
	this.p=0;
	this.bp=0;
}
function _srBegin()
{
	bSr=1;
	if(is.ns4){
		document.write(this.ns4b);
	}
	else {
		document.write('<DIV ID=scrrec STYLE="position: relative;width:'+this.w+'px; height:'+this.h+'px; overflow:auto;" onScroll="blur();">');
	}
}
/*
	Argument:
	h = HEIGHT
	d = HTML
*/
function _srAdd(h,d)
{
	if(is.ns4) {
		if((this.n>=this.c)&&((this.d+h)<this.h)){
			document.write(d);
			this.d+=h;
			this.c=this.n;
			++this.p;
		}
		++this.n;
	}
	else {
		document.write(d);
 	}
}
function _srEnd()
{
	bSr=0;
	if(is.ie) {
		document.write('</DIV>');
	}
	else if(is.ns6) {
		document.write('</DIV>');
	}
	else if(is.ns4) {
		document.write(this.ns4e);
	} else {
		document.write('</DIV>');
	}
}
new ScrRec();
ScrRec.prototype.srBegin = _srBegin;
ScrRec.prototype.srAdd = _srAdd;
ScrRec.prototype.srEnd = _srEnd;
function srNew(t,w,h)
{
	var s;
	var a = ScrRecCount++;
	if(is.ns4){
		if(parent.sr_bref==0){
			s= parent.sr[parent.sr.length]= new ScrRec(oFom,t,a,w,h);
		}
		else{
			s= parent.sr[a];
			if(s.bp<s.p)s.bp=s.p;
			s.d=s.p=s.n=0;
		}
	}
	else {
		s= parent.sr[a]= new ScrRec(oFom,t,a,w,h);
	}
	return s;
}

function srUp(n)
{
	if((parent.sr[n].c-(parent.sr[n].p-1))>0){
		parent.sr_bref=1;
		parent.sr[n].c-=(parent.sr[n].p-1)+parent.sr[n].bp;
		if(parent.sr[n].c<0)parent.sr[n].c=0;
		_iptSave();
		location.reload(false);
		return true;
	}
}

function srDown(n)
{
	if(parent.sr[n].c<(parent.sr[n].n-1)){
		parent.sr_bref=1;
		++parent.sr[n].c;
		_iptSave();
		location.reload(false);
		return true;
	}
}

function srSet(f,fsrv,a)
{
	var l="";
	var n;
	_iptSave();
	l+=a;
	for(var i=0;i<parent.ipt.length;++i){
		v=parent.ipt[i].getValue();
		if(v!=null){
			if(l.length>0) l+="&";
			l+=parent.ipt[i].n+"="+v;
		}
	}

	f[fsrv].value=l;
	return true;
}



function _iptSave()
{
	for(var i=0;i<oIpt.length;++i){
		oIpt[i].save();
	}
}
function _iptRstr()
{
	for(var i=0;i<oIpt.length;++i){
		oIpt[i].rstr();
	}
}
function _iptChk(n)
{
	for(var i=0;i<oIpt.length;++i){
		if(oIpt[i].n==n){
			return oIpt[i];
		}
	}
	return null;
}
function srUpdate(f)
{
	if(is.ns4) {
		_iptRstr();
	}
	parent.sr_bref=1;
}

function OpPW(UOW,WOW,FOW) { window.open(UOW,WOW,FOW);}

function fsub(a,u)
{
  if((oIpt!=null)&&(parent.sr.length)){
		for(var i=0;i<parent.sr.length;++i){
			srSet(oFom,parent.sr[i].t,a);
		}
	}
	else {
		var l="";
		l+=a;
		oFom["OLOZE"].value="";
		for(var i=0;i<oFom.length;++i){
			if(oFom[i].type=="checkbox"){
				v=oFom[i].checked==true?"on":"";
			}else if(oFom[i].type=="radio"){
				v=oFom[i].checked?oFom[i].value:null;
			}else{
				v=oFom[i].value;
			}
			if(v!=null){
				if(l.length>0) l+="&";
				l+=oFom[i].name+"="+v;
			}
		}
		oFom["OLOZE"].value=l;
	}	
	if(u!=null)
		oFom.action=u;
   if(parent.ipt!=null)
      parent.ipt=new Array();
   if(parent.sr_bref!=null)
      parent.sr_bref=0;
   if(parent.sr!=null)
      parent.sr=new Array();
	oFom.submit();
	return true;
}

function form(n,a,f,o,s,m)
{
	if(is.ns6) {
		document.write('<FORM NAME="'+n+'" ACTION="'+a+'" METHOD="'+m+'" '+o+' OnSubmit="'+s+'">');
		sfsly(f);
	}else{
		sfsly(f);
		document.write('<FORM NAME="'+n+'" ACTION="'+a+'" METHOD="'+m+'" '+o+' OnSubmit="'+s+'">');
	}
	document.write('<input type="HIDDEN" name="OLOZE" value="">');
	oIpt = parent.ipt;
}
function fset(f)
{
	oFom=f;
	if(oIpt!=null){
		srUpdate(oFom);
	}
}

function mArr(n) {this.cnt=n; return(this);}
function gotoPage(urlad){
	self.location=urlad;
}
function trueReplace(dansQuoi,leQuoi,lePar){
	var leResult='';
	if(dansQuoi.length<1){leResult='';}else{
		var strt=dansQuoi.indexOf(leQuoi);
		if(strt<0){leResult=dansQuoi;}else{
			leResult=dansQuoi.substring(0,strt)+lePar+dansQuoi.substring(strt+leQuoi.length);
	}}
	return leResult;
}
function printzePage() {
if (typeof(window.print) != 'undefined')
 { window.print(); }
} 
function addToFavorites (urlAddress, siteName) {
if (window.external) {window.external.AddFavorite(urlAddress,siteName);}
else if (window.sidebar) {window.sidebar.addPanel(siteName,urlAddress,"");}
}

function fermla() {opener=self;self.parent.close();}
function check_frset(wnm){
	if(parent.stKey==1){var flOk2Cont=1; window.name='';}else
		if(wnm=='About'){flOk2Cont=1;}else{
		var flOk2Cont=0; 
		var zzloc = self.location+"";
                   self.location='index.htm';
		if(zzloc.indexOf('?')>-1)window.name=zzloc.substring(0,zzloc.indexOf('?')); 
			else window.name=zzloc; 
		}
	return flOk2Cont;
}
function openPageNW(zePage){
  var zeKey='['+'LNGCD'+']';
	if(zePage.indexOf(zeKey,0)>-1){zePage=trueReplace(zePage,zeKey,parent.lgl[parent.curlgidx-1].lp)};
	window.open(zePage,'About','height=520,width=720,location=no,scrollbars=yes,menubars=yes,toolbars=yes,resizable=yes');
}
function httlsp(n,v,l,t,w,h){
	var s;
	s='<DIV ID="'+n+'" STYLE="width: '+w+'px; height: '+h+'px; z-index: 1; visibility: visible; overflow: hidden; position: relative;">'+v+'</DIV>';
	return s;
}
function sk_FormatNb(o,n)
{
	var p,m,s,f,v;
  n=Math.round(n*100)/100;
	s="";
	p=o.indexOf(".0");
	if(p>=0) {
		f=o.substr(p);
		o=o.substr(0,p);
		v=new String(Math.abs(n));
		p=v.indexOf(".");
		if(p>=0){
			v=v.substr(p+1);
			p=0;
			for( var c=f.indexOf(".");c<f.length;++c ){
				if((p<v.length)&&(f.charAt(c)=="0")){
					s+=v.charAt(p);
					++p;
				}else{
					s+=f.charAt(c);
				}
			}
		}
		else{
			s+=f;
		}
	}
	f=o;
	v=new String(Math.floor(Math.abs(n)));
	p=v.length-1;
	m=f.search(/#/);
	for( var c=f.length-1; c>m; --c ){
		if(p>=0){
			if( f.charAt(c)=="#" ){
				s=v.charAt(p)+s;
				--p;
			}else{
				s=f.charAt(c)+s;
			}
		}else{
			break;
		}
	}
	if(n<0){
		s="-"+s;
	}
	if( f.charAt(0)!="#"){
		s=f.substr(0,f.indexOf("#"))+s;
	}
	return s;
}
function sk_GiveIndex(cod){
	var idx=0;
	for (var j=1; j<=parent.skat.cnt; j++) {
		if(cod==parent.skat[j].cod) {idx=j;break;}
	}
	return (idx);
}
function sk_GiveProdIndex(cod){
	var idx=0;
	for (var j=1; j<=parent.listProds.cnt; j++) {
		if(cod==parent.listProds[j].cod) {idx=j;break;}
	}
	return (idx);
}
function getFmIdbyNm(zeform,zename){
var found=0;
for(i = 0; i<zeform.length; i++){if((zeform[i].type!='hidden')&&(zeform[i].type!='submit')){if(zeform[i].name==zename){found=i;}}}
return found;}
function getZeElement (zeID) {
	if (document.getElementById)   	  // this is the way the standards work
    	elem = document.getElementById(zeID);
		else if (document.all)  		  // this is the way old msie versions work
			elem = document.all[zeID];
			else if (document.layers)   // this is the way nn4 works
				elem = document.layers[zeID];
return (elem);}
function handleZeCont (lapage){
 	zz = 50;
 	if(parent.vCurPgName == lapage) {
		for (var i=1; i<=zz; i++) {
			j = (i<10)?"0"+i:""+i;
			nam = "MAP"+j+"01";
			vElem = getZeElement(nam);
			if (vElem!=null){
				vElem.style.visibility="hidden";
				k = parent.vCurContner[i];
				if (k<1) k=1;
				kk=(k<10)?"0"+k:""+k;
				nam = "MAP"+j+kk;
				vElem = getZeElement(nam);
				if (vElem!=null){
					vElem.style.visibility="visible";
				}
			}
		}
	} else {
		for (var i=0; i<50; i++) {parent.vCurContner[i]=0;}
		parent.vCurPgName = lapage;
}}
function swapcontainer (lecont, lechoix){
	parent.vCurContner[eval(lecont)]=eval(lechoix);
 	//window.location.reload();
}
function flyOverZeCont (lecont, lechoix){
 	zz = 50;	
 	for (var i=1; i<=zz; i++) {
		j = (i<10)?"0"+i:""+i;
		nam = "MAP"+lecont+j;
		vElem = getZeElement(nam);
		if (vElem!=null){vElem.style.visibility="hidden";}
	}
	nam = "MAP"+lecont+lechoix;
	vElem = getZeElement(nam);
	if (vElem!=null){vElem.style.visibility="visible";}
	return('');
}
function shadowOverZeCont (lecont){
 	zz = 50;	
 	for (var i=1; i<=zz; i++) {
		j = (i<10)?"0"+i:""+i;
		nam = "MAP"+lecont+j;
		vElem = getZeElement(nam);
		if (vElem!=null){vElem.style.visibility="hidden";}
	}
	return('');
}
var forie4=document.all;
var forns6=document.getElementById&&!document.all;
var curdropmenuobj;
var zemenuarray=new Array();
var hidemenu_onclick="yes";
var disappeardelay = 200;
function getposOffset(what, offsettype){
	var totaloffset=(offsettype=="left")? what.offsetLeft : what.offsetTop;
	var parentEl=what.offsetParent;
	while (parentEl!=null){
		totaloffset=(offsettype=="left")? totaloffset+parentEl.offsetLeft : totaloffset+parentEl.offsetTop;
		parentEl=parentEl.offsetParent;
	}
	return totaloffset;
}
function showhide(obj, e, visible, hidden, menuwidth, dropmenuobj){
	if (forie4 || forns6) dropmenuobj.style.left=dropmenuobj.style.top="-500px";
	if (menuwidth!=""){ dropmenuobj.widthobj=dropmenuobj.style;	dropmenuobj.widthobj.width=menuwidth;}
	if (e.type=="click" && obj.visibility==hidden || e.type=="mouseover") obj.visibility=visible; else if (e.type=="click") obj.visibility=hidden;
}
function iecompattest(){ return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body;}
function clearbrowseredge(obj, whichedge, dropmenuobj){
	var edgeoffset=0;
	if (whichedge=="rightedge"){
		var windowedge=forie4 && !window.opera? iecompattest().scrollLeft+iecompattest().clientWidth-15 : window.pageXOffset+window.innerWidth-15;
		dropmenuobj.contentmeasure = dropmenuobj.offsetWidth;
		if (windowedge-dropmenuobj.x < dropmenuobj.contentmeasure) edgeoffset=dropmenuobj.contentmeasure-obj.offsetWidth;
	}else{
		var topedge=forie4 && !window.opera? iecompattest().scrollTop : window.pageYOffset;
		var windowedge=forie4 && !window.opera? iecompattest().scrollTop+iecompattest().clientHeight-15 : window.pageYOffset+window.innerHeight-18;
		dropmenuobj.contentmeasure = dropmenuobj.offsetHeight
		if (windowedge-dropmenuobj.y < dropmenuobj.contentmeasure){ edgeoffset=dropmenuobj.contentmeasure+obj.offsetHeight; 
			if ((dropmenuobj.y-topedge)<dropmenuobj.contentmeasure) edgeoffset=dropmenuobj.y+obj.offsetHeight-topedge;  
		}
	}
	return edgeoffset;
}
function populatemenu(what, dropmenuobj){ if (forie4 || forns6) dropmenuobj.innerHTML=what.join(""); }
function hideozers(dropmenuobj){
	var zz = zemenuarray.length;
	var isinit = false;
	for (var i=0; i<zz; i++){
		if(zemenuarray[i].id==dropmenuobj.id){isinit=true; }else{ zemenuarray[i].style.visibility = "hidden";}
	}
	if (!isinit) {zemenuarray[zz]=dropmenuobj; }
}

function dropdownmenu(obj, e, menucontents, menuwidth, dropmenuobj,lefte,tope){
	curdropmenuobj = dropmenuobj;
          hideozers(dropmenuobj);
	if (!forie4) document.onclick=hidemenu();
	if (window.event) event.cancelBubble=true; else if (e.stopPropagation) e.stopPropagation();
	clearhidemenu();
	populatemenu(menucontents, dropmenuobj);
	if (forie4 || forns6){
		showhide(dropmenuobj.style, e, "visible", "hidden", menuwidth, dropmenuobj);
		dropmenuobj.x=getposOffset(obj, "left");
		dropmenuobj.y=getposOffset(obj, "top");
		dropmenuobj.style.left=dropmenuobj.x-lefte-clearbrowseredge(obj, "rightedge", dropmenuobj)+"px";
		dropmenuobj.style.top=dropmenuobj.y-tope-clearbrowseredge(obj, "bottomedge", dropmenuobj)+obj.offsetHeight+"px";
	}
	return clickreturnvalue();
}
function clickreturnvalue(){ if (forie4 || forns6) return false; else return true;}
function contains_forns6(a, b) { if(b){while (b.parentNode) if ((b = b.parentNode) == a) return true; return false;}}
function dynamichide(e, dropmenuobj){ if (forie4 && !dropmenuobj.contains(e.toElement)) delayhidemenu(disappeardelay);
		else if (forns6&&e.currentTarget!= e.relatedTarget && !contains_forns6(e.currentTarget, e.relatedTarget)) delayhidemenu(disappeardelay);}
function hidemenu(){   if (typeof curdropmenuobj != "undefined"){ if (forie4 || forns6) curdropmenuobj.style.visibility="hidden";}}
function delayhidemenu(){ if (forie4 || forns6) delayhide=setTimeout("hidemenu()",disappeardelay);}
function clearhidemenu(){ if (typeof delayhide!="undefined") clearTimeout(delayhide);}
function pwidchk (u,p,n) {if (u && p) self.location = "auth.htm?" + u + p + "-" + n.substring(0,n.indexOf('.')); return false;}
function pwsignout (p) {parent.lkpg = [];location.replace(p);}
function pwsttest (cod1,cod2){if(parent.lkpg[vCurPgName.substring(0,vCurPgName.length-6)]) document.writeln(cod1); else document.writeln(cod2);}

function dics(page, title, value) {
	this.pg=page;
	this.ttl=title;
	this.val=value;
	return(this);
}
function acct(listChar, value) {
	this.LC=listChar;
	this.val=value;
	return(this);
}
function normKw(kw) {
kw2 =kw.toLowerCase();
kw3 = "";
for (var i=0; i<kw2.length; i++) {
 	chr = kw2.charAt(i);
 	if(chNorm.indexOf(chr) != -1 ){ kw3 = kw3+chr; } else {
 		for (var j=1; j<=accs.cnt; j++) { if(accs[j].LC.indexOf(chr) != -1 ){ kw3 += accs[j].val; j=accs.cnt;}}
 	}
 }
return(kw3);
}
function format4Display(v){
zecrlf = /\r\n/g;
zecr = /\r/g;
v = v.replace(zecrlf,String.fromCharCode(13));
v = v.replace(zecr,'<BR>');
return v;
}
function format4Mail(v){
zecrlf = /\r\n/g;
zecr = /\r/g;
zebr=/<BR>/g;
zesp=/\s/g;
zeapost=/\'/g;
v = v.replace(zeapost,'&#39;');
v = v.replace(zecrlf,String.fromCharCode(13));
v = v.replace(zecr,'&#13;');
v = v.replace(zebr,'&#13;');
v = v.replace(zesp,'&nbsp;');
if(false){
v = escape(v);
}
return v;
}

function lst_Sel(cod,nam,sel){
	this.cod=cod;
	this.nam=nam;
	this.sel=sel;//.split(zeSep);					
	return(this);
}
function lst_CurSel(pos,pag){
	this.pos=pos;
	this.pag=pag;
	return(this);
}
function lst_Prod(cod,val,pag,scr){
	this.cod=cod;
	this.val=val;
	this.pag=pag;
	this.scr=scr;
	return(this);
}
function go2back(curP, pict, w, h, alt, did, zid, l, t, fsz){
	var pos=0;
	if(parent.arpgstack[0].cod != ''){   
		document.writeln("<a href="+parent.arpgstack[0].cod+"><img src="+pict+" width="+w+" height="+h+" border='0' alt="+alt+"></A>");}
}
function go2next(curP, pict, w, h, alt, did, zid, l, t, fsz){
	var pos=0;
	for(var i=1; i<=parent.listCurSel.cnt; i++){
	 if(curP==parent.listCurSel[i].pos){pos=i;}
	}
	if((pos!=parent.listCurSel.cnt)&&(pos>0)){   
		document.writeln("<a href="+parent.listCurSel[pos+1].pag+"><img src="+pict+" width="+w+" height="+h+" border='0' ALT="+alt+"></A>");
	}
}
function go2last(curP, pict, w, h, alt, did, zid, l, t, fsz){
	var pos=0;
	for(var i=1; i<=parent.listCurSel.cnt; i++){
	 if(curP==parent.listCurSel[i].pos){pos=i;}
	}
	if((pos!=parent.listCurSel.cnt)&&(pos>0)){   
		document.writeln("<a href="+parent.listCurSel[parent.listCurSel.cnt].pag+"><img src="+pict+" width="+w+" height="+h+" border='0' ALT="+alt+"></A>");
	}
}
function go2prev(curP, pict, w, h, alt, did, zid, l, t, fsz){
	var pos=0;
	for(var i=1; i<=parent.listCurSel.cnt; i++){
	 if(curP==parent.listCurSel[i].pos){pos=i;}
	}
	if(pos>1){
		document.writeln("<A HREF="+parent.listCurSel[pos-1].pag+"><img src="+pict+" width="+w+" height="+h+" border='0' ALT="+alt+"></A>");
	}
}
function go2first(curP, pict, w, h, alt, did, zid, l, t, fsz){
	var pos=0;
	for(var i=1; i<=parent.listCurSel.cnt; i++){
	 if(curP==parent.listCurSel[i].pos){pos=i;}
	}
	if((pos!=parent.listCurSel.cnt)&&(pos>0)){   
		document.writeln("<A HREF="+parent.listCurSel[1].pag+"><img src="+pict+" width="+w+" height="+h+" border='0' ALT="+alt+"></A>");
	}
}
var zeCurPg=0;
function initzepage(cod, nam, typ, lg, nb){
	switch(typ){
		case "LS":
			parent.arpgstack[0].cod = cod;
			parent.arpgstack[0].nam=nam;						
			parent.arpgstack[0].typ=typ;
		break;
		case "RC":
			parent.arpgstack[0].cod = cod;
			parent.arpgstack[0].nam=nam;						
			parent.arpgstack[0].typ=typ;
		break;
		case "PR":
		break;
		default://HM PR SK 
			parent.arpgstack[0].cod = '';
			parent.arpgstack[0].nam='';						
			parent.arpgstack[0].typ='';
		break;
	}
	parent.arpgstack[1].cod=cod;
	parent.arpgstack[1].nam=nam;						
	parent.arpgstack[1].typ=typ;
	if(parent.listKey.length<nb){parent.listKey[nb]='';
	}else{
		if((typeof parent.listKey[nb]=='undefined')||(parent.listKey[nb]=='')){parent.listKey[nb]=1;}}
	zeCurPg=nb;
          return true;
}
function makezesels(tab,cods,libs){
	var zeSep = '_*_';
	if(tab=='GRID'){
		var arcods=cods.split(zeSep);
		var arlibs=libs.split(zeSep);
		parent.listSels.cnt=arcods.length;
		for(var i=0; i<arcods.length; i++){parent.listSels[i+1]=new lst_Sel(arcods[i],arlibs[i],tab);}
	}else{
	var arcods=cods.split(zeSep);
		var arlibs=libs.split(zeSep);
		parent.listSels.cnt=arcods.length;
		for(var i=0; i<arcods.length; i++){parent.listSels[i+1]=new lst_Sel(arcods[i],arlibs[i],arsels[i]);}
	}
}
function drawzepop(tex,clas,col,nam,cods){
	var zeSep = '_*_';
	var arcods=cods.split(zeSep);
	var zeSelTex='';
	for(var i=0; i<arcods.length; i++){
		for(var j=1; j<=parent.listSels.cnt; j++){
			if(parent.listSels[j].cod==arcods[i]){
				zeSelTex+="<option value='"+arcods[i];
				if((j==parent.listKey[zeCurPg])||((j==1)&&(parent.listKey[zeCurPg]==0))) {zeSelTex+="' selected";}else{zeSelTex+="'";}
				zeSelTex+=">"+parent.listSels[j].nam+"</option>";		
	}}}
	if(zeSelTex!=''){document.writeln("<SPAN CLASS="+clas+" COLOR="+col+">"+tex+"&nbsp;</SPAN><select name="+nam+" onchange='selectlist("+nam+".value);'>"+zeSelTex+"</select>");}
}
function selectlist(lequ,laqu){
	var j=0;
	for(var j=1; j<=parent.listSels.cnt; j++){if(parent.listSels[j].cod==lequ){
		if(parent.listSels[j].sel=='GRID'){
			mygrid.clearAll();
			parent.kwss[4].val=parent.listSels[j].nam;
			doRefresh();
		}else{
			parent.listKey[zeCurPg]=j;
			doRefresh();
}}}}
function doRefresh(){
	var zagent=navigator.userAgent.toLowerCase();
	if (zagent.indexOf("safari") != -1) {parent.frames[1].history.go(0);}
	else if(zagent.indexOf("firefox") != -1) {window.location.reload();}
	else if(zagent.indexOf("msie") != -1) {parent.frames[1].history.go(0);}
	else {window.location.reload();}
	return false;
}
function drawzelist(ref,wid,hgt,lWidth,tWidth,lHeight){
	sr=srNew(ref,wid,hgt);
	sr.srBegin();
	if(parent.listKey[zeCurPg].length==0){parent.listKey[zeCurPg]=1;}
	var zeIdx = parent.listSels[parent.listKey[zeCurPg]].sel;
	var counter=0;
	var hPos=0;
	var lTop=0;
	document.writeln("<TABLE  BORDER='0' CELLPADDING='0' CELLSPACING='0'><TR>");
	for(var i=1; i<=listProds.cnt; i++){if((zeIdx.indexOf(listProds[i].cod) != -1 )||(zeIdx=="ALL")){
		 counter+=1;
		 if(counter>parent.listCurSel.cnt)parent.listCurSel[counter]=new lst_CurSel(0,'');
		 parent.listCurSel[counter].pos=i;
		 parent.listCurSel[counter].pag=listProds[i].pag;
		 parent.listCurSel.cnt=counter;
		 document.writeln("<TD WIDTH="+lWidth+" HEIGHT="+lHeight+" ROWSPAN='1'>");
		 sr.srAdd(listProds[i].val, listProds[i].scr);
		 document.writeln("</TD>");
		 hPos+=lWidth;
		 if ((hPos + lWidth) > tWidth) {hPos = 0; lTop+=lHeight; document.writeln("</TR><TR>");}
	}}
	document.writeln("</TR></TABLE>");
	sr.srEnd();
}
function drawzelistmin(ref,wid,hgt,headeur,fouteur){
	sr=srNew(ref,wid,hgt);
	sr.srBegin();
	if(parent.listKey[zeCurPg].length==0){parent.listKey[zeCurPg]=1;}
	var zeIdx = parent.listSels[parent.listKey[zeCurPg]].sel;
	var counter=0;
	var hPos=0;
	var lTop=0;
	document.writeln(headeur);
	for(var i=1; i<=listProds.cnt; i++){if((zeIdx.indexOf(listProds[i].cod) != -1 )||(zeIdx=="ALL")){
		 counter+=1;
		 if(counter>parent.listCurSel.cnt)parent.listCurSel[counter]=new lst_CurSel(0,'');
		 parent.listCurSel[counter].pos=i;
		 parent.listCurSel[counter].pag=listProds[i].pag;
		 parent.listCurSel.cnt=counter;
		 sr.srAdd(listProds[i].val, listProds[i].scr);
	}}
	document.writeln(fouteur);
	sr.srEnd();
}