// JScript File

function AddListener(p_objElement, p_strType, p_fun) {
    if (p_objElement.addEventListener) p_objElement.addEventListener(p_strType, p_fun, false);
    else if (p_objElement.attachEvent) p_objElement.attachEvent("on" + p_strType, p_fun);
}

function RemoveValidationError(p_objElement) {
    //Remove exisiting validation error
    var l_objValidationError = document.getElementById("divValidationError" + p_objElement.name);
	while (l_objValidationError != null) {
	    l_objValidationError.parentNode.removeChild(l_objValidationError);
	    l_objValidationError = document.getElementById("divValidationError" + p_objElement.name);
	}
}

function AddValidationError(p_objElement, p_strMessage) {
    if (p_strMessage == null) {
        p_strMessage = p_objElement.getAttribute("validation", 0);
    }
    
    var l_intLeft = document.documentElement.offsetLeft;
    var l_intTop = document.documentElement.offsetTop;
	var l_objElement = p_objElement;
	if (l_objElement.offsetParent) {
		l_intLeft = l_objElement.offsetLeft;
		l_intTop = l_objElement.offsetTop;
		while (l_objElement = l_objElement.offsetParent)
		{
			l_intLeft += l_objElement.offsetLeft;
			l_intTop += l_objElement.offsetTop;
		};
	};
	//If the element that is validated is contained within a table cell, display the validation dialog at the end of the row
	var l_objElement = p_objElement;
    if (l_objElement.parentNode != null && l_objElement.parentNode.tagName != null && l_objElement.parentNode.tagName.toLowerCase() == "td") {
        if (l_objElement.offsetWidth == 0) l_objElement = l_objElement.parentNode.parentNode;
    }
    l_intLeft += l_objElement.offsetWidth;
    
    RemoveValidationError(p_objElement);
	
    var l_objDiv = document.createElement("div");
    with (l_objDiv) {
        id = "divValidationError" + p_objElement.name;
        className = "ValidationError";
        with (style) {
            whiteSpace = "nowrap";
            margin = "0 4";
            padding = "1 4";
            backgroundColor = "#C00";
            border = "#C00 1px solid";
            fontWeight = "bold";
            color = "#FFF";
            position = "absolute";
            left = l_intLeft + "px";
            top = l_intTop + "px";
            filter = "alpha(opacity=75)";
            opacity = 0.75;
        }
        innerHTML = "<--&nbsp;" + p_strMessage;
    }
    document.body.appendChild(l_objDiv);
    AddListener(p_objElement, "blur", function () { ValidateElement(p_objElement); });
    return l_objDiv;
}

function ValidateElement(p_objElement) {
    if (p_objElement.name.length==0) return true;
	if (p_objElement.tagName.toLowerCase() == "input" && (p_objElement.type == 'checkbox' || p_objElement.type == 'image')) {
	    if (p_objElement.type == 'checkbox' && p_objElement.checked && (p_objElement.value == null || p_objElement.value.length == 0))
	        p_objElement.value = "true";
	    return true;
	}
	else if (p_objElement.tagName.toLowerCase() == "input" && p_objElement.type == 'radio') {
		var l_arrRadio = document.getElementsByName(p_objElement.name);
		var l_intLength = l_arrRadio.length;
		var l_blnChecked = false;
		for (var l_intIndex = 0; l_intIndex < l_intLength; l_intIndex++) {
			if (l_arrRadio[l_intIndex].checked) {
				l_blnChecked = true;
				break;
			}
		}
		var l_strValidation = p_objElement.getAttribute("validation", 0);
		if (l_strValidation != null && l_strValidation.indexOf("Verplicht ") == 0 && !l_blnChecked) {
		    AddValidationError(p_objElement);
		    return false;
		}
	} else {
	    var l_strValue = p_objElement.value;
	    var l_strValidation = p_objElement.getAttribute("validation", 0);
	    if (l_strValidation != null && l_strValidation.indexOf("Verplicht ") == 0 && l_strValue.length == 0) {
	        AddValidationError(p_objElement);
	        return false;
	    }
	    var l_strMask = null;
	    if (p_objElement.className == "email") l_strMask = "^\\S+@.+\\.(biz|com|net|edu|mil|gov|org|.{2})$";
	    else if (p_objElement.className == "getal") l_strMask = "^-?\\d+$";
	    else if (p_objElement.className == "tinyint") l_strMask = "^-?\\d+$";
	    else if (p_objElement.className == "smallint") l_strMask = "^-?\\d+$";
	    else if (p_objElement.className == "int") l_strMask = "^-?\\d+$";
	    else if (p_objElement.className == "bigint") l_strMask = "^-?\\d+$";
	    else if (p_objElement.className == "datum") l_strMask = "^\\d{1,2}-\\d{1,2}-(\\d{2}|\\d{4})$";
	    else if (p_objElement.className == "postcode") l_strMask = "^\\d{4}\\s?[a-z]{2}$";
	    else if (p_objElement.className == "huisnummer") l_strMask = "^\\d+\\s?[a-z]?$";
	    else if (p_objElement.className == "guid") l_strMask = "^\\{?[a-z0-9]{8}-[a-z0-9]{4}-[a-z0-9]{4}-[a-z0-9]{4}-[a-z0-9]{12}\\}?$";
	    if (l_strMask != null && l_strValue.length > 0) {
	        var l_objRegExp = new RegExp(l_strMask, "gi");
	        if (!l_objRegExp.test(l_strValue)) {
	            AddValidationError(p_objElement, "Ongeldige " + ((l_strMask == "^-?\\d+$") ? "getal" : p_objElement.className) + " notatie");
	            return false;
	        } else if (l_strMask == "^-?\\d+$") {
	            var l_intValue = parseInt(l_strValue);
	            var l_intMinValue = null;
	            var l_intMaxValue = null;
	            if (p_objElement.className == "tinyint") {
	                l_intMinValue = 0;
	                l_intMaxValue = Math.pow(Math.pow(2, 8), 1);
	            } else if (p_objElement.className == "smallint") {
	                l_intMinValue = -1 * (Math.pow(Math.pow(2, 8), 2) / 2);
	                l_intMaxValue = (Math.pow(Math.pow(2, 8), 2) / 2) - 1;
	            } else if (p_objElement.className == "int") {
	                l_intMinValue = -1 * (Math.pow(Math.pow(2, 8), 4) / 2);
	                l_intMaxValue = (Math.pow(Math.pow(2, 8), 4) / 2) - 1;
	            } else if (p_objElement.className == "bigint") {
	                l_intMinValue = -1 * (Math.pow(Math.pow(2, 8), 8) / 2);
	                l_intMaxValue = (Math.pow(Math.pow(2, 8), 8) / 2) - 1;
	            }
	            if (l_intMinValue != null && l_intValue < l_intMinValue) {
	                AddValidationError(p_objElement, "Ongeldige getal waarde (< "+ l_intMinValue + ")");
	                return false;
	            } else if (l_intMaxValue != null && l_intValue > l_intMaxValue) {
	                AddValidationError(p_objElement, "Ongeldige getal waarde (> "+ l_intMaxValue + ")");
	                return false;
	            }
	        }
	    }
	}
	
	RemoveValidationError(p_objElement);
	
	return true;
}

