From: <Saved by Microsoft Internet Explorer 5>
Subject: =?Windows-1252?Q?Comunica=E7=E3o_#162?=
Date: Fri, 18 Oct 2002 16:19:48 +0100
MIME-Version: 1.0
Content-Type: multipart/related;
	boundary="----=_NextPart_000_00FF_01C276C2.2DE17B00";
	type="text/html"
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000

This is a multi-part message in MIME format.

------=_NextPart_000_00FF_01C276C2.2DE17B00
Content-Type: text/html;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Content-Location: http://interno.cvrvv.pt/eVerde/Procedures/verComunica.asp?numero=162&wrtablename=comunicaShop

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML lang=3Dpt><HEAD><TITLE>Comunica=E7=E3o #162</TITLE>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1"><LINK=20
href=3D"http://interno.cvrvv.pt/eVerde/WAMLibrary/WAMcss.win.css.txt"=20
type=3Dtext/css rel=3DSTYLESHEET><LINK=20
href=3D"http://interno.cvrvv.pt/eVerde/css/WAMcss.win.css.txt" =
type=3Dtext/css=20
rel=3DSTYLESHEET>
<SCRIPT language=3DJavaScript=20
src=3D"http://interno.cvrvv.pt/eVerde/WAMLibrary/window_prototype.js">=0A=
</SCRIPT>

<SCRIPT language=3DJavaScript>=0A=
<!--=0A=
var WAMRootURL =3D 'http://interno.cvrvv.pt/eVerde/';=0A=
var WAMMessages =3D new Array();=0A=
//-->=0A=
</SCRIPT>

<SCRIPT language=3DJavaScript>=0A=
<!--=0A=
function window_onLoad(){=0A=
	window.executeOnLoad();=0A=
}=0A=
=0A=
//-->=0A=
</SCRIPT>

<META content=3D"MSHTML 6.00.2716.2200" name=3DGENERATOR></HEAD>
<BODY bgColor=3Dwhite leftMargin=3D0 topMargin=3D0=20
onload=3D'javascript:if (typeof(window_onLoad) =3D=3D "function") =
window_onLoad();'=20
marginHeight=3D"0" marginWidth=3D"0"><!--- WAM --->
<TABLE cellSpacing=3D0 cellPadding=3D0 width=3D"100%" border=3D0>
  <TBODY>
  <TR>
    <TD class=3DcssWAMwinTitle>&nbsp;</TD>
    <TD class=3DcssWAMwinTitle><SPAN =
class=3DcssWAMwinTitleTop><NOBR>e-Verde=20
      Gestor v1.2<BR></SPAN><SPAN class=3DcssWAMwinTitleBottom=20
      title=3D""><NOBR>Comunica=E7=E3o #162</SPAN></NOBR></TD></TR>
  <TR>
    <TD colSpan=3D2 height=3D10></TD></TR>
  <TR>
    <TD><IMG height=3D1=20
      src=3D"http://interno.cvrvv.pt/eVerde/WAMLibrary/Images/space.gif" =

    width=3D10></TD>
    <TD width=3D"100%">
      <TABLE id=3DWAMCanvas cellSpacing=3D0 cellPadding=3D0 border=3D0>
        <TBODY>
        <TR>
          <TD>
            <TABLE cellSpacing=3D0 cellPadding=3D0 width=3D600 =
border=3D0>
              <TBODY>
              <TR>
                <TD><FONT face=3Dverdana,arial,helvetica size=3D1>Exmos. =
Srs.,=20
                  <P>A loja de Vinho Verde (VVShop) tem o prazer de lhes =

                  encaminhar mais uma encomenda. Agradecemos que d=EAem =
o devido=20
                  seguimento a este pedido, seguindo as instru=E7=F5es =
em anexo.=20
                  <P></FONT>
                  <TABLE>
                    <TBODY>
                    <TR>
                      <TH><FONT face=3Dverdana,arial,helvetica =
size=3D1>Morada de=20
                        entrega</FONT></TH>
                      <TH><FONT face=3Dverdana,arial,helvetica =
size=3D1>Morada de=20
                        factura=E7=E3o</FONT></TH></TR>
                    <TR>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1>Miguel=20
                        Calejo<BR>R. Cerca 88<BR>Porto<BR>4150 200=20
                        =
PORTO<BR>PT<BR>0:226109516<BR>mc@declarativa.com<BR></FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1>Miguel=20
                        Calejo<BR>R. Cerca 88<BR>Porto<BR>4150 200=20
                        =
PORTO<BR>PT<BR>0:226109516<BR>mc@declarativa.com<BR>N=BA=20
                        Cont. =
107970384<BR></FONT></TD></TR></TBODY></TABLE>
                  <P>
                  <TABLE borderColor=3Dblack cellSpacing=3D0 border=3D1>
                    <TBODY>
                    <TR>
                      <TH><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>&nbsp;</FONT></TH>
                      <TH><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>C=F3digo</FONT></TH>
                      <TH><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>Produto</FONT></TH>
                      <TH><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>Quantidade</FONT></TH>
                      <TH><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>Pre=E7o/Garrafa</FONT></TH>
                      <TH><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>Pre=E7o</FONT></TH>
                      <TH><FONT face=3Dverdana,arial,helvetica=20
                      size=3D1>IVA</FONT></TH></TR>
                    <TR>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1></FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>70</FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1>Portal do=20
                        Fidalgo&nbsp;(caixa de <B>6</B>)</FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>1</FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>5.26 EUR</FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>31.56 EUR</FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>0.0&nbsp;%</FONT></TD></TR>
                    <TR>
                      <TD align=3Dright colSpan=3D5><FONT=20
                        face=3Dverdana,arial,helvetica=20
                        size=3D1><B>Sub-total</B></FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>31.56 EUR</FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>&nbsp;</FONT></TD></TR>
                    <TR>
                      <TD align=3Dright colSpan=3D5><FONT=20
                        face=3Dverdana,arial,helvetica size=3D1><B>Total =

                        IVA</B></FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>0.00 EUR</FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>&nbsp;</FONT></TD></TR>
                    <TR>
                      <TD align=3Dright colSpan=3D5><FONT=20
                        face=3Dverdana,arial,helvetica=20
                      size=3D1><B>Total</B></FONT></TD>
                      <TD align=3Dright><FONT =
