function MakeCalendar(nDay, nMonth, nYear, aWeek, aMonth, sFont, sFontSize, aColors, cField, iType, bChange, sBgColor)
{
   var nAux, sHTML;
   cField = document.getElementById(cField);
   if(cField != null && cField.value != "" && bChange == false)
   {
      if( iType == 1 )
      {
         nAux = cField.value.substr(0,2);
         while(nAux.search("_") != -1) nAux = nAux.replace("_","");
         nDay = nAux == "" ? nDay : nAux
         
         nAux = cField.value.substr(3,2);
         while(nAux.search("_") != -1) nAux = nAux.replace("_","");
         nMonth = nAux == "" ? nMonth : nAux

         nAux = cField.value.substr(6,4);
         while(nAux.search("_") != -1) nAux = nAux.replace("_","");
         nYear = nAux == "" ? nYear : nAux
         
         if( nYear.length < 4)
         {
           nYear = strzero(nYear,2);
           d = new Date();
           nCentury = (d.getFullYear() + '').substr(0,2);
           nCentury = ((nYear > 49) ? (nCentury-1) : nCentury) + '';
           nYear = nCentury + nYear;
         }
      }
      else
      {
      }
   }
   sHTML = "<table bgcolor=\"#C0C0C0\" cellspacing=\"1\" cellpadding=\"1\" >" +
           "<tr><td>" +
           MakeHeaderCalendar(aWeek, aMonth, nMonth, nYear, 1995, 2010, cField, sFont, sFontSize, sBgColor) +
           MakeBodyCalendar(nDay, nMonth, nYear, aWeek, aMonth, sFont, sFontSize, aColors, cField, iType) +
           "</td></tr></table>";
   document.all.DATEDIV.innerHTML = sHTML
}
function getCalendar(cField, aWeek, aMonth, iMonth, iYear)
{
   if (DATEDIV.style.visibility == "visible")
     closeCalendar();
   else
   {  
     var c = getAnchorPosition(cField.name), iLeft, iTop;
     var bChange = iMonth == null ? false : true;
     iMonth = iMonth == null ? new Date().getMonth() : iMonth;
     iYear  = iYear  == null ? new Date().getFullYear() : iYear;
     cFieldAux = cField.name;
     if( typeof(aWeek) == "undefined" || aWeek.length < 7) 
       aWeek = new Array('Dom','Seg','Ter','Qua','Qui','Sex','Sab');
     if( typeof(aMonth) == "undefined" || aMonth.length < 12) 
       aMonth = new Array('Janeiro','Fevereiro','Março','Abril','Maio','Junho','Julho','Agosto','Setembro','Outubro','Novembro','Dezembro');

     document.onmouseup = closeCalendar;
     DATEDIV.style.left=c.x;
     DATEDIV.style.top=c.y + cField.offsetHeight;
     MakeCalendar(new Date().getDate(), iMonth,iYear,aWeek,aMonth,null,null,null,
                  cFieldAux,1,bChange);

     
     iLeft = c.x;
     iTop = c.y + cField.offsetHeight;

     frameM = document.getElementById("iFrameMenu");

     frameM.style.top    =  DATEDIV.style.top    ;
     frameM.style.left   =  DATEDIV.style.left   ;
     frameM.style.width  =  172 ;
     frameM.style.height =  155 ;
     DATEDIV.style.visibility="visible";
     
     frameM.style.visibility="visible";

     vwShowWindowedObjects(false,iLeft,iTop,iLeft+170,iTop+125)
   }
}
function vwShowWindowedObjects(show, DivStartLeft, DivStartTop, DivEndLeft, DivEndTop)
{
  var isIE = navigator.appName.indexOf("Microsoft") != -1;
  var windowedObjectTags = new Array("DIV", "SELECT", "IFRAME", "OBJECT", "APPLET","EMBED");
  var windowedObjects = new Array();
  var j=0;

  if (isIE == true)
  {
    for (var i=0; i<windowedObjectTags.length; i++)
    {
      var tmpTags = document.all.tags(windowedObjectTags[i]);
        if (tmpTags.length > 0)
          for (var k=0; k<tmpTags.length; k++)
          {
                if (tmpTags[k].id.toUpperCase().substr(0,6) != "MYMENU") 
                if (tmpTags[k].id.toUpperCase().substr(0,9) != "CMSUBMENU") 
                if (tmpTags[k].id.toUpperCase().substr(0,10) != "IFRAMEMENU")
                if (tmpTags[k].id != "DATEDIV") 
                    windowedObjects[j++] = tmpTags[k];
          }  
    }
  }	
  else 
  {
    for (var i=0; i<windowedObjectTags.length; i++) 
    {
      var tmpTags = document.getElementsByTagName(windowedObjectTags[i]);
      if (tmpTags.length > 0)
        for (var k=0; k<tmpTags.length; k++)
          if (tmpTags[k].id != "DATEDIV")
            windowedObjects[j++] = tmpTags[k];
    }
  }
  for (var i=0; i<windowedObjects.length; i++)
  {
    if (windowedObjects[i].id != "")
    {
      var topInt = getAnchorPosition(windowedObjects[i].id).y;
      var leftInt = getAnchorPosition(windowedObjects[i].id).x;
      var widthObject = document.getElementById(windowedObjects[i].id).offsetWidth;
      var heightObject = document.getElementById(windowedObjects[i].id).offsetHeight;
      var rightInt = leftInt + parseInt(widthObject);
      var bottomInt = topInt + parseInt(heightObject);

      if ((((leftInt >= DivStartLeft) && (leftInt <= DivEndLeft)) | 
         ((rightInt >= DivStartLeft) && (rightInt <= DivEndLeft)) | 
         ((leftInt <= DivStartLeft) && (rightInt >= DivStartLeft))) && 
         (((topInt >= DivStartTop) && (topInt <= DivEndTop)) | 
         ((bottomInt >= DivStartTop) && (bottomInt <= DivEndTop))))
          windowedObjects[i].style.visibility = show ? "visible" : "hidden";
    }      
  }
}
function closeCalendar()
{
   var iLeft = parseInt(DATEDIV.style.left.substring(0,DATEDIV.style.left.length - 2));
   var iTop  = parseInt(DATEDIV.style.top.substring(0,DATEDIV.style.top.length - 2));
   DATEDIV.style.visibility='hidden';

   frameM = document.getElementById("iFrameMenu");
   frameM.style.visibility='hidden';
   
   vwShowWindowedObjects(true,iLeft,iTop,iLeft+170,iTop+125)
}