function ValidateArray(p_arrElement) {
    var l_blnReturnValue = true;
	var l_intLength = p_arrElement.length;
	for (var l_intIndex = 0; l_intIndex < l_intLength; l_intIndex++) {
		if (!ValidateElement(p_arrElement[l_intIndex])) {
		    if (l_blnReturnValue) p_arrElement[l_intIndex].focus();
		    l_blnReturnValue = false;
		}
	}
	return l_blnReturnValue;
}

function Validate(p_objEvent, p_objElement, p_objForm) {
    if (p_objEvent == null) p_objEvent = event;
    if (p_objElement == null) {
        p_objElement = p_objEvent.srcElement;
        if (p_objElement == null) p_objElement = p_objEvent.target;
    }
    if (p_objForm == null) {
        var l_objParent = p_objElement.parentNode;
        while (l_objParent != null && l_objParent.tagName != null && l_objParent.tagName.toLowerCase() != "form") {
            l_objParent = l_objParent.parentNode;
        }
        if (l_objParent != null &&  l_objParent.tagName != null && l_objParent.tagName.toLowerCase() == "form") p_objForm = l_objParent;
    }
    if (p_objForm != null) {
        var l_arrDiv = document.getElementsByTagName("div");
        var l_intLength = l_arrDiv.length;
	    for (var l_intIndex = l_intLength - 1; l_intIndex >= 0; l_intIndex--) {
		    var l_objElement = l_arrDiv[l_intIndex];
		    if (l_objElement.className == "ValidationError") {
		        l_objElement.parentNode.removeChild(l_objElement)
		    }
        }
        var l_blnReturn = true;
        if (!ValidateArray(p_objForm.getElementsByTagName("input"))) l_blnReturn = false;
        if (!ValidateArray(p_objForm.getElementsByTagName("select"))) l_blnReturn = false;
        if (!ValidateArray(p_objForm.getElementsByTagName("textarea"))) l_blnReturn = false;
        return l_blnReturn;
    }
}

function GetElementNode(p_objNode) {
    //In firefox, an enter (CrLf) used for markup of html is considered a textnode
    //Skip these nodes
    while (p_objNode != null && p_objNode.nodeType != 1) {
        p_objNode = p_objNode.nextSibling;
    }
    return p_objNode;
}

function IsCaptionNode(p_objNode) {
    var l_objNode = p_objNode.firstChild;
    if (l_objNode != null) {
        if (l_objNode.nodeType == 3) {
            l_objNode = l_objNode.nextSibling;
        }
        if (l_objNode != null && l_objNode.tagName != null) {
            return false;
        }
    }
    return true;
}

