﻿//13-1-2008 All undefined : typeof(xx)=="undefined"
//20-4-08
function St_Mod(prMone, prMechane)
{
return Math.round((prMone / prMechane - parseInt(prMone / prMechane)) * prMechane);
}// St_Mod

//26-8-07
function Asc(p) {return p.toString().charCodeAt(0);}
function Abs(p) {return Math.abs(p);}
function St_Count(p, prF) {return p.toString().split(prF).length - 1;}

function Fix(p) {return parseInt(p);}
function Chr(p) {return String.fromCharCode(p);}
function Chr$(p) {return Chr(p);} 
function IIf(p, pTrue, pFalse) {if (p) {return pTrue} else {return pFalse};}
function Val(Value) {if (isNaN((Value*1))) {return 0}; return Value*1;}

function LCase(p) {return p.toString().toLowerCase();}
function LCase$(p) {return LCase(p);}
function UCase(p) {return p.toString().toUpperCase();}
function UCase$(p) {return UCase(p);}
function Len(p) {return p.toString().length;}
function Mid(Str, Start, Length) {
//** 24-4-2008
var ln, p = Str.toString(), s_ = parseInt(Start);
var args= Mid.arguments;
if (typeof(args[2])=="undefined") {ln=Len(p)} else {ln=parseInt(Length)}
 var ln = Length; if (ln==null) {ln=Len(p)};
	return p.substring(s_-1, s_ + ln*1 -1);
}
function Mid$(Str, Start, Length) {return Mid(Str, Start, Length);}
//13-1-2008
//function IsMissing(p) {return (p == null);}
function IsMissing(p) {
if (typeof(p)=="undefined") {return true}; return (p == null);}
function IsNull(p) {
if (typeof(p)=="undefined") {return true}; return (p == null);}

function IsEmpty(p) {if (p==null) {return false}; return (p.toString().length==0);}
function IsObject(p) {return (typeof p == "object");}
function IsArray(p) {return (p.constructor.toString().indexOf("Array")==-1);}
function IsDate(prDate, swMmDd)
{
	if (typeof(prDate)=="object")
		{if (Len(prDate) > 29) {return true} else {return false}};
var ff_IsDate = 0;
var p1=0, p2=0, dd=0, mm=0, yy=0, ez=0, ezD;
// var t = new Date(Date.parse(prDate)); if (isNaN(t.getYear())) {return false};
    ezD = CStr(prDate);
    if (IsNumeric(Mid(ezD, 2, 1))) { p1 = 3; }  else { p1 = 2; }
    if (IsNumeric(Mid(ezD, p1 + 2, 1))) { p2 = p1 + 3; }  else { p2 = p1 + 2; }
    if (Len(ezD) - p2 == 2) { ezD = Left(ezD, p2) + "20" + Right(ezD, 2); }
    mm = Val(Mid(ezD, 1, p1 - 1));
    dd = Val(Mid(ezD, p1 + 1, p2 - p1 - 1));
    yy = Val(Mid(ezD, p2 + 1));
    //If y < 100 Then y = y + 2000:
    if (IsMissing(swMmDd)) {ez = mm; mm = dd; dd = ez;}
    if (dd==Day(ezD, swMmDd) && mm==Month(ezD, swMmDd) && yy==Year(ezD, swMmDd)) 
		{ ff_IsDate = true; } 
return ff_IsDate;

}// IsDate

function IsNumeric(p) { return jst_isnumPer(p)}
function DateJs() {return new Date();}
function Date$() {var t = new Date(); return Day(t) + "/" + Month(t) + "/" + Year(t);}

//24-4-2008: Mid, Trim, RTrim, LTrim, Left, Right, InStr
function Trim(p)  {if (p==null) {return null};return p.toString().replace(/(^ +)|( +$)/g,'')}
function Trim$(p)  {return Trim(p);}
function LTrim(p) {if (p==null) {return null};return p.toString().replace(/(^ +)/g,'')}
function LTrim$(p) {return LTrim(p);}
function RTrim(p) {if (p==null) {return null};return p.toString().replace(/( +$)/g,'')}
function RTrim$(p) {return RTrim(p);}
function Right(p, ai) {return p.toString().substr(p.toString().length - ai)}
function Right$(p, ai) {return Right(p, ai);}
function Left(p, ai)  {return p.toString().substring(0,parseInt(ai))}
function Left$(p, ai) {return Left(p, ai);}

function Year(p, swMmDd) {return DateValue(p, swMmDd).getFullYear();};
function Month(p, swMmDd) {return DateValue(p, swMmDd).getMonth()+1;}
function Day(p, swMmDd) {return DateValue(p, swMmDd).getDate();}
function Space(p) {return jst_lpad("", " ", p);}
function Space$(p) {return Space(p);}
function Str(p) {if (p<0) {return p.toString()} else {return " " + p.toString()};}
function Str$(p) {return Str(p);}
function StringJs(pNo, pAsc) {return jst_lpad("", Chr(pAsc), pNo);}
function String$(pNum, pCh) {return StringJs(pNum, pCh);}
function CStr(p) {return p.toString()}
function CStr$(p) {return p.toString()}
function DateSerial(y, m, d) {return new Date(y, m-1, d)} 
//function DateValue(dt) { return new Date(Date.parse(dt))}
function DateValue(prDate, swMmDd)
{
var ff_DateValue;
var p1=0, p2=0, dd=0, mm=0, yy=0, ez=0, ezD;
    if (typeof(prDate)=="object")
	{if (Len(prDate) > 29) {return prDate}};
    ezD = CStr(prDate);
    if (IsNumeric(Mid(ezD, 2, 1))) { p1 = 3; }  else { p1 = 2; }
    if (IsNumeric(Mid(ezD, p1 + 2, 1))) { p2 = p1 + 3; }  else { p2 = p1 + 2; }
    if (Len(ezD) - p2 == 2) { ezD = Left(ezD, p2) + "20" + Right(ezD, 2); } 
    mm = Val(Mid(ezD, 1, p1 - 1));
    dd = Val(Mid(ezD, p1 + 1, p2 - p1 - 1));
    yy = Val(Mid(ezD, p2 + 1));
    if (IsMissing(swMmDd)) {ez = mm; mm = dd; dd = ez;}
    ff_DateValue = DateSerial(yy, mm, dd);
return ff_DateValue;

}// DateValue

