var isNav4=false;var isNav5=false;var isIE4=false;var strSeperator="/";var vDateType=1;var vYearType=4;var vYearLength=4;var err=0;if(navigator.appName=="Netscape"){if(navigator.appVersion<"5"){isNav4=true;isNav5=false}else{if(navigator.appVersion>"4"){isNav4=false;isNav5=true}}}else{isIE4=true}function DateFormat(p,d,m,k,g){vDateType=g;if(d=="~"){alert("AppVersion = "+navigator.appVersion+" \nNav. 4 Version = "+isNav4+" \nNav. 5 Version = "+isNav5+" \nIE Version = "+isIE4+" \nYear Type = "+vYearType+" \nDate Type = "+vDateType+" \nSeparator = "+strSeperator);p.value="";p.focus();return true}var o;if(window.event){o=window.event.keyCode}else{if(m){o=m.which}}if(d.length>8&&isNav4){if((d.indexOf("-")>=1)||(d.indexOf("/")>=1)){return true}}var l=" abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ/-";if(l.indexOf(d)>=1){if(isNav4){p.value="";p.focus();p.select();return false}else{p.value=p.value.substr(0,(d.length-1));return false}}if(o==8){return false}else{var b="47,48,49,50,51,52,53,54,55,56,57,58,59,95,96,97,98,99,100,101,102,103,104,105";if(b.indexOf(o)!=-1){if(isNav4){if(((d.length<6&&k)||(d.length==7&&k))&&(d.length>=1)){alert("Error: 91\nInvalid Date\nPlease Re-Enter");p.value="";p.focus();p.select();return false}if(d.length==6&&k){var f=p.value.substr(2,2);var q=p.value.substr(0,2);var j=p.value.substr(4,4);if(j.length==2&&vYearType==4){var r=new Date();var c=r.getFullYear()+30;var a="20"+j;if(a>=c){j="19"+j}else{j="20"+j}}var h=q+strSeperator+f+strSeperator+j;if(!dateValid(h)){alert("Error: 117\nInvalid Date\nPlease Re-Enter");p.value="";p.focus();p.select();return false}return true}else{if(d.length>=8&&k){if(vDateType==1){var f=p.value.substr(2,2);var q=p.value.substr(0,2);var j=p.value.substr(4,4);p.value=q+strSeperator+f+strSeperator+j}if(vDateType==2){var j=p.value.substr(0,4);var q=p.value.substr(4,2);var f=p.value.substr(6,2);p.value=j+strSeperator+q+strSeperator+f}if(vDateType==3){var q=p.value.substr(2,2);var f=p.value.substr(0,2);var j=p.value.substr(4,4);p.value=f+strSeperator+q+strSeperator+j}var n=vDateType;vDateType=1;var h=q+strSeperator+f+strSeperator+j;if(!dateValid(h)){alert("Error: 158\nInvalid Date\nPlease Re-Enter");vDateType=n;p.value="";p.focus();p.select();return false}vDateType=n;return true}else{if(((d.length<8&&k)||(d.length==9&&k))&&(d.length>=1)){alert("Error: 172\nInvalid Date\nPlease Re-Enter");p.value="";p.focus();p.select();return false}}}}else{if(((d.length<8&&k)||(d.length==9&&k))&&(d.length>=1)){alert("Error: 186\nInvalid Date\nPlease Re-Enter");p.value="";p.focus();return true}}if(d.length>=8&&k){if(vDateType==1){var q=p.value.substr(0,2);var f=p.value.substr(3,2);var j=p.value.substr(6,4)}if(vDateType==2){var j=p.value.substr(0,4);var q=p.value.substr(5,2);var f=p.value.substr(8,2)}if(vDateType==3){var f=p.value.substr(0,2);var q=p.value.substr(3,2);var j=p.value.substr(6,4)}if(vYearLength==4){if(j.length<4){alert("Error: 219\nInvalid Date\nPlease Re-Enter");p.value="";p.focus();return true}}var n=vDateType;vDateType=1;var h=q+strSeperator+f+strSeperator+j;if(j.length==2&&vYearType==4&&k){var r=new Date();var c=r.getFullYear()+30;var a="20"+j;if(a>=c){j="19"+j}else{j="20"+j}h=q+strSeperator+f+strSeperator+j;if(n==1){p.value=q+strSeperator+f+strSeperator+j}if(n==3){p.value=f+strSeperator+q+strSeperator+j}}if(!dateValid(h)){alert("Error: 254\nInvalid Date\nPlease Re-Enter");vDateType=n;p.value="";p.focus();return true}vDateType=n;return true}else{if(vDateType==1){if(d.length==2){p.value=d+strSeperator}if(d.length==5){p.value=d+strSeperator}}if(vDateType==2){if(d.length==4){p.value=d+strSeperator}if(d.length==7){p.value=d+strSeperator}}if(vDateType==3){if(d.length==2){p.value=d+strSeperator}if(d.length==5){p.value=d+strSeperator}}return true}}if(d.length==10&&k){if(!dateValid(d)){alert("Error: 307\nInvalid Date\nPlease Re-Enter");p.focus();p.select()}}return false}if(isNav4){p.value="";p.focus();p.select();return false}else{p.value=p.value.substr(0,(d.length-1));return false}}function dateValid(k){var m;var l;var c;var j;var d;var a;var n;var h;var e=false;var g=k;var f=new Array("-"," ","/",".");var b;var o=new Array(12);o[0]="Jan";o[1]="Feb";o[2]="Mar";o[3]="Apr";o[4]="May";o[5]="Jun";o[6]="Jul";o[7]="Aug";o[8]="Sep";o[9]="Oct";o[10]="Nov";o[11]="Dec";m=k;if(m.length<1){return true}for(b=0;b<f.length;b++){if(m.toString().indexOf(f[b])!=-1){l=m.toString().split(f[b]);if(l.length!=3){err=1;return false}else{c=l[0];j=l[1];d=l[2]}e=true}}if(e==false){if(m.length>5){c=m.substr(0,2);j=m.substr(2,2);d=m.substr(4)}}if(d.length==2){d="20"+d}strTemp=c;c=j;j=strTemp;a=parseInt(c,10);if(isNaN(a)){err=2;return false}n=parseInt(j,10);if(isNaN(n)){for(i=0;i<12;i++){if(j.toUpperCase()==o[i].toUpperCase()){n=i+1;j=o[i];i=12}}if(isNaN(n)){err=3;return false}}h=parseInt(d,10);if(isNaN(h)){err=4;return false}if(n>12||n<1){err=5;return false}if((n==1||n==3||n==5||n==7||n==8||n==10||n==12)&&(a>31||a<1)){err=6;return false}if((n==4||n==6||n==9||n==11)&&(a>30||a<1)){err=7;return false}if(n==2){if(a<1){err=8;return false}if(LeapYear(h)==true){if(a>29){err=9;return false}}else{if(a>28){err=10;return false}}}return true}function LeapYear(a){if(a%100==0){if(a%400==0){return true}}else{if((a%4)==0){return true}}return false};