function ResizeLabels(p_objNode) {
    var l_objParentNode = p_objNode.parentNode;
    var l_intWidth = 1;
    //First calculate the label length of the largest label
    for (var l_intIndex = 0; l_intIndex < l_objParentNode.childNodes.length; l_intIndex++) {
        //For all form elements in form
        var l_objChildNode = l_objParentNode.childNodes[l_intIndex];
        if (l_objChildNode.nodeType==1 && l_objChildNode.tagName.toLowerCase() == "div" && l_objChildNode.style.clear != "left") {
            //If the element is a div
            var l_objFirstChild = GetElementNode(l_objChildNode.firstChild);
            var l_objSecondChild = GetElementNode(l_objFirstChild.nextSibling);
            l_objFirstChild.style.width = "1px";
            if (NodeIsFirstOnLine(l_objChildNode) && IsCaptionNode(l_objFirstChild) && l_objSecondChild != null && l_objSecondChild.style.clear != "left" && l_objFirstChild.scrollWidth > l_intWidth) {
                l_intWidth = l_objFirstChild.scrollWidth;
            }
            l_objFirstChild.style.width = l_objFirstChild.scrollWidth;
        }
    }
    //Then set all labels to this width
    for (var l_intIndex = 0; l_intIndex < l_objParentNode.childNodes.length; l_intIndex++) {
        var l_objChildNode = l_objParentNode.childNodes[l_intIndex];
        if (l_objChildNode.nodeType==1 && l_objChildNode.tagName.toLowerCase() == "div" && l_objChildNode.style.clear != "left") {
            var l_objFirstChild = GetElementNode(l_objChildNode.firstChild);
            var l_objSecondChild = GetElementNode(l_objFirstChild.nextSibling);
            if (NodeIsFirstOnLine(l_objChildNode) && IsCaptionNode(l_objFirstChild) && l_objSecondChild != null && l_objSecondChild.style.clear != "left") {
                l_objFirstChild.style.width = l_intWidth;
            }
        }
    }
    return true;
}

function GetRadioValue(p_strName) {
    var l_objRadio = document.getElementsByName(p_strName);
    var l_intLength = l_objRadio.length;
    if (l_intLength == null) {
        return l_objRadio.checked ? l_objRadio.value : null;
    } else {
        for(var l_intIndex = 0; l_intIndex < l_intLength; l_intIndex++) {
            if (l_objRadio[l_intIndex].checked) return l_objRadio[l_intIndex].value;
        }
    }
    return null;
}

function TagNameForType(p_strType) {
    switch (p_strType) {
        case "text":
        case "checkbox":
        case "radio":
        case "file":
        case "password":
        case "submit":
            return "input";
        default:
            return p_strType;
    }
    return null;
}

function SetVisibility(p_objEvent, p_strStyle) {
    if (p_strStyle == null) {
        if (p_objEvent == null) p_objEvent = event;
        var l_objElement = p_objEvent.srcElement;
        if (l_objElement == null) l_objElement = p_objEvent.target;
        p_strStyle = l_objElement.value;
    }
    document.getElementById('divCaption').style.visibility = (p_strStyle == 'hidden' || p_strStyle == 'option') ? 'hidden' : 'visible';
    document.getElementById('divName').style.visibility = (p_strStyle == 'option' || p_strStyle == 'label') ? 'hidden' : 'visible';
    document.getElementById('divValue').style.visibility = (p_strStyle == 'checkbox' || p_strStyle == 'file' || p_strStyle == 'label') ? 'hidden' : 'visible';
    document.getElementById('divMaxLength').style.visibility = (p_strStyle == 'text' || p_strStyle == 'password' || p_strStyle == 'select' || p_strStyle == 'textarea') ? 'visible' : 'hidden';
    document.getElementById('divMaxRows').style.visibility = (p_strStyle == 'textarea') ? 'visible' : 'hidden';
    document.getElementById('divWidth').style.visibility = (p_strStyle == 'text' || p_strStyle == 'select' || p_strStyle == 'textarea') ? 'visible' : 'hidden';
    document.getElementById('divRequired').style.visibility = (p_strStyle == 'submit' || p_strStyle == 'dropdown' || p_strStyle == 'hidden' || p_strStyle == 'option' || p_strStyle == 'label') ? 'hidden' : 'visible';
    document.getElementById('divType').style.visibility = (p_strStyle == 'text') ? 'visible' : 'hidden';
}