face=3Dverdana,arial,helvetica=20
                        size=3D1>31.56 EUR</FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>&nbsp;</FONT></TD></TR></TBODY></TABLE>
                  <P><FONT face=3Dverdana,arial,helvetica =
size=3D1></FONT>=20
                  <P>
                  <TABLE>
                    <TBODY>
                    <TR>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1><B>Forma=20
                        de Pagamento</B></FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1>CARTAO=20
                        CREDITO</FONT></TD></TR>
                    <TR>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1><B>Ref.=20
                        distribui=E7=E3o</B></FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica=20
                        =
size=3D1>ShipMinStandard:20020301:15001800:empty</FONT></TD></TR>
                    <TR>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1><B>Pedido=20
                        SD</B></FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica=20
                        size=3D1>SD-1020220113431-229</FONT></TD></TR>
                    <TR>
                      <TD><FONT face=3Dverdana,arial,helvetica =
size=3D1><B>N.=BA de=20
                        ordem</B></FONT></TD>
                      <TD><FONT face=3Dverdana,arial,helvetica=20
                        =
size=3D1>abc-000124832-xyz</FONT></TD></TR></TBODY></TABLE><FONT=20
                  face=3Dverdana,arial,helvetica size=3D1>
                  <P>Obrigado pela sua colabora=E7=E3o!=20
                  <P>Vinho Verde Shop<BR><A=20
                  =
href=3D"http://www.vinhoverde.pt/">http://www.vinhoverde.pt/</A><BR><A=20
                  =
href=3D"mailto:sos.aderente@vinhoverde.pt">sos.aderente@vinhoverde.pt</A>=
=20
                  </FONT></P></TD></TR></TBODY></TABLE>
            <SCRIPT language=3DJavaScript=20
            =
src=3D"http://interno.cvrvv.pt/eVerde/WAMLibrary/ClientJavaScript.js.asp"=
>=0A=
</SCRIPT>

            <SCRIPT language=3DJavaScript>=0A=
<!--=0A=
function WAMCanvasResize(){=0A=
	if (isUndefined(window.WAMCanvas)) return false;=0A=
	var iAH, iAW, iCH, iCW, iWX, iWY, iST, SL;=0A=
	iST =3D window.screenTop;=0A=
	iSL =3D window.screenLeft;=0A=
	iAH =3D screen.availHeight;=0A=
	iAW =3D screen.availWidth;=0A=
	iCH =3D window.WAMCanvas.clientHeight;=0A=
	iCW =3D window.WAMCanvas.clientWidth;=0A=
	iWX =3D iCW+50 > iAW-iSL ? iAW-iSL-20 : iCW+50;=0A=
	iWY =3D iCH+150 > iAH-iST ? iAH-iST+20 : iCH+150;=0A=
	window.resizeTo(iWX, iWY);=0A=
}=0A=
window.addToOnLoad(WAMCanvasResize);=0A=
//-->=0A=
</SCRIPT>
          </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<DIV id=3D_ExecuteOnServer style=3D"VISIBILITY: hidden"=20
name=3D"_ExecuteOnServer"></DIV>
<STYLE type=3Dtext/css media=3Dprint>SPAN.cssWAMVERSION {
	VISIBILITY: hidden
}
</STYLE>
<BR><BR><SPAN class=3DcssWAMVERSION=20
style=3D"FONT: 9px tahoma,verdana,arial">&nbsp;Web Application Maker =
Version=20
v8.01<BR>&nbsp;WAMLibrary =A9 Declarativa 2000-2002<BR><BR>&nbsp;Hello,=20
declarativa&nbsp;&nbsp;|&nbsp;&nbsp;18-10-2002 =
16:30:32:406</SPAN></BODY></HTML>

------=_NextPart_000_00FF_01C276C2.2DE17B00
Content-Type: image/gif
Content-Transfer-Encoding: base64
Content-Location: http://interno.cvrvv.pt/eVerde/WAMLibrary/Images/space.gif

R0lGODlhCAAIAID/AMDAwAAAACH5BAEAAAAALAAAAAAIAAgAAAIHhI+py+1dAAA7

------=_NextPart_000_00FF_01C276C2.2DE17B00
Content-Type: text/plain;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Content-Location: http://interno.cvrvv.pt/eVerde/css/WAMcss.win.css.txt

BODY {
	FONT: 11px tahoma, verdana, arial; BACKGROUND-COLOR: rgb(255,255,255)
}
TD.cssWAMwinTitle {
	HEIGHT: 45px; BACKGROUND-COLOR: rgb(0,57,24)
}
SPAN.cssWAMwinTitleTop {
	FONT: 10px tahoma,verdana,arial; COLOR: rgb(255,255,255)
}
SPAN.cssWAMwinTitleBottom {
	FONT: bold 24px tahoma,verdana,arial; COLOR: rgb(255,255,255)
}
TD.cssWAMlistDark {
	FONT: 11px tahoma,verdana,arial; COLOR: rgb(0,0,0); BACKGROUND-COLOR: =
rgb(192,220,192)
}
TR.cssWAMlistLight {
	FONT: 11px tahoma,verdana,arial; BACKGROUND-COLOR: rgb(235,235,235)
}
TR.cssWAMlistSelected {
	FONT: 11px tahoma,verdana,arial; COLOR: rgb(255,255,255); =
BACKGROUND-COLOR: rgb(192,220,192)
}
IMG.cssdbotipoLocalpictograma {
	HEIGHT: 20px
}
IMG.cssdbotipoProdutoimagem1 {
	HEIGHT: 17px
}
IMG.cssdbotipoProdutoimagem2 {
	HEIGHT: 17px
}

