##include(Defaults)

##local.Define(TabBgColor)<contentof>#DDDDDD</contentof>
##local.Define(SelectedBGColor)<contentof>#83A2DC</contentof>
##local.Define(DefaultFontColor)<contentof>#000000</contentof>
##local.Define(ReverseFontColor)<contentof>#FFFFFF</contentof>
##local.Define(DivBGColor)<contentof>#FFFFFF</contentof>
##local.Define(SeletedBorderColor)<contentof>#1D3C76</contentof>

##local.define(PopupWindowClose)<CONTENTOF>

    ##local.Define(FrameContent)<contentof>
    <!-- *********** MOVE BAR *********** -->	
    <style>
        table
        {
            font-family:verdana;
            font-size:12
        }
    </style>
        
    <TABLE style="background-color:##local.middleSkinColour;cursor:move;width:100%" id="banner" cellpadding="0" cellspacing="0" ALSiClass="dragHandle" ALSiType="move" border="1">
        <TR>
            <TD align="left" style="color:white;foont-size:100%;padding:3px;foont-variant:small-caps">
                ##local.PopupTitle                        
            </TD>
        </tr>
    </TABLE>
     
     <table height="100%" bgcolor="#CCCCCC" cellpadding="0" cellspacing="0" border="1" width="100%"> <tr><td>
    <table height="100%" cellpadding="0" cellspacing="0" border="0" width="100%">
        <tr>
            <td bgcolor="#CCCCCC">
                ##local.PopupContent
            </td>			
        </tr>
     
        <tr>
            <TD align="right" style="padding:3px">
                <BUTTON class="portalInOne" onclick='OnClose();documentManager.close()' style='text-transform:uppercase;cursor:hand'>##leg.GLOBAL.Buttonprompts.Close</BUTTON>
            </TD>
        </TR>
    </table>
    </td></tr></table>
 
    <script>
        function OnClose()
        {
            ##if local.PopUpCloseScript
                ##local.PopUpCloseScript
            ##endif
        }
    </script>
    </contentof>
        
    ##include(FrameBody)
</CONTENTOF>

##local.define(PopupWindowConfirm)<CONTENTOF>
    ##local.Define(FrameContent)<contentof>
        <!-- *********** MOVE BAR *********** -->	
        <style>
            table
            {
                font-family:verdana;
                font-size:12
            }
        </style>
            
      
       <TABLE style="background-color:##local.middleSkinColour;cursor:move;width:100%" id="banner"  cellpadding="0" cellspacing="0" ALSiClass="dragHandle" ALSiType="move" border="1">
            <TR>
                <TD align="left" style="color:white;font-size:100%;padding:3px;font-variant:small-caps">
                    ##local.PopupTitle                      
                </TD>
                
            </TR>
        </TABLE>
         
        <table height="20%" bgcolor="#CCCCCC" cellpadding="0" cellspacing="0" border="1" width="100%"> <tr><td>
            <table height="80%" bgcolor="#CCCCCC" cellpadding="0" cellspacing="5" border="0" width="100%">
                <tr>
                    <td bgcolor="#CCCCCC" width="100%" colspan=2>
                        ##local.PopupContent
                    </td>			
                </tr>
                <tr>
                    <td   align="right" width="50%">
                        <BUTTON class="portalInOne" onclick='Confirm("##request.type", "##request.id")' style='text-transform:uppercase;cursor:hand'>##leg.GLOBAL.Buttonprompts.Yes</BUTTON>&nbsp;&nbsp;&nbsp;&nbsp;
                    </td>
                    <td  align="left" width="50%">
                        &nbsp;&nbsp;&nbsp;&nbsp;<BUTTON class="portalInOne" onclick='documentManager.close()' style='text-transform:uppercase;cursor:hand'>##leg.GLOBAL.Buttonprompts.No</BUTTON>
                    </td>
                </tr>
            </table>
        </td></tr></table>

        <script>

            function Confirm(type, id)
            {
                var url = "APS_E_LEARNING?##this.styleset&SubStyle=Popup&Method=Delete&type="+type+"&id="+id;
                window.location.replace( url );
            }
            
        </script>


    </contentof>
        
    ##include(FrameBody)
</CONTENTOF>

