
function kal_mm_len(yy,mm)
 {
  var len=31;
      
  if(parseInt(mm)==4 || parseInt(mm)==6 || parseInt(mm)==9 || parseInt(mm)==11)
   len--;
   
  if(parseInt(mm)==2)
   {
    len=len-3;
    if(yy%4==0)
     len++;
    if(yy%100==0)
     len--;
    if(yy%400==0)
     len++;
   }
   
  return len; 
    
 }

function kal_dd_akt(form,feld_yymm,feld_dd)
 {
 	var dd=0;
 	var tmp=eval('window.document.'+form+'.'+feld_yymm+'.options[window.document.'+form+'.'+feld_yymm+'.selectedIndex].value');
 	
 	tmp=tmp.split("-");
 	dd=kal_mm_len(tmp[0],tmp[1]);

  var fld=eval('window.document.'+form+'.'+feld_dd)

  len=fld.length;
  max=(len>dd)?len:dd;

  si=fld.selectedIndex;
  if(si>dd)
   si=0;

  for(i=0;i<max;i++)
   {
   	if(i<dd)
   	 {
   	  ndd=new Option(i+1,i+1,false,true);
   	  fld.options[i]=ndd;
   	 }
   	else
   	 {
   	 fld[dd]=null;
   	 }
   }
  fld.selectedIndex=si;
 }
 
function kal_klick(form,feld_yymm,feld_dd,yymmdd)
 {
 	var dd=0;
 	 	
 	var tmp=yymmdd;
 	tmp=tmp.split("-");

  var fld=eval('window.document.'+form+'.'+feld_yymm)
  fld.value=tmp[0]+"-"+tmp[1];
  
  var fld=eval('window.document.'+form+'.'+feld_dd)
 	
 	dd=kal_mm_len(tmp[0],tmp[1]); 	
  len=fld.length;
  max=(len>dd)?len:dd; 	
  
  for(i=0;i<max;i++)
   {
   	if(i<dd)
   	 {
   	  ndd=new Option(i+1,i+1,false,true);
   	  fld.options[i]=ndd;
   	 }
   	else
   	 {
   	 fld[dd]=null;
   	 }
   }  
  fld.value=tmp[2];     
 } 