function GetElement(p_strType, p_strClass, p_strName, p_strId, p_strMaxLength, p_strMaxRows, p_strWidth, p_strValue, p_blnRequired) {
    var l_objElement = null;
    var l_strTagName = TagNameForType(p_strType);
    if (l_strTagName != null) {
        try {
            l_objElement = document.createElement("<" + l_strTagName + " name='" + p_strName + "'>");
        } catch (l_objException) {
            l_objElement = document.createElement(l_strTagName);
            l_objElement.name = p_strName;
        }
        if (p_strId != null) l_objElement.id = p_strId;
        if (l_strTagName == "input") {
            l_objElement.type = p_strType;
            l_objElement.value = p_strValue;
            if ((p_strType == "text" || p_strType == "password") && p_strMaxLength != null && p_strMaxLength.length > 0) {
                l_objElement.maxLength = p_strMaxLength;
            } else if (p_strType == "radio") {
                var l_colElements = document.getElementsByName(p_strName);
                var l_intMaxValue = 0;
                var l_intLength = l_colElements.length;
                for (l_intIndex = 0; l_intIndex < l_intLength; l_intIndex++) {
		            var l_intValue = parseInt(l_colElements.item(l_intIndex).value);
		            if (!isNaN(l_intValue) && l_intValue > l_intMaxValue) l_intMaxValue = l_intValue;
		        }
                l_objElement.value = ++l_intMaxValue;
            }
        } else if (l_strTagName == "select") {
            if (p_strMaxLength != null && p_strMaxLength.length > 0) {
                l_objElement.size = p_strMaxLength;
            }
            var l_objOption = document.createElement("OPTION");
            l_objOption.value = "";
            l_objOption.text = p_strValue;
			l_objElement.options.add(l_objOption);
        } else if (l_strTagName == "textarea") {
            l_objElement.cols = p_strMaxLength;
            l_objElement.rows = p_strMaxRows;
        }
        if (p_strType != "checkbox" && p_strType != "radio" && p_strWidth != null && p_strWidth.length > 0) {
            l_objElement.style.width = p_strWidth;
        }
        var l_strValidation = "";
        var l_strSeparator = "";
        if (p_blnRequired) {
            l_strValidation += "Verplicht";
            l_strSeparator = " ";
        }
        if (p_strType == "text" && p_strClass != null && p_strClass.length > 0) {
            l_objElement.className = p_strType;
            l_strValidation += l_strSeparator + p_strType;
            l_strSeparator = " ";
        } else if (p_strType == "checkbox" || p_strType == "radio") {
            l_objElement.className = "checkbox";
        }
        if (p_strType != "hidden" && p_strType != "submit" && p_strType != "label" && l_strValidation.length > 0) {
            l_strValidation += l_strSeparator + "veld";
            var l_objAttribute = document.createAttribute("validation");
	        l_objAttribute.value = l_strValidation;
	        l_objElement.attributes.setNamedItem(l_objAttribute);	        
        }
        l_objElement.style.margin = "0px 5px";
    }
    return l_objElement;
}

function GetDiv(p_objContent) {
    var l_objDiv = document.createElement("div");
    l_objDiv.style.styleFloat = "left";
    l_objDiv.style.cssFloat = "left";
    l_objDiv.style.whiteSpace = "nowrap";
    l_objDiv.style.overflow = "visible";
    if (p_objContent!=null) {
        if (typeof(p_objContent) == "string") {
            /*
            l_objDiv.contentEditable = true;
            l_objDiv.onkeyup = function() {
                var l_obj = (event.srcElement != null) ? event.srcElement : event.currentTarget;
                ResizeLabels(l_obj.parentNode);
            };
            */
            if (p_objContent.length == 0) p_objContent = "&nbsp;";
            l_objDiv.innerHTML = p_objContent;
            return l_objDiv;
        }
        l_objDiv.appendChild(p_objContent);
    }
    return l_objDiv;
}

function GetSpaceClaimer() {
    var l_objDiv =  document.createElement("div");
    l_objDiv.style.clear = "left";
    var l_objContent = document.createComment("");
    l_objDiv.appendChild(l_objContent);
    return l_objDiv;
}

function NodeIsSpaceClaimer(p_objNode) {
    if (p_objNode == null) return false;
    return (p_objNode.tagName.toLowerCase() == "div" && p_objNode.style.clear == "left");                
}

function NodeIsFirstOnLine(p_objNode) {
    if (p_objNode == null) return false;
    var l_objPreviousSibling = p_objNode.previousSibling;
    while (l_objPreviousSibling != null && l_objPreviousSibling.nodeType != 1) {
        l_objPreviousSibling = l_objPreviousSibling.previousSibling;
    }
    if (l_objPreviousSibling == null) return true;
    return NodeIsSpaceClaimer(l_objPreviousSibling);
}

function NodeIsLastOnLine(p_objNode) {
    if (p_objNode != null) {
        var l_objNextSibling = p_objNode.nextSibling;
        while (l_objNextSibling != null && l_objNextSibling.nodeType != 1) {
            l_objNextSibling = l_objNextSibling.nextSibling;
        }
        if (l_objNextSibling == null) return true;
        else if (l_objNextSibling.tagName.toLowerCase() == "div" && l_objNextSibling.style.clear == "left") {
            return true;
        }
    }
    return false;
}

function SelectForNode(p_objNode) {
    if (p_objNode != null) {
        var l_objDiv = p_objNode.firstChild;
        if (l_objDiv.firstChild == null || l_objDiv.firstChild.nodeType == 3) {
            //Label div
            l_objDiv = l_objDiv.nextSibling;
        }
        if (l_objDiv.style.clear != "left") {
            var l_objElement = l_objDiv.firstChild;
            if (l_objElement.tagName.toLowerCase() == "select") {
                return l_objElement;
            }
        }
    }
    return null;
}

