var ds_i_date = new Date(); ds_c_month = ds_i_date.getMonth() + 1; ds_c_year = ds_i_date.getFullYear();
function ds_getel(id) {return document.getElementById(id);}
function ds_getleft(el) {var tmp = el.offsetLeft; el = el.offsetParent; while(el) {tmp += el.offsetLeft; el = el.offsetParent;} return tmp;}
function ds_gettop(el) {var tmp = el.offsetTop; el = el.offsetParent; while(el) {tmp += el.offsetTop; el = el.offsetParent;} return tmp;}
var ds_oe = ds_getel('ds_calclass'); var ds_ce = ds_getel('ds_conclass'); var ds_ob = ''; 
function ds_ob_clean() {ds_ob = '';}
function ds_ob_flush() {ds_oe.innerHTML = ds_ob; ds_ob_clean();}
function ds_echo(t) {ds_ob += t;} var ds_element; 
var ds_monthnames = [ 'Enero', 'Febrero', 'Marzo', 'Abril', 'Mayo', 'Junio', 'Julio', 'Agosto', 'Septiembre', 'Octubre', 'Noviembre', 'Diciembre' ]; 
var ds_daynames = [ 'Do', 'Lu', 'Ma', 'Mi', 'Ju', 'Vi', 'Sa' ]; 
function ds_template_main_above(t) {return '<table cellpadding="3" cellspacing="1" class="ds_tbl"><tr><td class="ds_head" style="cursor:pointer" onclick="ds_py();"><<</td><td class="ds_head" style="cursor:pointer" onclick="ds_pm();"><</td><td class="ds_head" style="cursor:pointer" onclick="ds_hi();" colspan="3">[Cerrar]</td><td class="ds_head" style="cursor:pointer" onclick="ds_nm();">></td><td class="ds_head" style="cursor:pointer" onclick="ds_ny();">>></td></tr><tr><td colspan="7" class="ds_head">' + t + '</td></tr><tr>';}
function ds_template_day_row(t) {return '<td class="ds_subhead">' + t + '</td>';}
function ds_template_new_week() {return '</tr><tr>';}
function ds_template_blank_cell(colspan) {return '<td colspan="' + colspan + '"></td>';}
function ds_template_day(d, m, y) {return '<td class="ds_cell" onclick="ds_onclick(' + d + ',' + m + ',' + y + ')">' + d + '</td>';}
function ds_template_main_below() {return '</tr>' + '</table>';}
function ds_draw_calendar(m, y) {ds_ob_clean(); ds_echo (ds_template_main_above(ds_monthnames[m - 1] + ' ' + y)); for (i = 0; i < 7; i ++) {ds_echo (ds_template_day_row(ds_daynames[i]));} var ds_dc_date = new Date(); ds_dc_date.setMonth(m - 1); ds_dc_date.setFullYear(y); ds_dc_date.setDate(1); if (m == 1 || m == 3 || m == 5 || m == 7 || m == 8 || m == 10 || m == 12) {days = 31;} else if (m == 4 || m == 6 || m == 9 || m == 11) {days = 30;} else {days = (y % 4 == 0) ? 29 :28;} var first_day = ds_dc_date.getDay(); var first_loop = 1; ds_echo (ds_template_new_week()); if (first_day != 0) {ds_echo (ds_template_blank_cell(first_day));} var j = first_day; for (i = 0; i < days; i ++) {if (j == 0 && !first_loop) {ds_echo (ds_template_new_week());} ds_echo (ds_template_day(i + 1, m, y)); first_loop = 0; j ++; j %= 7;} ds_echo (ds_template_main_below()); ds_ob_flush();}
function ds_sh(t) {ds_element = t; var ds_sh_date = new Date(); ds_c_month = ds_sh_date.getMonth() + 1; ds_c_year = ds_sh_date.getFullYear(); if (typeof(ds_element.value) != 'undefined') {ds_element.disabled = true;} ds_draw_calendar(ds_c_month, ds_c_year); ds_ce.style.display = ''; the_left = ds_getleft(t); the_top = ds_gettop(t) + t.offsetHeight; ds_ce.style.left = the_left + 'px'; ds_ce.style.top = the_top + 'px';}
function ds_hi() {ds_ce.style.display = 'none'; if (typeof(ds_element.value) != 'undefined') {ds_element.disabled = false;} }
function ds_nm() {ds_c_month ++; if (ds_c_month > 12) {ds_c_month = 1; ds_c_year++;} ds_draw_calendar(ds_c_month, ds_c_year);}
function ds_pm() {ds_c_month = ds_c_month - 1; if (ds_c_month < 1) {ds_c_month = 12; ds_c_year = ds_c_year - 1;} ds_draw_calendar(ds_c_month, ds_c_year);}
function ds_ny() {ds_c_year++; ds_draw_calendar(ds_c_month, ds_c_year);}
function ds_py() {ds_c_year = ds_c_year - 1; ds_draw_calendar(ds_c_month, ds_c_year);}
function ds_format_date(d, m, y) {m2 = '00' + m; m2 = m2.substr(m2.length - 2); d2 = '00' + d; d2 = d2.substr(d2.length - 2); return y + '-' + m2 + '-' + d2;}
function ds_onclick(d, m, y) {ds_hi(); if (typeof(ds_element.value) != 'undefined') {ds_element.value = ds_format_date(d, m, y);} else if (typeof(ds_element.innerHTML) != 'undefined') {ds_element.innerHTML = ds_format_date(d, m, y);} else {alert (ds_format_date(d, m, y));}
}