------=_NextPart_000_00FF_01C276C2.2DE17B00
Content-Type: application/x-javascript
Content-Transfer-Encoding: quoted-printable
Content-Location: http://interno.cvrvv.pt/eVerde/WAMLibrary/window_prototype.js

function WinFeatures(w, h, t, l, d, s, m, sc, r){
	var c =3D "toolbar=3D"+t+
//	var c =3D "toolbar=3D"+1+
		",location=3D"+l+
//		",location=3D"+1+
		",directories=3D"+d+
		",status=3D"+s+
//		",menubar=3D"+m+
		",menubar=3D"+1+
		",scrollbars=3D"+sc+
		",resizable=3D"+r+
		",width=3D"+150+
		",height=3D"+1+
		"";
	return c;
}

// --- Properties
window.childWindows =3D new Array();
window._nChilds =3D 0;
window.toExecuteOnOnLoad =3D new Array();
window.addToOnLoad =3D window_addToOnLoad;
window.executeOnLoad =3D window_executeOnLoad;
window.browser =3D new Browser();

// --- Methods
window.newWindowName =3D window_newWindowName;
window.openChild =3D window_openChild;
window.closeChild =3D window_closeChild;
window.closeAllChilds =3D window_closeAllChilds;
window.deleteChild =3D window_deleteChild;
window.deleteFromParent =3D window_deleteFromParent
window.onunload =3D window_onUnLoad;

function window_newWindowName(){
	var dt =3D new Date();
	return =
"window"+dt.getFullYear()+dt.getMonth()+dt.getDate()+dt.getHours()+dt.get=
Minutes()+dt.getSeconds()+dt.getMilliseconds()+(++this._nChilds);
}

function window_openChild(strURL, strWinFeatures){
	var strWinName =3D this.newWindowName();
	var win =3D window.open(strURL, strWinName, strWinFeatures, true);
	this.childWindows[win.name] =3D win;
	return strWinName;
}

function window_closeChild(strWindowName){
	if (typeof(this.childWindows[strWindowName]) !=3D "undefined"){
		this.childWindows[strWindowName].close();
		this.deleteChild(strWindowName);
	}
}

function window_closeAllChilds(){
	var win;
	for (el in this.childWindows){
		win =3D this.childWindows[el];
		this.deleteChild(el);
		if (!win.closed) win.close();
	}
}

function window_deleteChild(strWindowName){
	delete(this.childWindows[strWindowName]);
}

function window_deleteFromParent(){
	if (this.opener+"" !=3D "undefined" && this.opener+"" !=3D "null")
		if (typeof(this.opener.childWindows) !=3D "undefined")
			if (typeof(this.opener.childWindows[this.name]) !=3D "undefined")
				this.opener.deleteChild(this.name);
}

function window_addToOnLoad(varIN){
	this.toExecuteOnOnLoad[this.toExecuteOnOnLoad.length] =3D varIN;
}

function window_executeOnLoad(){
	var i;
	for (i =3D 0; i < this.toExecuteOnOnLoad.length; i++){
		switch (typeof(this.toExecuteOnOnLoad[i])){
			case "function":
				this.toExecuteOnOnLoad[i]();
				break;
			case "string":
				eval(this.toExecuteOnOnLoad[i]);
				break;
		}
	}
}

function window_onUnLoad(){
	this.closeAllChilds();
//	this.deleteFromParent();
}

function Browser() {
	var n =3D navigator.appName;
	if (n =3D=3D "Netscape") this.name =3D "ns";
	else if (n =3D=3D "Microsoft Internet Explorer") this.name =3D "ie";
	else this.name =3D name;

	var ua =3D navigator.userAgent.toLowerCase();
	if (ua.indexOf("win") > -1) this.platform =3D "win32";
	else if (ua.indexOf("mac") > -1) this.platform =3D "mac";
	else this.platform =3D "other";
=09
	this.isNS =3D this.name =3D=3D "ns";
	this.isIE =3D this.name =3D=3D "ie";
	this.isIEMAC =3D this.name =3D=3D "ie" && this.platform =3D=3D "mac";
}

if (window.browser.isNS){
	window.captureEvents(Event.CLICK);
	window.captureEvents(Event.KEYPRESS);
	window.document.onclick =3D function __setIEEvent(e){
			event =3D e;
		}
}
------=_NextPart_000_00FF_01C276C2.2DE17B00
Content-Type: text/asp;
	charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
Content-Location: http://interno.cvrvv.pt/eVerde/WAMLibrary/ClientJavaScript.js.asp