function Remove() {
    var l_objSelectedNode = GetSelected();
    if (l_objSelectedNode != null) {
        var l_strType = GetRadioValue("type");
        if (l_strType == "option") {
            var l_objSelect = SelectForNode(l_objSelectedNode);
            if (l_objSelect != null && l_objSelect.selectedIndex > 0) {
                var l_intSelectedIndex = l_objSelect.selectedIndex;
                l_objSelect.options.remove(l_intSelectedIndex);
                if (l_intSelectedIndex < l_objSelect.options.length) {
                    l_objSelect.selectedIndex = l_intSelectedIndex;
                }
                return;
            }
        }
        var l_blnNodeIsFirstOnLine = NodeIsFirstOnLine(l_objSelectedNode);
        var l_blnNodeIsLastOnLine = NodeIsLastOnLine(l_objSelectedNode);
        var l_objNextSibling = l_objSelectedNode.nextSibling;
        while (l_objNextSibling != null && (l_objNextSibling.nodeType != 1 || NodeIsSpaceClaimer(l_objNextSibling))) {
            l_objNextSibling = l_objNextSibling.nextSibling;
        }
        var l_objPreviousSibling = l_objSelectedNode.previousSibling;
        while (l_objPreviousSibling != null && l_objPreviousSibling.nodeType != 1) {
            l_objPreviousSibling = l_objPreviousSibling.previousSibling;
        }
        while (l_objPreviousSibling != null && NodeIsSpaceClaimer(l_objPreviousSibling)) {
            var l_objDeleteNode = l_objPreviousSibling;
            l_objPreviousSibling = l_objPreviousSibling.previousSibling;
            while (l_objPreviousSibling != null && l_objPreviousSibling.nodeType != 1) {
                l_objPreviousSibling = l_objPreviousSibling.previousSibling;
            }
            if (l_blnNodeIsLastOnLine) l_objDeleteNode.parentNode.removeChild(l_objDeleteNode);
        }
        l_objSelectedNode.parentNode.removeChild(l_objSelectedNode);
        l_objSelectedNode = l_objNextSibling != null ? l_objNextSibling : l_objPreviousSibling;
        if (l_objSelectedNode != null) SelectFormElement(null, l_objSelectedNode, false);
    }
}

function Add() {
    var l_objParentNode = (l_objSelectedNode != null) ? l_objSelectedNode.parentNode : document.getElementById("divTarget");
    var l_strCaption = document.getElementById("caption").value;
    var l_strWidth = document.getElementById("width").value;
    var l_strValue = document.getElementById("value").value;
    var l_strMaxLength = document.getElementById("maxlength").value;
    var l_strMaxRows = document.getElementById("maxrows").value;
    var l_strName = document.getElementById("_name").value;
    var l_strId = document.getElementById("_id").value;
    var l_blnRequired = document.getElementById("required").checked;
    var l_strType = GetRadioValue("type");
    var l_strClass = document.getElementById("type").value;
    
    var l_objSelectedNode = GetSelected();
    
    if (l_strType == "option") {
        var l_objSelect = SelectForNode(l_objSelectedNode);
        if (l_objSelect != null) {
            var l_intMaxValue = 0;
            var l_intLength = l_objSelect.options.length;
            for (var l_intIndex = 0; l_intIndex < l_intLength; l_intIndex++) {
                var l_intValue = parseInt(l_objSelect.options.item(l_intIndex).value);
                if (!isNaN(l_intValue) && l_intValue > l_intMaxValue) l_intMaxValue = l_intValue;
            }
            var l_objOption = l_objSelect.ownerDocument.createElement("OPTION");
            l_objOption.value = ++l_intMaxValue;
            //l_objOption.text = l_strCaption;
            l_objOption.text = l_strValue;
            l_objOption.selected = true;
		    l_objSelect.options.add(l_objOption);
		    return;
		}
    }

    var l_objDiv = GetDiv();
    var l_objElement = null;
    
    if (l_strType == "label" || l_strCaption.length > 0) {
        var l_objLabelDiv = GetDiv(l_strCaption);
        l_objLabelDiv.className = l_strType == "label" ? "w3s_Label" : "w3s_Caption";
        l_objDiv.appendChild(l_objLabelDiv);
    }
    
    if (l_strType != "label") {
        //Only add an input element when type is not eual to label
        l_objElement = GetElement(l_strType, l_strClass, l_strName, l_strId, l_strMaxLength, l_strMaxRows, l_strWidth, l_strValue, l_blnRequired);
        l_objDiv.appendChild(GetDiv(l_objElement));
    }
    if (l_strType == "radio" && l_strValue.length > 0) {
        var l_objTextDiv = GetDiv(l_strValue);
        l_objTextDiv.className = "w3s_Text";
        //For radio input element, also add a caption for the radio when it is specified
        l_objDiv.appendChild(l_objTextDiv);
    }
    
    l_objDiv.appendChild(GetSpaceClaimer());
    
    if (l_objSelectedNode != null) {
        var l_blnNodeIsFirstOnLine = NodeIsFirstOnLine(l_objSelectedNode);
        l_objParentNode.insertBefore(l_objDiv, l_objSelectedNode);
        if (l_blnNodeIsFirstOnLine) {
            var l_objNewLineDiv = GetSpaceClaimer();
            if (l_objSelectedNode.previousSibling != null) {
                l_objParentNode.insertBefore(l_objNewLineDiv, l_objSelectedNode);
            } else {
                l_objParentNode.insertBefore(l_objNewLineDiv, l_objDiv);
            }
        }
    } else {
        l_objParentNode.appendChild(l_objDiv);
        if (l_objDiv.previousSibling != null) {
            var l_objNewLineDiv = GetSpaceClaimer();
            l_objParentNode.insertBefore(l_objNewLineDiv, l_objDiv);
        }
    }
    
    ResizeLabels(l_objDiv);
    
    if (l_strType == "submit" && l_objElement != null) {
        /*
        var l_objScript = document.createElement("script");
        var l_strScript = AddValidationError.toString() + '\r\n\r\n';
        l_strScript += ValidateElement.toString() + '\r\n\r\n';
        l_strScript += ValidateArray.toString() + '\r\n\r\n';
        l_strScript += Validate.toString() + '\r\n\r\n';
        l_objScript.text = l_strScript;
        l_objParentNode.insertBefore(l_objScript, l_objParentNode.firstChild);
        */
        l_objElement.onclick = "return Validate(event);";
        AddListener(l_objElement, "click", function (event) { Validate(event); });
    }
    
    return l_objDiv;
}

