function fill_cal(cal, mon, year, type)
{
  var objcalm = document.getElementById("monat" + cal);
  //clear table
  for(var myrow = 1; myrow < 7; myrow++)
  {
    for(var mywo = 1; mywo < 8; mywo++)
    {
      var idx = cal + myrow + mywo;
      var objcal = document.getElementById("cal" + idx);
      if(objcal){ 
      	//clear text
      	objcal.innerHTML = "";
      	//clear background
      	if(cal == 1)
      	  objcal.style.backgroundColor = "#f0fff0";
      	else
      	  objcal.style.backgroundColor = "#fff0f0";
      }
    }
  }
  //table fill
  if(objcalm){
  	switch(mon){
  	case 0:  objcalm.innerHTML = "Januar " + year;    break;
  	case 1:  objcalm.innerHTML = "Februar " + year;   break;
  	case 2:  objcalm.innerHTML = "März " + year;      break;
  	case 3:  objcalm.innerHTML = "April " + year;     break;
  	case 4:  objcalm.innerHTML = "Mai " + year;       break;
  	case 5:  objcalm.innerHTML = "Juni " + year;      break;
  	case 6:  objcalm.innerHTML = "Juli " + year;      break;
  	case 7:  objcalm.innerHTML = "August " + year;    break;
  	case 8:  objcalm.innerHTML = "September " + year; break;
  	case 9:  objcalm.innerHTML = "Oktober " + year;   break;
  	case 10: objcalm.innerHTML = "November " + year;  break;
  	case 11: objcalm.innerHTML = "Dezember " + year;  break;
  	}
  }
  var row = 1;
  var d1 = new Date(year, mon, 1);
  for(var myday = 1; myday < 32; myday++)
  {
  	d1.setDate(myday);
  	if(d1.getMonth() != mon) break;
    var wod = d1.getDay();
    if (wod == 0) wod = 7;
  
    var idx = cal + row.toString() + wod.toString();
    //if(myday < 5) alert(myday + "=" + cal + "," + wod + "," + idx);
    var objcal = document.getElementById("cal" + idx);
    if(objcal){
      objcal.innerHTML = myday;
      var hcolor = '#A0A0A0';
      if(cal == 1){
      	if((type & 0x02) == 0){
          if((wod == "1") || (wod == "4") || (wod == "6")) hcolor = '#202020';
        } else { 
          if((wod == "3") || (wod == "5") || (wod == "7")) hcolor = '#202020';
        }
      }
      else
      {
      	if((type & 0x02) == 0){
          if((wod == "3") || (wod == "5") || (wod == "7")) hcolor = '#202020';
        } else {
          if((wod == "1") || (wod == "4") || (wod == "6")) hcolor = '#202020';
        }
      }
      objcal.style.color = hcolor;
    }
    if(wod == 7) row++; 
  }
}