##local.define(EditQuestionInFrame)<contentof>
    <style>
        body, p, td, div, li, select, input, button, file {
            font-family: verdana arial tahoma;
            color: black;
        }
        
       input, button {
            font-size:11px;
        }
    </style> 
    <script language="JavaScript" type="text/javascript" src="/portal2/dragdrop.js"></script>
    <script>
        //common functions
        function escapeStringForMap ( text ) 
        {
            return text.replace ( /\\/g, '\\\\' ).replace ( /"/g, '\\"' );
        }
 
        function isArray(a) 
        {
            return a.constructor == Array;
        }
 
        function DumpAsVarMap (rs, indent)
        {  
            var str="";
            for (var i=0; i<rs.length; i++)
            {
                if (isArray(rs[i]))
                {
                    if (isArray(rs[i][1]))
                    {
                        str += " \""+escapeStringForMap(rs[i][0]) + "\" {"+ DumpAsVarMap(rs[i][1], "")+"}";
                    }
                    else
                    {
                        str += " \""+escapeStringForMap (rs[i][0])+"\" = \""+ escapeStringForMap (rs[i][1])+"\"";
                    }
                }
            }
            return str;
        }
        
    </script>
    <script>
        
        function ChangeType(status)
        {   
            var field = window.document.getElementById("Field.type");
                   
            field.attachEvent("onchange", SwitchAnswerModel2);    
            //SwitchAnswerModel2();
        }
       
       ##local.defineByRender(CurrentAnswerModel)<contentof>type0</contentof>
        
        ##if Value.IsMap(answer_model.answer.yesno) ##local.defineByRender(CurrentAnswerModel)<contentof>type0</contentof> ##endif
        ##if Value.IsMap(answer_model.answer.truefalse) ##local.defineByRender(CurrentAnswerModel)<contentof>type1</contentof> ##endif
        ##if Value.IsMap(answer_model.answer.singlechoice) ##local.defineByRender(CurrentAnswerModel)<contentof>type2</contentof> ##endif
        ##if Value.IsMap(answer_model.answer.multiplechoice) ##local.defineByRender(CurrentAnswerModel)<contentof>type3</contentof> ##endif
        
     
        var currentModel = "##local.CurrentAnswerModel";

        function SwitchAnswerModel2()
        {
            var sel = document.getElementById("Field.type");
            sel = sel.value;

            var adiv =  document.getElementById(currentModel);
            adiv.style.display="none";
            var div =  document.getElementById("type"+sel);
            div.style.display = "block";
            currentModel = "type"+sel;   

            documentManager.updateHoverRectangle ();
            documentManager.updateFocusRectangle ();
            handleRemoved = false;
        }
        
    </script>
    
    <script>        
        function ComposeAnswer( type)
        {
            var parentdiv = document.getElementById("answermodeldiv"+type);
            var options = parentdiv.childNodes;
            
            var correct = document.getElementsByName("correct"+type);
            
            var answerarray = new Array();   
            for (var i=0; i< options.length; i++)
            {
                var textareas = options(i).getElementsByTagName("textarea");
                
                var option = new Array();
                for (var j=0; j<textareas.length; j++)
                {
                    if ( textareas(j).name.search(/text/i) >=0 )
                    {
                        if ( textareas(j).name.search(/text(\d+)_(\d+).eng/i) >=0 )
                        {
                            var texteng = new Array();
                            texteng[0] = "eng";
                            texteng[1] = textareas(j).innerText; 
                        }
                        else
                        if ( textareas(j).name.search(/text(\d+)_(\d+).fre/i) >=0 )
                        {
                            var textfre = new Array();
                            textfre[0] = "fre";
                            textfre[1] = textareas(j).innerText; 
                        }
                        else
                        if ( textareas(j).name.search(/text(\d+)_(\d+).dut/i) >=0 )
                        {
                            var textdut = new Array();
                            textdut[0] = "dut";
                            textdut[1] = textareas(j).innerText; 
                        }
                        else
                        if ( textareas(j).name.search(/text(\d+)_(\d+).ger/i) >=0 )
                        {
                            var textger = new Array();
                            textger[0] = "ger";
                            textger[1] = textareas(j).innerText; 
                        }
                        else
                        {
                            alert("answer model error: no text area found!");
                        }
                    }
                    else
                    if ( textareas(j).name.search(/value/i) >= 0 )
                    {
                        var value = new Array();
                        value[0] = "value";
                        value[1] = textareas(j).innerText;
                    }
                }
                
                var textarray = new Array();
                textarray[0] = texteng;
                textarray[1] = textfre;
                textarray[2] = textdut;
                textarray[3] = textger;
                
                var text = new Array();
                text[0] = "text";
                text[1] = textarray;
                
                var iscorrect = new Array();
                iscorrect[0] = "iscorrect";

                if (correct(i).checked)  
                {
                    iscorrect[1] = "1";
                }
                else 
                {
                    iscorrect[1] = "0";
                }  
                
                var option = new Array();
                option[0] = value;
                option[1] = text;
                option[2] = iscorrect
                
                var optionarray = new Array();
                optionarray[0] = "option";
                optionarray[1] = option;
                
                answerarray[i] = optionarray;
            }     
            //alert("answerarray: "+answerarray.toString()); 
            return answerarray;
        }
        
        function ValidateQuestion()
        {
           
            return true;
        }
        
        function SaveQuestion()
        {
            //var img = window.document.getElementById("images_Field.pictures");
            
            var type = window.document.getElementById("Field.type"); 
            
            if (ValidateQuestion()) 
            {
                var path = "yesno";
     
                if (type.value == 0)
                {
                    path = "yesno";
                }
                else
                if (type.value == 1)
                {
                    path = "truefalse";
                }
                else
                if (type.value == 2)
                {  
                    path = "singlechoice";
                }
                else
                if (type.value == 3)
                {
                    path = "multiplechoice";
                }
                
                var rs = ComposeAnswer(type.value);
                var str = "{ }"
                if (rs != null)
                {
                    str = "{ \"answer\" { \""+path+"\" { "+DumpAsVarMap(rs, "")+" } } }";
                    //alert(str);
                }
                var form = xGetElementById("editForm");
                
                if ( "##request.Method" != "AddNew")  
                {
                    var title = xGetElementById("Field.title."+"##request.Lang");
                    var titleeng = xGetElementById("Field.title.ENG");
                    var titlefre = xGetElementById("Field.title.FRE");
                    var titledut = xGetElementById("Field.title.DUT");
                    var titleger = xGetElementById("Field.title.GER");
                
                    if ( (titleeng.value !== "##Value.title.ENG") || (titlefre.value !== "##Value.title.FRE") ||(titledut.value !== "##Value.title.DUT") ||(titleger.value !== "##Value.title.GER") )
                    {
                        //parent.UpdateQuestionInQuiz("##Value.id", title.value, titleeng.value, titlefre.value, titledut.value, titleger.value);
                        form.ToBeUpdated.value = "true";
                    }
                    else
                    {
                        form.ToBeUpdated.value = "flase";
                    }
                }
                
                var answerstring = xGetElementById("Field.answer_model");
                answerstring.value = str;
                //alert("beforesubmit");              
                form.Method.value = "WriteRecord2";
                form.submit();
            }
            else alert("sth not filled");
        }
        

        var singleOptionCount = 0;
        var multiOptionCount = 0;
        window.onload = function()
        {
            var div = document.getElementById("answermodeldiv2");          
            singleOptionCount = div.childNodes.length;
            div = document.getElementById("answermodeldiv3");
            multiOptionCount = div.childNodes.length;

            for (var i=0; i<4; i++)
            {            
                var div =  document.getElementById("answermodeldiv"+i);

                DragSort.makeListSortable(div);   
            }
            
           ##local.define(NewQuestionId)<contentof> ##if Value.id ##Value.id ##else ##endif </contentof>
             /*##local.define(NewQuestionTitle)<contentof>##formatter.JScriptQuote()<contentof>##Value.QualDataIgnoreIfMissing(title)</contentof></contentof>
            
             ##local.define(NewQuestionTitleENG)<contentof> ##if Value.IsMap(title) ##Value.title.ENG ##else ##endif</contentof>
             ##local.define(NewQuestionTitleFRE)<contentof> ##if Value.IsMap(title) ##Value.title.FRE ##else ##endif</contentof>
             ##local.define(NewQuestionTitleDUT)<contentof> ##if Value.IsMap(title) ##Value.title.DUT ##else ##endif</contentof>
             ##local.define(NewQuestionTitleGER)<contentof> ##if Value.IsMap(title) ##Value.title.GER ##else ##endif</contentof>*/
               
            if ( "##request.IsNew" == "true" )
            {
                if ("##local.NewQuestionId" != "")
                {
                    //parent.SaveQuestionInQuiz("##local.NewQuestionId", "##local.NewQuestionTitle", "##local.NewQuestionTitleENG", "##local.NewQuestionTitleFRE", "##local.NewQuestionTitleDUT", "##local.NewQuestionTitleGER");
                    //alert("here...##local.NewQuestionId");
                    parent.SaveQuestionInQuiz("##local.NewQuestionId");
                }
            }
            else if ( "##request.ToBeUpdated" == "true" )
            {
                parent.UpdateList();
            }
        }
        
        var handleRemoved = false;
        
        function AddOption(type)
        {
            var modeloption = document.getElementById("newchoicediv"+type); 
            if (!handleRemoved )
            {
                removeChildElementsAndObjectHandlesFromMarkup(modeloption);
                handleRemoved = true;
            }
            var div = document.getElementById("answermodeldiv"+type); 

            modeloption.style.display="block";
                        
            var str = modeloption.innerHTML;
            modeloption.style.display="none";
            
            if (type === "2")
            {
                str = str.replace(/text2/g, "text2_"+singleOptionCount);
                str = str.replace(/value2/g, "value2_"+singleOptionCount);
                singleOptionCount++;
            }
            else if(type === "3")
            {
                 str = str.replace(/text3/g, "text3_"+multiOptionCount);
                 str = str.replace(/value3/g, "value3_"+multiOptionCount);
                 multiOptionCount++;
            }
            //alert(str);
            div.insertAdjacentHTML("beforeEnd", str);
            
           
            documentManager.bindChildElements( div );
            
            documentManager.updateHoverRectangle ();
            documentManager.updateFocusRectangle ();
            
            //div = document.getElementById("answermodeldiv"+type); 
            
            DragSort.makeItemSortable(div.childNodes(div.childNodes.length-1));   
        }
        
        
        
        function removeChildElementsAndObjectHandlesFromMarkup(element)
        {
        
            var arrayObs = documentManager.allBoundObjects ( element );
            for ( var numIndex = 0; numIndex < arrayObs.length; numIndex++ ) {
                var h = arrayObs [ numIndex ].handle;
                var o = documentManager.getObject(h);
                if (o.pluginElement!=null)
                {
                    o.pluginElement.removeAttribute("objectHandle");
                    /*alert(o.pluginElement.outerHTML);*/
                }
            }
            
            documentManager.removeChildElements (element);
        
        }    

        function RemoveOption(type)
        {
            var checkbox = document.getElementsByName("removeoption"+type);
            var div = document.getElementById("answermodeldiv"+type);

            for (var i =0; i<checkbox.length; i++)
            {
                if(checkbox(i).checked)
                {  
                    div.removeChild(div.childNodes(i));
                    i--;
                }
            }
        }
        
        
    </script>
        

    /*##local.define(CategoryItemEditorTitle)<contentof><span style="font:normal normal bold larger;">Edit Question</span></contentof>*/
        
    ##local.define(CategoryItemEditorContent)<contentof>
    
        ##local.ZonesTypeScripts
        <script>
            documentManager.registerType ( "VarMap", stringValidatorObject );
        </script>
        <table id="questionEditTable" cellspacing="0" cellpadding="2" border="0" height="100%" width="100%">
        ##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.QuestionID</contentof> ##local.define(field)<contentof>id</contentof>
        ##local.FieldRow
        
        ##local.define(label)<contentof>##leg.ELEARNING.Common.Title</contentof> ##local.define(field)<contentof>title</contentof>
        ##local.MultiLingualFieldRow
    
        ##local.SepFieldRow
        
        ##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.Text</contentof> ##local.define(field)<contentof>text</contentof>
        ##local.MultiLingualFieldRow
    
        ##local.SepFieldRow
        
        
        /*##if Value.id

            ##local.defineByRender(defImageId)<contentof>PictureForQuestion_##Value.id</contentof>
            
            ##local.define(label)<contentof>Picture:</contentof> ##local.define(field)<contentof>picture</contentof>
            ##local.FieldRow    
    
        ##else 
            ##if local.RowBG
                ##if local.IsEqual(RowBG, "#EEEEEE")
                    ##local.define(RowBG)<contentof>#FFFFFF</contentof>
                ##else
                    ##local.define(RowBG)<contentof>#EEEEEE</contentof>
                ##endif
            ##endif        
            <tr style="background-color: ##local.RowBG;"><td></td><td>Picture: </td>
            <td>
                Please save the question before editing the associated picture.
            </td>
            </tr>
        ##endif*/
        
        ##if Value.id
            ##local.defineByRender(defQuestionId)<contentof>##Value.id</contentof>
        ##else
            ##local.defineByRender(defQuestionId)<contentof></contentof>
        ##endif
        ##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.Picture</contentof> ##local.define(field)<contentof>picture</contentof>
        ##local.MultiLingualFieldRow 
        
        
        ##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.Layout</contentof> ##local.define(field)<contentof>layout</contentof>
        ##local.FieldRow  
        ##local.SepFieldRow
        
        ##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.Weight</contentof> ##local.define(field)<contentof>weight</contentof>
        ##local.FieldRow    
        
        ##local.SepFieldRow
    
        ##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.FeedBack</contentof> ##local.define(field)<contentof>feedback</contentof>
        ##local.MultiLingualFieldRow
    
        ##local.SepFieldRow
        
        ##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.Comment</contentof> ##local.define(field)<contentof>comment</contentof>
        ##local.FieldRow
        ##local.SepFieldRow
    
    
        /*##local.define(label)<contentof>##leg.ELEARNING.Question.QuestionDetail.AnswerType</contentof> ##local.define(field)<contentof>type</contentof>
        ##local.FieldRow*/
        
        ##local.SepFieldRow

        ##local.define(newchoice01)<contentof>
            <div id="answermodeldiv##local.fieldtype" style="background-color:#FFFFFF;border:1px solid black">
                <table style="background-color:#EEEEEE" width="100%" style="position:relative">
                    ##local.define(OptionCount)<contentof>0</contentof>
                    ##local.define(label)<contentof></contentof>
                    ##local.defineByRender(field)<contentof>text##local.data(fieldtype)_0</contentof>
                    ##local.define(ReadOnly)<contentof></contentof>
                    
                    ##local.defineByRender(defaulttext_eng)<contentof>\=0023\=0023local.text##local.data(fieldtype)_0_eng</contentof>
                    ##local.defineByRender(defaulttext_fre)<contentof>\=0023\=0023local.text##local.data(fieldtype)_0_fre</contentof>
                    ##local.defineByRender(defaulttext_dut)<contentof>\=0023\=0023local.text##local.data(fieldtype)_0_dut</contentof>
                    ##local.defineByRender(defaulttext_ger)<contentof>\=0023\=0023local.text##local.data(fieldtype)_0_ger</contentof>
                    
                    ##local.MultiLingualFieldRowEmpty
                                        
                    <tr>
                        <td  colspan=3>
                            ##leg.ELEARNING.Question.AnswerModel.IsCorrect<INPUT type=radio name="correct##local.data(fieldtype)" >
                            ##leg.ELEARNING.Question.AnswerModel.Value<TEXTAREA name="value##local.data(fieldtype)_##local.OptionCount" 
                            ALSiAutoSize="1" rows="1" 
                            ALSiClass=Control 
                            ALSiTypeMap='{Type:"LongString",CharacterWidth:"5",MaximumLength:"10",RdOnly:""}'  cols="5"></TEXTAREA>
                        </td>
                    </tr>
                </table>

                <table style="background-color:#EEEEEE" width="100%" style="position:relative">
                
                    ##local.define(OptionCount)<contentof>1</contentof>
                    ##local.defineByRender(field)<contentof>text##local.data(fieldtype)_1</contentof>
                    ##local.define(ReadOnly)<contentof></contentof>
                    ##local.define(label)<contentof></contentof> 
                    
                    ##local.defineByRender(defaulttext_eng)<contentof>\=0023\=0023local.text##local.data(fieldtype)_1_eng</contentof>
                    ##local.defineByRender(defaulttext_fre)<contentof>\=0023\=0023local.text##local.data(fieldtype)_1_fre</contentof>
                    ##local.defineByRender(defaulttext_dut)<contentof>\=0023\=0023local.text##local.data(fieldtype)_1_dut</contentof>
                    ##local.defineByRender(defaulttext_ger)<contentof>\=0023\=0023local.text##local.data(fieldtype)_1_ger</contentof>
                    
                    ##local.MultiLingualFieldRowEmpty

                    <tr>
                        <td  colspan=3>
                            ##leg.ELEARNING.Question.AnswerModel.IsCorrect<INPUT type=radio name="correct##local.data(fieldtype)">
                            ##leg.ELEARNING.Question.AnswerModel.Value<TEXTAREA name="value##local.data(fieldtype)_##local.OptionCount" id="value##local.data(fieldtype)_##local.OptionCount" 
                            ALSiAutoSize="1" 
                            ALSiClass=Control 
                            ALSiTypeMap='{Type:"String",CharacterWidth:"5",MaximumLength:"10",RdOnly:""}' rows="1" cols="5"></TEXTAREA>
                        </td>
                    </tr>
                </table>
                </div >
            </div>
        </contentof>
        
        ##local.define(newchoices)<contentof>
            <div id="answermodeldiv##local.fieldtype" style="background-color:#EEEEEE;border:1px solid black">
                    ##local.newchoicescontent
            </div>

            <table border=0 width=100%>
                <tr >
                    <td align="left">##if local.removeoption ##local.removeoption ##endif</td>
                    <td align="right">##if local.addoption ##local.addoption ##endif</td>
                </tr>
            </table>
            
            <div  id="newchoicediv##local.data(fieldtype)" style="display:none">
                <table width=100% bgcolor=#FFFFFF cellspacing=1 cellpadding=1 style="position:relative">
                    <tr>
                        <td bgcolor=#DDDDDD width=30px valign=middle align=center>
                            <input type="checkbox" name="removeoption##local.fieldtype" id="removeoption##local.fieldtype">
                        </td>
                        <td>
                            <table width=100% bgcolor=#EEEEEE >
                                
                                ##local.define(OptionCount)<contentof>0</contentof>
                                ##local.defineByRender(field)<contentof>text##local.data(fieldtype)</contentof>
                                ##local.define(ReadOnly)<contentof></contentof>
                                ##local.define(label)<contentof></contentof> 
                                
                                ##local.defineByRender(defaulttext_eng)<contentof></contentof>
                                ##local.defineByRender(defaulttext_fre)<contentof></contentof>
                                ##local.defineByRender(defaulttext_dut)<contentof></contentof>
                                ##local.defineByRender(defaulttext_ger)<contentof></contentof>
                                
                                ##local.MultiLingualFieldRowEmpty
                                <tr>
                                    <td colspan=3>
                                        ##leg.ELEARNING.Question.AnswerModel.IsCorrect<INPUT type="##local.selecttype" name="correct##local.data(fieldtype)" >
                                        ##leg.ELEARNING.Question.AnswerModel.Value<TEXTAREA name="value##local.data(fieldtype)" rows="1" ALSiAutoSize="1" ALSiClass=Control ALSiTypeMap='{Type:"String",CharacterWidth:"5",MaximumLength:"10",RdOnly:""}'  cols="5"></TEXTAREA>
                                    </td>
                                </tr>
                            </table>
                        </td>
                    </tr>
                </table>
            </div>
        </contentof>
        
        ##local.define(newchoicescontent)<contentof>
            <table width=100% bgcolor=#FFFFFF cellspacing=1 cellpadding=1 style="position:relative">
                <tr>
                    <td bgcolor=#DDDDDD width=30px valign=middle align=center>
                        <input type="checkbox" name="removeoption##local.fieldtype" id="removeoption##local.fieldtype">
                    </td>
                    <td>            
                        <table width=100% bgcolor=#EEEEEE >
                            ##local.define(OptionCount)<contentof>0</contentof>
                            ##local.defineByRender(field)<contentof>text##local.data(fieldtype)_##local.OptionCount</contentof>
                            ##local.define(ReadOnly)<contentof></contentof>
                            ##local.define(label)<contentof></contentof> 
                            
                            ##local.defineByRender(defaulttext_eng)<contentof></contentof>
                            ##local.defineByRender(defaulttext_fre)<contentof></contentof>
                            ##local.defineByRender(defaulttext_dut)<contentof></contentof>
                            ##local.defineByRender(defaulttext_ger)<contentof></contentof>
                            
                            ##local.MultiLingualFieldRowEmpty
                            <tr>
                                <td colspan=3>
                                    ##leg.ELEARNING.Question.AnswerModel.IsCorrect<INPUT type=##local.selecttype name="correct##local.data(fieldtype)" >
                                
                                    ##leg.ELEARNING.Question.AnswerModel.Value<TEXTAREA name="value##local.data(fieldtype)_##local.OptionCount" id="value##local.data(fieldtype)_##local.OptionCount" rows="1" 
                                        ALSiAutoSize="1" 
                                        ALSiClass=Control 
                                        ALSiTypeMap='{Type:"String",CharacterWidth:"5",MaximumLength:"10",RdOnly:""}'  cols="5"></TEXTAREA>
                                </td>
                            </tr>
                        </table>
                    </td>
                </tr>
            </table>        
            
        </contentof>

        ##local.define(editchoice01)<contentof>
            <div id="answermodeldiv##local.fieldtype" style="background-color:#EEEEEE;border:1px solid black">
                
                ##local.define(OptionCount)<contentof>0</contentof>
                ##local.define(Row01)<contentof>
                   
                    <table style="background-color:#EEEEEE"  width="100%" style="position:relative">
                        ##local.defineByRender(field)<contentof>text##local.data(fieldtype)_##local.OptionCount</contentof>
                        ##local.define(ReadOnly)<contentof></contentof>
                        ##local.define(label)<contentof></contentof> 
                        
                        ##local.MultiLingualFieldRow2
                                
                        <tr>
                            <td colspan=3>
                                ##if option.IsEqual(iscorrect, "1")
                                    ##local.define(Checked)<contentof>CHECKED</contentof>
                                ##endif
                                    
                                ##if option.IsEqual(iscorrect, "0")
                                    ##local.define(Checked)<contentof></contentof>
                                ##endif
                                ##leg.ELEARNING.Question.AnswerModel.IsCorrect<INPUT type=radio name="correct##local.data(fieldtype)" id="correct" ##if local.Checked ##local.Checked ##endif class=dm-checkbox-class ALSiClass=control>
                                ##leg.ELEARNING.Question.AnswerModel.Value<TEXTAREA name="value##local.data(fieldtype)_##local.OptionCount" id="value##local.data(fieldtype)_##local.OptionCount" rows="1" ALSiAutoSize="1" ALSiClass=Control ALSiTypeMap='{Type:"String",CharacterWidth:"5",MaximumLength:"10",RdOnly:""}'  cols="5">##option.value</TEXTAREA>
                            </td>
                        </tr>
                    </table>
                    
                </contentof>
                ##Value.ForEachIn(option, ##local.OptionPath)<contentof>
                    
                    ##local.Row01
                    ##local.increment(OptionCount)
                </contentof>
            </div>
        </contentof>

        ##local.define(editchoices)<contentof>
            <div id="answermodeldiv##local.fieldtype" style="background-color:#EEEEEE;border:1px solid black">
                ##local.editchoicescontent
            </div>

            <table border=0 width=100%>
                <tr >
                    <td align="left">##if local.removeoption ##local.removeoption ##endif</td>
                    <td align="right">##if local.addoption ##local.addoption ##endif</td>
                </tr>
            </table>
            
            <div  id="newchoicediv##local.data(fieldtype)" style="display:none">
                <table width=100% bgcolor=#FFFFFF cellspacing=1 cellpadding=1 style="position:relative">
                    <tr>
                        <td bgcolor=#DDDDDD width=30px valign=middle align=center>
                            <input type="checkbox" name="removeoption##local.fieldtype" id="removeoption##local.fieldtype">
                        </td>
                        <td>
                            <table width=100% bgcolor=#EEEEEE >
                                
                                ##local.define(OptionCount)<contentof>0</contentof>
                                ##local.defineByRender(field)<contentof>text##local.data(fieldtype)</contentof>
                                ##local.define(ReadOnly)<contentof></contentof>
                                ##local.define(label)<contentof></contentof> 
                                
                                ##local.defineByRender(defaulttext_eng)<contentof></contentof>
                                ##local.defineByRender(defaulttext_fre)<contentof></contentof>
                                ##local.defineByRender(defaulttext_dut)<contentof></contentof>
                                ##local.defineByRender(defaulttext_ger)<contentof></contentof>
                                
                                ##local.MultiLingualFieldRowEmpty
                                <tr>
                                    <td colspan=3>
                                        ##leg.ELEARNING.Question.AnswerModel.IsCorrect<INPUT type="##local.selecttype" name="correct##local.data(fieldtype)" >
                                        ##leg.ELEARNING.Question.AnswerModel.Value<TEXTAREA name="value##local.data(fieldtype)" rows="1" ALSiAutoSize="1" ALSiClass=Control ALSiTypeMap='{Type:"String",CharacterWidth:"5",MaximumLength:"10",RdOnly:""}'  cols="5"></TEXTAREA>
                                    </td>
          
                                </tr>
                            </table>
                        </td>
                    </tr>
                </table>
            </div>
        </contentof>

        ##local.define(editchoicescontent)<contentof>
                ##local.define(OptionCount)<contentof>0</contentof>
                ##local.define(RowChoice)<contentof>
                    <table width=100% bgcolor=#FFFFFF border=0 cellspacing=1 cellpadding=1 style="position:relative">
                        <tr>
                            <td align=center valign=middle width=30px bgcolor=#DDDDDD>
                                <input type="checkbox" name="removeoption##local.fieldtype" id="removeoption##local.fieldtype">
                            </td>
                            <td>
                            <table width=100% bgcolor=#EEEEEE >
         
                                ##local.defineByRender(field)<contentof>text##local.data(fieldtype)_##local.OptionCount</contentof>
                                ##local.define(ReadOnly)<contentof></contentof>
                                ##local.define(label)<contentof></contentof> 
                                
                                ##local.MultiLingualFieldRow2
                                
                                <tr>
                                   <td colspan=3>
                                        ##if option.IsEqual(iscorrect, "1")
                                        
                                        
                                        
                                            ##local.define(Checked)<contentof>CHECKED</contentof>
                                        ##endif
                                        
                                        ##if option.IsEqual(iscorrect, "0")
                                            ##local.define(Checked)<contentof></contentof>
                                        ##endif
                                        ##leg.ELEARNING.Question.AnswerModel.IsCorrect<INPUT type="##local.selecttype" name="correct##local.data(fieldtype)" ##if local.Checked ##local.Checked ##endif >
                                        ##leg.ELEARNING.Question.AnswerModel.Value<TEXTAREA name="value##local.data(fieldtype)_##local.OptionCount" rows="1" ALSiAutoSize="1" ALSiClass=Control ALSiTypeMap='{Type:"String",CharacterWidth:"5",MaximumLength:"10",RdOnly:""}'  cols="5">##option.value</TEXTAREA>
                                    </td>
                                </tr>
                            </table>
                            </td>
                        </tr>
                    </table>
                </contentof>                    
                    
                ##Value.ForEachIn(option, ##local.OptionPath)<contentof>
                    ##local.RowChoice
                    ##local.increment(OptionCount)
                </contentof>                        
            </contentof>
                    

        ##local.define(answeryesno)<contentof>
            
            ##local.define(OptionPath)<contentof>answer_model.answer.yesno</contentof>
            ##local.define(fieldtype)<contentof>0</contentof>
            
            ##local.defineByRender(text0_0_eng)<contentof>Yes.</contentof>
            ##local.defineByRender(text0_0_fre)<contentof>Oui.</contentof>
            ##local.defineByRender(text0_0_dut)<contentof></contentof>
            ##local.defineByRender(text0_0_ger)<contentof></contentof>
            
            ##local.defineByRender(text0_1_eng)<contentof>No.</contentof>
            ##local.defineByRender(text0_1_fre)<contentof>Non.</contentof>
            ##local.defineByRender(text0_1_dut)<contentof></contentof>
            ##local.defineByRender(text0_1_ger)<contentof></contentof>
            
            ##if local.IsEqual(CurrentAnswerModel,"type0")
                ##if Value.IsMap(answer_model.answer.yesno)  ##local.editchoice01 ##else ##local.newchoice01 ##endif
            ##else
                ##local.newchoice01
            ##endif
        </contentof>
        
        ##local.define(answertruefalse)<contentof>
            ##local.define(fieldtype)<contentof>1</contentof>
            ##local.define(OptionPath)<contentof>answer_model.answer.truefalse</contentof>
            
            ##local.defineByRender(text1_0_eng)<contentof>True.</contentof>
            ##local.defineByRender(text1_0_fre)<contentof>Vrai.</contentof>
            ##local.defineByRender(text1_0_dut)<contentof></contentof>
            ##local.defineByRender(text1_0_ger)<contentof></contentof>
            
            ##local.defineByRender(text1_1_eng)<contentof>False.</contentof>
            ##local.defineByRender(text1_1_fre)<contentof>Faux.</contentof>
            ##local.defineByRender(text1_1_dut)<contentof></contentof>
            ##local.defineByRender(text1_1_ger)<contentof></contentof>
            
            ##if local.IsEqual(CurrentAnswerModel,"type1")
                ##local.editchoice01
            ##else
                ##local.newchoice01
            ##endif

        </contentof>
        
        
        ##local.define(answersinglechoice)<contentof>
       
            ##local.define(OptionPath)<contentof>answer_model.answer.singlechoice</contentof>
            ##local.define(selecttype)<contentof>radio</contentof>
            ##local.define(fieldtype)<contentof>2</contentof>
            ##local.define(addoption)<contentof><input type=button name="singleaddoptionbutton" value="##leg.ELEARNING.Question.AnswerModel.ButtonAddOption" onclick="AddOption('2')"></contentof>
            ##local.define(removeoption)<contentof><input type=button name="singleremoverowbutton" value="##leg.ELEARNING.Question.AnswerModel.ButtonRemoveOption" onclick="RemoveOption('2')"></contentof>
            
            ##if local.IsEqual(CurrentAnswerModel,"type2")
                ##local.editchoices
            ##else
                ##local.newchoices
            ##endif
        
        </contentof>
        
        ##local.define(answermultiplechoice)<contentof>
            ##local.define(OptionPath)<contentof>answer_model.answer.multiplechoice</contentof>
            ##local.define(selecttype)<contentof>checkbox</contentof>
            ##local.define(addoption)<contentof><input type=button name="multiaddoptionbutton" value="##leg.ELEARNING.Question.AnswerModel.ButtonAddOption" onclick="AddOption('3')"></contentof>
            ##local.define(removeoption)<contentof><input type=button name="multiremoveoptionbutton" value="##leg.ELEARNING.Question.AnswerModel.ButtonRemoveOption" onclick="RemoveOption('3')"></contentof>
            
            ##local.define(fieldtype)<contentof>3</contentof>
            
            ##if local.IsEqual(CurrentAnswerModel,"type3")
                ##local.editchoices
            ##else
                ##local.newchoices
            ##endif
        </contentof>
        
        
        
        <tr>
            <td colspan=3 width=100%>
                <table width=100% border=0 style="border:1px solid black;background-color:#FFFFFF">
                    <tr><td align = "center">##leg.ELEARNING.Question.AnswerModel.AnswerType&nbsp;&nbsp;&nbsp;&nbsp;<select name="Field.type" id="Field.type" class=dm-select-class ALSiClass=control >
                        <option value="0" ##if local.IsEqual(CurrentAnswerModel,"type0") SELECTED ##endif>##leg.ELEARNING.Question.AnswerModel.YesNo</option>
                        <option value="1" ##if local.IsEqual(CurrentAnswerModel,"type1") SELECTED ##endif>##leg.ELEARNING.Question.AnswerModel.TrueFalse</option>
                        <option value="2" ##if local.IsEqual(CurrentAnswerModel,"type2") SELECTED ##endif>##leg.ELEARNING.Question.AnswerModel.SingleChoice</option>
                        <option value="3" ##if local.IsEqual(CurrentAnswerModel,"type3") SELECTED ##endif>##leg.ELEARNING.Question.AnswerModel.MultiChoice</option>
                    </select></td></tr>
                    <tr><td>                           
                            <div id="type0" name="yesno" ##if local.IsEqual(CurrentAnswerModel,"type0") ##else style="display:none" ##endif>##local.answeryesno</div>
                            <div id="type1" name="truefalse" ##if local.IsEqual(CurrentAnswerModel,"type1") ##else style="display:none" ##endif>##local.answertruefalse</div>
                            <div id="type2" name="singlechoice" ##if local.IsEqual(CurrentAnswerModel,"type2") ##else style="display:none" ##endif>##local.answersinglechoice</div>
                            <div id="type3" name="multiplechoice" ##if local.IsEqual(CurrentAnswerModel,"type3") ##else style="display:none" ##endif>##local.answermultiplechoice</div>
                    </td></tr>
                </table>                
            </td>
        </tr>
        
        
       <script>ChangeType('##request.Method')</script> 
            
            /*<tr><td colspan=3>
                ##local.define(AnswerModelContents)<contentof>{}</contentof>
                ##if Value.IsMap(answer_model)  ##local.define(AnswerModelContents)<contentof>##Value.Dump()</contentof> ##endif
                    <textarea ALSiAutoSize="1"
                                           
                          name=answer_model 
                          rows=6 
                          cols=30 
                          class=dm-control-class  
                          ALSiClass=Control 
                          ALSiTypeMap='{Type:"LongString", CharacterWidth:"8192", MaximumLength:"8192", RdOnly:""}' >##local.AnswerModelContents</textarea>

            </td></tr>*/
            <input name="Field.answer_model" id="Field.answer_model" type="hidden" width=100%>            
            <input type="hidden" name="IsMap.Field.answer_model"  value="1">

        </table>
        
   
    </contentof>
    ##local.define(CategoryItemEditorTools)<contentof><INPUT type="button" value="##leg.CMS.LeafEditor.ApplyButton" onclick="SaveQuestion()"/></contentof>
    ##local.QuizItemEditorBody
    

</contentof>

<style>
    body, p, td, div, li, select, input, button, file 
    {
        font-family: verdana arial tahoma;
        color: black;
    }
    
    input, button 
    {
        font-size:11px;
    }
    
</style>
##if request.IsEqual(SubStyle,"Preview")


##local.define(FrameContent)<contentof>

    <script>
        var selecteditem = null;
        
        function ValidateAnswer()
        {

            if (selecteditem !== null)
            {            
                //var form = xGetElementById("questionform");
                var div = xGetElementById(selecteditem);
                //if div.iscorrect == 1
                ////alert(form.selection.iscorrect);
                
                var feedback = xGetElementById("feedback");
                if (div.iscorrect == 1)
                {
                    

                    feedback.style.border = '1px solid';
                    feedback.innerText = "Correct!";
                    feedback.style.color = 'green';
                    feedback.style.display = 'inline';
    
                }
                else
                {
                    feedback.style.border = '1px solid';
                    feedback.innerText = "Wrong!";
                    feedback.style.color = 'red';
                    feedback.style.display = 'inline';
                }
            }
            else
            {
                feedback.style.border = '1px solid';
                    feedback.innerText = "Wrong!";
                    feedback.style.color = 'red';
                    feedback.style.display = 'inline';
            }
        }
        
        function SelectAnswer(div, type)
        {
            SelectDiv(div, type);
        }
        
        
        
        function SelectDiv(adiv, type)
        {

            var id = adiv.id;
           
            if (selecteditem != id)
            {           
                if ((selecteditem != null) && (type!=3))
                {
                    var olddiv = xGetElementById(selecteditem);
                    olddiv.style.backgroundColor = "##local.DivBGColor";
                    olddiv.style.color="##local.DefaultFontColor";
                    olddiv.style.borderColor = "##local.DivBGColor";
                }                
                
                if (type !=3 )
                {                
                    selecteditem = id;
                }
                else
                {
                   
                }
                var div = xGetElementById(id);
                div.style.backgroundColor="##local.SelectedBGColor";
                div.style.borderColor="##local.SeletedBorderColor";
                div.style.color="##local.ReverseFontColor";
                var col = div.getElementsByTagName("input");
                for (var i=0; i<col.length; i++)
                {
                    col(i).checked = "true";
                }
                
                              
            } else
            {
                var div = xGetElementById(id);
                div.style.backgroundColor = "##local.DivBGColor";
                div.style.color= "##local.DefaultFontColor";
                div.style.borderColor = "##local.DivBGColor";
                
                var col = div.getElementsByTagName("input");
                for (var i=0; i<col.length; i++)
                {
                    col(i).checked = "false";
                }
                
                selecteditem = null;  
                
            }
    
        }
    </script>
    
    /*##Value.Dump()*/
    
        ##local.define(AnswerList)<contentof>
            <form name="questionform" >
            <table border=0 width=100%>
            <tr>
                <td colspan=3 align=center>
                    <span style="font:normal bold larger;color=navy">##Value.QualData(title)</span>
                </td>
            </tr>
            <tr>
                <td colspan=3><br>image<br><br></td>
            </tr>
            <tr>
                <td colspan=3><b>&nbsp;&nbsp;&nbsp;&nbsp;##Value.QualData(text)</b><br><br>
                </td>
            </tr>
            ##Value.ForEachIn(option, ##local.OptionPath)<contentof>
                
                <tr>    
                    <td >&nbsp;
                    </td>
                    <td >
                        &nbsp;
                    </td>       
                    <td width=100%>
                        <div  id="##option.value" name="##Value.id" onmousedown="SelectAnswer(this, '##Value.type')" onmouseover="this.style.border='0.02cm solid navy'" onmouseout="if (selecteditem!='##option.value') this.style.border='none'" style="cursor:hand" iscorrect=##option.iscorrect>
                        <input type="##local.selecttype" name="selection" >
                        ##option.QualData(text)
                        </div>
                    </td>
                </tr>
                
            </contentof>
            <tr>
                <td colspan=3 align="center"><br>
                    <input type="button" name="answerbutton" value="Validate Answer" onclick="ValidateAnswer()"><br><br>
                </td>
            </tr>
            <tr>
                <td colspan=3 width=100% align="center">
                    <div width=80% id="feedback" style="display:none" align="center">
                    
                    </div>
                </td>
            </tr>
        </table>
        
        </form >  
        </contentof>
        
        
        ##if Value.IsEqual(type, "0")
            ##local.define(OptionPath)<contentof>answer_model.answer.yesno</contentof>

            ##local.define(selecttype)<contentof>radio</contentof>
          
            ##local.AnswerList
        ##endif
        ##if Value.IsEqual(type, "1")
           ##local.define(OptionPath)<contentof>answer_model.answer.truefalse</contentof>

            ##local.define(selecttype)<contentof>radio</contentof>
            
            ##local.AnswerList
        ##endif
        ##if Value.IsEqual(type, "2")
            ##local.define(OptionPath)<contentof>answer_model.answer.singlechoice</contentof>

            ##local.define(selecttype)<contentof>radio</contentof>
            
            ##local.AnswerList
        
        ##endif
        ##if Value.IsEqual(type, "3")
            ##local.define(OptionPath)<contentof>answer_model.answer.multiplechoice</contentof>

            ##local.define(selecttype)<contentof>checkbox</contentof>
            
            ##local.AnswerList
        
        ##endif
      
        
    </contentof>

##local.define(QuizQuestion)<contentof>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head>
    ##Header
    ##Scripts
	<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />
	<meta http-equiv="Content-Type" content="application/xhtml+xml; charset=UTF-8" />
	<link href="/bell/layout.css" rel="stylesheet" type="text/css" />
</head>
<body>
	<div id="">
		<h1>Question ##Value.QualData(title)</h1>

        
        <div id="feedback" class="correctAnswer">
            <table>
                <tr>
                    <td><img src="/bell/images/correct.gif" width="40" height="39" border="0" alt="" /></td>
                    <td><span class="title">bonne r&eacute;ponse</span>##Value.QualData(feedback)</td>
                </tr>
            </table>
            
		</div>

        /*<div id="feedback" class="wrongAnswer">
            <table>
                <tr>
                    <td><img src="/bell/images/wrong.gif" width="40" height="39" border="0" alt="" /></td>
                    <td><span class="title">mauvaise réponse</span>##Value.QualData(feedback)</td>
                </tr>
            </table>
		</div>*/
        

        <p>##Value.QualData(text)</p>

        ##local.define(feedback)<contentof>correct</contentof>
        <form action="##this.obj" method="post" id="questionForm">
            ##this.stylesetforform
            <input type=hidden name="Method" value="RecordAnswer"/>
            ##if Value.IsMap(answer_model.answer.singlechoice)
            <table class="answers">
                ##Value.ForEachIn(choice, answer_model.answer.singlechoice) <contentof>                    
                    
                    <tr  ##if local.feedback ##if choice.IsEqual(iscorrect,"1") class="correctAnswer" ##endif ##endif><td ><input type="radio" name="answer" value="##choice.value" ##if local.feedback disabled=1 ##endif  />  ##choice.QualData(text)</td><td></td></tr>
                </contentof>
                ##local.define(questionHandled)<contentof>1</contentof>
            </table>
            ##endif
            
            ##if Value.IsMap(answer_model.answer.truefalse)
            <table class="answers">
                ##Value.ForEachIn(choice, answer_model.answer.truefalse) <contentof>                    
                    
                    <tr  ##if local.feedback ##if choice.IsEqual(iscorrect,"1") class="correctAnswer" ##endif ##endif><td ><input type="radio" name="answer" value="##choice.value" ##if local.feedback disabled=1 ##endif  />  ##choice.QualData(text)</td><td></td></tr>
                </contentof>
                ##local.define(questionHandled)<contentof>1</contentof>
            </table>
            ##endif

            ##if Value.IsMap(answer_model.answer.multiplechoice)
            <table class="answers">
                ##Value.ForEachIn(choice, answer_model.answer.multiplechoice) <contentof>                    
                    
                    <tr  ##if local.feedback ##if choice.IsEqual(iscorrect,"1") class="correctAnswer" ##endif ##endif><td ><input type="checkbox" name="answer" value="##choice.value" ##if local.feedback disabled=1 ##endif  />  ##choice.QualData(text)</td><td></td></tr>
                </contentof>
                ##local.define(questionHandled)<contentof>1</contentof>
            </table>
            ##endif

            ##if local.questionHandled
            ##else
                ##Value.Dump(answer_model.answer)            
            ##endif
		  <br >

    </form>
        

	</div>
</body>
</html>

</contentof>
    
##local.QuizQuestion

##else


##if request.IsEqual(SubStyle,"QuestionEditFrame")
    
        ##local.EditQuestionInFrame

##else

##if request.IsEqual(SubStyle,"RightListFrame")
        
        ##local.EditQuestionInFrame

##else

##if request.IsEqual(SubStyle, "InFrame")
       <script>
        //common functions
        function escapeStringForMap ( text ) 
        {
            return text.replace ( /\\/g, '\\\\' ).replace ( /"/g, '\\"' );
        }
 
        function isArray(a) 
        {
            return a.constructor == Array;
        }
 
        function DumpAsVarMap (rs, indent)
        {  
            var str="";
            for (var i=0; i<rs.length; i++)
            {
                if (isArray(rs[i]))
                {
                    if (isArray(rs[i][1]))
                    {
                        str += " \""+escapeStringForMap(rs[i][0]) + "\" {"+ DumpAsVarMap(rs[i][1], "")+"}";
                    }
                    else
                    {
                        str += " \""+escapeStringForMap (rs[i][0])+"\" = \""+ escapeStringForMap (rs[i][1])+"\"";
                    }
                }
            }
            return str;
        }
        
    </script>
    <script>
        
        function setOptions()
        {
            var opts = parent.document.getElementById("SelectQuiz");
            var sel = document.getElementById("quizselecttd");

            sel.innerHTML = '<select id="quizSelect" name="quizSelect" size="1" onchange="UpdateList()" style="width:100%">'+opts.innerHTML+'</select>';
            
            sel = document.getElementById("quizSelect");
            
            var opt = document.getElementById("newopt");
            if (opt != null)
            {
                sel.removeChild(opt);
            }
            
            opt = document.createElement ('<OPTION id="all">');
            sel.options.add(opt);
            opt.innerHTML="##leg.ELEARNING.Common.QuestionList.AllQuestions";
            opt.value="all";
            
            opt = document.createElement ('<OPTION id="sep">');
            sel.options.add(opt,0);
            opt.innerHTML="----------------";
            opt.value="";
            opt.disabled = "true"; 
            
            opt = document.createElement ('<OPTION id="start">');
            sel.options.add(opt,0);
            opt.innerHTML="##leg.ELEARNING.Common.QuestionList.SelectQuiz";
            opt.value="";
            opt.selected = "true";
        }
        
        function UpdateList()
        {
           var v = document.getElementById("quizSelect");
           if ( v.value != "" )
           {
                parent.getQuizQuestions(v.value, "QuestionListFrame");
           }
        }
        
        
        function AddNewQuestion()
        {
            var rframe = window.document.getElementById("QuestionEditFrame");
            
            rframe.src = "APS_E_LEARNING?##this.styleset&SubStyle=QuestionEditFrame&Method=AddNew&type=Question&id=";               
        }
        
        function EditQuestion(questionid)
        {
            var rframe = window.document.getElementById("QuestionEditFrame");
            
            rframe.src = "APS_E_LEARNING?##this.styleset&SubStyle=QuestionEditFrame&Method=Edit&type=Question&id="+questionid;               
        }
        
        function AddNewQuestionTo(quizid)
        {
            var rframe = window.document.getElementById("QuestionEditFrame");
            if (quizid !="")
            {
                if( quizid == "all" )
                {
                    var opt = document.getElementById("all");
                    opt.selected = true;
                    
                    parent.getQuizQuestions("all", "QuestionListFrame");
                    
                    rframe.src = "##this?SubStyle=QuestionEditFrame&Method=AddNew&type=Question&Quizid=";               
                }
                else if (quizid =="new")
                {
                    var td = document.getElementById("quizselecttd");
                    td.style.display = "none";
                    
                    var frame = document.getElementById("QuestionListFrame");
                    frame.src = parent.quizobj+"?##this.styleset&SubStyle=QuestionListFrame&Method=Edit&type=Quiz&id=";
                                     
                    rframe.src = "##this?SubStyle=QuestionEditFrame&Method=AddNew&type=Question&Quizid="; 
                }
                else
                {  
                    var td = document.getElementById("quizselecttd");
                    td.style.display = "none";

                    var frame = document.getElementById("QuestionListFrame");
                    frame.src = parent.quizobj+"?##this.styleset&SubStyle=QuestionListFrame&Method=Edit&type=Quiz&id=";
                    rframe.src = "##this?SubStyle=QuestionEditFrame&Method=AddNew&type=Question&Quizid="+quizid;            
                }
            }
        }
        
        function EditQuestionIn(questionid)
        {
            var td = document.getElementById("quizselecttd");
            td.style.display = "none";
            
            var rframe = window.document.getElementById("QuestionEditFrame"); 
            var lframe = window.document.getElementById("QuestionListFrame"); 
            
            if(questionid !== null)
            {
                lframe.src = parent.quizobj+"?##this.styleset&SubStyle=QuestionListFrame&Method=Edit&type=Quiz&id=";
                
                rframe.src = "APS_E_LEARNING?##this.styleset?&SubStyle=QuestionEditFrame&Method=Edit&type=Question&id="+questionid;       
            }
            else
            {
                lframe.src = "";          
                rframe.src = "";       
            }
        }

        function SaveQuestionInQuizOld(questionid, questiontitle, titleeng, titlefre, titledut, titleger)
        {
            if (questionid != "" && questiontitle != "")
            {
                if ("##request.Quizid" == "all")
                {
                    var select = xGetElementById("quizSelect");
                    if (select.value != "")
                    {
                        if (select.value === "all")
                        {
                            UpdateList();
                        }
                        else
                        {
                            AddQuestion(questionid, questiontitle, titleeng, titlefre, titledut, titleger);   
                            SaveQuizQuestions();
                        }
                    }
                }
                else
                if ("##request.Quizid" == "new")
                {
                   
                    AddQuestion(questionid, questiontitle, titleeng, titlefre, titledut, titleger);
                    
                    UpdateQuestionListForm();
                }
                else
                {
                    AddQuestion(questionid, questiontitle, titleeng, titlefre, titledut, titleger);
                    SaveQuizQuestions();
                }
            }
        }
        
        function SaveQuestionInQuiz(questionid)
        {
            if (questionid != "")
            {
                if ("##request.Quizid" == "all")
                {
                    var select = xGetElementById("quizSelect");
                    if (select.value != "")
                    {
                        if (select.value === "all")
                        {
                            UpdateList();
                        }
                        else
                        {
                            AddQuestion(questionid);   
                            SaveQuizQuestions();
                        }
                    }
                }
                else
                if ("##request.Quizid" == "new")
                {
                    AddQuestion(questionid);
                    UpdateQuestionListForm();
                }
                else
                {
                    AddQuestion(questionid);
                    SaveQuizQuestions();
                }
            }
        }
        
        function AddQuestion(questionid)
        {
            var lframe = xGetElementById("QuestionListFrame");
            var div = lframe.contentWindow.document.getElementById("quizquestionlist");
            
            var newdiv = document.createElement("<div id="+questionid+">");
            
            newdiv = div.insertAdjacentElement("beforeEnd", newdiv);
        }
        
        function UpdateQuestionInQuiz (questionid, questiontitle, titleeng, titlefre, titledut, titleger)
        {
            if (questionid != "")
            {
                if ("##request.Quizid" == "all")
                {
                    var select = xGetElementById("quizSelect");
                    if (select.value != "")
                    {
                        if (select.value === "all")
                        {  
                            UpdateList();
                        }
                        else
                        {
                            RefreshQuestionInQuiz(questionid, questiontitle, titleeng, titlefre, titledut, titleger);   
                            SaveQuizQuestions();
                        }
                    }
                }
                else
                if ("##request.Quizid" == "new")
                {
                    RefreshQuestionInQuiz(questionid, questiontitle, titleeng, titlefre, titledut, titleger);
                    UpdateQuestionListForm();
                }
                else
                {
                    RefreshQuestionInQuiz(questionid, questiontitle, titleeng, titlefre, titledut, titleger);
                    SaveQuizQuestions();
                }
            }
        }
        
        function AddQuestionOld (questionid, questiontitle, titleeng, titlefre, titledut, titleger)
        {
            var lframe = xGetElementById("QuestionListFrame");
            var div = lframe.contentWindow.document.getElementById("quizquestionlist");
            
            var newdiv = document.createElement("<div id="+questionid+">");
            newdiv.name = questiontitle;
            newdiv = div.insertAdjacentElement("beforeEnd", newdiv);
            
            var engdiv = document.createElement("<div id=ENG >");
            engdiv.name = titleeng;
            var frediv = document.createElement("<div id=FRE >");
            frediv.name = titlefre;
            var dutdiv = document.createElement("<div id=DUT >");
            dutdiv.name = titledut;
            var gerdiv = document.createElement("<div id=GER >");
            gerdiv.name = titleger;
            
            newdiv.insertAdjacentElement("beforeEnd", engdiv);
            newdiv.insertAdjacentElement("beforeEnd", frediv);
            newdiv.insertAdjacentElement("beforeEnd", dutdiv);
            newdiv.insertAdjacentElement("beforeEnd", gerdiv);

        }
        
        function RefreshQuestionInQuiz(questionid, questiontitle, titleeng, titlefre, titledut, titleger)
        { 
            var lframe = xGetElementById("QuestionListFrame");
            var adiv = lframe.contentWindow.document.getElementById(questionid);

            if (adiv != null)
            {
                adiv.title = questiontitle;
                adiv.replaceAdjacentText("afterBegin", questionid+"----"+questiontitle);
                var children = adiv.getElementsByTagName("div");

                for (var i=0; i<children.length; i++)
                {
                    if (children(i).id == "ENG")
                    {
                        children(i).name = titleeng;
                    }
                    else
                    if (children(i).id == "FRE")
                    {
                        children(i).name = titlefre;
                    }
                    else
                    if (children(i).id == "DUT")
                    {
                        children(i).name = titledut;
                    }
                    else
                    if (children(i).id == "GER")
                    {
                        children(i).name = titleger;
                    }
                }
            }
        }
        
        function SaveQuizQuestions()
        {
            var rs = ComposeQuestionList();

            if (rs!= null)
            { 
                var str = "{"+DumpAsVarMap(rs, "")+"}";
            }
            //alert(str);
            
            var lframe = xGetElementById("QuestionListFrame");
            
            var field = lframe.contentWindow.document.getElementById("Field.questions");
            field.value = str;
            
            var form = lframe.contentWindow.document.getElementById("questionlistform");
            form.target = ""; 
            form.SubStyle.value = "QuestionListFrame";
            form.Method.value = "WriteRecord2";
            form.submit(); 
        }
         
        
        function ComposeQuestionList()
        {
            var lframe = xGetElementById("QuestionListFrame");
            var div = lframe.contentWindow.document.getElementById("quizquestionlist");

            divs = div.childNodes;
            var rs = new Array();
            
            if (divs != null)
            {
                for(var i=0; i< divs.length; i++)
                {
                    var atom = new Array(2);
                    
                    var sub = new Array(2);                
                    sub[0] = "question";
                    var sub1 = new Array(2);
                        
                    var ssub = new Array(2);
                    atom[0] = "id";
                    atom[1] = divs[i].id; 
                    sub1[0] = atom;
                    
                    ssub[0] = "title";
                    var ssub1 = new Array();
                    
                    var subdivs = divs[i].getElementsByTagName("div");
                    
                    for (var j=0; j<subdivs.length; j++)
                    {
                        var temp = new Array();  
                        temp[0] = subdivs[j].id;
                        temp[1] = subdivs[j].name;
                        ssub1[j] = temp;
                    }
                    
                    ssub[1] = ssub1;
                    
                    sub1[1] = ssub;
                    
                    sub[1] = sub1;
                    rs[i] = sub;
                }
            }
            
            return rs;
        }

       
        function UpdateQuestionListForm()
        {
            var rs = ComposeQuestionList();
            var str = "{ }";
            if (rs!= null)
            { 
                str = "{"+DumpAsVarMap(rs, "")+"}";
            }
            var lframe = xGetElementById("QuestionListFrame");
            
            var form = lframe.contentWindow.document.getElementById("questionlistform");
            var field = lframe.contentWindow.document.getElementById("Field.questions");
            field.value = str;
            form.Method.value = "UpdateFromForm2";
            form.SubStyle.value = "QuestionListFrame";
            form.target = "";
            form.submit();
            
        }
    
        function DeleteQuestionConfirm()
        {
            var lframe = xGetElementById("QuestionListFrame");
            var questionid = lframe.contentWindow.selecteditem;
            if (questionid != null)
            {
                var div = lframe.contentWindow.document.getElementById(questionid);
                
                if (div != null)
                {
                    var url = "APS_E_LEARNING?##this.styleset&SubStyle=Popup&Method=ConfirmDelete&type=Question&id="+questionid;
                    showConfirmation (url);
                }
            }
        }
        
        var confirmationPopup=null;
        function showConfirmation (url)
        {
            if(confirmationPopup==null)
            {
                confirmationPopup = documentManager.topManager ().create ( "floatingFrame" );
                confirmationPopup.setRectangle ( 300, 100, 300, 0 );
               
                confirmationPopup.addOnClose( confirmationClosed );
                confirmationPopup.start ();
                confirmationPopup.load( url ); 
            }
        }
        
        function confirmationClosed()
        {
            confirmationPopup = null;
        }
        
        function OnRemove( type, id )
        {
            var frame = xGetElementById( "QuestionListFrame");
            var doc = frame.contentWindow.document;
            
            var elem = doc.getElementById(id);
            elem.style.display = "none";
        }
        
        
    </script>
    
    ##local.define(EditQuestion)<contentof>
        ##if request.IsEqual(type, "Question")
          
            ##if request.IsEqual(Method, "AddNew")
                <script>AddNewQuestionTo(##if request.Quizid "##request.Quizid" ##else "" ##endif)</script>
            ##endif
            ##if request.IsEqual(Method, "Edit")
                <script>EditQuestionIn(##request.id)</script>
            ##endif
        ##endif
    </contentof>
    
    ##local.define(QuestionListPanel)<contentof>
        <table width="100%" height="100%" border="0" style="border:0px solid black">
            <tr>    
                <td width=100% height=30 align="center" id="quizselecttd">

                    <script>setOptions()</script>
 
                </td>
            </tr>
            <tr>
                <td align="left" width="100%" height="100%">
                    <iframe id="QuestionListFrame" width=100% height=100%  frameborder="0" src="" style="border:1px solid black;overflow-x:hidden;overflow-y:scroll">
                    </iframe>
                </td>
            </tr>
            <tr>
                <td align="center">
                    
                    <a href="javascript:AddNewQuestion()">| ##leg.ELEARNING.Question.Action.New |</a><br>
                    <a href="javascript:DeleteQuestionConfirm()">| ##leg.ELEARNING.Question.Action.Delete |</a>
                </td>
            </tr>
        </table>
    </contentof>
    
    ##local.define(QuestionEditPanel)<contentof>
        <iframe id="QuestionEditFrame" width="100%" height="100%" frameborder="0"  src="" scrolling=yes>
        </iframe>
    </contentof>
    
    ##local.define(FrameContent)<contentof>
    <style>
    body, p, td, div, li, select, input, button, file, a {
        font-family: verdana arial tahoma;
        color: black;
    }
    
    a {
        font-size: 11px;
        font-weight: normal;
    }
    a:hover {
        color: black;
        text-decoration: underline;
    }
    </style>
        <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0" style="border:1px solid black; background-color:#EEEEEE">
            <tr>
                <td width="25%" height="100%" align="center" valign="middle">##local.QuestionListPanel</td>
                <td>&nbsp;&nbsp;&nbsp;&nbsp;</td>
                <td width="75%" height="100%" align="center" valign="middle">##local.QuestionEditPanel</td>
            </tr>
        </table>
        ##local.EditQuestion
    

    </contentof>
    ##include(FrameBody)
    

##else


##if request.IsEqual(SubStyle,"Popup")
    
    ##local.define(PopupTitle)<contentof></contentof>
    ##local.define(PopupContent)<contentof></contentof>

    ##if error.Level
        ##local.define(Handled)<contentof>1</contentof>
        ##local.define(PopupTitle)<contentof>##leg.ELEARNING.Popup.Error.ErrorTitle</contentof>
        ##local.define(PopupContent)<contentof>##request.FullURI() <br> ##error.Dump()
        </contentof>
        ##local.PopupWindowClose
    ##endif
    
    ##if request.IsEqual(Method, "ConfirmDelete")
        ##local.define(Handled)<contentof>1</contentof>
        ##local.define(PopupTitle)<contentof>##leg.ELEARNING.Popup.Delete.Confirm</contentof>
        ##local.define(PopupContent)<contentof>
           ##leg.ELEARNING.Popup.Delete.ConfirmMessage
        </contentof>
        ##local.PopupWindowConfirm
    ##endif
    
    ##if request.IsEqual(Method, "Delete")
        <script>parent.OnRemove( '##request.type', '##request.id' );</script>
        ##local.define(Handled)<contentof>1</contentof>
        ##local.define(PopupTitle)<contentof>##leg.ELEARNING.Popup.Delete.Confirm</contentof>
        ##local.define(PopupContent)<contentof>
           ##leg.ELEARNING.Popup.Delete.DeletedMessage      
        </contentof>
        ##local.PopupWindowClose
    ##endif



##endif