function _Date_toHTMLFormat(domain){
	var r, tYear, tMonth, tDate, tHours, tMinutes, tSeconds;

	switch (domain){
		case WAMDomain.wamdate:
			// --- Get Date
			tYear =3D this.getFullYear();
			tMonth =3D this.getMonth() + 1;
			tDate =3D this.getDate();
			tMonth =3D tMonth < 10 ? "0"+tMonth : tMonth;
			tDate =3D tDate < 10 ? "0"+tDate : tDate;
			r =3D tDate+"-"+tMonth+"-"+tYear;
			break;
		case WAMDomain.wamtime:
			// --- Get Time
			tHours =3D this.getHours(); tHours =3D tHours < 10 ? "0"+tHours : =
tHours;
			tMinutes =3D this.getMinutes(); tMinutes =3D tMinutes < 10 ? =
"0"+tMinutes : tMinutes;
			tSeconds =3D this.getSeconds(); tSeconds =3D tSeconds < 10 ? =
"0"+tSeconds : tSeconds;
			r =3D tHours+":"+tMinutes+":"+tSeconds;
			break;
		default:
			// --- Get DateTime
			tYear =3D this.getFullYear();
			tMonth =3D this.getMonth() + 1;
			tDate =3D this.getDate();
			tMonth =3D tMonth < 10 ? "0"+tMonth : tMonth;
			tDate =3D tDate < 10 ? "0"+tDate : tDate;
			tHours =3D this.getHours(); tHours =3D tHours < 10 ? "0"+tHours : =
tHours;
			tMinutes =3D this.getMinutes(); tMinutes =3D tMinutes < 10 ? =
"0"+tMinutes : tMinutes;
			tSeconds =3D this.getSeconds(); tSeconds =3D tSeconds < 10 ? =
"0"+tSeconds : tSeconds;
			r =3D tDate+"-"+tMonth+"-"+tYear+" =
"+tHours+":"+tMinutes+":"+tSeconds;
			break;
	}
	return r;
}

function _String_formatNum(format){
	var newStr =3D "";

	for (i =3D 0; i < format.length-this.length; i++) newStr +=3D =
format.charAt(i);
	return newStr+this.valueOf();
}

function _String_toNumber(){
	return new Number(this.replace(/ /g, ""));
}

function _String_replaceSubstr(iFrom, strWith){
	var newStr =3D "";
	iFrom--;
	return this.substr(0,iFrom)+this.substr(iFrom).replace(new =
RegExp("#{"+strWith.length+"}"), strWith);
}

function _String_splitWords(sep){
	var r; var i; var s =3D "";
=09
	r =3D this.split(sep);
	for (i in r){
		if (!isEmpty(r[i])){
			s +=3D r[i]+" ";
		}
	}
	s =3D s.substr(0, s.length-1);
	this._words =3D s.split(sep);
}

function _String_getWord(i){
	var r;

	this.splitWords(" ");
	if (isNaN(i)){
		r =3D "";
	} else {
		if (isUndefined(this._words[i-1])){
			r =3D "";
		} else {
			r =3D this._words[i-1];
		}
	}
	delete(this._words);
	return r;
}

function _String_deleteWord(iBegin, iEnd){
	var i; var s;

	this.splitWords(" ");
	if (isUndefined(iEnd)){
		iEnd =3D iBegin;
	} else {
		if (iEnd > this._words.length){
			iEnd =3D this._words.length;
		}
	}
	for (i =3D iBegin; i <=3D iEnd; i++){
		delete(this._words[i-1]);
	}
	s =3D new String(this._words.join(" "));
	s.splitWords(" ");
	delete(this._words);
	return new String(s._words.join(" "));
}

function _String_toScriptFormat(){
	return this.replace(/\n/g, "\\n").replace(/\r/g, "\\r").replace(/"/g, =
'\\"');
}

function _Number_toMoney(casasDecimais){
	return formatNumber(this.round(casasDecimais), 2);
}

function _Number_round(numDecimalPlaces){
	if (isUndefined(numDecimalPlaces)) numDecimalPlaces =3D 0;
	return Math.round(this*Math.pow(10, numDecimalPlaces))/Math.pow(10, =
numDecimalPlaces)
}

function formatNumber(val, dec, mSep){
	var iIntPart, iDot, lDecPart, i;
	val +=3D "";
=09
	if (isUndefined(mSep)) mSep =3D " ";

	iDot =3D val.indexOf(".", 0);
	iIntPart =3D (iDot =3D=3D -1 ? val.length : iDot);
	lDecPart =3D val.substr(iIntPart+1).length;
=09
	for (i =3D iIntPart-4; i > 0; i-=3D3){
		val =3D val.substr(0, i+1) + mSep + val.substr(i+1);
	}
	if (i =3D=3D 0) val =3D val.substr(0, i+1) + mSep + val.substr(i+1);
	if (isNaN(dec)) return val;
	if (iDot =3D=3D -1) val +=3D ".";
	for (i=3D0; i<(dec-lDecPart); i++) val +=3D "0";
	return val;
}

function GetScriptEngineInfo(){
    var s;
    s =3D ""; // Build string with necessary info.
    s +=3D ScriptEngine() + " Version ";
    s +=3D ScriptEngineMajorVersion() + ".";
    s +=3D ScriptEngineMinorVersion() + ".";
    s +=3D ScriptEngineBuildVersion();
    return(s);
}

function encodeURL(strToEncode){
	// --- * @ - _ + . /
	return escape(strToEncode).replace(/\+/g, "%2B");
}

function validMask(varValue, strMask){
	var re =3D new RegExp(strMask);

	if (re.test(varValue)){
		return true;
	} else {
		return false;
	}
}

function isUndefined(varIn){
	if (varIn+"" =3D=3D "undefined"){
		return true;
	} else {
		return false;
	}
}

function isNull(varIn){
	if (varIn =3D=3D null){
		return true;
	} else {
		return false;
	}
}

function isEmpty(varIn){
	if (varIn+"" =3D=3D ""){
		return true;
	} else {
		return false;
	}
}

function isDigit(val){
	var digits =3D "^\\d$";
	return validMask(val, digits);
}

function previewImage(formEl, strIMGName, OLDsource){
	var strFileTemp;

	strFileTemp =3D formEl.value;
	if (typeof(__strFileUpLoadPath) =3D=3D "undefined") __strFileUpLoadPath =
=3D null;
	if (strFileTemp !=3D __strFileUpLoadPath){
		if (strFileTemp =3D=3D ""){
			window.document.all[strIMGName].src =3D OLDsource;
		} else {
			window.document.all[strIMGName].src =3D "file://" + strFileTemp;
		}
		__strFileUpLoadPath =3D strFileTemp;
	}
}

