<% Set tdatacourses = (CreateDictionary()) setArrElement tdatacourses,".NumberOfChars",80 setArrElement tdatacourses,".ShortName","courses" setArrElement tdatacourses,".OwnerID","" setArrElement tdatacourses,".OriginalTable","courses" Set fieldLabelscourses = (CreateDictionary()) if IsEqual(mlang_getcurrentlang(),"English") then setArrElement fieldLabelscourses,"English",CreateDictionary() setArrElement fieldToolTipscourses,"English",CreateDictionary() setArrElementN fieldLabelscourses,CreateArray2("English","CourseID"),"Course ID" setArrElementN fieldToolTipscourses,CreateArray2("English","CourseID"),"" setArrElementN fieldLabelscourses,CreateArray2("English","CourseTitle"),"Course Title" setArrElementN fieldToolTipscourses,CreateArray2("English","CourseTitle"),"" setArrElementN fieldLabelscourses,CreateArray2("English","CEUCredit"),"CEUCredit" setArrElementN fieldToolTipscourses,CreateArray2("English","CEUCredit"),"" setArrElementN fieldLabelscourses,CreateArray2("English","Location"),"Location" setArrElementN fieldToolTipscourses,CreateArray2("English","Location"),"" setArrElementN fieldLabelscourses,CreateArray2("English","CourseDates"),"Course Dates" setArrElementN fieldToolTipscourses,CreateArray2("English","CourseDates"),"" setArrElementN fieldLabelscourses,CreateArray2("English","DurationInDays"),"Duration In Days" setArrElementN fieldToolTipscourses,CreateArray2("English","DurationInDays"),"" setArrElementN fieldLabelscourses,CreateArray2("English","Tuitionfees"),"Tuitionfees" setArrElementN fieldToolTipscourses,CreateArray2("English","Tuitionfees"),"" if bValue(asp_count(ArrayElement(fieldToolTipscourses,"English"))) then setArrElement tdatacourses,".isUseToolTips",true end if end if setArrElement tdatacourses,".NCSearch",true setArrElement tdatacourses,".shortTableName","courses" setArrElement tdatacourses,".nSecOptions",0 setArrElement tdatacourses,".recsPerRowList",1 setArrElement tdatacourses,".tableGroupBy","0" setArrElement tdatacourses,".mainTableOwnerID","" setArrElement tdatacourses,".moveNext",1 setArrElement tdatacourses,".showAddInPopup",false setArrElement tdatacourses,".showEditInPopup",false setArrElement tdatacourses,".showViewInPopup",false setArrElement tdatacourses,".fieldsForRegister",CreateDictionary() setArrElement tdatacourses,".listAjax",false setArrElement tdatacourses,".audit",false setArrElement tdatacourses,".locking",false setArrElement tdatacourses,".listIcons",true setArrElement tdatacourses,".edit",true setArrElement tdatacourses,".inlineEdit",true setArrElement tdatacourses,".view",true setArrElement tdatacourses,".exportTo",true setArrElement tdatacourses,".printFriendly",true setArrElement tdatacourses,".delete",true setArrElement tdatacourses,".showSimpleSearchOptions",false setArrElement tdatacourses,".showSearchPanel",true setArrElement tdatacourses,".isUseAjaxSuggest",true setArrElement tdatacourses,".rowHighlite",true setArrElement tdatacourses,".addPageEvents",false setArrElementN tdatacourses,CreateArray2(".arrKeyFields",empty),"CourseID" setArrElement tdatacourses,".isUseCalendarForSearch",false setArrElement tdatacourses,".isUseTimeForSearch",false setArrElement tdatacourses,".isUseiBox",false setArrElement tdatacourses,".isUseInlineAdd",true setArrElement tdatacourses,".isUseInlineEdit",true setArrElement tdatacourses,".isUseInlineJs",bValue(ArrayElement(tdatacourses,".isUseInlineAdd")) or bValue(ArrayElement(tdatacourses,".isUseInlineEdit")) setArrElement tdatacourses,".allSearchFields",CreateDictionary() setArrElementN tdatacourses,CreateArray2(".globSearchFields",empty),"CourseID" if not bValue(asp_in_array("CourseID",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CourseID" end if setArrElementN tdatacourses,CreateArray2(".globSearchFields",empty),"CourseTitle" if not bValue(asp_in_array("CourseTitle",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CourseTitle" end if setArrElementN tdatacourses,CreateArray2(".globSearchFields",empty),"CEUCredit" if not bValue(asp_in_array("CEUCredit",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CEUCredit" end if setArrElementN tdatacourses,CreateArray2(".globSearchFields",empty),"Location" if not bValue(asp_in_array("Location",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"Location" end if setArrElementN tdatacourses,CreateArray2(".globSearchFields",empty),"CourseDates" if not bValue(asp_in_array("CourseDates",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CourseDates" end if setArrElementN tdatacourses,CreateArray2(".globSearchFields",empty),"DurationInDays" if not bValue(asp_in_array("DurationInDays",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"DurationInDays" end if setArrElementN tdatacourses,CreateArray2(".globSearchFields",empty),"Tuitionfees" if not bValue(asp_in_array("Tuitionfees",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"Tuitionfees" end if setArrElementN tdatacourses,CreateArray2(".googleLikeFields",empty),"CourseID" setArrElementN tdatacourses,CreateArray2(".googleLikeFields",empty),"CourseTitle" setArrElementN tdatacourses,CreateArray2(".googleLikeFields",empty),"CEUCredit" setArrElementN tdatacourses,CreateArray2(".googleLikeFields",empty),"Location" setArrElementN tdatacourses,CreateArray2(".googleLikeFields",empty),"CourseDates" setArrElementN tdatacourses,CreateArray2(".googleLikeFields",empty),"DurationInDays" setArrElementN tdatacourses,CreateArray2(".googleLikeFields",empty),"Tuitionfees" setArrElementN tdatacourses,CreateArray2(".advSearchFields",empty),"CourseID" if not bValue(asp_in_array("CourseID",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CourseID" end if setArrElementN tdatacourses,CreateArray2(".advSearchFields",empty),"CourseTitle" if not bValue(asp_in_array("CourseTitle",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CourseTitle" end if setArrElementN tdatacourses,CreateArray2(".advSearchFields",empty),"CEUCredit" if not bValue(asp_in_array("CEUCredit",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CEUCredit" end if setArrElementN tdatacourses,CreateArray2(".advSearchFields",empty),"Location" if not bValue(asp_in_array("Location",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"Location" end if setArrElementN tdatacourses,CreateArray2(".advSearchFields",empty),"CourseDates" if not bValue(asp_in_array("CourseDates",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"CourseDates" end if setArrElementN tdatacourses,CreateArray2(".advSearchFields",empty),"DurationInDays" if not bValue(asp_in_array("DurationInDays",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"DurationInDays" end if setArrElementN tdatacourses,CreateArray2(".advSearchFields",empty),"Tuitionfees" if not bValue(asp_in_array("Tuitionfees",ArrayElement(tdatacourses,".allSearchFields"),false)) then setArrElementN tdatacourses,CreateArray2(".allSearchFields",empty),"Tuitionfees" end if setArrElement tdatacourses,".isTableType","list" setArrElement tdatacourses,".isDisplayLoading",true setArrElement tdatacourses,".isResizeColumns",false setArrElement tdatacourses,".pageSize",20 gstrOrderBy = "" if bValue(asp_strlen(gstrOrderBy)) and not IsEqual(asp_strtolower(asp_substr(gstrOrderBy,0,8)),"order by") then gstrOrderBy = "order by " & CSmartStr(gstrOrderBy) end if setArrElement tdatacourses,".strOrderBy",gstrOrderBy setArrElement tdatacourses,".orderindexes",CreateDictionary() setArrElement tdatacourses,".sqlHead","SELECT CourseID, CourseTitle, CEUCredit, Location, CourseDates, DurationInDays, Tuitionfees" setArrElement tdatacourses,".sqlFrom","FROM courses" setArrElement tdatacourses,".sqlWhereExpr","" setArrElement tdatacourses,".sqlTail","" Set arrRPP = (CreateDictionary()) setArrElement arrRPP,asp_count(arrRPP),10 setArrElement arrRPP,asp_count(arrRPP),20 setArrElement arrRPP,asp_count(arrRPP),30 setArrElement arrRPP,asp_count(arrRPP),50 setArrElement arrRPP,asp_count(arrRPP),100 setArrElement arrRPP,asp_count(arrRPP),500 setArrElement arrRPP,asp_count(arrRPP),-1 setArrElement tdatacourses,".arrRecsPerPage",arrRPP Set arrGPP = (CreateDictionary()) setArrElement arrGPP,asp_count(arrGPP),1 setArrElement arrGPP,asp_count(arrGPP),3 setArrElement arrGPP,asp_count(arrGPP),5 setArrElement arrGPP,asp_count(arrGPP),10 setArrElement arrGPP,asp_count(arrGPP),50 setArrElement arrGPP,asp_count(arrGPP),100 setArrElement arrGPP,asp_count(arrGPP),-1 setArrElement tdatacourses,".arrGroupsPerPage",arrGPP Set tableKeys = (CreateDictionary()) setArrElement tableKeys,asp_count(tableKeys),"CourseID" setArrElement tdatacourses,".Keys",tableKeys Set fdata = (CreateDictionary()) setArrElement fdata,"strName","CourseID" setArrElement fdata,"ownerTable","courses" setArrElement fdata,"Label","Course ID" setArrElement fdata,"FieldType",3 setArrElement fdata,"UseiBox",false setArrElement fdata,"EditFormat","Text field" setArrElement fdata,"ViewFormat","" setArrElement fdata,"NeedEncode",true setArrElement fdata,"GoodName","CourseID" setArrElement fdata,"FullName","CourseID" setArrElement fdata,"IsRequired",true setArrElement fdata,"Index",1 setArrElement fdata,"EditParams","" setArrElement fdata,"bListPage",true setArrElement fdata,"bViewPage",true setArrElement fdata,"bAdvancedSearch",true setArrElement fdata,"bPrinterPage",true setArrElement fdata,"bExportPage",true setArrElement fdata,"validateAs",CreateDictionary() setArrElementN fdata,CreateArray3("validateAs","basicValidate",empty),getJsValidatorName("Number") setArrElementN fdata,CreateArray3("validateAs","basicValidate",empty),"IsRequired" setArrElement fdata,"FieldPermissions",true setArrElement tdatacourses,"CourseID",fdata Set fdata = (CreateDictionary()) setArrElement fdata,"strName","CourseTitle" setArrElement fdata,"ownerTable","courses" setArrElement fdata,"Label","Course Title" setArrElement fdata,"FieldType",200 setArrElement fdata,"UseiBox",false setArrElement fdata,"EditFormat","Text field" setArrElement fdata,"ViewFormat","" setArrElement fdata,"NeedEncode",true setArrElement fdata,"GoodName","CourseTitle" setArrElement fdata,"FullName","CourseTitle" setArrElement fdata,"Index",2 setArrElement fdata,"EditParams","" setArrElement fdata,"EditParams",CSmartStr(ArrayElement(fdata,"EditParams")) & " maxlength=50" setArrElement fdata,"bListPage",true setArrElement fdata,"bAddPage",true setArrElement fdata,"bInlineAdd",true setArrElement fdata,"bEditPage",true setArrElement fdata,"bInlineEdit",true setArrElement fdata,"bViewPage",true setArrElement fdata,"bAdvancedSearch",true setArrElement fdata,"bPrinterPage",true setArrElement fdata,"bExportPage",true setArrElement fdata,"validateAs",CreateDictionary() setArrElement fdata,"FieldPermissions",true setArrElement tdatacourses,"CourseTitle",fdata Set fdata = (CreateDictionary()) setArrElement fdata,"strName","CEUCredit" setArrElement fdata,"ownerTable","courses" setArrElement fdata,"FieldType",14 setArrElement fdata,"UseiBox",false setArrElement fdata,"EditFormat","Text field" setArrElement fdata,"ViewFormat","Number" setArrElement fdata,"DecimalDigits",2 setArrElement fdata,"NeedEncode",true setArrElement fdata,"GoodName","CEUCredit" setArrElement fdata,"FullName","CEUCredit" setArrElement fdata,"Index",3 setArrElement fdata,"EditParams","" setArrElement fdata,"bListPage",true setArrElement fdata,"bAddPage",true setArrElement fdata,"bInlineAdd",true setArrElement fdata,"bEditPage",true setArrElement fdata,"bInlineEdit",true setArrElement fdata,"bViewPage",true setArrElement fdata,"bAdvancedSearch",true setArrElement fdata,"bPrinterPage",true setArrElement fdata,"bExportPage",true setArrElement fdata,"validateAs",CreateDictionary() setArrElementN fdata,CreateArray3("validateAs","basicValidate",empty),getJsValidatorName("Number") setArrElement fdata,"FieldPermissions",true setArrElement tdatacourses,"CEUCredit",fdata Set fdata = (CreateDictionary()) setArrElement fdata,"strName","Location" setArrElement fdata,"ownerTable","courses" setArrElement fdata,"FieldType",200 setArrElement fdata,"UseiBox",false setArrElement fdata,"EditFormat","Text field" setArrElement fdata,"ViewFormat","" setArrElement fdata,"NeedEncode",true setArrElement fdata,"GoodName","Location" setArrElement fdata,"FullName","Location" setArrElement fdata,"Index",4 setArrElement fdata,"EditParams","" setArrElement fdata,"EditParams",CSmartStr(ArrayElement(fdata,"EditParams")) & " maxlength=30" setArrElement fdata,"bListPage",true setArrElement fdata,"bAddPage",true setArrElement fdata,"bInlineAdd",true setArrElement fdata,"bEditPage",true setArrElement fdata,"bInlineEdit",true setArrElement fdata,"bViewPage",true setArrElement fdata,"bAdvancedSearch",true setArrElement fdata,"bPrinterPage",true setArrElement fdata,"bExportPage",true setArrElement fdata,"validateAs",CreateDictionary() setArrElement fdata,"FieldPermissions",true setArrElement tdatacourses,"Location",fdata Set fdata = (CreateDictionary()) setArrElement fdata,"strName","CourseDates" setArrElement fdata,"ownerTable","courses" setArrElement fdata,"Label","Course Dates" setArrElement fdata,"FieldType",200 setArrElement fdata,"UseiBox",false setArrElement fdata,"EditFormat","Text field" setArrElement fdata,"ViewFormat","" setArrElement fdata,"NeedEncode",true setArrElement fdata,"GoodName","CourseDates" setArrElement fdata,"FullName","CourseDates" setArrElement fdata,"Index",5 setArrElement fdata,"EditParams","" setArrElement fdata,"EditParams",CSmartStr(ArrayElement(fdata,"EditParams")) & " maxlength=50" setArrElement fdata,"bListPage",true setArrElement fdata,"bAddPage",true setArrElement fdata,"bInlineAdd",true setArrElement fdata,"bEditPage",true setArrElement fdata,"bInlineEdit",true setArrElement fdata,"bViewPage",true setArrElement fdata,"bAdvancedSearch",true setArrElement fdata,"bPrinterPage",true setArrElement fdata,"bExportPage",true setArrElement fdata,"validateAs",CreateDictionary() setArrElement fdata,"FieldPermissions",true setArrElement tdatacourses,"CourseDates",fdata Set fdata = (CreateDictionary()) setArrElement fdata,"strName","DurationInDays" setArrElement fdata,"ownerTable","courses" setArrElement fdata,"Label","Duration In Days" setArrElement fdata,"FieldType",200 setArrElement fdata,"UseiBox",false setArrElement fdata,"EditFormat","Text field" setArrElement fdata,"ViewFormat","" setArrElement fdata,"NeedEncode",true setArrElement fdata,"GoodName","DurationInDays" setArrElement fdata,"FullName","DurationInDays" setArrElement fdata,"Index",6 setArrElement fdata,"EditParams","" setArrElement fdata,"EditParams",CSmartStr(ArrayElement(fdata,"EditParams")) & " maxlength=50" setArrElement fdata,"bListPage",true setArrElement fdata,"bAddPage",true setArrElement fdata,"bInlineAdd",true setArrElement fdata,"bEditPage",true setArrElement fdata,"bInlineEdit",true setArrElement fdata,"bViewPage",true setArrElement fdata,"bAdvancedSearch",true setArrElement fdata,"bPrinterPage",true setArrElement fdata,"bExportPage",true setArrElement fdata,"validateAs",CreateDictionary() setArrElement fdata,"FieldPermissions",true setArrElement tdatacourses,"DurationInDays",fdata Set fdata = (CreateDictionary()) setArrElement fdata,"strName","Tuitionfees" setArrElement fdata,"ownerTable","courses" setArrElement fdata,"FieldType",14 setArrElement fdata,"UseiBox",false setArrElement fdata,"EditFormat","Text field" setArrElement fdata,"ViewFormat","Number" setArrElement fdata,"DecimalDigits",2 setArrElement fdata,"NeedEncode",true setArrElement fdata,"GoodName","Tuitionfees" setArrElement fdata,"FullName","Tuitionfees" setArrElement fdata,"Index",7 setArrElement fdata,"EditParams","" setArrElement fdata,"bListPage",true setArrElement fdata,"bAddPage",true setArrElement fdata,"bInlineAdd",true setArrElement fdata,"bEditPage",true setArrElement fdata,"bInlineEdit",true setArrElement fdata,"bViewPage",true setArrElement fdata,"bAdvancedSearch",true setArrElement fdata,"bPrinterPage",true setArrElement fdata,"bExportPage",true setArrElement fdata,"validateAs",CreateDictionary() setArrElementN fdata,CreateArray3("validateAs","basicValidate",empty),getJsValidatorName("Number") setArrElement fdata,"FieldPermissions",true setArrElement tdatacourses,"Tuitionfees",fdata setArrElementByRef tables_data,"courses",tdatacourses setArrElementByRef field_labels,"courses",fieldLabelscourses setArrElementByRef fieldToolTips,"courses",fieldToolTipscourses setArrElement detailsTablesData,"courses",CreateDictionary() setArrElement masterTablesData,"courses",CreateDictionary() mIndex = CSmartDbl(1)-1 strOriginalDetailsTable = "customer" setArrElementN masterTablesData,CreateArray2("courses",mIndex),CreateDictionary12("mDataSourceTable","customer","mOriginalTable",strOriginalDetailsTable,"mShortTable","customer","masterKeys",CreateDictionary(),"detailKeys",CreateDictionary(),"dispChildCount","1","hideChild","0","dispInfo","1","previewOnList",0,"previewOnAdd",0,"previewOnEdit",0,"previewOnView",0) setArrElementN masterTablesData,CreateArray4("courses",mIndex,"masterKeys",empty),"RegisterCID" setArrElementN masterTablesData,CreateArray4("courses",mIndex,"detailKeys",empty),"CourseID" asp_include getabspath("classes/sql.asp"),true Set proto17 = (CreateDictionary()) setArrElement proto17,"m_strHead","SELECT" setArrElement proto17,"m_strFieldList","CourseID, CourseTitle, CEUCredit, Location, CourseDates, DurationInDays, Tuitionfees" setArrElement proto17,"m_strFrom","FROM courses" setArrElement proto17,"m_strWhere","" setArrElement proto17,"m_strOrderBy","" setArrElement proto17,"m_strTail","" Set proto18 = (CreateDictionary()) setArrElement proto18,"m_sql","" setArrElement proto18,"m_uniontype","SQLL_UNKNOWN" Set obj = (CreateClass("SQLNonParsed",1,CreateDictionary1("m_sql",""),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto18,"m_column",obj setArrElement proto18,"m_contained",CreateDictionary() setArrElement proto18,"m_strCase","" setArrElement proto18,"m_havingmode","0" setArrElement proto18,"m_inBrackets","0" setArrElement proto18,"m_useAlias","0" Set obj = (CreateClass("SQLLogicalExpr",1,proto18,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto17,"m_where",obj Set proto20 = (CreateDictionary()) setArrElement proto20,"m_sql","" setArrElement proto20,"m_uniontype","SQLL_UNKNOWN" Set obj = (CreateClass("SQLNonParsed",1,CreateDictionary1("m_sql",""),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto20,"m_column",obj setArrElement proto20,"m_contained",CreateDictionary() setArrElement proto20,"m_strCase","" setArrElement proto20,"m_havingmode","0" setArrElement proto20,"m_inBrackets","0" setArrElement proto20,"m_useAlias","0" Set obj = (CreateClass("SQLLogicalExpr",1,proto20,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto17,"m_having",obj setArrElement proto17,"m_fieldlist",CreateDictionary() Set proto22 = (CreateDictionary()) Set obj = (CreateClass("SQLField",1,CreateDictionary2("m_strName","CourseID","m_strTable","courses"),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto22,"m_expr",obj setArrElement proto22,"m_alias","" Set obj = (CreateClass("SQLFieldListItem",1,proto22,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fieldlist",empty),obj Set proto24 = (CreateDictionary()) Set obj = (CreateClass("SQLField",1,CreateDictionary2("m_strName","CourseTitle","m_strTable","courses"),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto24,"m_expr",obj setArrElement proto24,"m_alias","" Set obj = (CreateClass("SQLFieldListItem",1,proto24,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fieldlist",empty),obj Set proto26 = (CreateDictionary()) Set obj = (CreateClass("SQLField",1,CreateDictionary2("m_strName","CEUCredit","m_strTable","courses"),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto26,"m_expr",obj setArrElement proto26,"m_alias","" Set obj = (CreateClass("SQLFieldListItem",1,proto26,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fieldlist",empty),obj Set proto28 = (CreateDictionary()) Set obj = (CreateClass("SQLField",1,CreateDictionary2("m_strName","Location","m_strTable","courses"),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto28,"m_expr",obj setArrElement proto28,"m_alias","" Set obj = (CreateClass("SQLFieldListItem",1,proto28,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fieldlist",empty),obj Set proto30 = (CreateDictionary()) Set obj = (CreateClass("SQLField",1,CreateDictionary2("m_strName","CourseDates","m_strTable","courses"),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto30,"m_expr",obj setArrElement proto30,"m_alias","" Set obj = (CreateClass("SQLFieldListItem",1,proto30,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fieldlist",empty),obj Set proto32 = (CreateDictionary()) Set obj = (CreateClass("SQLField",1,CreateDictionary2("m_strName","DurationInDays","m_strTable","courses"),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto32,"m_expr",obj setArrElement proto32,"m_alias","" Set obj = (CreateClass("SQLFieldListItem",1,proto32,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fieldlist",empty),obj Set proto34 = (CreateDictionary()) Set obj = (CreateClass("SQLField",1,CreateDictionary2("m_strName","Tuitionfees","m_strTable","courses"),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto34,"m_expr",obj setArrElement proto34,"m_alias","" Set obj = (CreateClass("SQLFieldListItem",1,proto34,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fieldlist",empty),obj setArrElement proto17,"m_fromlist",CreateDictionary() Set proto36 = (CreateDictionary()) setArrElement proto36,"m_link","SQLL_MAIN" Set proto37 = (CreateDictionary()) setArrElement proto37,"m_strName","courses" setArrElement proto37,"m_columns",CreateDictionary() setArrElementN proto37,CreateArray2("m_columns",empty),"CourseID" setArrElementN proto37,CreateArray2("m_columns",empty),"CourseTitle" setArrElementN proto37,CreateArray2("m_columns",empty),"CEUCredit" setArrElementN proto37,CreateArray2("m_columns",empty),"Location" setArrElementN proto37,CreateArray2("m_columns",empty),"CourseDates" setArrElementN proto37,CreateArray2("m_columns",empty),"DurationInDays" setArrElementN proto37,CreateArray2("m_columns",empty),"Tuitionfees" Set obj = (CreateClass("SQLTable",1,proto37,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto36,"m_table",obj setArrElement proto36,"m_alias","" Set proto38 = (CreateDictionary()) setArrElement proto38,"m_sql","" setArrElement proto38,"m_uniontype","SQLL_UNKNOWN" Set obj = (CreateClass("SQLNonParsed",1,CreateDictionary1("m_sql",""),Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto38,"m_column",obj setArrElement proto38,"m_contained",CreateDictionary() setArrElement proto38,"m_strCase","" setArrElement proto38,"m_havingmode","0" setArrElement proto38,"m_inBrackets","0" setArrElement proto38,"m_useAlias","0" Set obj = (CreateClass("SQLLogicalExpr",1,proto38,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElement proto36,"m_joinon",obj Set obj = (CreateClass("SQLFromListItem",1,proto36,Empty,Empty,Empty,Empty,Empty,Empty)) setArrElementN proto17,CreateArray2("m_fromlist",empty),obj setArrElement proto17,"m_groupby",CreateDictionary() setArrElement proto17,"m_orderby",CreateDictionary() Set obj = (CreateClass("SQLQuery",1,proto17,Empty,Empty,Empty,Empty,Empty,Empty)) doAssignment queryData_courses,obj setArrElement tdatacourses,".sqlquery",queryData_courses setArrElement tableEvents,"courses",CreateClass("eventsBase",0,Empty,Empty,Empty,Empty,Empty,Empty,Empty) %>