<% %> <% add_nocache_headers asp_include "include/courses_variables.asp",false asp_include "classes/searchcontrol.asp",false asp_include "classes/advancedsearchcontrol.asp",false asp_include "classes/panelsearchcontrol.asp",false asp_include "classes/searchclause.asp",false doAssignment sessionPrefix,strTableName includes = "" predefFieldNum = 0 asp_include "include/xtempl.asp",false asp_include "classes/runnerpage.asp",false Set xt = (CreateClass("Xtempl",0,Empty,Empty,Empty,Empty,Empty,Empty,Empty)) if bValue(postvalue("id")) then doAssignmentByRef id,postvalue("id") else id = 1 end if mode = SEARCH_SIMPLE templatefile = "courses_search.htm" if IsEqual(postvalue("mode"),"inlineLoadCtrl") then mode = SEARCH_LOAD_CONTROL templatefile = "courses_inline_search.htm" end if calendar = false timepicker = false Set params = (CreateDictionary()) setArrElement params,"id",id setArrElement params,"mode",mode setArrElement params,"calendar",calendar setArrElement params,"timepicker",timepicker setArrElementByRef params,"xt",xt setArrElement params,"shortTableName","courses" setArrElement params,"origTName",strOriginalTableName setArrElement params,"sessionPrefix",sessionPrefix setArrElement params,"tName",strTableName setArrElement params,"includes_js",includes_js setArrElement params,"includes_jsreq",includes_jsreq setArrElement params,"includes_css",includes_css setArrElement params,"locale_info",locale_info setArrElement params,"pageType",PAGE_SEARCH Set pageObject = (CreateClass("RunnerPage",1,params,Empty,Empty,Empty,Empty,Empty,Empty)) doAssignment searchControllerId,IIF(postvalue("searchControllerId"),postvalue("searchControllerId"),pageObject.id) if bValue(eventObj.exists_p1("BeforeProcessSearch")) then eventObj.BeforeProcessSearch_p1 conn end if if IsEqual(mode,SEARCH_SIMPLE) then Set searchControlBuilder = (CreateClass("AdvancedSearchControl",4,searchControllerId,strTableName,pageObject.searchClauseObj,pageObject,Empty,Empty,Empty)) doAssignmentByRef onLoadJsCode,GetTableData(pageObject.tName,".jsOnloadSearch","") pageObject.addOnLoadJsEvent_p1 onLoadJsCode pageObject.addButtonHandlers includes = CSmartStr(includes) & "" & vbcrlf includes = CSmartStr(includes) & "" & vbcrlf includes = CSmartStr(includes) & "" & vbcrlf if IsIdentical(pageObject.debugJSMode,true) then includes = CSmartStr(includes) & "" & vbcrlf else includes = CSmartStr(includes) & "" & vbcrlf end if includes = CSmartStr(includes) & "
" doAssignmentByRef searchRadio,searchControlBuilder.getSearchRadio() xt.assign_section_p3 "all_checkbox_label",ArrayElement(ArrayElement(searchRadio,"all_checkbox_label"),0),ArrayElement(ArrayElement(searchRadio,"all_checkbox_label"),1) xt.assign_section_p3 "any_checkbox_label",ArrayElement(ArrayElement(searchRadio,"any_checkbox_label"),0),ArrayElement(ArrayElement(searchRadio,"any_checkbox_label"),1) xt.assignbyref_p2 "all_checkbox",ArrayElement(searchRadio,"all_checkbox") xt.assignbyref_p2 "any_checkbox",ArrayElement(searchRadio,"any_checkbox") if bValue(GetLookupTable("CourseID",strTableName)) then setArrElementN pageObject.settingsMap,CreateArray3("globalSettings","shortTNames",GetLookupTable("CourseID",strTableName)),GetTableURL(GetLookupTable("CourseID",strTableName)) end if pageObject.fillFieldToolTips_p1 "CourseID" doAssignmentByRef srchFields,pageObject.searchClauseObj.getSearchCtrlParams_p1("CourseID") Set firstFieldParams = (CreateDictionary()) if bValue(asp_count(srchFields)) then doAssignment firstFieldParams,ArrayElement(srchFields,0) else setArrElement firstFieldParams,"fName","CourseID" setArrElement firstFieldParams,"eType","" setArrElement firstFieldParams,"value1","" setArrElement firstFieldParams,"opt","" setArrElement firstFieldParams,"value2","" setArrElement firstFieldParams,"not",false end if doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ArrayElement(firstFieldParams,"fName"),0,ArrayElement(firstFieldParams,"opt"),ArrayElement(firstFieldParams,"not"),false,ArrayElement(firstFieldParams,"value1"),ArrayElement(firstFieldParams,"value2")) if bValue(isEnableSection508()) then xt.assign_section_p3 "CourseID_label",("" else xt.assign_p2 "CourseID_label",true end if xt.assign_p2 "CourseID_fieldblock",true xt.assignbyref_p2 "CourseID_editcontrol",ArrayElement(ctrlBlockArr,"searchcontrol") xt.assign_p2 "CourseID_notbox",ArrayElement(ctrlBlockArr,"notbox") xt.assignbyref_p2 "CourseID_editcontrol1",ArrayElement(ctrlBlockArr,"searchcontrol1") xt.assign_p2 "searchtype_CourseID",ArrayElement(ctrlBlockArr,"searchtype") doAssignmentByRef isFieldNeedSecCtrl,searchControlBuilder.isNeedSecondCtrl_p1("CourseID") ctrlInd = 0 if bValue(isFieldNeedSecCtrl) then setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CourseID","recId",id,"ctrlsMap",CreateDictionary2(0,ctrlInd,1,CSmartDbl(ctrlInd)+1)) ctrlInd = CSmartDbl(ctrlInd)+2 else setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CourseID","recId",id,"ctrlsMap",CreateDictionary1(0,ctrlInd)) ctrlInd = CSmartDbl(ctrlInd)+1 end if if bValue(GetLookupTable("CourseTitle",strTableName)) then setArrElementN pageObject.settingsMap,CreateArray3("globalSettings","shortTNames",GetLookupTable("CourseTitle",strTableName)),GetTableURL(GetLookupTable("CourseTitle",strTableName)) end if pageObject.fillFieldToolTips_p1 "CourseTitle" doAssignmentByRef srchFields,pageObject.searchClauseObj.getSearchCtrlParams_p1("CourseTitle") Set firstFieldParams = (CreateDictionary()) if bValue(asp_count(srchFields)) then doAssignment firstFieldParams,ArrayElement(srchFields,0) else setArrElement firstFieldParams,"fName","CourseTitle" setArrElement firstFieldParams,"eType","" setArrElement firstFieldParams,"value1","" setArrElement firstFieldParams,"opt","" setArrElement firstFieldParams,"value2","" setArrElement firstFieldParams,"not",false end if doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ArrayElement(firstFieldParams,"fName"),0,ArrayElement(firstFieldParams,"opt"),ArrayElement(firstFieldParams,"not"),false,ArrayElement(firstFieldParams,"value1"),ArrayElement(firstFieldParams,"value2")) if bValue(isEnableSection508()) then xt.assign_section_p3 "CourseTitle_label",("" else xt.assign_p2 "CourseTitle_label",true end if xt.assign_p2 "CourseTitle_fieldblock",true xt.assignbyref_p2 "CourseTitle_editcontrol",ArrayElement(ctrlBlockArr,"searchcontrol") xt.assign_p2 "CourseTitle_notbox",ArrayElement(ctrlBlockArr,"notbox") xt.assignbyref_p2 "CourseTitle_editcontrol1",ArrayElement(ctrlBlockArr,"searchcontrol1") xt.assign_p2 "searchtype_CourseTitle",ArrayElement(ctrlBlockArr,"searchtype") doAssignmentByRef isFieldNeedSecCtrl,searchControlBuilder.isNeedSecondCtrl_p1("CourseTitle") ctrlInd = 0 if bValue(isFieldNeedSecCtrl) then setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CourseTitle","recId",id,"ctrlsMap",CreateDictionary2(0,ctrlInd,1,CSmartDbl(ctrlInd)+1)) ctrlInd = CSmartDbl(ctrlInd)+2 else setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CourseTitle","recId",id,"ctrlsMap",CreateDictionary1(0,ctrlInd)) ctrlInd = CSmartDbl(ctrlInd)+1 end if if bValue(GetLookupTable("CEUCredit",strTableName)) then setArrElementN pageObject.settingsMap,CreateArray3("globalSettings","shortTNames",GetLookupTable("CEUCredit",strTableName)),GetTableURL(GetLookupTable("CEUCredit",strTableName)) end if pageObject.fillFieldToolTips_p1 "CEUCredit" doAssignmentByRef srchFields,pageObject.searchClauseObj.getSearchCtrlParams_p1("CEUCredit") Set firstFieldParams = (CreateDictionary()) if bValue(asp_count(srchFields)) then doAssignment firstFieldParams,ArrayElement(srchFields,0) else setArrElement firstFieldParams,"fName","CEUCredit" setArrElement firstFieldParams,"eType","" setArrElement firstFieldParams,"value1","" setArrElement firstFieldParams,"opt","" setArrElement firstFieldParams,"value2","" setArrElement firstFieldParams,"not",false end if doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ArrayElement(firstFieldParams,"fName"),0,ArrayElement(firstFieldParams,"opt"),ArrayElement(firstFieldParams,"not"),false,ArrayElement(firstFieldParams,"value1"),ArrayElement(firstFieldParams,"value2")) if bValue(isEnableSection508()) then xt.assign_section_p3 "CEUCredit_label",("" else xt.assign_p2 "CEUCredit_label",true end if xt.assign_p2 "CEUCredit_fieldblock",true xt.assignbyref_p2 "CEUCredit_editcontrol",ArrayElement(ctrlBlockArr,"searchcontrol") xt.assign_p2 "CEUCredit_notbox",ArrayElement(ctrlBlockArr,"notbox") xt.assignbyref_p2 "CEUCredit_editcontrol1",ArrayElement(ctrlBlockArr,"searchcontrol1") xt.assign_p2 "searchtype_CEUCredit",ArrayElement(ctrlBlockArr,"searchtype") doAssignmentByRef isFieldNeedSecCtrl,searchControlBuilder.isNeedSecondCtrl_p1("CEUCredit") ctrlInd = 0 if bValue(isFieldNeedSecCtrl) then setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CEUCredit","recId",id,"ctrlsMap",CreateDictionary2(0,ctrlInd,1,CSmartDbl(ctrlInd)+1)) ctrlInd = CSmartDbl(ctrlInd)+2 else setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CEUCredit","recId",id,"ctrlsMap",CreateDictionary1(0,ctrlInd)) ctrlInd = CSmartDbl(ctrlInd)+1 end if if bValue(GetLookupTable("Location",strTableName)) then setArrElementN pageObject.settingsMap,CreateArray3("globalSettings","shortTNames",GetLookupTable("Location",strTableName)),GetTableURL(GetLookupTable("Location",strTableName)) end if pageObject.fillFieldToolTips_p1 "Location" doAssignmentByRef srchFields,pageObject.searchClauseObj.getSearchCtrlParams_p1("Location") Set firstFieldParams = (CreateDictionary()) if bValue(asp_count(srchFields)) then doAssignment firstFieldParams,ArrayElement(srchFields,0) else setArrElement firstFieldParams,"fName","Location" setArrElement firstFieldParams,"eType","" setArrElement firstFieldParams,"value1","" setArrElement firstFieldParams,"opt","" setArrElement firstFieldParams,"value2","" setArrElement firstFieldParams,"not",false end if doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ArrayElement(firstFieldParams,"fName"),0,ArrayElement(firstFieldParams,"opt"),ArrayElement(firstFieldParams,"not"),false,ArrayElement(firstFieldParams,"value1"),ArrayElement(firstFieldParams,"value2")) if bValue(isEnableSection508()) then xt.assign_section_p3 "Location_label",("" else xt.assign_p2 "Location_label",true end if xt.assign_p2 "Location_fieldblock",true xt.assignbyref_p2 "Location_editcontrol",ArrayElement(ctrlBlockArr,"searchcontrol") xt.assign_p2 "Location_notbox",ArrayElement(ctrlBlockArr,"notbox") xt.assignbyref_p2 "Location_editcontrol1",ArrayElement(ctrlBlockArr,"searchcontrol1") xt.assign_p2 "searchtype_Location",ArrayElement(ctrlBlockArr,"searchtype") doAssignmentByRef isFieldNeedSecCtrl,searchControlBuilder.isNeedSecondCtrl_p1("Location") ctrlInd = 0 if bValue(isFieldNeedSecCtrl) then setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","Location","recId",id,"ctrlsMap",CreateDictionary2(0,ctrlInd,1,CSmartDbl(ctrlInd)+1)) ctrlInd = CSmartDbl(ctrlInd)+2 else setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","Location","recId",id,"ctrlsMap",CreateDictionary1(0,ctrlInd)) ctrlInd = CSmartDbl(ctrlInd)+1 end if if bValue(GetLookupTable("CourseDates",strTableName)) then setArrElementN pageObject.settingsMap,CreateArray3("globalSettings","shortTNames",GetLookupTable("CourseDates",strTableName)),GetTableURL(GetLookupTable("CourseDates",strTableName)) end if pageObject.fillFieldToolTips_p1 "CourseDates" doAssignmentByRef srchFields,pageObject.searchClauseObj.getSearchCtrlParams_p1("CourseDates") Set firstFieldParams = (CreateDictionary()) if bValue(asp_count(srchFields)) then doAssignment firstFieldParams,ArrayElement(srchFields,0) else setArrElement firstFieldParams,"fName","CourseDates" setArrElement firstFieldParams,"eType","" setArrElement firstFieldParams,"value1","" setArrElement firstFieldParams,"opt","" setArrElement firstFieldParams,"value2","" setArrElement firstFieldParams,"not",false end if doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ArrayElement(firstFieldParams,"fName"),0,ArrayElement(firstFieldParams,"opt"),ArrayElement(firstFieldParams,"not"),false,ArrayElement(firstFieldParams,"value1"),ArrayElement(firstFieldParams,"value2")) if bValue(isEnableSection508()) then xt.assign_section_p3 "CourseDates_label",("" else xt.assign_p2 "CourseDates_label",true end if xt.assign_p2 "CourseDates_fieldblock",true xt.assignbyref_p2 "CourseDates_editcontrol",ArrayElement(ctrlBlockArr,"searchcontrol") xt.assign_p2 "CourseDates_notbox",ArrayElement(ctrlBlockArr,"notbox") xt.assignbyref_p2 "CourseDates_editcontrol1",ArrayElement(ctrlBlockArr,"searchcontrol1") xt.assign_p2 "searchtype_CourseDates",ArrayElement(ctrlBlockArr,"searchtype") doAssignmentByRef isFieldNeedSecCtrl,searchControlBuilder.isNeedSecondCtrl_p1("CourseDates") ctrlInd = 0 if bValue(isFieldNeedSecCtrl) then setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CourseDates","recId",id,"ctrlsMap",CreateDictionary2(0,ctrlInd,1,CSmartDbl(ctrlInd)+1)) ctrlInd = CSmartDbl(ctrlInd)+2 else setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","CourseDates","recId",id,"ctrlsMap",CreateDictionary1(0,ctrlInd)) ctrlInd = CSmartDbl(ctrlInd)+1 end if if bValue(GetLookupTable("DurationInDays",strTableName)) then setArrElementN pageObject.settingsMap,CreateArray3("globalSettings","shortTNames",GetLookupTable("DurationInDays",strTableName)),GetTableURL(GetLookupTable("DurationInDays",strTableName)) end if pageObject.fillFieldToolTips_p1 "DurationInDays" doAssignmentByRef srchFields,pageObject.searchClauseObj.getSearchCtrlParams_p1("DurationInDays") Set firstFieldParams = (CreateDictionary()) if bValue(asp_count(srchFields)) then doAssignment firstFieldParams,ArrayElement(srchFields,0) else setArrElement firstFieldParams,"fName","DurationInDays" setArrElement firstFieldParams,"eType","" setArrElement firstFieldParams,"value1","" setArrElement firstFieldParams,"opt","" setArrElement firstFieldParams,"value2","" setArrElement firstFieldParams,"not",false end if doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ArrayElement(firstFieldParams,"fName"),0,ArrayElement(firstFieldParams,"opt"),ArrayElement(firstFieldParams,"not"),false,ArrayElement(firstFieldParams,"value1"),ArrayElement(firstFieldParams,"value2")) if bValue(isEnableSection508()) then xt.assign_section_p3 "DurationInDays_label",("" else xt.assign_p2 "DurationInDays_label",true end if xt.assign_p2 "DurationInDays_fieldblock",true xt.assignbyref_p2 "DurationInDays_editcontrol",ArrayElement(ctrlBlockArr,"searchcontrol") xt.assign_p2 "DurationInDays_notbox",ArrayElement(ctrlBlockArr,"notbox") xt.assignbyref_p2 "DurationInDays_editcontrol1",ArrayElement(ctrlBlockArr,"searchcontrol1") xt.assign_p2 "searchtype_DurationInDays",ArrayElement(ctrlBlockArr,"searchtype") doAssignmentByRef isFieldNeedSecCtrl,searchControlBuilder.isNeedSecondCtrl_p1("DurationInDays") ctrlInd = 0 if bValue(isFieldNeedSecCtrl) then setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","DurationInDays","recId",id,"ctrlsMap",CreateDictionary2(0,ctrlInd,1,CSmartDbl(ctrlInd)+1)) ctrlInd = CSmartDbl(ctrlInd)+2 else setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","DurationInDays","recId",id,"ctrlsMap",CreateDictionary1(0,ctrlInd)) ctrlInd = CSmartDbl(ctrlInd)+1 end if if bValue(GetLookupTable("Tuitionfees",strTableName)) then setArrElementN pageObject.settingsMap,CreateArray3("globalSettings","shortTNames",GetLookupTable("Tuitionfees",strTableName)),GetTableURL(GetLookupTable("Tuitionfees",strTableName)) end if pageObject.fillFieldToolTips_p1 "Tuitionfees" doAssignmentByRef srchFields,pageObject.searchClauseObj.getSearchCtrlParams_p1("Tuitionfees") Set firstFieldParams = (CreateDictionary()) if bValue(asp_count(srchFields)) then doAssignment firstFieldParams,ArrayElement(srchFields,0) else setArrElement firstFieldParams,"fName","Tuitionfees" setArrElement firstFieldParams,"eType","" setArrElement firstFieldParams,"value1","" setArrElement firstFieldParams,"opt","" setArrElement firstFieldParams,"value2","" setArrElement firstFieldParams,"not",false end if doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ArrayElement(firstFieldParams,"fName"),0,ArrayElement(firstFieldParams,"opt"),ArrayElement(firstFieldParams,"not"),false,ArrayElement(firstFieldParams,"value1"),ArrayElement(firstFieldParams,"value2")) if bValue(isEnableSection508()) then xt.assign_section_p3 "Tuitionfees_label",("" else xt.assign_p2 "Tuitionfees_label",true end if xt.assign_p2 "Tuitionfees_fieldblock",true xt.assignbyref_p2 "Tuitionfees_editcontrol",ArrayElement(ctrlBlockArr,"searchcontrol") xt.assign_p2 "Tuitionfees_notbox",ArrayElement(ctrlBlockArr,"notbox") xt.assignbyref_p2 "Tuitionfees_editcontrol1",ArrayElement(ctrlBlockArr,"searchcontrol1") xt.assign_p2 "searchtype_Tuitionfees",ArrayElement(ctrlBlockArr,"searchtype") doAssignmentByRef isFieldNeedSecCtrl,searchControlBuilder.isNeedSecondCtrl_p1("Tuitionfees") ctrlInd = 0 if bValue(isFieldNeedSecCtrl) then setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","Tuitionfees","recId",id,"ctrlsMap",CreateDictionary2(0,ctrlInd,1,CSmartDbl(ctrlInd)+1)) ctrlInd = CSmartDbl(ctrlInd)+2 else setArrElementN pageObject.controlsMap,CreateArray3("search","searchBlocks",empty),CreateDictionary3("fName","Tuitionfees","recId",id,"ctrlsMap",CreateDictionary1(0,ctrlInd)) ctrlInd = CSmartDbl(ctrlInd)+1 end if setArrElement pageObject.body,"begin",CSmartStr(ArrayElement(pageObject.body,"begin")) & CSmartStr(includes) pageObject.addCommonJs xt.assignbyref_p2 "body",pageObject.body xt.assign_p2 "contents_block",true xt.assign_p2 "conditions_block",true xt.assign_p2 "search_button",true xt.assign_p2 "reset_button",true xt.assign_p2 "back_button",true xt.assign_p2 "searchbutton_attrs",("id=""searchButton" & CSmartStr(id)) & """" xt.assign_p2 "resetbutton_attrs",("id=""resetButton" & CSmartStr(id)) & """" xt.assign_p2 "backbutton_attrs",("id=""backButton" & CSmartStr(id)) & """" if bValue(eventObj.exists_p1("BeforeShowSearch")) then eventObj.BeforeShowSearch_p2 xt,templatefile end if pageObject.fillSetCntrlMaps setArrElement pageObject.body,"end",CSmartStr(ArrayElement(pageObject.body,"end")) & "" setArrElement pageObject.body,"end",CSmartStr(ArrayElement(pageObject.body,"end")) & (("") xt.assignbyref_p2 "body",pageObject.body xt.display_p1 templatefile Response.End else if IsEqual(mode,SEARCH_LOAD_CONTROL) then Set searchControlBuilder = (CreateClass("PanelSearchControl",4,searchControllerId,strTableName,pageObject.searchClauseObj,pageObject,Empty,Empty,Empty)) doAssignmentByRef ctrlField,postvalue("ctrlField") doAssignmentByRef ctrlBlockArr,searchControlBuilder.buildSearchCtrlBlockArr_p8(id,ctrlField,0,"",false,true,"","") Set resArr = (CreateDictionary()) setArrElement resArr,"control1",trim(xt.call_func_p1(ArrayElement(ctrlBlockArr,"searchcontrol"))) setArrElement resArr,"control2",trim(xt.call_func_p1(ArrayElement(ctrlBlockArr,"searchcontrol1"))) setArrElement resArr,"comboHtml",trim(ArrayElement(ctrlBlockArr,"searchtype")) setArrElement resArr,"delButt",trim(ArrayElement(ctrlBlockArr,"delCtrlButt")) setArrElement resArr,"delButtId",trim(searchControlBuilder.getDelButtonId_p2(ctrlField,id)) setArrElement resArr,"divInd",trim(id) setArrElement resArr,"fLabel",GetFieldLabel(GoodFieldName(strTableName),GoodFieldName(ctrlField)) setArrElement resArr,"ctrlMap",ArrayElement(pageObject.controlsMap,"controls") if IsEqual(postvalue("isNeedSettings"),"true") then pageObject.fillGlobalSettings pageObject.fillTableSettings setArrElementN resArr,CreateArray2("settings",ctrlField),pageObject.jsSettings end if ResponseWrite my_json_encode(resArr) Response.End end if end if %>