var dayA = new Array();
var monthA = new Array();
var yearA = new Array();
var targetfield;
monthA[0]="January";
monthA[1]="February";
monthA[2]="March";
monthA[3]="April";
monthA[4]="May";
monthA[5]="June";
monthA[6]="July";
monthA[7]="August"; 
monthA[8]="September"; 
monthA[9]="October";
monthA[10]="November"; 
monthA[11]="December";
for(var i=1;i<=31;i++) 
{ 
dayA[i]=i; 
} 
for(var i=0;i<10;i++) 
{ 
yearA[i]=gy(i); 
} 
function gm(num) { 
 var mydate = new Date(); 
 mydate.setDate(1); 
 mydate.setMonth(num-1); 
 var datestr = "" + mydate; 
 return datestr.substring(4,7); 
} 
function gy(num) { 
  var mydate = new Date(); 
  return (eval(mydate.getYear()) - 4 + num); 
} 
function ud(mon) { 
  var i = mon.selectedIndex; 
  if(mon.options[i].value == "2") { 
    document.forms[0].day.options[30] = null; 
    document.forms[0].day.options[29] = null; 
    var j = document.forms[0].year.selectedIndex; 
    var year = eval(document.forms[0].year.options[j].value); 
    if ( ((year%400)==0) || (((year%100)!=0) && ((year%4)==0)) ) { 
      if (document.forms[0].day.options[28] == null) { 
        document.forms[0].day.options[28] = new Option("29"); 
        document.forms[0].day.options[28].value = "29"; 
      } 
    } else { 
      document.forms[0].day.options[28] = null; 
    } 
  } 
  if(mon.options[i].value == "1" || 
     mon.options[i].value == "3" || 
     mon.options[i].value == "5" || 
     mon.options[i].value == "7" || 
     mon.options[i].value == "8" || 
     mon.options[i].value == "10" || 
     mon.options[i].value == "12") 
  { 
    if (document.forms[0].day.options[28] == null) { 
      document.forms[0].day.options[28] = new Option("29"); 
      document.forms[0].day.options[28].value = "29"; 
    } 
    if (document.forms[0].day.options[29] == null) { 
      document.forms[0].day.options[29] = new Option("30"); 
      document.forms[0].day.options[29].value = "30"; 
    } 
    if (document.forms[0].day.options[30] == null) { 
      document.forms[0].day.options[30] = new Option("31"); 
      document.forms[0].day.options[30].value = "31"; 
    } 
  } 
  if(mon.options[i].value == "4" || 
     mon.options[i].value == "6" || 
     mon.options[i].value == "9" || 
     mon.options[i].value == "11") 
  { 
    if (document.forms[0].day.options[28] == null) { 
      document.forms[0].day.options[28] = new Option("29"); 
      document.forms[0].day.options[28].value = "29"; 
    } 
    if (document.forms[0].day.options[29] == null) { 
      document.forms[0].day.options[29] = new Option("30"); 
      document.forms[0].day.options[29].value = "30"; 
    } 
    document.forms[0].day.options[30] = null; 
  } 
  if (document.forms[0].day.selectedIndex == -1) 
    document.forms[0].day.selectedIndex = 0; 
} 
function showdate() { 
  var i = document.forms[0].month.selectedIndex; 
  var j = document.forms[0].day.selectedIndex; 
  var k = document.forms[0].year.selectedIndex; 
  alert(document.forms[0].day.options[j].value + "/" + 
        document.forms[0].month.options[i].value + "/" + 
        document.forms[0].year.options[k].value) 
} 
function opencalendar(temptargetfield) {
var field= eval("document.forms[0]." + temptargetfield);
targetfield = "opener.document.forms[0]." + temptargetfield + ".value";
var mydate;
if(field.value == "" || field.value.length < 10 || field.value.length >10)
{
mydate = new Date(); 
}
else
{
var tempday = field.value.charAt(0).toString() + field.value.charAt(1).toString();
var tempmonth = (parseInt((parsemonth(field.value.charAt(3).toString(), field.value.charAt(4).toString())))-1).toString();
var tempyear = (parseInt(field.value.charAt(6).toString() + field.value.charAt(7).toString() + field.value.charAt(8).toString() + field.value.charAt(9).toString())).toString();
mydate = new Date(tempyear, tempmonth, tempday ); 
}
for(var i=0;i<=monthA.length;i++) 
{ 
	if (mydate.getMonth() == i) 
	{
		month = i+1;
	}
} 
year = mydate.getYear();
//yearA[4].toString();
calwin = window.open("","calwin","resizable,status,height=280,width=210"); 
calccal(calwin,month,year,targetfield); 
} 
function parsemonth(tmpm1, tmpm2)
{
var m1;
var m2;
var m3;
if (tmpm1 == "0")
{
m1 = "";
}
else
{
m1 = "1";
}
m2 = tmpm2;
m3 = m1.toString() + m2.toString();
return m3;
}
function calccal(targetwin,month,year,targetfield) { 
  var monthname = new Array(12); 
  monthname[0] = "Januari"; 
  monthname[1] = "Februari"; 
  monthname[2] = "Maart"; 
  monthname[3] = "April"; 
  monthname[4] = "Mei"; 
  monthname[5] = "Juni"; 
  monthname[6] = "Juli"; 
  monthname[7] = "Augustus"; 
  monthname[8] = "September"; 
  monthname[9] = "October"; 
  monthname[10] = "November"; 
  monthname[11] = "December"; 
  var endday = calclastday(eval(month),eval(year)); 
  mystr = month + "/01/" + year; 
  mydate = new Date(mystr); 
  firstday = mydate.getDay(); 
  var cnt = 0; 
  var day = new Array(6); 
  for (var i=0; i<6; i++) 
    day[i] = new Array(7); 
  for (var r=0; r<6; r++) 
  { 
    for (var c=0; c<7; c++) 
    { 
      if ((cnt==0) && (c!=firstday)) 
        continue; 
      cnt++; 
      day[r][c] = cnt; 
      if (cnt==endday) 
        break; 
    } 
    if (cnt==endday) 
      break; 
  } 
  targetwin.document.write("<TABLE><TR VALIGN=TOP><FORM>"); 
  var prevyear = eval(year) - 1; 
  targetwin.document.write("<TD><font face=verdana size=2><INPUT TYPE=BUTTON NAME=prevyearbutton VALUE='<<'"+ 
   " onclick='document.close();opener.calccal(opener.calwin,"+month+","+prevyear+",\""+targetfield+"\")'></font></TD>"); 
  var prevmonth = calcprevmonth(month); 
  var prevmonthyear = calcprevyear(month,year); 
  targetwin.document.write("<TD><font face=verdana size=2><INPUT TYPE=BUTTON NAME=prevmonthbutton VALUE='&nbsp;<&nbsp;'"+ 
   " onclick='document.close();opener.calccal(opener.calwin,"+prevmonth+","+prevmonthyear+",\""+targetfield+"\")'></font></TD>"); 
  targetwin.document.write("<TD COLSPAN=3 ALIGN=CENTER>"); 
  var index = eval(month) - 1; 
  targetwin.document.write("<font face=verdana size=2><B>" + monthname[index] + " " + year + "</B></font></TD>"); 
  var nextmonth = calcnextmonth(month); 
  var nextmonthyear = calcnextyear(month,year); 
  targetwin.document.write("<TD><font face=verdana size=2><INPUT TYPE=BUTTON NAME=nextmonthbutton VALUE='&nbsp;>&nbsp;'"+ 
   " onclick='document.close();opener.calccal(opener.calwin,"+nextmonth+","+nextmonthyear+",\""+targetfield+"\")'></font></TD>"); 
  var nextyear = eval(year) + 1; 
  targetwin.document.write("<TD><font face=verdana size=2><INPUT TYPE=BUTTON NAME=nextyearbutton VALUE='>>'"+ 
   " onclick='document.close();opener.calccal(opener.calwin,"+month+","+nextyear+",\""+targetfield+"\")'></font></TD>"); 
  targetwin.document.write("</TR><TR>"); 
  targetwin.document.write("<TD><font face=verdana size=2>Zo</font></TD>"); 
  targetwin.document.write("<TD bgcolor=red><font face=verdana size=2 color=white>Ma</font></TD>"); 
  targetwin.document.write("<TD><font face=verdana size=2 >Di</font></TD>"); 
  targetwin.document.write("<TD><font face=verdana size=2>Wo</font></TD>"); 
  targetwin.document.write("<TD><font face=verdana size=2>Do</font></TD>"); 
  targetwin.document.write("<TD bgcolor=red><font face=verdana size=2 color=white>Vr</font></TD>"); 
  targetwin.document.write("<TD><font face=verdana size=2 >Za</font></TD>"); 
  targetwin.document.write("</TR>"); 
  targetwin.document.write("<TR><TD COLSPAN=7><HR NOSHADE></TD></TR>"); 
  var selectedmonth = eval(month) - 1; 
  var today = new Date(); 
  var thisyear = today.getYear(); 
  var selectedyear = eval(year) - thisyear + 4; 
  var conditionalpadder = ""; 
  for(r=0; r<6; r++) 
  { 
   targetwin.document.write("<TR>"); 
   for(c=0; c<7; c++) 
   { 
    targetwin.document.write("<TD><font face=verdana size=2>"); 
    if(day[r][c] != null) { 
      if (day[r][c] < 10) 
        conditionalpadder = "&nbsp;" 
      else 
        conditionalpadder = ""; 
      targetwin.document.write("<INPUT TYPE=BUTTON NAME="+day[r][c]+         " VALUE=" + conditionalpadder + day[r][c] + conditionalpadder +  
	" onClick=\"window.close();" +targetfield+"='"+(day[r][c]).toString()+ "/"+ (selectedmonth+1).toString() + "/" + yearA[selectedyear.toString()]+"';\";>");    } 
    targetwin.document.write("</font></TD>"); 
   } 
   targetwin.document.write("</TR>"); 
  } 
  targetwin.document.write("</FORM></TABLE>"); 
} 
function calclastday(month,year) { 
  if ((month==2) && ((year%4)==0)) 
    return 29; 
  if ((month==2) && ((year%4)!=0)) 
    return 28; 
  if ((month==1) || (month == 3) || (month == 5) || (month == 7) || 
      (month==8) || (month == 10) || (month ==12)) 
    return 31; 
  return 30; 
} 
function calcnextmonth(month) { 
  if (month=="12") 
    return "1"; 
  else 
    return (eval(month)+1); 
} 
function calcnextyear(month,year) { 
  if (month=="12") 
    return (eval(year)+1); 
  else 
    return (year); 
} 
function calcprevmonth(month) { 
  if (month=="1") 
    return "12"; 
  else 
    return (eval(month)-1); 
} 
function calcprevyear(month,year) { 
  if (month=="1") 
    return (eval(year)-1); 
  else 
    return (year); 
} 
function changein(id) {
        if (document.layers) document.layers[id].visibility = "show"
        else if (document.getElementById) document.getElementById(id).style.visibility = "visible"
        else if (document.all && !(document.getElementById)) document.all(id).style.visibility = "visible"
}
function changeout(id) {
        if (document.layers) document.layers[id].visibility = "hide"
        else if (document.getElementById) document.getElementById(id).style.visibility = "hidden"
        else if (document.all && !(document.getElementById)) document.all(id).style.visibility = "hidden"
}
function changeStackOrderin(id) {
 	document.getElementById(id).style.zIndex = "3"
}
function nothing(){
}
function retarget()
{	var linkobj = document.links;
	var hnaam = document.location.hostname;
	for (i=0; i < linkobj.length;)
	{	if(linkobj[i].hostname.indexOf(hnaam))
		{	linkobj[i].target ="_blank";
		}
		i++;
	}
}
// -->
var loc = location.pathname
var DatabasePath = loc.substr(0, loc.indexOf('.nsf')+4)
function tbButtonOvr() {
var image;
  image = event.srcElement;
  if (image.className == "buttonNor") {
    image.className = "buttonOvr";
    }
}
function tbButtonOut() {
var image;
  image = event.srcElement;
  if (image.className == "buttonOvr") {
    image.className = "buttonNor";
    }
}
function tbButtonDown() {
var image;
  image = event.srcElement;
  if (image.className == "buttonOvr") {
    image.className = "buttonPress";
    }
} 
function tbButtonUp() {
var image;
  image = event.srcElement;
  if (image.className == "buttonPress") {
    image.className = "buttonOvr";
    }
}
//background text color
function setHilite() {
  var arr = showModalDialog( DatabasePath+"/jslibs/$file/selcolor.htm?openelement",
   "", "font-family:Verdana; font-size:12; dialogWidth:35em; dialogHeight:42em" );
  if (arr != null) {
  document.forms[0].DHTMLEdit1.ExecCommand(DECMD_SETBACKCOLOR,OLECMDEXECOPT_DODEFAULT, arr);
  }
}
//Table function
function InsertTable() {
  var pVar = document.forms[0].ObjTableInfo;
  var args = new Array();
  var arr = null;
//Default waarden geven  
pVar.NumRows = 1;
pVar.NumCols = 2
pVar.TableAttrs= "border=1 cellPadding=1 cellSpacing=1 width=100%"
pVar.CellAttrs= "valign=top"
   // Display table information dialog
  args["NumRows"] = pVar.NumRows;
  args["NumCols"] = pVar.NumCols;
  args["TableAttrs"] = pVar.TableAttrs;
  args["CellAttrs"] = pVar.CellAttrs;
  args["Caption"] = pVar.Caption;
  
  arr = null;
  
  arr = showModalDialog( DatabasePath+"/jslibs/$file/instable.htm?openelement",
  args, "font-family:Verdana; font-size:12; dialogWidth:36em; dialogHeight:25em");
  if (arr != null) {
   // Initialize table object
    for ( elem in arr ) {
      if ("NumRows" == elem && arr["NumRows"] != null) {
        pVar.NumRows = arr["NumRows"];
      } else if ("NumCols" == elem && arr["NumCols"] != null) {
        pVar.NumCols = arr["NumCols"];
      } else if ("TableAttrs" == elem) {
        pVar.TableAttrs = arr["TableAttrs"];
      } else if ("CellAttrs" == elem) {
        pVar.CellAttrs = arr["CellAttrs"];
      } else if ("Caption" == elem) {
        pVar.Caption = arr["Caption"];
      }
    }
    document.forms[0].DHTMLEdit1.ExecCommand(DECMD_INSERTTABLE,OLECMDEXECOPT_DODEFAULT, pVar);  
  }
}
//Functions to open image/attachment/html windows
function imageForm() {
window.open(DatabasePath+"/webimagefile?openform" , "UploadImage" , "height=400, width=400, status");
}
function schaalForm() {
window.open(DatabasePath+"/UploadPhoto?openform" , "UploadImage" , "height=600, width=800, status");
}
function showHTML() {
window.open(DatabasePath+"/DisplayHTML?openform" , "DisplayHTML" , "height=450, width=600, status");
}
function attachForm() {
window.open(DatabasePath+"/attachment?openform" , "UploadFile" , "height=300, width=400, status");
}
//functions to get and set data
function loadEditor() {
var content = document.forms[0].Body.value;
if (content.charAt(0) == '[')
content = content.substr(1,content.length-2);
//FIND OUT CURRENT SERVER NAME AND REPLACE "../" IN URL
var svrname = location.hostname;
newstring = "http://" + svrname+DatabasePath+"/"; 
contentArray=content.split("../"); 
content=contentArray.join( newstring ) ; 
/////////// 
document.forms[0].DHTMLEdit1.DOM.body.innerHTML =
content;
document.forms[0].DHTMLEdit1.focus();
}
function submitHTML() {
var theData =
document.forms[0].DHTMLEdit1.DOM.body.innerHTML;
if (theData.charAt(0) =='<') {
var data =theData;
//REPLACE CURRENT SERVER NAME WITH "../" IN URL 
var svrname = location.hostname;
newstring = "http://" + svrname + DatabasePath+"/"; 
contentArray=data.split( newstring ); 
data=contentArray.join( "../" ) ; 
//////////// 
}
else{
var data = "<p>"+theData+"</p>"
}
var content = document.getElementById("rtStore");
content.value = "["+data+"]";
}
function insertChar(charTyp) {
	var sel = document.forms[0].DHTMLEdit1.DOM.selection;
	i = document.forms[0].elements[charTyp].selectedIndex;
	text = document.forms[0].elements[charTyp].options[i].text;
	range = sel.createRange();
	range.pasteHTML(text)
	document.DHTMLEdit1.focus();
}
function strikeThru() {
	var sel = document.forms[0].DHTMLEdit1.DOM.selection;
	range = sel.createRange();
	range.pasteHTML("<strike>" + range.htmlText + "</strike>")
	document.DHTMLEdit1.focus();
}
function superText() {
	var sel = document.forms[0].DHTMLEdit1.DOM.selection;
	range = sel.createRange();
	range.pasteHTML("<sup>" + range.htmlText + "</sup>")
	document.DHTMLEdit1.focus();
}
function subText() {
	var sel = document.forms[0].DHTMLEdit1.DOM.selection;
	range = sel.createRange();
	range.pasteHTML("<sub>" + range.htmlText + "</sub>")
	document.DHTMLEdit1.focus();
}
function hr() {
var sel = document.forms[0].DHTMLEdit1.DOM.selection;
range = sel.createRange();
range.execCommand("InsertHorizontalRule")
document.all.DHTMLEdit1.focus();
}