function Eval(p) {return eval(p);}

function mPower(n, pw) {var rt=1; for (var i=1;i<=pw;i++) {rt=rt*n}; return rt;}
function Round (n, zL) {return Math.round(Val(n)*mPower(10, zL))/mPower(10, zL);}

function InStr(p1, p2, p3, p4) {
var Start, St1, St2, Compare;
	if (p4==null)
	{
		Compare=0;
		if (p3==null)
			{Start=1;St1=p1; St2=p2;}
		else
			{Start=p1*1;St1=p2; St2=p3;}
	}
	else		
		{Start=p1*1;St1=p2;St2=p3;Compare=p4*1;}

	if (Start > Len(St1)) return 0;
	if (Len(St2) == 0) return Start;
	if (Compare == 1) {St1 = LCase(St1); St2 = LCase(St2);}
	var index = Mid(St1, Start).indexOf(St2);
	if (index == -1) {return 0;} else {return index + Start;}
}
function InStrRev(StCheck, StMatch, p3, Compare) {
var Start; if (p3 == -1) {Start=Len(StCheck)} else Start=p3;
	if (Len(StMatch) == 0) return Start;
	if (Compare == 1) {StCheck = LCase(StCheck); StMatch = LCase(StMatch);}
	return Left(StCheck, Start).lastIndexOf(StMatch) + 1;
}
function StrReverse(p) {var lr = p.split('');lr = lr.reverse();return lr.join('');}

function MonthName(Month, Abbreviate) {
	var months = new Array("January","February","March","April","May","June","July","August","September","October","November","December");
	if (Month < 1 || Month > 13) {
		alert("Invalid Month argument\n\nMonthName function (js2vb.js)"); return "";
	}
	var retval = months[Month - 1];
	if (Abbreviate) retval = Left(retval, 3);
	return retval;
}
function WeekdayName(Weekday, Abbreviate, FirstDayOfWeekValue) {
	var weekdays = new Array("Sunday","Monday","Tuesday","Wednesday","Thursday","Friday","Saturday");
	if (Weekday < 1 || Weekday > 7) {
		alert("Invalid Weekday argument\n\nWeekdayName function (js2vb.js)"); return "";
	}
	if (FirstDayOfWeekValue < 0 || FirstDayOfWeekValue > 7) {
		alert("Invalid FirstDayOfWeekValue argument\n\nWeekdayName function (js2vb.js)"); return "";
	}
	var addval = (FirstDayOfWeekValue > 1) ? FirstDayOfWeekValue : 0;
	if (Weekday + addval > 7) addval -= 7;
	return weekdays[Weekday + addval - 1];
}


function Format(prNum, prFormat)
{
var ff_Format;
var swPsik=0, iRound=0, perPlaces=0, i=0, ezNum=0;
var ezLeft="", ezMid="", ezRight="", EZSign="";
var ezD = 0;
    if (Len(Nz(prNum, "")) > 0) { ezNum = Val(prNum); } 
    swPsik = InStr(prFormat, ",");
    if (InStr(prFormat, ".") > 0) { ezMid = "."; } 
    ezi = InStr(prFormat, ".");
    if (ezi > 0) { perPlaces = Len(prFormat) - ezi; } 
    
    //סימן פלוס:
    if (Left(prFormat, 1) == "+" && ezNum >= 0) { EZSign = "+"; } 
    //עיגול:
    ezi = InStr(prFormat, ".");
    if (ezi > 0) { iRound = Len(prFormat) - ezi; } 
    numval = Round(ezNum, iRound);
    //השלמת אפסים אחרי נקודה:
    ezs = CStr(numval);
    ezi = InStr(ezs, ".");

    if (ezi > 0)
    {
        ezLeft = Left(ezs, ezi - 1);
        ezRight = Mid(ezs, ezi + 1);
    }
    else
    {
        ezLeft = ezs;
    }
    ezD = perPlaces - Len(ezRight);
    for (i = 1 ; i <= ezD ; i++)
    {
        ezRight = ezRight + "0";
    }
    //מפרידים עשרוניים:
    if (swPsik)
    {
        ezs = "";
        for (i = 1 ; i <= Len(ezLeft) ; i++)
        {
            ezs = Mid(ezLeft, Len(ezLeft) - i + 1, 1) + ezs;
            if (i < Len(ezLeft) && i / 3 == Round(i / 3, 0))
            {
                ezs = "," + ezs;
            }
        }
        ezLeft = ezs;
    }
    ff_Format = EZSign + ezLeft + ezMid + ezRight;
return ff_Format;

}// Format

function jst_count(p, as_pattern)
{
 return p.split(as_pattern).length - 1;
}

function Replace(as,fd,rp)
{
var ez=as.toString(); var ezi=0;
	while (InStr(ez, fd) > 0 && ezi<50) {ezi=ezi+1; ez = ez.replace(fd, rp);}
	return ez;
}

function Replace1(as,fd,rp)
{
var ez=as.toString(); var ezi=0;
alert(ez); alert(fd); alert(rp);
alert(InStr(ez, fd));
	while (InStr(ez, fd) > 0 && ezi<50) {ezi=ezi+1; ez = ez.replace(fd, rp);}
	return ez;
}

function jst_isnumPer(pr)
{
 var  ls_rex, ls_text, ls_msg;
 var p = pr.toString();
 var ind = p.indexOf(".");
 if (ind > 0) {p = Left(p, ind) + Mid(p, ind+2);}
 ls_text = p.replace('','');
 ls_rex  = '[^0-9]';
 lrex    = new RegExp(ls_rex);
 return !lrex.test(ls_text);
}

