// JavaScript Document // Pop Up Message function MM_popupMsg(msg) { //v1.0 alert(msg); } // Pop Up Confirm Message function GP_popupConfirmMsg(msg) { //v1.0 document.MM_returnValue = confirm(msg); } // Jump Menu function MM_jumpMenu(targ,selObj,restore){ //v3.0 eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'"); if (restore) selObj.selectedIndex=0; } // Copy Field function NM_copyField(f1,f2){ MM_findObj(f2).value=MM_findObj(f1).value; } // Focus Field function NM_focusfield(objName){ var obj = MM_findObj(objName); obj.focus();obj.select(); } // Toggle checkboxes function flevToggleCheckboxes() { // v1.1 // Copyright 2002, Marja Ribbers-de Vroed, FlevOOware (www.flevooware.nl/dreamweaver/) var sF = arguments[0], bT = arguments[1], bC = arguments[2], oF = MM_findObj(sF); for (var i=0; inum) { val.value=val.value.substring(0,num); alert(unescape(msg)) } } // Yaromat Validate Form function YY_checkform() { //v4.71 //copyright (c)1998,2002 Yaromat.com var a=YY_checkform.arguments,oo=true,v='',s='',err=false,r,o,at,o1,t,i,j,ma,rx,cd,cm,cy,dte,at; for (i=1; i0) if (t==1){ //fromto ma=a[i+1].split('_');if(isNaN(v)||v ma[1]/1){err=true} } else if (t==2){ rx=new RegExp("^[\\w\.=-]+@[\\w\\.-]+\\.[a-zA-Z]{2,4}$");if(!rx.test(v))err=true; } else if (t==3){ // date ma=a[i+1].split("#");at=v.match(ma[0]); if(at){ cd=(at[ma[1]])?at[ma[1]]:1;cm=at[ma[2]]-1;cy=at[ma[3]]; dte=new Date(cy,cm,cd); if(dte.getFullYear()!=cy||dte.getDate()!=cd||dte.getMonth()!=cm){err=true}; }else{err=true} } else if (t==4){ // time ma=a[i+1].split("#");at=v.match(ma[0]);if(!at){err=true} } else if (t==5){ // check this 2 if(o1.length)o1=o1[a[i+1].replace(/(.*\[)|(\].*)/ig,"")]; if(!o1.checked){err=true} } else if (t==6){ // the same if(v!=MM_findObj(a[i+1]).value){err=true} } } else if (!o.type&&o.length>0&&o[0].type=='radio'){ at = a[i].match(/(.*)\[(\d+)\].*/i); o2=(o.length>1)?o[at[2]]:o; if (t==1&&o2&&o2.checked&&o1&&o1.value.length/1==0){err=true} if (t==2){ oo=false; for(j=0;j0&&!t){alert(unescape(eMsg));myErr+="eMsg";}document.MM_returnValue=(myErr==""); } // Set Text of Testfield from listbox function NM_setTextOfTextfieldFromListbox(objName,x,newText) { //v3.0 var text = MM_findObj(newText).options[MM_findObj(newText).selectedIndex].value; var obj = MM_findObj(objName); if (obj) obj.value = text; } // Trim spaces function Trim (string) { if (string.length > 0) { string = RemoveLeadingSpaces (string); } if (string.length > 0) { string = RemoveTrailingSpaces(string); } return string; } function RemoveLeadingSpaces(string) {while(string.substring(0, 1) == " ") { string = string.substring(1, string.length); } return string; } function RemoveTrailingSpaces(string) { while(string.substring((string.length - 1), string.length) == " ") { string = string.substring(0, (string.length - 1)); } return string; } // Create Nice Menu Link function NM_menuLink(objName,objLink) { var objName = MM_findObj(objName); var objLink = MM_findObj(objLink); var strOut=" "; // replace this var strAdd="_"; // with this if (objName) temp = "" + objName.value.toLowerCase(); // temporary holder //temp = temp.toLowerCase() // Convert to lower case //remove qoutes temp = temp.replace("'", ""); while (temp.indexOf(strOut)>-1) { pos=temp.indexOf(strOut); temp = ""+(temp.substring(0,pos)+strAdd+temp.substring((pos+strOut.length),temp.length)); } if (objLink) objLink.value = filterNum(temp); // remove special characters like "$" and "," etc... function filterNum(str){ re =/\'|\‘|\’|\`|\$|\&|\,|\@|\#|\~|\%|\*|\^|\/|\&|\(|\)|\+|\=|\[|\-|\]|\[|\}|\{|\;|\:|\"|\<|\>|\?|\||\\|\!|\…|\¤|\“|\”|\£|\—|\./g; return str.replace(re, ""); } //alert(objLink.value); } /* "'"),chr(34),"'") 'qoute "–","–"),"–","–") 'odd en dash!! "–","–"),"–","–") 'en dash "","—"),"—","—") 'em dash "˜","˜"),"˜","˜") 'Small tilde "","™"),"™","™") 'Trade mark sign "","†"),"†","†") 'Dagger "","‡"),"†","‡") 'Double dagger "","‰"),"‰","‰") 'Per mile sign "","‘"),"‘","‘") 'left quote "","’"),"’","’") 'right quote "","“"),"“","“") 'left double quote "","”"),"”","”") 'right double quote "","¡"),"¡","¡") 'inverted exclamation "","¢"),"¢","¢") 'cent sign "","£"),"£","£") 'pound sterling "","€"),"€","€") 'euro sign "","…"),"…","…") 'Horizontal ellipsis "","¤"),"¤","¤") 'general currency sign "¥","¥"),"¥","¥") 'yen sign "¦","¦"),"¦","¦") 'broken vertical bar "§","§"),"§","§") 'section sign "¨","¨"),"¨","¨") 'umlaut (dieresis) "©","©"),"©","©") 'copyright "ª","ª"),"ª","ª") 'feminine ordinal "«","«"),"«","«") 'left angle quote, guillemotleft "¬","¬"), "¬","¬") 'not sign "­","­"), "­","­") 'soft hyphen "®","®"), "®","®") 'registered trademark "¯","¯"), "¯","¯") 'macron accent "°","°"), "°","°") 'degree sign "±"," ±"), "±","±") 'plus or minus "²","²"), "²","²") 'superscript two "³","³"), "³","³") 'superscript three "´","´"), "´","´") 'acute accent "µ","µ"), "µ","µ") 'micro sign "¶","¶"), "¶","¶") 'paragraph sign "·","·"), "·","·") 'middle dot "¸","¸"), "¸","¸") 'cedilla "²","¹"), "²","¹") 'superscript one "º","º"), "º","º") 'masculine ordinal "•","•"), "•","•") 'Bullet "»","»"), "»","»") 'right angle quote, guillemotright "¼","¼"), "¼","¼") 'fraction one-fourth "½","½"), "½","½") 'fraction one-half "¾","¾"), "¾","¾") 'fraction three-fourths "¿","¿"), "¿","¿") 'inverted question mark "À","À"), "À","À") 'capital A, grave accent "Á","Á"), "Á","Á") 'capital A, acute accent "Â","Â"), "Â","Â") 'capital A, circumflex accent "Ã","Ã"), "Ã","Ã") 'capital A, tilde "Ä","Ä"), "Ä","Ä") 'capital A, dieresis or umlaut mark "Å","Å"), "Å","Å") 'capital A, ring "Æ","Æ"), "Æ","Æ") 'capital AE diphthong (ligature) "Ç","Ç"), "Ç","Ç") 'capital C, cedilla "È","È"), "È","È") 'capital E, grave accent "É","É"), "É","É") 'capital E, acute accent "Ê","Ê"), "Ê","Ê") 'capital E, circumflex accent "Ë","Ë"), "Ë","Ë") 'capital E, dieresis or umlaut mark "Ì","Ì"), "Ì","Ì") 'capital I, grave accent "Í","Í"), "Í","Í") 'capital I, acute accent "Î","Î"), "Î","Î") 'capital I, circumflex accent "Ï","Ï"), "Ï","Ï") 'capital I, dieresis or umlaut mark "Ð","Ð"), "Ð","Ð") 'capital Eth, Icelandic "Ñ","Ñ"), "Ñ","Ñ") 'capital N, tilde "Ò","Ò"), "Ò","Ò") 'capital O, grave accent "Ó","Ó"), "Ó","Ó") 'capital O, acute accent "Ô","Ô"), "Ô","Ô") 'capital O, circumflex accent "Õ","Õ"), "Õ","Õ") 'capital O, tilde "Ö","Ö"), "Ö","Ö") 'capital O, dieresis or umlaut mark "×","×"), "×","×") 'multiply sign "Ø","Ø"), "Ø","Ø") 'capital O, slash "Ù","Ù"), "Ù","Ù") 'capital U, grave accent "Ú","Ú"), "Ú","Ú") 'capital U, acute accent "Û","Û"), "Û","Û") 'capital U, circumflex accent "Ü","Ü"), "Ü","Ü") 'capital U, dieresis or umlaut mark "Ý","Ý"), "Ý","Ý") 'capital Y, acute accent "Þ","Þ"), "Þ","Þ") 'capital THORN, Icelandic "ß","ß"), "ß","ß") 'small sharp s, German (sz ligature) "à","à"), "à","à") 'small a, grave accent "á","á"), "á","á") 'small a, acute accent "â","â"), "â","â") 'small a, circumflex accent "ã","ã"), "ã","ã") 'small a, tilde "ä","ä"), "ä","ä") 'small a, dieresis or umlaut mark "å","å"), "å","å") 'small a, ring "æ","æ"), "æ","æ") 'small ae diphthong (ligature) "ç","ç"), "ç","ç") 'small c, cedilla "è","è"), "è","è") 'small e, grave accent "é","é"), "é","é") 'small e, acute accent "ê","ê"), "ê","ê") 'small e, circumflex accent "ë","ë"), "ë","ë") 'small e, dieresis or umlaut mark "ì","ì"), "ì","ì") 'small i, grave accent "í","í"), "í","í") 'small i, acute accent "î","î"), "î","î") 'small i, circumflex accent "ï","ï"), "ï","ï") 'small i, dieresis or umlaut mark "ð","ð"), "ð","ð") 'small eth, Icelandic "ñ","ñ"), "ñ","ñ") 'small n, tilde "ò","ò"), "ò","ò") 'small o, grave accent "ó","ó"), "ó","ó") 'small o, acute accent "ô","ô"), "ô","ô") 'small o, circumflex accent "õ","õ"), "õ","õ") 'small o, tilde "ö","ö"), "ö","ö") 'small o, dieresis or umlaut mark "÷","÷"), "÷","÷") 'division sign "ø","ø"), "ø","ø") 'small o, slash "ù","ù"), "ù","ù") 'small u, grave accent "ú","ú"), "ú","uacute;") 'small u, acute accent "û","û"), "û","û") 'small u, circumflex accent "ü","ü"), "ü","ü") 'small u, dieresis or umlaut mark "ý","ý"), "ý","ý") 'small y, acute accent "þ","þ"), "þ","þ") 'small thorn, Icelandic "ÿ","ÿ"), "ÿ","ÿ") 'small y, dieresis or umlaut mark */