Choose Date

/* * * (C) Copyright Neat Group, Inc. 1999-2005 - All Rights Reserved * * The original version of this source code and documentation * is copyrighted and owned by Neat Group, Inc. * * Using, copying, modifying and distributing this software * is strictly prohibited without a prior written agreement * of Neat Group, Inc. * */ var sdt_fld_y = null var sdt_fld_m = null var sdt_fld_d = null var sdt_onchange = null var sdt_win = null var apos = "'" function gen_month_tb(imgdir,y,m,fy,fm,fromday,ty,tm,today) { prevm = m-1 prevy = y nextm = m+1 nexty = y if (prevm < 1) { prevm = 12 prevy-- } if (nextm > 12) { nextm = 1 nexty++ } var doc = sdt_win.document; doc.open() doc.writeln('') doc.writeln('Choose Date') doc.writeln('') doc.writeln('') doc.write('') if (y>fy || (y==fy && m>fm)) { doc.write('') doc.write('

') doc.write(''); } else doc.write('

') gen_month(doc,imgdir,y,m,fy,fm,fromday,ty,tm,today) if (y"); gen_month(doc,imgdir,nexty,nextm,fy,fm,fromday,ty,tm,today) if (nexty 12) { nnextm = 1 nnexty++ } doc.write('') doc.write('

') doc.write('') } else doc.write('

') } doc.write('

') doc.write('

') doc.write('') doc.close() } function gen_month(doc,imgdir,y,m,fy,fm,fromday,ty,tm,today) { currDate=new Date() curry=currDate.getFullYear() currm=currDate.getMonth()+1 currd=currDate.getDate() doc.write('') doc.write('') // Week Days title doc.writeln('') for (i=0; i<7; i++) doc.write('') doc.writeln('') // Fill month dt1 = new Date(y,m-1,1) fd = dt1.getDay() ny=y nm = m+1 if (nm > 12) { nm = 1 ny++ } dte = new Date(ny, nm-1, 1) dye = dte.getDay() doc.write('') for (c=0; c ') var rows = 0 for (i=1; i<29 || c!=dye; i++) { if (i==currd && m==currm && y==curry) { tmks=''+tmke) else doc.write(tmks+''+tmke) c=(++c)%7 if (c==0) { doc.write('') rows++ } } while (rows < 6) // Fill last row(s) { for (; c<7; c++) sdt_win.document.write('') c=0 rows++ if (rows<6) sdt_win.document.write('') } doc.writeln('') doc.writeln('

' + sdt_month_name[m-1] + ' ' + y + '

'+sdt_day_name[i]+'

' tmke='

' } else tmks=tmke=""; if ((m==fm&&y==fy&& itoday)) doc.write(tmks+'

'+i+'

') } function sdt(event,imgdir,dbox,mbox,ybox,fy,fm,fd,ty,tm,td,onchange) { if (dbox == sdt_fld_d && sdt_win != null && !sdt_win.closed) { sdt_clswin() // second click = close return } if (event != null && sdt_win != null && !sdt_win.closed) sdt_clswin() if (dbox != null) { sdt_fld_d = dbox sdt_fld_m = mbox sdt_fld_y = ybox sdt_onchange = onchange } if (sdt_win == null || sdt_win.closed) { var loc = '' if (event.clientX) loc = ',top='+event.clientY+',left='+event.clientX else if (event.pageX) loc = ',top='+event.pageY+',left='+event.pageX sdt_win=window.open('','sdt','toolbar=no,scrollbars=no,width=160,height=460,resizable=yes,status=no,menubar=no'+loc,true); } if (ybox.options) year = ybox.options[ybox.selectedIndex].value * 1 else year = ybox.value month = mbox.options[mbox.selectedIndex].value * 1 if (year == 0 || month == 0) { var cd = new Date() if (cd.getFullYear() >= fy && cd.getFullYear() <= ty && cd.getMonth() >= fm-1 && cd.getMonth() <= tm-1) { year = cd.getFullYear() month = cd.getMonth() + 1 } else { year = fy month = fm } } gen_month_tb(imgdir,year,month,fy,fm,fd,ty,tm,td) sdt_win.focus() } function sdt_clswin() { sdt_win.close() sdt_win = null sdt_fld_y = null sdt_fld_m = null sdt_fld_d = null } function sdt_set(y,m,d) { if (sdt_fld_y.options) sdt_set_opt(sdt_fld_y, y) else sdt_fld_y.value=y sdt_set_opt(sdt_fld_m, m) sdt_set_opt(sdt_fld_d, d) if (sdt_onchange != null) eval(sdt_onchange) sdt_win.close() return false } function sdt_set_opt(fld, val) { for (i=0; i ty) y = ty dfd = new Date(fy, fm-1, fd) dtd = new Date(ty, tm-1, td) dsd = new Date(y, m-1, d) while (d > 27 && dsd.getMonth()!=m-1) dsd = new Date(y, m-1, --d) // Month has less days if (dsd < dfd || dsd > dtd) { var altdates = get_alternatives(dsd,dfd,dtd,fldtype,dbox!=null) if (altdates.length > 0) dsd=altdates[0] } if (dsd < dfd) dsd = dfd if (dsd > dtd) dsd = dtd if (ybox.options) sdt_set_opt(ybox, dsd.getFullYear()) else ybox.value = dsd.getFullYear() sdt_set_opt(mbox, dsd.getMonth()+1) if (dbox != null) sdt_set_opt(dbox, dsd.getDate()) if (onchange != null) { eval(onchange) // were values modifed (blocked) ? load_y_m_d(dbox,mbox,ybox) if (y != dsd.getFullYear() || m != (dsd.getMonth()+1) || d != dsd.getDate()) { var altdates = get_alternatives(dsd,dfd,dtd,fldtype,dbox!=null) var i for (i=0; i= fd && ndt <= td) res[res.length] = ndt } } } else if (fld == 'D') // day changed { for (nm=0; nm<12; nm++) { for (ny=fd.getFullYear(); ny<=td.getFullYear(); ny++) { var ndt = new Date(ny,nm,d) if (ndt.getDate() == d && ndt >= fd && ndt <= td) res[res.length] = ndt } } } // sort by proximity var i,j; for (i=0; i dj) { var t = res[i] res[i] = res[j] res[j] = t di = dj } } } return res } // Adjust a peer related date field (if necessary) function sdt_adjust_related(dbox,mbox,ybox, rdbox, rmbox, rybox, rfd,rfm,rfy,rtd,rtm,rty, mindiffd, maxdiffd) { var form = getForm(dbox) var dbox = form[dbox] var mbox = form[mbox] var ybox = form[ybox] var rdbox = form[rdbox] var rmbox = form[rmbox] var rybox = form[rybox] if (ybox.options) y = ybox.options[ybox.selectedIndex].value * 1 else // Invisible year y = ybox.value*1 m = mbox.options[mbox.selectedIndex].value * 1 if (dbox != null) d = dbox.options[dbox.selectedIndex].value * 1 else d = 1 if (rybox.options) ry = rybox.options[rybox.selectedIndex].value * 1 else ry = rybox.value*1 rm = rmbox.options[rmbox.selectedIndex].value * 1 if (rdbox != null) rd = rdbox.options[rdbox.selectedIndex].value * 1 else rd = 1 if (y==0 || m==0 || d==0 || ry==0 || rm==0 || rd==0) return; // null is not adjusted/adjusting rfdt = new Date(rfy, rfm-1, rfd) rfd_rel = new Date(y, m-1, d+mindiffd) if (rfd_rel > rfdt) rfdt = rfd_rel // higher start from base and relation rtdt = new Date(rty, rtm-1, rtd) rtd_rel = new Date(y, m-1, d+maxdiffd) if (rtd_rel < rtdt) rtdt = rtd_rel // higher start from base and relation if (maxdiffd < 0) // negative (last to first) { t = rfdt rfdt = rtdt rtdt = t } var sd = new Date(ry, rm-1, rd) // current related selection changed = false if (sd < rfdt) { changed = true sd = rfdt } else if (sd > rtdt) { changed = true sd = rtdt } if (changed) { if (rybox.options) sdt_set_opt(rybox, sd.getFullYear()) else rybox.value = sd.getFullYear() sdt_set_opt(rmbox, sd.getMonth()+1) if (rdbox != null) sdt_set_opt(rdbox, sd.getDate()) } } function sdt_getdate(dbox,mbox,ybox) { if (ybox.options) y = ybox.options[ybox.selectedIndex].value * 1 else // Invisible year y = ybox.value*1 m = mbox.options[mbox.selectedIndex].value * 1 if (dbox != null) d = dbox.options[dbox.selectedIndex].value * 1 else d = 1 if (y == 0) return null return new Date(y, m-1, d) } function sdt_copy(fromctl, toctl) { var fyc = document.getElementById("year"+fromctl) var fmc = document.getElementById("month"+fromctl) var fdc = document.getElementById("day"+fromctl) var tyc = document.getElementById("year"+toctl) var tmc = document.getElementById("month"+toctl) var tdc = document.getElementById("day"+toctl) var fd = document.getElementById("date"+fromctl) var td = document.getElementById("date"+toctl) if (fdc) sdt_set_opt(tdc, fdc.options[fdc.selectedIndex].value * 1) if (fmc) sdt_set_opt(tmc, fmc.options[fmc.selectedIndex].value * 1) if (fyc) { if (fyc.options) sdt_set_opt(tyc, fyc.options[fyc.selectedIndex].value * 1) else { tyc.value = fyc.value } } if (fd) td.value = fd.value } ///////////////////////////////////////////////////////////////////////////////////////// // Auto popup date functions ///////////////////////////////////////////////////////////////////////////////////////// var cal_focusField = null var cal_closeField = null var cal_mayCloseWindow = true function cal_open(fld,y,m,fy,fm,fd,ty,tm,td,imgdir,related,onchange) { var cal = document.getElementById("cal_win") if (cal.style.display == "block" && cal_focusField == fld) { } else { var relatedValues = new Array() for (var i=0; i maxY) { var y = pos.top-cal.clientHeight if (y < 0) y = 0 cal.style.top = y+"px" } pos.top = y cal.style.zIndex = 100; } cal_mayCloseWindow = true if (cal_closeField == fld) cal_closeField = null } function cal_close(fld) { cal_closeField = fld setTimeout('cal_close_impl()', 300) } function cal_close_impl() { if (cal_mayCloseWindow && cal_focusField == cal_closeField) { cal_focusField = null var calwin = document.getElementById("cal_win") calwin.style.display = "none" } else { if (cal_focusField) cal_focusField.focus() } cal_mayCloseWindow = true } function cal_getPosition(fld) { var pos = new Object() pos.left = 0 pos.top = 0 var item = fld while (item) { if (item.style.position == 'absolute') break pos.left += item.offsetLeft pos.top += item.offsetTop item= item.offsetParent } var x = pos.left var y = pos.top+fld.offsetHeight return pos } function cal_set(d,m,y) { if (cal_focusField) { cal_setf(cal_focusField,d,m,y) if (sdt_onchange != null) eval(sdt_onchange) } } function cal_setf(fld,d,m,y) { var val = '' var sy = '/' if (y<2010) sy = sy + '0' sy = sy + (y-2000) if (sdt_format == 'M/d/yy') val = m+'/'+d+sy else if (sdt_format == 'd/M/yy') val = d+'/'+m+sy if (val != '') fld.value = val } function cal_getFocusField() { return cal_focusField } function cal_setMayClose(mayClose) { cal_mayCloseWindow = mayClose } function cal_parse(val) { var d = -1 var m = -1 var y = -1 var sep = '/' if (val.indexOf(sep) >= 0) { var c1 = val.substring(0, val.indexOf(sep)) var c2c3 = val.substring(val.indexOf(sep)+1) if (c2c3.indexOf(sep) >= 0) { var c2 = c2c3.substring(0, c2c3.indexOf(sep)) var c3 = c2c3.substring(c2c3.indexOf(sep)+1) if (sdt_format == 'M/d/yy') { d = parseInt(c2) m = parseInt(c1) y = parseInt(c3,10) } else if (sdt_format == 'd/M/yy') { d = parseInt(c1) m = parseInt(c2) y = parseInt(c3,10) } if (y >=0 && y < 100) y += 2000 } } return new Array(y, m, d) } function cal_adjust_related(fld, rfld, rfd, rfm, rfy, rtd, rtm, rty, mindiffd, maxdiffd) { var form = getForm(fld) myvals = cal_parse(form[fld].value) rfvals = cal_parse(form[rfld].value) y = myvals[0] m = myvals[1] d = myvals[2] ry = rfvals[0] rm = rfvals[1] rd = rfvals[2] if (y==-1 || m==-1 || d==-1 || ry==-1 || rm==-1 || rd==-1) return; // invalid value, ignore (do not change) rfdt = new Date(rfy, rfm-1, rfd) rfd_rel = new Date(y, m-1, d+mindiffd) if (rfd_rel > rfdt) rfdt = rfd_rel // higher start from base and relation rtdt = new Date(rty, rtm-1, rtd) rtd_rel = new Date(y, m-1, d+maxdiffd) if (rtd_rel < rtdt) rtdt = rtd_rel // higher start from base and relation if (maxdiffd < 0) // negative (last to first) { t = rfdt rfdt = rtdt rtdt = t } var sd = new Date(ry, rm-1, rd) // current related selection changed = false if (sd < rfdt) { changed = true sd = rfdt } else if (sd > rtdt) { changed = true sd = rtdt } if (changed) { cal_setf(form[rfld],sd.getDate(),sd.getMonth()+1,sd.getFullYear()) } }