function jst_isnumAndNeg(pr)
{
 var  ls_rex, ls_text, ls_msg;
 var p = pr.toString();
 var ind = p.indexOf(".");
 if (ind > 0) {p = Left(p, ind) + Mid(p, ind+2);}

if (p.toString().substring(0,1) == "-")
  {p = p.substring(1, 2 + p.toString().length-1)}
 ls_text = p.replace('','');
 ls_rex  = '[^0-9]';
 lrex    = new RegExp(ls_rex);
 return !lrex.test(ls_text);
}


function jst_isnumber(pr)
{
 var  ls_rex, ls_text, ls_msg;
 p = pr.toString();
 ls_text = p.replace('','');
 ls_rex  = '[^0-9]';
 lrex    = new RegExp(ls_rex);
 return !lrex.test(ls_text);
}

function jst_isnotdigit(p)
{
 var  ls_rex, ls_text, ls_msg;

 ls_text = p.replace('','');
 ls_rex  = '\D';
 lrex    = new RegExp(ls_rex, "g");
 return lrex.test(ls_text);
}

function jst_thousands(as_no)
{
 var li, li_len;
 var ls_no, ls_comma;

 ls_comma = '';
 ls_no       = '';

 li_len = as_no.length;
 if (li_len < 4) {ls_no = as_no}
 else
 {
  for (li=li_len;li>0;li=li-3)
  {
   ls_no       = as_no.substring(as_no.length - 3, as_no.length) + ls_comma + ls_no;
   ls_comma = ',';
   as_no    = as_no.substring(0, as_no.length - 3)
   if (as_no.length < 4)
   {
    ls_no    = as_no + ls_comma + ls_no;
    as_no = '';
    li    = 0;
   }
  }
 }
 return ls_no;
}