function Set() {
    var l_objSelectedNode = GetSelected();
    if (l_objSelectedNode != null) {
        var l_strType = GetRadioValue("type");
        var l_objSelect = null;
        if (l_strType == "select" || l_strType == "option") {
            l_objSelect = SelectForNode(l_objSelectedNode);
            if (l_strType == "option" && l_objSelect.selectedIndex > -1) {
                //l_objSelect.options[l_objSelect.selectedIndex].text = document.getElementById("caption").value;
                l_objSelect.options[l_objSelect.selectedIndex].text = document.getElementById("value").value;
                return;
            }
        }
        var l_blnIsLastNode = (NodeIsLastOnLine(l_objSelectedNode) && l_objSelectedNode.nextSibling == null);
        Remove();
        l_objSelectedNode = GetSelected();
        if (l_blnIsLastNode && l_objSelectedNode != null) {
            //If the selected node is the last node, toggle the newly selected node to unselected in order to append the new node at the end
            SelectFormElement(null, l_objSelectedNode, true);
        }
        l_objSelectedNode = Add();
        SelectFormElement(null, l_objSelectedNode, false);
        if (l_strType == "select" && l_objSelect != null) {
            var l_objOptions = l_objSelect.options;
            l_objSelect = SelectForNode(l_objSelectedNode);
            var l_intLength = l_objOptions.length;
            for (var l_intIndex = 1; l_intIndex < l_intLength; l_intIndex++) {
                var l_obj = l_objOptions[l_intIndex];
                var l_objOption = l_objSelect.ownerDocument.createElement("OPTION");
                l_objOption.value = l_obj.value;
                l_objOption.text = l_obj.text;
                l_objOption.selected = l_obj.selected;
		        l_objSelect.options.add(l_objOption);
            }
        }
    } else {
        alert("Selecteer eerst een element om de eigenschappen aan te passen.");
    }
}

function TypeForElement(p_objElement) {
    if (p_objElement==null || p_objElement.tagName == null) return "label";
    switch (p_objElement.tagName.toLowerCase()) {
        case "input":
            return p_objElement.type.toLowerCase();
        case "select":
        case "textarea":
            return p_objElement.tagName.toLowerCase();
        default:
            return "label";
    }
    return null;
}