Date.prototype.toHTMLFormat =3D _Date_toHTMLFormat;
String.prototype.formatNum =3D _String_formatNum;
String.prototype.toNumber =3D _String_toNumber;
String.prototype.replaceSubstr =3D _String_replaceSubstr;
String.prototype.splitWords =3D _String_splitWords;
String.prototype.getWord =3D _String_getWord;
String.prototype.deleteWord =3D _String_deleteWord;
String.prototype.toScriptFormat =3D _String_toScriptFormat;

Number.prototype.toMoney =3D _Number_toMoney;
Number.prototype.round =3D =
_Number_round;//*********************************************************=
***************/
// Web Application Maker Library
//
// Copyright (c) Declarativa 2000. All Rights Reserved.
//***********************************************************************=
*/
//***********************************************************************=
*/
// ASPExecute Object (Client Side)
//***********************************************************************=
*/
function ASPExecute(){
	var AE =3D new _ASPExecute();
//AE.setDebug(true);
	return AE;
}

function _ASPExecute(){
	if (typeof(_ASPExecutePrototypeCalled) =3D=3D "undefined")
		_ASPExecute__Prototype();
}

function _ASPExecute__Prototype(){
	_ASPExecutePrototypeCalled =3D true;

	_ASPExecute.prototype.url =3D null;
	_ASPExecute.prototype.form =3D null;
	_ASPExecute.prototype.formName =3D null;
	_ASPExecute.prototype.debug =3D false;

	_ASPExecute.prototype._window =3D window;
	if (window.browser.isNS) window._ExecuteOnServer =3D =
window.document.getElementById("_ExecuteOnServer");
	_ASPExecute.prototype._iFrameHidden =3D "<iframe src=3D'about:blank' =
id=3D'ExecuteOnServer' name=3D'ExecuteOnServer' =
style=3D'visibility:hidden;width:0px;height:0px;'></iframe>";
	_ASPExecute.prototype._iFrameVisible =3D "<iframe src=3D'about:blank' =
id=3D'ExecuteOnServer' name=3D'ExecuteOnServer' =
style=3D'visibility:visible;width:600px;height:300px;'></iframe>";

	_ASPExecute.prototype.execute =3D ASPExecute_execute;
	_ASPExecute.prototype.setForm =3D ASPExecute_setForm;
	_ASPExecute.prototype.setURL =3D ASPExecute_setURL;
	_ASPExecute.prototype.setDebug =3D ASPExecute_setDebug;
=09
	function ASPExecute_execute(){
		var i;

		for (i =3D 0; i < __arASPExecute.length; i++){}
		if (isNull(__arASPExecute[i])) __arASPExecute[i] =3D this;
		setTimeout("__ASPExecute_execute__("+i+")", 100);
	}
=09
	function ASPExecute_setForm(strForm, strFormName){
		this.form =3D strForm;
		this.formName =3D strFormName;
	}
=09
	function ASPExecute_setURL(strURL){
		this.url =3D strURL;
	}

	function ASPExecute_setDebug(bolDebug){
		this.debug =3D bolDebug;
		if (this.debug =3D=3D true){
			this._window._ExecuteOnServer.style.visibility =3D "visible";
		} else {
			this._window._ExecuteOnServer.style.visibility =3D "hidden";
		}
	}
}