function jst_nolf(p)    {return p.replace(/(\n+)/g,'')}
function jst_nocr(p)    {return p.replace(/(\r+)/g,'')}
function jst_nosp(p)    {return p.replace(/ /g,'')}
function jst_nocrlf(p)  {return p.replace(/(\r+)|(\n+)/g,'')}
function jst_nolfcr(p)  {return p.replace(/(\n+)|(\r+)/g,'')}
function jst_nosqts(p)  {return p.replace(/(\'+)|(\"+)/g,'')}
function jst_brcr(p)    {return p.replace(/(\<BR\>)/gi,'\r')}
function jst_crbr(p)    {return p.replace(/\r\n|\r|\n\r|\n/gi,'<BR>')}

function jst_lpad(p, as_fill, ai_count)
{
 // lpad: left pads a string with a fill string to a count
 var li;
 var ls_pad, ls_text;

 ls_pad    = '';
 ls_text   = p.replace('','');
 ai_count *= as_fill.length
 for(li=0;li<ai_count;li=(li + as_fill.length)) {ls_pad += as_fill}

 ls_text = ls_pad + ls_text;
 return ls_text;
}

function jst_rpad(p, as_fill, ai_count)
{
 var li;
 var ls_pad, ls_text;

 ls_pad  = '';
 ls_text = p.replace('','');
 ai_count *= as_fill.length
 for(li=0;li<ai_count;li=(li + as_fill.length)) {ls_pad += as_fill}
 ls_text += ls_pad;

 return ls_text;
}

function jst_flat(p)
{
 var ls_text;

 ls_text = p.replace(/\r\n( )+|\n\r( )+/g,'\r');
 ls_text = ls_text.replace(/( )+\r\n|( )+\n\r/g,'\r');
 ls_text = ls_text.replace(/\r( )+|\n( )+/g,'\r');
 ls_text = ls_text.replace(/( )+\r|( )+\n/g,'\r');
 return ls_text;
}

function jst_degremlin(p, as_gremlins)
{
 var li;
 var ls_text; var ls_gremlins; var ls_rex;
 var lr;
 ls_text     = p.replace('','');

 // Default gremlins if argument not supplied
 ls_gremlins = '(\r\n)+|(\n\r)+|(\r)+|(\n)+|(\t)+|(\&)+|(\@)+|(\~)+|(\#)+|(\%)+|(\")+|(\!)+|(\\$)+|(\\*)+|(\\^)+'

 li = arguments.length;
 if (li > 0)
 {
  if (arguments[0].trim().length != -1)
  {
   lr = arguments[0].split(',');
   for (li=0;li<lr.length;li++) {lr[li] = '(' + lr[li] + ')'}
   ls_gremlins = lr.join('+|');
  }
 }

 // CREATE Regular Expression object.
 ls_rex = new RegExp(ls_gremlins,"g");

 return p.replace(ls_rex,'')
}

///////////////////////////////////////////////
function St_Token(prSt, prPos, prDelim)
{//St_Token("ab;bc;cd", 2, ";"); >> "bc" 20-4-08

var ff_St_Token = "";
var st="", Pos, find_="", p1=0, p2=0, pCur=0;
var cDelim = ";";
var args= St_Token.arguments; //**
	if (typeof(prSt)=="undefined") {st = ""} else{st = prSt.toString()}
	if (typeof(args[2])=="undefined") {find_ = cDelim}  else {find_ = prDelim.toString()}//**
	Pos = parseInt(prPos);
	if (st.length == 0) { return ff_St_Token; } 
	if (find_.length == 0) { return ff_St_Token; } 
	if (Pos == 0) { return ff_St_Token; } 
	if (st.substring(0,find_.length) == find_) 
	 {st = st.substring(find_.length, find_.length + st.length);} 
	if (st.substr(st.length - find_.length) != find_) { st = st + find_; } 
	p1 = 1;

	p2 = st.substring(p1-1, p1 + st.length-1).indexOf(find_) + p1;
	while (p2 > 0)
	{
	 pCur = pCur + 1;
	 if (pCur == Pos)
	 {
		st = st.substring(p1-1, p2 -1);
		if (st == find_) {st = ""}; ff_St_Token = st;
		return ff_St_Token;
	 }
	 p1 = p2 + find_.length;
	 p2 = st.substring(p1-1, p1 + st.length-1).indexOf(find_) + p1;
	}
return ff_St_Token;
}// St_Token

var cfWidthSave = 1, cfHeightSave = 1;
var fdNameBs = "SaveBs", BsLim1 = 2, BsLim2 = -1, Bsmu1 = 1.1, Bsmu2 = 0.91;
function RezFeet()
{// RezFeet(0, 1024, 800) : Ex For Other Env.
MozMatchLine();
var devWidth = 800, devHeight = 600;
if (RezFeet.arguments.length>2)
	{devWidth=RezFeet.arguments[1]*1;devHeight=RezFeet.arguments[2]*1;}

var cfWidth = screen.width / devWidth, cfHeight = screen.height / devHeight;
var swBs = 0, objSaveBs = document.getElementById(fdNameBs);

var swShort = 0;

	if (RezFeet.arguments.length>0) {swShort=RezFeet.arguments[0]*1};
	cfWidthSave = 1; cfHeightSave = 1;
	if (objSaveBs!=null) 
	{
	  var Bsmulti; var mu =0;
	  if (parseInt(objSaveBs.value) != 0)
	     { mu = objSaveBs.value*1}
	  else
	     { mu = BsCookieGet(); objSaveBs.value = mu*1}

	  if (parseInt(mu) != 0)
	    {

		if (mu>0) {Bsmulti=Bsmu1} else {Bsmulti=Bsmu2};
		if (mu > BsLim1*1) {mu = BsLim1*1};
		if (mu < BsLim2*1) {mu = BsLim2*1};
		cfWidthSave = mPower(Bsmulti, Math.abs(mu));
		cfHeightSave = mPower(Bsmulti, Math.abs(mu));
	    }
	}
if (cfWidth==1 && cfWidthSave==1) {return};
	RezFeetAll(cfWidth, cfHeight, swShort, 0, 0, 1);
}

function RezFeetAll()
{
var obj, i, j, pr, pr1, oStyleSheet, oRule;
var PlusBs = 1;
var cfWi, cfHei;
var args=RezFeetAll.arguments;
var cfWidth = args[0], cfHeight = args[1];
var swShort = 0, swSave = 0, swSaveAsk = 0;
var docRez;
var sw, swFirstLoad = 0; // 9.9.2008

	if (args.length>2) {swShort=args[2]*1};
	if (args.length>3) {swSave=args[3]*1};
	if (args.length>4) {swSaveAsk=args[4]*1};
	if (args.length>5) {swFirstLoad=args[5]*1};
	cfWi = cfWidth * cfWidthSave; cfHei = cfHeight * cfHeightSave;
	cfWidthSave = 1; cfHeightSave = 1;
	  // +- Bs
	  obj = document.getElementById(fdNameBs);
	  if (obj!=null  && (cfWidth*1==Bsmu1*1 || cfWidth*1==Bsmu2*1))
		{if (cfWidth*1<1) {PlusBs = -1}; obj.value = obj.value*1 + 1*PlusBs;};

//28-29/08/2008 :
var eEle, ezs, iCount;
eEle = "div;p;span;img;hr;input;select;textarea;a;"; //a; 9/2008
iCount = St_Count(eEle, ";");

	//swShort==1
	{
	 docRez = new Object(document.body.getElementsByTagName("table"));
	 for(var i = 0; i < docRez.length; i++)
	  {obj = new Object(docRez[i]); RezFeetAll_obj(obj, cfHei, cfWi)}
	}
	if (swShort!=1)
	{
	 for(j = 1; j <= iCount; j++)
	 {
	  ezs = St_Token(eEle,j);
	  docRez = new Object(document.body.getElementsByTagName(ezs));
	  for(i = 0; i < docRez.length; i++)
	   {
		obj = new Object(docRez[i]);
		sw = RezFeetAll_objNot(obj, swFirstLoad);
		RezFeetAll_obj(obj, cfHei, cfWi, sw);
	   }
	 }	
	}
//{docRez = new Object(document.all)};


//new Object(docRez[i]);
//STYLES
   for ( i = 0; i < document.styleSheets.length; i++ )
   {
	oStyleSheet= new Object(document.styleSheets[i]);
     if (typeof(oStyleSheet.rules)!="undefined")
     {
	for ( j = 0; j < oStyleSheet.rules.length; j++ )
	{
		oRule=oStyleSheet.rules[j];
		pr = oRule.style.fontSize; pr1 = "pt";
		if (pr.toString().substr(pr.toString().length - 2) == "pt")
		  {
		  pr = pr.toString().substring(0, pr.toString().length-2);
		  oRule.style.fontSize = Math.round(pr * cfHei) + pr1;
		  }
	}
     }
   }
   if (swSave==1 && ((cfWidth*1==Bsmu1*1) || (cfWidth*1==Bsmu2*1)))
	{BsCookieSet(swSaveAsk)};
}

function RezFeetAll_objNot(obj, swFirstLoad)
{// 9.9.2008
 if (obj.name == "noRez") {return true}
 if (swFirstLoad) {return false}
 if (typeof(obj.id)=="undefined") {return false}
 if (obj.id.toString().substring(0,5)=="rezNo")  {return true}
 return false;
}// RezFeetAll_objNot

function RezFeetAll_objAbs(pr)
{// 28-29-31/08/2008 (zomila 2.02~ ?!!
	if (pr.length==0) {return false};
	if (pr.substr(pr.length - 1)=="%") {return false};
	if ( "0123456789".indexOf(pr.substring(0,1)) == -1) {return false};
	return true;	
}// RezFeetAll_objAbs

function RezFeetAll_obj(obj, cfHei, cfWi, swNoRez)
{// 28-29-31/08/2008 (zomila 2.02~ ?!!
var pr, ezs;
	  // style-top
	  if (typeof(obj.style.top)=="string")
	  {
		pr = obj.style.top.toString();
		if (RezFeetAll_objAbs(pr))
		{
		  ezs = pr.substring(0, pr.length - 2);
		  obj.style.top = Math.round(ezs * cfHei) + pr.substr(pr.length - 2);
		}
	  }
	  // style-left
	  if (typeof(obj.style.left)=="string")
	  {
		pr = obj.style.left.toString();
		if (RezFeetAll_objAbs(pr))
		{
		  ezs = pr.substring(0, pr.length - 2);
		  obj.style.left = Math.round(ezs * cfWi) + pr.substr(pr.length - 2);
		}
	  }

if (! swNoRez)
	 {
	  // style-height
	  if (typeof(obj.style.height)=="string")
	  {
		pr = obj.style.height.toString();
		if (RezFeetAll_objAbs(pr))
		{
		  ezs = pr.substring(0, pr.length - 2);
		  obj.style.height = Math.round(ezs * cfHei) + pr.substr(pr.length - 2);
		}
	  }


	  // style-width
	  if (typeof(obj.style.width)=="string")
	  {
		pr = obj.style.width.toString();
		if (RezFeetAll_objAbs(pr))
		{
		  ezs = pr.substring(0, pr.length - 2);
		  obj.style.width = Math.round(ezs * cfWi) + pr.substr(pr.length - 2);
		}
	  }

	  // style-fontSize
	  if (typeof(obj.style.fontSize)=="string")
	  {
		pr = obj.style.fontSize.toString();
		if (RezFeetAll_objAbs(pr))
		{
		  ezs = pr.substring(0, pr.length - 2);
		  obj.style.fontSize = Math.round(ezs * cfHei) + pr.substr(pr.length - 2);
		}
	  }

	  // fontSize
	  //if (typeof(obj.size)!="undefined") {obj.size = Math.round(obj.size * cfHei)};
	  // Width
	  if (typeof(obj.width)!="undefined")
	  {
		pr = obj.width.toString();
		if (RezFeetAll_objAbs(pr))
		{
		  obj.width = Math.round(obj.width * cfWi);
		}
	  }		

	  // Height
	  if (typeof(obj.height)!="undefined")
	  {
		pr = obj.height.toString();
		if (RezFeetAll_objAbs(pr))
		{
		  obj.height = Math.round(obj.height * cfHei);
		}
	  }		
	 }		
}//RezFeetAll_obj


var cookieBsName = "MichalE_bs";

function CookieGet1(sName)
{
  var aCookie = document.cookie.split("; ");
  for (var i=0; i < aCookie.length; i++)
  {

    var aName = aCookie[i].split("=");
    if (sName == aName[0])
    {
      return Mid(unescape(aCookie[i]), Len(sName) + 2);
    }
  }
  return "";
  // does not exist
  return "";
}

function BsCookieGet()
{
var p3, p4, st;
var x = document.location;
var p1 = InStrRev(x, "/", -1, 0) + 1, p2 = InStrRev(x, ".", -1, 0) + 1;
	if (LCase(Mid(x, p2))=="htm")
	{
	  st = LCase(CookieGet1(cookieBsName));
	  p3 = InStr(st, LCase(Mid(x, p1, p2-p1-1)) + ":");
	  if (p3>0)
	  {
		p3 = InStr(p3, st, ":"); p4 = InStr(p3, st, "~");
		return parseInt(Mid(st, p3+1, p4-p3-1));
	  }
	}
return 0;
} //BsCookieGet

function BsCookieSet(swSaveAsk)
{
if (typeof(window.clientInformation) != "undefined")
	{if (! window.clientInformation.cookieEnabled) {return};}
var p3, p4, st, msg, obj;
var x = document.location;
var p1 = InStrRev(x, "/", -1, 0) + 1, p2 = InStrRev(x, ".", -1, 0) + 1;

	if (LCase(Mid(x, p2))!="htm") {return};
//
	obj = document.getElementById(fdNameBs);
	if (obj==null) {return};
	if (obj.value*1 < BsLim2) {return};
	if (obj.value*1 > BsLim1) {return};
	if (BsCookieGet()*1 == obj.value*1) {return};
	if (swSaveAsk*1==1)
	{
		if (obj.value*1 == 0) {msg = "רגיל"};
		if (obj.value*1 > 0) {msg = "+" + obj.value};
		if (obj.value*1 < 0) {msg = obj.value};
		if (! confirm("לשמור גודל: " + msg + "?")) {return};
	}
	//
	st = LCase(CookieGet1(cookieBsName));
	p3 = InStr(st, LCase(Mid(x, p1, p2-p1-1)) + ":");
	if (p3>0)
	{
		p3 = InStr(p3, st, ":"); p4 = InStr(p3, st, "~");
		st = Left(st, p3) + document.getElementById(fdNameBs).value + Mid(st, p4)
	}
	else
	  {st = st + LCase(Mid(x, p1, p2-p1-1)) + ":" + document.getElementById(fdNameBs).value*1 + "~"}
	CookieSet(cookieBsName, st, 888);

} //BsCookieSet

function BsMouseDown()
{
	if (event.button == 1) {};
	if (event.button == 2)
	{
	 if (document.getElementById(fdNameBs)==null) {return};
	 if (document.getElementById(fdNameBs).value == 0) {return};
	 if (! confirm("back to?")) {return};
	 document.getElementById(fdNameBs).value = 0;
	 cfWidthSave = 1; cfHeightSave = 1;
var devWidth = 800, devHeight = 600; 
var cfWidth = screen.width / devWidth, cfHeight = screen.height / devHeight;
	 RezFeetAll(cfWidth, cfHeight);
	}
} //  BsMouseDown

function WindowOpenDlg(wAdd, wHeight, wWidth, swCenter, prOpenArg)
{
var winPar;
var ArgObj = new Object();
	wWidth = Math.round(wWidth *(screen.width/800));
	wHeight = Math.round(wHeight *(screen.height/600));
	winPar = "dialogheight: " + wHeight + "px"+";dialogwidth: "+wWidth+"px"
	winPar = winPar + ";status: No;scroll: No;";
	if (swCenter) {winPar = winPar + "center: Yes;"};
	ArgObj.openArg = prOpenArg;
	return window.showModalDialog(wAdd, ArgObj , winPar);
} // WindowOpenDlg

function WindowOpen(wAdd, wHeight, wWidth, swCenterH, swCenterW, pars)
{
//25-4-2008: (Ver From h21_michale.htm, Fix: After if: extra[;], (with else)
var winPar;
	if(wWidth==0) {wWidth=screen.availWidth;}
	else {wWidth = Math.round(wWidth *(screen.width/800));}
	if(wHeight==0) {wHeight=screen.availHeight;}
	else {wHeight = Math.round(wHeight *(screen.height/600));}

	winPar = "height=" + wHeight + ",width=" + wWidth;
	if (swCenterH)
	  { winPar = winPar + ",top=" + ((screen.height - wHeight) / 2)}
	else
	  { winPar = winPar + ",top=0"}

	if (swCenterW)
	  { winPar = winPar + ",left=" + ((screen.width - wWidth) / 2)}
	else
	  { winPar = winPar + ",left=0"}


	winPar = winPar + "," + pars;

//Bug: 8/6/2008
var Name_ = "_blank", args= WindowOpen.arguments;
if (typeof(args[6])!="undefined") {Name_ = args[6]}

	var wWin = window.open(wAdd, Name_, winPar);
	wWin.focus();

} // WindowOpen

function Nz(pr, rep)
{
var ff_Nz;
    if (! IsNull(pr))
    {
      if (Len(pr) > 0)
      {
        if (IsNumeric(pr)) { ff_Nz = Val(pr); }  else { ff_Nz = pr; }
        return ff_Nz;
      }
    }
    if (! IsMissing(rep)) { ff_Nz = rep; }  else { ff_Nz = ""; }
return ff_Nz;

}// Nz

function aValid(prCon, prTag)
{
var ff_aValid = 0;
//prTag: 1^n^^^0.00^sh    > Required,Type,Minimum,Maximum,Format, sh (shalem):
//prTag: 1^n^^^0.00^sh12  > Required,Type,Minimum,Maximum,Format, 12 Dec.Places:(7.2009)
//prTag: 1^n^^^sh3        > sh Placed At Format: OK
var ezs="", ezs1="", ezType="", p1=0, ConV="", msg="", swPsik=0, swPer=0;
var cDelim = "^";
var ezDate, swDateFix = false, swFocus = true;
var p10 = 0, p4 = 0, e4 = "";
var Svfocus;
try {Svfocus = focusData} catch(err_) {swFocus = false}
// Just 4 Shure:
if (typeof(Svfocus)=="undefined")
 {swFocus = false}
else
 {if (Svfocus==null) {swFocus = false}}

	ConV = prCon.value;
	ezs = prTag;
	if (Len(ezs) == 0) { return ff_aValid; } 
	p1 = InStr(ezs, ";");
	if (p1 == 0) { p1 = Len(ezs) + 1; } 
	ezs = Left(ezs, p1 - 1);
	if (Right(ezs, 1) != cDelim) { ezs = ezs + cDelim; }
	//Required:
	p1 = InStr(ezs, cDelim);
	if (p1 == 0) { return ff_aValid; } 
	ezs1 = Left(ezs, p1 - 1);
	ezs = Mid(ezs, p1 + 1);
	if (Len(ConV) == 0)
	{
	  if (ezs1 == "1")
	  {
		ff_aValid = true;
		alert("נתון חובה."); if(swFocus) {prCon.value = Svfocus};
	  }
	  return ff_aValid;
	}
	//Type:
	p1 = InStr(ezs, cDelim);
	if (p1 == 0) { return ff_aValid; } 
	ezType = Left(ezs, p1 - 1);
	ezs = Mid(ezs, p1 + 1);
	switch (ezType)
	{
        case "n":
		if (InStr(ConV, ",") > 0) {swPsik=true; ConV = Replace(ConV, ",", "");}
		if (Left(ConV, 1) == "+") {swPsik=true; ConV = Mid(ConV, 2);}
		if (Right(ConV, 1) == "+") {swPsik=true; ConV = Left(ConV, Len(ConV)-1);}
		if (Right(ConV, 1) == "-") {swPsik=true; ConV = "-" + Left(ConV, Len(ConV)-1);}

		e4 = Right(prTag, 4); p4 = InStr(e4, "sh");
		if (p4 > 0)
		{
			p10 = InStr(ConV, ".");
			if (p10 > 0)
			{
				p4 = Val(Mid(e4, p4 + Len("sh")));
				if (p4==0) {p4 = -1}
				if ((Len(ConV) - p10) > p4)
				{
				 swPer = true;
				 ConV = Left(ConV, p10 + p4*1); if(Len(ConV)==0) {ConV="0"}
				}
			}
		}
		e4 = ConV; p4 = InStr(Mid(e4, 2), ".");
		if (p4==0 && Left(e4, 1) == ".") {e4 = Mid(e4, 2)}; // .3
		if (! jst_isnumAndNeg(e4) || ConV=="-" || ConV=="-.")
		{
		 alert("נתון מסוג מספר."); if(swFocus) {prCon.value = Svfocus};
		 ff_aValid = true;
		 return ff_aValid;
		}
       
		break;

        case "y":
		ezDate = YearInputFix(ConV);
		if (ezDate != ConV)
		 {swDateFix = true; ConV = ezDate;}

		if (InStr(ConV, ",") > 0 || InStr(ConV, ".") > 0 || (Len(ConV) != 2 && Len(ConV) != 4) || (! jst_isnumber(ConV)))
		{
		 alert("קליטת שנה כדוגמת: 07 או 2007."); if(swFocus) {prCon.value = Svfocus};
		 ff_aValid = true;
		 return ff_aValid;
		}       
		break;

	case "d":
		ezDate = DateInputFix(ConV);
		if (ezDate != ConV)
		 {swDateFix = true; ConV = ezDate;}
		if (! IsDate(ConV) || InStr(ConV, "-") > 0)
		{
                 alert("הנתון מסוג תאריך במבנה: dd/mm/yyyy, dd-mm-yy");
		 if(swFocus) {prCon.value = Svfocus};
                 ff_aValid = true;
                 return ff_aValid;
		}
		break;
	default :
		break;
	}
	//Min:
	//5/2008
	ezs1 = ""; p1 = InStr(ezs, cDelim);
	if (p1 > 0) {ezs1 = Left(ezs, p1 - 1); ezs = Mid(ezs, p1 + 1);}
	if (ezType == "n" && Len(ezs1) == 0) {ezs1 = "0"}
	if (ezs1 != "")
	 {
	 switch (ezType)
	 {// Fix Bug 4/9/2008: case "n", "y":
         case "n":
		if (Val(ConV) < Val(ezs1))
		{
		 alert("החל מ: " + ezs1);
		 if(swFocus) {prCon.value = Svfocus};
		 ff_aValid = true;
		 return ff_aValid;
		}
		break;
         case "y":
		if (Val(ConV) < Val(ezs1))
		{
		 alert("החל מ: " + ezs1);
		 if(swFocus) {prCon.value = Svfocus};
		 ff_aValid = true;
		 return ff_aValid;
		}
		break;

	 case "d":
		if (DateValue(ConV) < DateValue(ezs1))
		{
		  alert("החל מ: " + ezs1);
		  if(swFocus) {prCon.value = Svfocus};
		  ff_aValid = true;
		  return ff_aValid;
		}
		break;

	 case "v":
		for (i = 1 ; i <= Len(ConV) ; i++)
		{
		  ch = LCase(Mid(ConV, i, 1));
		  if (InStr(ezs1, ch) == 0)
		  {
			alert("תווים שניתן לשבץ בשדה זה : " + ezs1);
		 	if(swFocus) {prCon.value = Svfocus};
		 	ff_aValid = true;
		 	return ff_aValid;
		  }
		}
		break;

	 default :
		if (CStr(ConV) < CStr(ezs1))
		{
                  alert("החל מ: " + ezs1);
		  if(swFocus) {prCon.value = Svfocus};
                  ff_aValid = true;
                  return ff_aValid;
		}
		break;
	 }
	}
	//Max:
	//5/2008
	ezs1 = ""; p1 = InStr(ezs, cDelim);
	if (p1 > 0) {ezs1 = Left(ezs, p1 - 1); ezs = Mid(ezs, p1 + 1);}

	if (ezs1 != "")
	{
	 switch (ezType)
	 {// Fix Bug 4/9/2008: case "n", "y":
	 case "n":
		if (Val(ConV) > Val(ezs1))
		{
		  alert("עד: " + ezs1);
		  if(swFocus) {prCon.value = Svfocus};
		  ff_aValid = true;
		  return ff_aValid;
		}
		break;
	 case "y":
		if (Val(ConV) > Val(ezs1))
		{
		  alert("עד: " + ezs1);
		  if(swFocus) {prCon.value = Svfocus};
		  ff_aValid = true;
		  return ff_aValid;
		}
		break;

	 case "d":
            if (DateValue(ConV) > DateValue(ezs1))
            {
                alert("עד: " + ezs1);
		if(swFocus) {prCon.value = Svfocus};
                ff_aValid = true;
                return ff_aValid;
            }
            break;
	 default :
		if (CStr(ConV) > CStr(ezs1))
		{
		  alert("עד: " + ezs1);
		  if(swFocus) {prCon.value = Svfocus};
		  ff_aValid = true;
		  return ff_aValid;
		}
		break;
	 }
	}
	//Format: 7.2009
	ezs1 = ""; p1 = InStr(ezs, cDelim);
	if (p1 > 0) {ezs1 = Left(ezs, p1 - 1); ezs = Mid(ezs, p1 + 1);}
	if (ezs1 != "" && InStr(ezs1, "sh")==0)
	 {ConV = Format(ConV, ezs1); if (prCon.value != ConV) {swPsik = true}}

	if (swDateFix) {prCon.value = ConV};
	if (swPsik) {prCon.value = ConV};
	if (swPer) {alert("הערה: הנתון מתוקן"); prCon.value = ConV};

return ff_aValid;

}// aValid

function YearInputFix(prYear)
{
var ff_YearInputFix;
var ezD, p1 = 0, p2 = 0, ezs = "";
	ff_YearInputFix = prYear;
	if (Len(prYear) != 2) {return ff_YearInputFix}
	if (! IsNumeric(prYear) ) {return ff_YearInputFix}

	if (Val(prYear) > 50)
	 {ff_YearInputFix = "19" + prYear}
	else
	 {ff_YearInputFix = "20" + prYear}

	return ff_YearInputFix;

}// YearInputFix

function DateInputFix(prDate)
{
var ff_DateInputFix;
var ezD, p1 = 0, p2 = 0, ezs = "";
	ff_DateInputFix = prDate;
	if (Len(prDate) > 10 || Len(prDate) < 6)
	 {return ff_DateInputFix}

	ezD = prDate;
	if (St_Count(ezD, ".") == 2)
	 {ezD = Replace(ezD, ".", "/");}

	if (St_Count(ezD, "-") == 2)
	 {ezD = Replace(ezD, "-", "/");}

	p1 = InStr(ezD, "/");
	if (p1 == 0) {return ff_DateInputFix;}
	if (! IsNumeric(Left(ezD, p1-1))) {return ff_DateInputFix;}

	p2 = InStr(p1 + 1, ezD, "/");
	if (p2 == 0) {return ff_DateInputFix;}
	if (! IsNumeric(Mid(ezD, p1+1, p2-p1-1))) {return ff_DateInputFix;}

	ezs = Mid(ezD, p2 + 1);
	if (! IsNumeric(ezs)) {return ff_DateInputFix;}
	if (Len(ezs) == 4) {ff_DateInputFix = ezD; return ff_DateInputFix;}
	if (Len(ezs) != 2) {return ff_DateInputFix;}

	if (Val(ezs) > 50)
	 {ff_DateInputFix = Left(ezD, p2) + "19" + ezs}
	else
	 {ff_DateInputFix = Left(ezD, p2) + "20" + ezs}

	return ff_DateInputFix;
}//DateInputFix

function isMozila()
{//Fix : 14/6/2008
var ez = window.navigator.appName; return (ez=="Netscape" || ez=="Opera");}

function MozRgb(prColor)
{
var ff_MozRgb;
var ezs="", p1=0, p2=0;
    ezs = LCase(prColor);
    if (Left(ezs, 3) != "rgb")
    {
        ff_MozRgb = ezs;
        return ff_MozRgb;
    }
    p1 = InStr(ezs, "(");
    p2 = InStr(ezs, ")");
    ezs = Trim(Mid(ezs, p1 + 1, p2 - p1 - 1));
    ff_MozRgb = "#" + Tr_z(St_Base_10ToBase(Trim(St_Token(ezs, 1, ",")), 16), 2) + Tr_z(St_Base_10ToBase(Trim(St_Token(ezs, 2, ",")), 16), 2) + Tr_z(St_Base_10ToBase(Trim(St_Token(ezs, 3, ",")), 16), 2);
return ff_MozRgb;

}// MozRgb

function inTxtSet(prObjOrId, prTxt)
{
var obj;

	if (typeof prObjOrId == "object")
		{obj = new Object(prObjOrId);}
	else	
		{obj = document.getElementById(prObjOrId);}

	if(isMozila())
	 {obj.textContent = prTxt;}
	else
	 {obj.innerText = prTxt;}	
}
function inTxtGet(prObjOrId)
{
var obj;
	if (typeof prObjOrId == "object")
		{obj = new Object(prObjOrId);}
	else	
		{obj = document.getElementById(prObjOrId);}

	if(isMozila())
	 {return obj.textContent;}
	else
	 {return obj.innerText;}	
}

function MozMatchMsg ()
{//alert("Nore You Have To Suffer From This .."); ((Msg-2007))
var aa;
return;
} 

function MozMatchLine ()
{//Fix: 14/6/2008 (Another Opera(!)?)
if (window.navigator.appName != 'Netscape') {return};

var cMatchDev600 = 8;
var obj, i, pr;
var swMsg = true;
var x = document.location;
if (LCase(Mid(x, InStrRev(x, ".", -1, 0) + 1))!="aspx") {swMsg = false};
var docRez = new Object(document.body.getElementsByTagName("hr"));

	for(var i = 0; i < docRez.length; i++)
	{
	  obj = new Object(docRez[i]);
	  if (i==0 && swMsg) {MozMatchMsg()};

	  // style-top
	  if (typeof(obj.style.top)!="undefined" && obj.style.top!=0)
	  {
		pr = obj.style.top;
		if (pr.toString().length > 0)
		{
		  pr = pr.toString().substring(0, pr.toString().length - 2)
		  obj.style.top = parseInt(pr-cMatchDev600) + "px";
		}
	  }
	}
}//MozMatchLine

function MozMatchCalcu ()
{
if (!isMozila()) {return false};
//MozMatchMsg();

WindowOpen("Tax_Ca8.Htm", 260, 320, false, true, "top=15,status=yes,toolbar=no,menubar=no,location=no,resizable=yes,scrollbars=no");

	return true;
}//MozMatchCalcu

function TipLf(pr)
{// Fix: 31/8/2008
if (!isMozila()) {return pr}
var st = pr.toString();
var x13 = Chr$(13), x10 = Chr$(10);
st = Replace(st, x13+x10, "\n");
st = Replace(st, x10+x13, "\n");
//st = Replace(st, x13, " \n"); st = Replace(st, x10, " \n");
return st;
}//TipLf

function TipObjSet(prtitle, prTipId)
{// 11.9.2008
var st;
var obj = document.getElementById(prTipId);
	st = Nz(prtitle, "").toString();
	if (!isMozila()) {obj.innerText = prtitle; return;}

var x13 = Chr$(13), x10 = Chr$(10);
	st = Replace(st, x13+x10, "<BR>");
	st = Replace(st, x10+x13, "<BR>");
	obj.innerHTML = st;
}// TipObjSet

function DlgOpCalcu(ezArg)
{// : 31/8-01/09/2008
var ret = undefined;
var FormAdd = "Tax_Ca.htm", h_ = 260, w_ = 320;
	try 
	{ret = WindowOpenDlg(FormAdd, h_, w_, true, ezArg);}
	catch (err_)
{
WindowOpen(FormAdd, h_, w_, false, true, "top=15,status=yes,toolbar=no,menubar=no,location=no,resizable=yes,scrollbars=no");
}
	return ret;
}//DlgOpCalcu

function DlgOpCalan(PrArg, PrObj)
{// : 9/2008
var ret = undefined;
var FormAdd = "Tl_CalHe.Htm", h_ = 300, w_ = 350;
	try 
	{ret = WindowOpenDlg(FormAdd, h_, w_, true, PrArg);}
	catch (err_)
	{
WindowOpen(FormAdd, h_, w_, false, true, "top=15,status=yes,toolbar=no,menubar=no,location=no,resizable=yes,scrollbars=no");
	return;}

	if (typeof(ret) != "undefined")
	{
		try {
		PrObj.focus();
		if (ret==null) {return}
		PrObj.value = ret;}
		catch (err_) {return;}
	}

}//DlgOpCalan