function Get() {
    var l_objSelectedNode = GetSelected();
    if (l_objSelectedNode != null) {
        var l_objDiv = GetElementNode(l_objSelectedNode.firstChild);
        var l_strText = "";
        var l_objElement = GetElementNode(l_objDiv.firstChild);
        var l_strType = TypeForElement(l_objElement);
        if (l_strType == "label") {
            //Label div
            //l_strText = l_objDiv.innerText == null ? l_objDiv.textContent: l_objDiv.innerText;
            l_strText = l_objDiv.innerHTML;
            l_objDiv = GetElementNode(l_objDiv.nextSibling);
        }
        var l_strType = null;
        if (l_objDiv.style.clear != "left") {
            l_objElement = GetElementNode(l_objDiv.firstChild);
            l_strType = TypeForElement(l_objElement);
            if (l_strType == "select" && l_objElement.selectedIndex > 0) {
                l_strType = "option";
                l_objElement = l_objElement.options[l_objElement.selectedIndex];
            }
            
            var l_strValue = null;
            var l_strMaxLength = "";
            var l_strMaxRows = "";
            var l_strWidth = "";
            switch (l_strType) {
                case "text":
                    l_strValue = l_objElement.value;
                    l_strMaxLength = l_objElement.maxLength;
                    if (l_strMaxLength == (Math.pow(2,32)/2)-1 || l_strMaxLength == "-1") l_strMaxLength = "";
                    if (l_objElement.className != null && l_objElement.className.length > 0) {
                        document.getElementById("type").value = l_objElement.className;
                    }
                    break;
                case "radio":
                    if (l_objDiv.nextSibling != null) {
                        l_strValue = l_objDiv.nextSibling.innerText;
                    }
                    break;
                case "textarea":
                    l_strValue = l_objElement.innerText;
                    l_strMaxLength = l_objElement.cols;
                    l_strMaxRows = l_objElement.rows;
                    break;
                case "select":
                    l_strValue = l_objElement.options[0].text;
                    if (l_objElement.size > 1) l_strMaxLength = l_objElement.size;
                    break;
                case "option":
                    l_strText = l_objElement.text;
                    l_strValue = l_objElement.value;
                    break;
                default:
                    //l_strValue = l_objElement.value;
                    l_strValue = l_objDiv.innerHTML;
                    break;
            }
            l_strWidth = l_objElement.style.width;
            document.getElementById("value").value = l_strValue;
            var l_strId = l_objElement.id != null && l_objElement.id.length > 0 ? l_objElement.id : l_objElement.uniqueID;
            document.getElementById("_id").value = l_strId
            var l_strName = l_objElement.name != null && l_objElement.name.length > 0 ? l_objElement.name : l_strId;
            document.getElementById("_name").value = l_strName;
            document.getElementById("maxlength").value = l_strMaxLength;
            document.getElementById("maxrows").value = l_strMaxRows;
            document.getElementById("width").value = l_strWidth;
            var l_strValidation = l_objElement.getAttribute("validation", 0);
            document.getElementById("required").checked = l_strValidation != null && l_strValidation.indexOf("Verplicht ") == 0;
        } else {
            l_strType = "label";
        }
        document.getElementById("caption").value = l_strText;
        document.getElementById(l_strType).checked = true;
        SetVisibility(null, l_strType);
    } else {
        alert("Selecteer eerst een element om de eigenschappen uit te lezen.");
    }
}

function GetSelected() {
    var l_objContainer = document.getElementById("divTarget");
    for (var l_intIndex = 0; l_intIndex < l_objContainer.childNodes.length; l_intIndex++) {
        var l_objDiv = l_objContainer.childNodes[l_intIndex];
        if (l_objDiv.nodeType==1 && l_objDiv.className == "selected") return l_objDiv;
    }
}

function SelectFormElement(p_objEvent, p_objElement, p_blnAllowToggle) {
    if (p_blnAllowToggle == null) p_blnAllowToggle = true;
    if (p_objElement == null) {
        if (p_objEvent == null) p_objEvent = event;
        p_objElement = p_objEvent.srcElement;
        if (p_objElement == null) p_objElement = p_objEvent.target;
    }
    while (
        p_objElement != null && (
            p_objElement.nodeType != 1 || !(
                p_objElement.tagName.toLowerCase() == "div" &&
                p_objElement.parentNode != null &&
                p_objElement.parentNode.tagName.toLowerCase() == "div" &&
                p_objElement.parentNode.id == "divTarget"
            )
        )
    ) p_objElement = p_objElement.parentNode;
    if (p_objElement!=null) {
        var l_objContainer = p_objElement.parentNode;
        for (var l_intIndex = 0; l_intIndex < l_objContainer.childNodes.length; l_intIndex++) {
            var l_objDiv = l_objContainer.childNodes[l_intIndex];
            if (l_objDiv.nodeType==1 && l_objDiv.style.clear != "left" && l_objDiv != p_objElement) {
                l_objDiv.removeAttribute("className");
                l_objDiv.removeAttribute("class");
            }
        }
        if (p_objElement.className == null || p_objElement.className.length == 0) p_objElement.className = "selected";
        else if (p_blnAllowToggle) {
            p_objElement.removeAttribute("className");
            p_objElement.removeAttribute("class");
        }
    }
}

function MoveUp() {
    var l_objSelectedDiv = GetSelected();
    var l_blnSelectedNodeIsFirstOnLine = NodeIsFirstOnLine(l_objSelectedDiv);
    var l_blnSelectedNodeIsLastOnLine = NodeIsLastOnLine(l_objSelectedDiv);
    if (l_objSelectedDiv != null && (
            l_objSelectedDiv.previousSibling != null || (
                l_blnSelectedNodeIsFirstOnLine && !l_blnSelectedNodeIsLastOnLine
            )
        )
    ) {
        var l_objParentNode = l_objSelectedDiv.parentNode;
        var l_objPreviousNode = l_objSelectedDiv.previousSibling;
        if (l_objPreviousNode == null && l_blnSelectedNodeIsFirstOnLine && !l_blnSelectedNodeIsLastOnLine) {
            var l_objNewLineDiv = GetSpaceClaimer();
            l_objParentNode.insertBefore(l_objNewLineDiv, l_objSelectedDiv.nextSibling);
        } else {
            l_objSelectedDiv = l_objParentNode.removeChild(l_objSelectedDiv);
            l_objSelectedDiv = l_objParentNode.insertBefore(l_objSelectedDiv, l_objPreviousNode);
            if (l_blnSelectedNodeIsFirstOnLine && !l_blnSelectedNodeIsLastOnLine) {
                var l_objNewLineDiv = GetSpaceClaimer();
                l_objParentNode.insertBefore(l_objNewLineDiv, l_objSelectedDiv);
            } else if (NodeIsSpaceClaimer(l_objPreviousNode) && (NodeIsSpaceClaimer(l_objPreviousNode.nextSibling) || l_objPreviousNode.nextSibling == null)) {
                l_objParentNode.removeChild(l_objPreviousNode);
            }
        }
        ResizeLabels(l_objSelectedDiv);
    }
}