var __arASPExecute =3D new Array();
function __ASPExecute_execute__(i){
	__arASPExecute[i]._window._ExecuteOnServer.innerHTML =3D "";
	if (__arASPExecute[i].debug =3D=3D true){
		__arASPExecute[i]._window._ExecuteOnServer.innerHTML =3D =
__arASPExecute[i]._iFrameVisible;
	} else {
		__arASPExecute[i]._window._ExecuteOnServer.innerHTML =3D =
__arASPExecute[i]._iFrameHidden;
	}

	if (window.browser.isNS) window.ExecuteOnServer =3D =
window.document.getElementById("ExecuteOnServer");

	if (__arASPExecute[i].url !=3D null){
		if (window.browser.isNS) __arASPExecute[i]._window.ExecuteOnServer.src =
=3D __arASPExecute[i].url;
		else __arASPExecute[i]._window.ExecuteOnServer.location.href =3D =
__arASPExecute[i].url;
	} else {
		if (__arASPExecute[i].form !=3D null){
			=
__arASPExecute[i]._window.document.frames('ExecuteOnServer').document.ope=
n('text/html', 'replace');
			=
__arASPExecute[i]._window.document.frames('ExecuteOnServer').document.cha=
rset =3D 'iso8859-1';
			=
__arASPExecute[i]._window.document.frames('ExecuteOnServer').document.wri=
te("<html><body>"+__arASPExecute[i].form+"</body></html>");
			=
__arASPExecute[i]._window.document.frames('ExecuteOnServer').document.clo=
se();
			=
eval("__arASPExecute[i]._window.document.frames('ExecuteOnServer').docume=
nt."+__arASPExecute[i].formName+".submit()");
		}
	}
	__arASPExecute[i].url =3D null;
	__arASPExecute[i].form =3D null;
	__arASPExecute[i].formName =3D null;
	__arASPExecute[i] =3D null;
}//**********************************************************************=
**/
// Web Application Maker Library
//
// Copyright (c) Declarativa 2000. All Rights Reserved.
//***********************************************************************=
*/
//***********************************************************************=
*/
// WAMEventHandler Object (Client side)
//***********************************************************************=
*/
function WAMEventHandler(objParent){
	return new _WAMEventHandler(objParent);
}

function _WAMEventHandler(objParent){
	if (typeof(_WAMEventHandlerPrototypeCalled) =3D=3D "undefined")
		_WAMEventHandler__Prototype();
	=09
	this.parent =3D objParent;
}

function _WAMEventHandler__Prototype(){
	_WAMEventHandlerPrototypeCalled =3D true;
=09
	// --- Methods
	_WAMEventHandler.prototype.set =3D _WAMEventHandler_set;
	_WAMEventHandler.prototype.fire =3D _WAMEventHandler_fire;
=09
	function _WAMEventHandler_set(strEventName, =
varObjectName/*string=3Deval()...; function=3D...()*/){
		eval("this.parent."+strEventName+"=3D"+varObjectName);
	}
=09
	function _WAMEventHandler_fire(strEventName, bolTimeOut){
		if (typeof(bolTimeOut) !=3D "boolean") bolTimeOut =3D true;
		__event =3D eval("this.parent."+strEventName);
		if (__event !=3D null){
			switch (typeof(__event)){
				case "string":
					if (bolTimeOut) window.setTimeout("eval(__event)", 1);
					else return eval(__event);
					break;
				case "function":
					if (bolTimeOut) window.setTimeout("__event();", 1);
					else return __event();
					break;
			}
		}
	}
}//**********************************************************************=
**/
// Web Application Maker Library
//
// Copyright (c) Declarativa 2000. All Rights Reserved.
//***********************************************************************=
*/
function WAMDialog(strWinTitle, strTitle, strText){
	var objWAMDialog;
=09
	objWAMDialog =3D new _WAMDialog(strWinTitle, strTitle, strText);

	return objWAMDialog;
}

// _WAMDIALOG OBJECT
function _WAMDialog(strWinTitle, strTitle, strText){
	if (isUndefined(typeof(_WAMDialogPrototypeCalled)))
		_WAMDialog__Prototype();

	this.height			=3D null;
	this.width			=3D null;
	this.top			=3D null;
	this.left			=3D null;
	this.winTitle		=3D "";
	this.title			=3D "";
	this.text			=3D "";
	this.inputText		=3D null;
	this.inputWidth		=3D 200;
	this.buttons		=3D new Array();
	this.isPromptDialog	=3D false;
=09
	if (!isUndefined(strWinTitle) && !isNull(strWinTitle)) =
this.setWinTitle(strWinTitle);
	if (!isUndefined(strTitle) && !isNull(strTitle)) =
this.setTitle(strTitle);
	if (!isUndefined(strText) && !isNull(strText)) this.setText(strText);
}

// _WAMDIALOG PROTOTYPE
function _WAMDialog__Prototype(){
	_WAMDialogPrototypeCalled =3D true;
=09
	_WAMDialog.prototype.setHeight		=3D _WAMDialog_setHeight;
	_WAMDialog.prototype.setWidth		=3D _WAMDialog_setWidth;
	_WAMDialog.prototype.setTop			=3D _WAMDialog_setTop;
	_WAMDialog.prototype.setLeft		=3D _WAMDialog_setLeft;
	_WAMDialog.prototype.setWinTitle	=3D _WAMDialog_setWinTitle;
	_WAMDialog.prototype.setTitle		=3D _WAMDialog_setTitle;
	_WAMDialog.prototype.setText		=3D _WAMDialog_setText;
	_WAMDialog.prototype.addLine		=3D _WAMDialog_addLine;
	_WAMDialog.prototype.addEmptyLine	=3D _WAMDialog_addEmptyLine;
	_WAMDialog.prototype.addLineBr		=3D _WAMDialog_addLineBr;
	_WAMDialog.prototype.addButton		=3D _WAMDialog_addButton;
	_WAMDialog.prototype.show			=3D _WAMDialog_show;
	_WAMDialog.prototype.alert			=3D _WAMDialog_alert;
	_WAMDialog.prototype.prompt			=3D _WAMDialog_prompt;
=09
	function _WAMDialog_setHeight(height){
		this.height =3D height;
	}
=09
	function _WAMDialog_setWidth(width){
		this.width =3D width;
	}
=09
	function _WAMDialog_setTop(top){
		this.top =3D top;
	}=09
=09
	function _WAMDialog_setLeft(left){
		this.left =3D left;
	}
=09
	function _WAMDialog_setWinTitle(strTitle){
		this.winTitle =3D strTitle;
	}

	function _WAMDialog_setTitle(strTitle){
		this.title =3D strTitle;
	}

	function _WAMDialog_setText(strText){
		this.text =3D strText;
	}
=09
	function _WAMDialog_addLine(strLine){
		if (isNull(this.text))
			this.text =3D strLine;
		else
			this.text +=3D strLine;
	}
=09
	function _WAMDialog_addEmptyLine(intNLines){
		if (isUndefined(intNLines) || isNull(intNLines))
			intNLines =3D 1;		=09
		var l;
		for (l=3D1; l<=3DintNLines; l++)
			this.text +=3D "\n";
	}

	function _WAMDialog_addLineBr(strLine){
		if (isNull(this.text))
			this.text =3D strLine;
		else
			this.text +=3D strLine + "<br>";
	}

	function _WAMDialog_addButton(objWAMButton){
		this.buttons[this.buttons.length] =3D objWAMButton;
	}

	function _WAMDialog_show(){
		var strFeatures =3D "";
		strFeatures +=3D "dialogHeight:" + ((isNull(this.height)) ? "300px;" : =
this.height + ";");
		strFeatures +=3D "dialogWidth:" + ((isNull(this.width)) ? "300px;" : =
this.width + ";");
		if (!isNull(this.left))
			strFeatures +=3D "dialogTop:" + this.top + ";";
		if (!isNull(this.left))
			strFeatures +=3D "dialogLeft:" + this.left + ";";
		strFeatures +=3D "status: no";
		var objDialogArgs =3D new Object();
		objDialogArgs.winTitle =3D this.winTitle;
		objDialogArgs.title =3D this.title;
		objDialogArgs.text =3D this.text.replace(/\n|\r|\n\r/g, "<br>");
		objDialogArgs.text =3D objDialogArgs.text.replace(/\t/g, =
"&nbsp;&nbsp;&nbsp;&nbsp;");
		objDialogArgs.isPromptDialog =3D this.isPromptDialog;
		objDialogArgs.inputText =3D this.inputText;
		objDialogArgs.inputWidth =3D this.inputWidth;
		objDialogArgs.buttons =3D this.buttons;
		var answer =3D =
window.showModalDialog(WAMRootURL+"/wamlibrary/dialog/wamdialog.htm", =
objDialogArgs, strFeatures);
		return answer;
	}

	function _WAMDialog_alert(){
		this.addButton(new WAMButton("OK", "OK"));
		this.show();
	}
=09
	function _WAMDialog_prompt(defValue, inputWidth){
		this.isPromptDialog =3D true;
		(isUndefined(defValue) || isNull(defValue)) ? this.inputText =3D "" : =
this.inputText =3D defValue;
		if (!isUndefined(inputWidth) || !isNull(inputWidth)) this.inputWidth =
=3D inputWidth;
		this.buttons =3D new Array();
		this.addButton(new WAMButton("OK"));
		this.addButton(new WAMButton("Cancel"));
		answer =3D this.show();
		return answer;=20
	}
}




function WAMButton(label, value, tip, width){
	var objWAMButton;
	objWAMButton =3D new _WAMButton(label, value, tip, width);
	return objWAMButton;
}
=09
function _WAMButton(label, value, tip, width){
	if (isUndefined(typeof(_WAMButtonPrototypeCalled)))
		_WAMButton__Prototype();
=09
	this.label		=3D label;
	(isUndefined(tip) || isNull(tip)) ? this.value =3D this.label : =
this.value =3D value;
	this.name		=3D "btn_" + this.label;
	(isUndefined(tip) || isNull(tip)) ? this.tip =3D "" : this.tip =3D tip;
	if (!isUndefined(width)) this.width =3D width;
}

function _WAMButton__Prototype(){
	_WAMButtonPrototypeCalled =3D true;

	// --- Properties
	_WAMButton.prototype.name		=3D "";
	_WAMButton.prototype.value		=3D null;
	_WAMButton.prototype.label		=3D "";
	_WAMButton.prototype.tip		=3D "";
	_WAMButton.prototype.width		=3D "75px";

	// --- Methods
	_WAMButton.prototype.setValue	=3D _WAMButton_setValue;
	_WAMButton.prototype.setLabel	=3D _WAMButton_setLabel;
	_WAMButton.prototype.getLabel	=3D _WAMButton_getLabel;
	_WAMButton.prototype.setTip		=3D _WAMButton_setTip;
	_WAMButton.prototype.getTip		=3D _WAMButton_getTip;
	_WAMButton.prototype.setWidth	=3D _WAMButton_setWidth;

	function _WAMButton_setValue(value){
		this.value =3D value;
	}

	function _WAMButton_setLabel(strLabel){
		this.label =3D strLabel;
	}
=09
	function _WAMButton_getLabel(){
		return this.label;
	}

	function _WAMButton_setTip(strTip){
		this.tip =3D strTip;
	}

	function _WAMButton_getTip(){
		return (isNull(this.tip) ? "" : this.tip);
	}

	function _WAMButton_setWidth(strWidth){
		this.width =3D strWidth;
	}
}
//***********************************************************************=
*/
// Web Application Maker Library
//
// Copyright (c) Declarativa 2000. All Rights Reserved.
//***********************************************************************=
*/
function WAMError(rootURL){
	var objWAMError;
=09
	objWAMError =3D new _WAMError();
	objWAMError.rootURL =3D rootURL;

	return objWAMError;
}

// _WAMERROR OBJECT
function _WAMError(){
	if (isUndefined(typeof(_WAMErrorPrototypeCalled)))
		_WAMError__Prototype();

	this.rootURL =3D null;
	this.errors =3D new Array();
	this.errorMsgs =3D new Array();
	this.focus =3D null;
	this.aspExecuted =3D true;
}

// _WAMERROR PROTOTYPE
function _WAMError__Prototype(){
	_WAMErrorPrototypeCalled =3D true;
=09
	_WAMError.prototype.existsMsg		=3D _WAMError_existsMsg;
	_WAMError.prototype.add				=3D _WAMError_add;
	_WAMError.prototype.addMsg			=3D _WAMError_addMsg;
	_WAMError.prototype.addError		=3D _WAMError_addError;
	_WAMError.prototype.setError		=3D _WAMError_setError;
	_WAMError.prototype.setMacro		=3D _WAMError_setMacro;
	_WAMError.prototype.catchErrors		=3D _WAMError_catchErrors;
	_WAMError.prototype.show			=3D _WAMError_show;
	_WAMError.prototype.showParsed		=3D _WAMError_showParsed;
	_WAMError.prototype.clear			=3D _WAMError_clear;
	_WAMError.prototype.setParameters	=3D _WAMError_setParameters;
	_WAMError.prototype.setFocusTo		=3D _WAMError_setFocusTo;
	_WAMError.prototype.hasErrors		=3D _WAMError_hasErrors;
	_WAMError.prototype.setASPExecuted	=3D _WAMError_setASPExecuted;
	_WAMError.prototype.getASPExecuted	=3D _WAMError_getASPExecuted;
}

function _WAMError_setASPExecuted(blnExecuted){
	if (isUndefined(blnExecuted))
		this.aspExecuted =3D false;
	else
		this.aspExecuted =3D blnExecuted;
}

function _WAMError_getASPExecuted(){
	return this.aspExecuted;
}

function _WAMError_existsMsg(strCode){
	if (isUndefined(this.errorMsgs[strCode]))
		return null;
	else
		return this.errorMsgs[strCode];
}

function _WAMError_addMsg(strCode, objErrorMsg){
	this.errorMsgs[strCode] =3D objErrorMsg;
}

function _WAMError_addError(objError){
	this.errors[this.errors.length] =3D objError;
}

function _WAMError_setParameters(){
	var arrParam =3D new Array();
	var i;
	for (i=3D0; i<_WAMError_setParameters.arguments.length; i+=3D2)
		arrParam[_WAMError_setParameters.arguments[i]] =3D =
_WAMError_setParameters.arguments[i+1];
	return arrParam;
}

function _WAMError_add(strCode, strDescription, arrParameters, =
bolCacheMode/*default=3Dfalse*/){
	var objError;
	var objErrorMsg =3D this.existsMsg(strCode);
=09
	if (isUndefined(bolCacheMode) || isNull(bolCacheMode))
		bolCacheMode =3D false;
=09
	if (isNull(objErrorMsg)){
		objErrorMsg =3D new _ErrorMsg(strCode, strDescription);
		this.addMsg(strCode, objErrorMsg);
	}
=09
	if (!bolCacheMode){
		if (isUndefined(arrParameters))
			this.addError(new _Error(objErrorMsg));
		else{
			objError =3D new _Error(objErrorMsg);
			objError.parameters =3D arrParameters;
			this.addError(objError);
		}
	}
}

function _WAMError_setError(strCode){
	this.add(strCode, null);
}

function _WAMError_setMacro(strParam, strValue){
	strParam =3D "@" + strParam;
	this.errors[this.errors.length-1].addParameter(strParam, strValue);
}

function _WAMError_setFocusTo(objHTMLEl){
	this.focus =3D objHTMLEl;
}

function _WAMError_hasErrors(){
	return (!this.errors.length =3D=3D 0);
}
=09
function _WAMError_catchErrors(blnShowErrors){
	var err;=20
	var blnGetFromServer =3D false;=20
	var strForm=3D"";
	var objASPExec;
=09
	//----
	if (!this.getASPExecuted()) return;
	//----
=09
	if (isUndefined(blnShowErrors) || isNull(blnShowErrors))
		blnShowErrors =3D true; // Show alert with erros imediatly after =
receiving errors from the Server
	for (err in this.errorMsgs){
		// Only get description from the server for those errors not yet =
loaded in client
		if (isNull(this.errorMsgs[err].description)){
			strForm +=3D "\t\t<input type=3D'text' name=3D'txtError' value=3D'" + =
this.errorMsgs[err].code + "'>\n";
			blnGetFromServer =3D true;
		}
	}
	if (blnGetFromServer =3D=3D true){
		strForm =3D ""+
			"\t<form name=3D'frmErrors' action=3D'" + this.rootURL + =
"/WAMLibrary/WAMError_Get.asp' method=3D'post'>\n" +
			strForm + // --- INPUTs
			"\t\t<input type=3D'text' name=3D'__showErrors' value=3D'" + =
blnShowErrors + "'>\n" +
			"\t</form>\n";
		//----
		this.setASPExecuted(false);
		//----
		// Get errors description from the Server
		objASPExec =3D new ASPExecute();
		objASPExec.setForm(strForm, "frmErrors");
//objASPExec.setDebug(true);
		objASPExec.execute();
	}
	else {
		if (blnShowErrors) this.showParsed();
	}
}

function _WAMError_show(){
	var e;
	var p;
	var strErrors =3D "";
	var strParameters;
=09
	for (e in this.errors){
		strErrors +=3D this.errors[e].msg.code + "-> " + =
this.errors[e].msg.description + "\n";
		strParameters =3D "\t";
		for (p in this.errors[e].parameters)
			strParameters +=3D p + " =3D " + this.errors[e].parameters[p] + "   =
";
		strErrors +=3D strParameters + "\n\n";
	}
	alert(strErrors);
}

function _WAMError_clear(){
	delete(this.errors);
	this.errors =3D new Array();
}

function _WAMError_showParsed(bolClearErrors/*default=3Dtrue*/){
	var e;=20
	var strErrors =3D "";=20
	var objHTLMEl;
	for (e in this.errors)
		strErrors +=3D this.errors[e].parse() + "\n\n";
	alert(strErrors);
	if (bolClearErrors !=3D false){
		this.clear();
	}
	if (!isNull(this.focus)){
		//HTMLEl =3D eval("window.document." + this.focus);
		objHTLMEl =3D this.focus;
		if (typeof(objHTLMEl.name) !=3D "undefined" && objHTLMEl.type !=3D =
"hidden" && objHTLMEl.disabled !=3D true){
			objHTLMEl.focus();
		}
	}
}

function _ErrorMsg(strCode, strDescription){
	this.code =3D strCode;
	this.description =3D strDescription;
}

function _Error(objErrorMsg){
	this.msg =3D objErrorMsg;
	this.parameters =3D new Array();
	this.addParameter =3D _Error_addParameter;
	this.parse =3D _Error_Parse;
}

function _Error_addParameter(strParam, strValue){
	this.parameters[strParam] =3D strValue;
}

function _Error_Parse(){
	var p;
	var strErrorMsg;
	strErrorMsg =3D this.msg.description;
	for (p in this.parameters)
		strErrorMsg =3D strErrorMsg.replace(p, this.parameters[p]);
	return strErrorMsg;
}
var Error =3D new WAMError(WAMRootURL);

------=_NextPart_000_00FF_01C276C2.2DE17B00--