function MoveDown() {
    var l_objSelectedDiv = GetSelected();
    var l_blnSelectedNodeIsFirstOnLine = NodeIsFirstOnLine(l_objSelectedDiv);
    var l_blnSelectedNodeIsLastOnLine = NodeIsLastOnLine(l_objSelectedDiv);
    if (l_objSelectedDiv != null && (
            l_objSelectedDiv.nextSibling != null || (
                l_blnSelectedNodeIsLastOnLine && !l_blnSelectedNodeIsFirstOnLine
            )
        )
    ) {
        var l_objParentNode = l_objSelectedDiv.parentNode;
        var l_objNextNode = l_objSelectedDiv.nextSibling;
        var l_objBeforeNode = l_objNextNode != null ? l_objNextNode.nextSibling : null;   
        if (l_objBeforeNode == null && l_blnSelectedNodeIsLastOnLine && !l_blnSelectedNodeIsFirstOnLine) {
            var l_objNewLineDiv = GetSpaceClaimer();
            l_objParentNode.insertBefore(l_objNewLineDiv, l_objSelectedDiv);
        } else {
            l_objSelectedDiv = l_objParentNode.removeChild(l_objSelectedDiv);
            if (l_objBeforeNode != null) {
                l_objParentNode.insertBefore(l_objSelectedDiv, l_objBeforeNode);
                if (l_blnSelectedNodeIsLastOnLine && !l_blnSelectedNodeIsFirstOnLine) {
                    var l_objNewLineDiv = GetSpaceClaimer();
                    l_objParentNode.insertBefore(l_objNewLineDiv, l_objBeforeNode);
                }else if (NodeIsSpaceClaimer(l_objNextNode) && (NodeIsSpaceClaimer(l_objNextNode.previousSibling) || l_objNextNode.previousSibling == null)) {
                    l_objParentNode.removeChild(l_objNextNode);
                }
            } else {
                l_objParentNode.appendChild(l_objSelectedDiv);
            }   
        }
        ResizeLabels(l_objSelectedDiv);
    }
}

function ElementOpenTagToLower(p_strMatch, p_strTag, p_strAttributes) {
    return "<" + p_strTag.toLowerCase() + p_strAttributes + ">";
}

function GetHtml(p_objDiv) {
    if (p_objDiv == null) p_objDiv = document.getElementById("divTarget");
    var l_strHtml = p_objDiv.innerHTML;
    //Todo: implement MakeXhtmlCompliant function here!
    l_strHtml = l_strHtml.replace(/<([^\s>]+)([^>]*)>/ig, ElementOpenTagToLower); //Replace all uppercase element open- and closing tags with lowercase
    l_strHtml = l_strHtml.replace(/(<(?:div|input)(?=\s)[^>]*)\scontentEditable=true(?=\s|>)/gi, "$1")
    l_strHtml = l_strHtml.replace(/(<(?:div)(?=\s)[^>]*)\sclass=selected(?=\s|>)/gi, "$1")
    return l_strHtml;
}

function trim(p_strValue) {
  p_strValue = p_strValue.replace(/^\s+/,''); 
  p_strValue = p_strValue.replace(/\s+$/,'');
  return p_strValue;
}

function SetNameId() {
    var l_strCaption = document.getElementById("caption").value;
    var l_strType = GetRadioValue("type");
    if (l_strCaption != null && trim(l_strCaption).length > 0) {
        var l_strName = l_strCaption.replace(/\W/gi, "");
        document.getElementById("_name").value = l_strName;
        var l_strId = l_strName;
        while (document.getElementById(l_strId) != null) {
            var l_objRegExp = new RegExp(/^(.*)_(\d+)$/);
            var l_objMatch = l_objRegExp.exec(l_strId);
            var l_intNumber = 2;
            if (l_objMatch!=null) {
                l_strId = l_objMatch[1];
                l_intNumber = parseInt(l_objMatch[2]) + 1;
            }
            l_strId = l_strId + "_" + l_intNumber
        }
        document.getElementById("_id").value = l_strId;
        if (l_strType != "radio") {
            //For non-radio element, create unique name
            document.getElementById("_name").value = l_strId;
        }
    }
}