<%@ Control Language="VB" AutoEventWireup="false" CodeFile="TabTwoVB.ascx.vb" Inherits="Admin_TabTwoVB" %>
<%@ Register Assembly="Telerik.Web.UI" Namespace="Telerik.Web.UI" TagPrefix="telerik" %>
<link href="../smart.css" rel="stylesheet" type="text/css" />
<table cellspacing="0" cellpadding="15" width="100%" border="1">
</tr>
<tr>
<td style="background-color: #f3f3f3">
<telerik:RadSplitter ID="RadSplitter1" runat="server" Height="700" Width="820">
<telerik:RadPane ID="LibraryPane" BackColor="#f3f3f3" BorderColor="#f3f3f3" runat="server" Width="60%"><br /><br />
<telerik:RadTreeView ID="RadTreeViewEP" runat="server" Skin="Outlook" AllowNodeEditing="True"
OnContextMenuItemClick="RadTreeViewEP_ContextMenuItemClick" OnClientContextMenuItemClicked="onClientContextMenuItemClicked"
OnClientContextMenuShowing="onClientContextMenuShowing"
OnNodeEdit="RadTreeViewEP_NodeEdit"
Font-Bold="True" Font-Names="Arial" Font-Size="10pt" ForeColor="#732928"
DataSourceID="SqlDataSource1" DataTextField="blkbkName"
DataValueField="blkbkID">
<Nodes>
<telerik:RadTreeNode runat="server" Expanded="False"
ExpandMode="ServerSideCallBack"
Font-Bold="True" Font-Names="Arial" Font-Size="10pt" ForeColor="#732928"
Height="22px">
<Nodes>
<telerik:RadTreeNode runat="server" Font-Names="Arial" Font-Size="10pt"
ForeColor="#732928" Height="22px" ImageUrl="~/Images/booksx.gif" ExpandMode="ServerSideCallBack">
<Nodes>
<telerik:RadTreeNode runat="server" Font-Names="Arial" Font-Size="9pt"
ForeColor="#732928" Height="22px" ImageUrl="~/Images/books2x.gif">
</telerik:RadTreeNode>
</Nodes>
</telerik:RadTreeNode>
</Nodes>
</telerik:RadTreeNode>
</Nodes>
</telerik:RadTreeView>
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
ConnectionString="<%$ ConnectionStrings:SMARTConnectionString %>"
SelectCommand="INDSearchV5" SelectCommandType="StoredProcedure">
<SelectParameters>
<asp:SessionParameter DefaultValue="1" Name="SID" SessionField="CTECAdmin"
Type="String" />
<asp:SessionParameter DefaultValue="1" Name="NH" SessionField="NewHorizons"
Type="String" />
<asp:ControlParameter ControlID="ViewBy" DefaultValue="0" Name="TY"
PropertyName="SelectedValue" Type="Byte" />
<asp:ControlParameter ControlID="ViewBy" DefaultValue="0" Name="BR"
PropertyName="SelectedValue" Type="Byte" />
<asp:ControlParameter ControlID="txtContent" DefaultValue="0" Name="SrchX"
PropertyName="Text" Type="String" />
</SelectParameters>
</asp:SqlDataSource>
</telerik:RadPane>
<telerik:RadSplitBar ID="RadSplitbar1" runat="server" CollapseMode="Forward"></telerik:RadSplitBar>
<telerik:RadPane ID="DetailPane" runat="server" Scrolling="y" Height="30%">
<telerik:RadSplitter ID="RadSplitter2" runat="server" Orientation="Horizontal">
<telerik:RadPane ID="FilterPane" BackColor="#f3f3f3" runat="server">
<br />
<table>
<tr>
<td align="left" colspan="2"><br /><br />
<font face="Arial, Helvetica, sans-serif" color="#732928" size="2">View By:</font></td>
</tr>
<tr>
<td align="left" colspan="2">
<asp:RadioButtonList AutoPostBack="True" runat="server" ID="ViewBy"
Font-Size="10pt" Font-Names="Arial" ForeColor="#732928"
DataSourceID="SqlDataSource2" DataTextField="blkbkName"
DataValueField="blkbkView">
<asp:ListItem Selected="True" Value="0"></asp:ListItem>
</asp:RadioButtonList>
<asp:SqlDataSource ID="SqlDataSource2" runat="server"
ConnectionString="<%$ ConnectionStrings:SMARTConnectionString %>"
SelectCommand="INDRoles" SelectCommandType="StoredProcedure">
<SelectParameters>
<asp:SessionParameter DefaultValue="1" Name="SID" SessionField="ctecadmin"
Type="String" />
</SelectParameters>
</asp:SqlDataSource>
</td>
</tr>
</table>
</telerik:RadPane>
<telerik:RadSplitBar ID="RadSplitbar2" runat="server" CollapseMode="Forward"></telerik:RadSplitBar>
<telerik:RadPane ID="ContentPane" BackColor="#f3f3f3" runat="server" Scrolling="Both" Height="70%">
<br /> <font face="Arial, Helvetica, sans-serif" color="#732928" size="2">Hover Over Content</font>
<asp:textbox ID="txtContent2" runat="server" BorderColor="AliceBlue" Height="90%" Width="90%" Text="n.a." ></asp:textbox>
</telerik:RadPane>
</telerik:RadSplitter>
</telerik:RadPane>
</telerik:RadSplitter>
</td>
</tr>
</table>
<telerik:RadAjaxManager ID="RadAjaxManager1" runat="server"
DefaultLoadingPanelID="RadAjaxLoadingPanel1">
<AjaxSettings>
<telerik:AjaxSetting AjaxControlID="ViewBy">
<UpdatedControls>
<telerik:AjaxUpdatedControl ControlID="RadTreeViewEP" />
<telerik:AjaxUpdatedControl ControlID="ViewBy" />
</UpdatedControls>
</telerik:AjaxSetting>
</AjaxSettings>
</telerik:RadAjaxManager>
<telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" Runat="server"
height="75px" width="75px" HorizontalAlign="Center">
<img alt="Loading..."
src='../images/loading.gif'
style="border:0px;" />
</telerik:RadAjaxLoadingPanel>
Imports System
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Data
Imports System.Data.SqlClient
Imports Telerik.Web.UI
Imports Microsoft.VisualBasic
Partial Class Admin_TabTwoVB
Inherits System.Web.UI.UserControl
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load, Me.Load
'Put user code to initialize the page here
If Not Page.IsPostBack Then
Session("CtecAdmin") = 1
Session("NewHorizons") = 1
End If
End Sub
Protected Sub RadTreeViewEP_ContextMenuItemClick(ByVal sender As Object, ByVal e As RadTreeViewContextMenuEventArgs)
Select Case e.MenuItem.Value
Case "Copy"
e.Node.InsertAfter(CloneNode(e.Node, String.Format("Copy of {0}", e.Node.Text)))
Case "NewFolder"
Dim newNodeTitle As String = String.Format("New Folder", e.Node.ParentNode.Nodes.Count + 1)
e.Node.Nodes.Add(New RadTreeNode(newNodeTitle))
e.Node.Expanded = True
End Select
End Sub
Private Function CloneNode(ByVal original As RadTreeNode, ByVal text As String) As RadTreeNode
Dim cloned As RadTreeNode = New RadTreeNode()
cloned.Text = text
cloned.Font.Bold = original.Font.Bold
cloned.Font.Italic = original.Font.Italic
cloned.ImageUrl = original.ImageUrl
For Each node As RadTreeNode In original.Nodes
cloned.Nodes.Add(CloneNode(node, original.Text))
Next
Return cloned
End Function
Protected Sub RadTreeViewEP_NodeEdit(ByVal sender As Object, ByVal e As Telerik.Web.UI.RadTreeNodeEditEventArgs) Handles RadTreeViewEP.NodeEdit
Dim nodeEdited As RadTreeNode = e.Node
Dim newText As String = e.Text
nodeEdited.Text = newText
End Sub
Protected Sub RadTreeViewEP_NodeExpand(ByVal sender As Object, ByVal e As RadTreeNodeEventArgs) Handles RadTreeViewEP.NodeExpand
'SQL Database connection
Dim sConnect As New SMARTCB.ConnectSMART.Connections
Dim cn As New SqlConnection
cn.ConnectionString = sConnect.GetConnectionString
If e.Node.Level = 0 Then 'Get EP Indicator Topics (Functions)
Dim myCMDf As New SqlDataAdapter
Dim myCMf As New SqlCommand
myCMf.Connection = cn
myCMf.CommandType = CommandType.StoredProcedure
myCMf.CommandText = "FuncSearchV4"
Dim myParmF As New SqlParameter("@Key", SqlDbType.Int)
myParmF.Value = e.Node.Value
myParmF.Direction = ParameterDirection.Input
myCMf.Parameters.Add(myParmF)
myParmF = New SqlParameter("@SID", SqlDbType.VarChar)
myParmF.Value = "1"
myParmF.Direction = ParameterDirection.Input
myCMf.Parameters.Add(myParmF)
myParmF = New SqlParameter("@NH", SqlDbType.VarChar)
myParmF.Value = "1"
myParmF.Direction = ParameterDirection.Input
myCMf.Parameters.Add(myParmF)
myParmF = New SqlParameter("@SrchX", SqlDbType.VarChar)
myParmF.Value = "0"
myParmF.Direction = ParameterDirection.Input
myCMf.Parameters.Add(myParmF)
myCMDf.SelectCommand = myCMf
Dim FUNC As DataSet = New DataSet
myCMDf.Fill(FUNC, "dFunc")
Dim mydatatablefunc As New DataTable
mydatatablefunc = FUNC.Tables("dFunc")
'myCMDf.Parameters.AddWithValue("parentId", e.Node.Value)
'Dim adapter As New SqlDataAdapter(selectCommand)
'Dim data As New DataTable()
'adapter.Fill(data)
Dim myRowF As DataRow
Dim currRowsF() As DataRow = mydatatablefunc.Select(Nothing, Nothing, DataViewRowState.CurrentRows)
For Each myRowF In currRowsF 'build new table for positioning skill topics
Dim node As New RadTreeNode()
node.Text = myRowF("bbfuncname")
node.Value = myRowF("bbfuncId")
node.ImageUrl = "../images/booksx.gif"
node.Height = Unit.Pixel(22)
node.ForeColor = Drawing.Color.FromName("#732928")
node.Font.Size = "10"
'If CInt(myRowF("ChildCount")) > 0 Then
node.ExpandMode = TreeNodeExpandMode.ServerSideCallBack
'End If
e.Node.Nodes.Add(node)
Next
e.Node.Expanded = True
End If
If e.Node.Level = 1 Then 'Get EP Indicator SubTopics (Categories)
Dim myCMDc As New SqlDataAdapter
Dim myCMc As New SqlCommand
myCMc.Connection = cn
myCMc.CommandType = CommandType.StoredProcedure
myCMc.CommandText = "CatSearchV4"
Dim myParmC As New SqlParameter("@Key", SqlDbType.Int)
myParmC.Value = e.Node.Value
myParmC.Direction = ParameterDirection.Input
myCMc.Parameters.Add(myParmC)
myParmC = New SqlParameter("@SID", SqlDbType.VarChar)
myParmC.Value = "1"
myParmC.Direction = ParameterDirection.Input
myCMc.Parameters.Add(myParmC)
myParmC = New SqlParameter("@NH", SqlDbType.VarChar)
myParmC.Value = "1"
myParmC.Direction = ParameterDirection.Input
myCMc.Parameters.Add(myParmC)
myParmC = New SqlParameter("@SrchX", SqlDbType.VarChar)
myParmC.Value = "0"
myParmC.Direction = ParameterDirection.Input
myCMc.Parameters.Add(myParmC)
myCMDc.SelectCommand = myCMc
Dim CAT As DataSet = New DataSet
myCMDc.Fill(CAT, "dCat")
Dim mydatatablecat As New DataTable
mydatatablecat = CAT.Tables("dCat")
'myCMDf.Parameters.AddWithValue("parentId", e.Node.Value)
'Dim adapter As New SqlDataAdapter(selectCommand)
'Dim data As New DataTable()
'adapter.Fill(data)
Dim myRowC As DataRow
Dim currRowsC() As DataRow = mydatatablecat.Select(Nothing, Nothing, DataViewRowState.CurrentRows)
For Each myRowC In currRowsC 'build new table for positioning skill topics
Dim node As New RadTreeNode()
node.Text = myRowC("bbcatname")
node.ImageUrl = "../images/books2x.gif"
node.Height = Unit.Pixel(22)
node.ForeColor = Drawing.Color.FromName("#732928")
node.Font.Size = "9"
node.Value = myRowC("bbcatId")
'If CInt(myRowC("ChildCount")) > 0 Then
node.ExpandMode = TreeNodeExpandMode.ServerSideCallBack
'End If
e.Node.Nodes.Add(node)
Next
e.Node.Expanded = True
End If
End Sub
End Class
| Window.VisibleOnPageLoad = true; |
| Window.Visible = true; |
| private void HideWindow() |
| { |
| Window.VisibleOnPageLoad = false; |
| Window.Visible = false; |
| } |
| var man = GetRadWindowManager(); |
| man.open(null, "Window"); |
| <DetailTables> |
| <telerik:GridTableView DataSourceID="sqdsStringsLoc" AutoGenerateColumns="False" DataKeyNames="StringsID,LanguageCode" AllowAutomaticUpdates="true" AllowSorting="false" AllowFilteringByColumn="false" Width="100%" EditFormSettings-EditColumn-Visible="true" EditMode="PopUp"> |
| <EditFormSettings PopUpSettings-Width="780px" EditFormType="Template" PopUpSettings-Modal="true" CaptionDataField="LanguageCode"> |
| <FormTemplate> |
| <asp:Button ID="Button1" Text="Update" runat="server" CommandName="Update"></asp:Button> |
| <asp:Button ID="Button2" Text="Cancel" runat="server" CausesValidation="False" CommandName="Cancel"></asp:Button> |
| <br /> |
| <telerik:RadEditor ToolsFile="/Images/MySetOfTools.xml" Skin="Office2007" Language="de-DE" ID="edTheString1" runat="server" Width="760px" Height="150px" Content='<%# Bind("TheString") %>'> |
| </telerik:RadEditor> |
| </FormTemplate> |
| </EditFormSettings> |
| <telerik:RadCodeBlock ID="rcb" runat="server" > |
| <script type="text/javascript" language="javascript" > |
| var rgFunding = null |
| var rcmFunding = null |
| var motype = null |
| function pageLoad() { |
| rgFunding = $find('<%= rgFunding.ClientID %>') |
| rcmFunding = $find('<%= rcmFunding.ClientID %>'); |
| motype = $find('<%= motype.ClientID %>'); |
| } |
| function fundingClientClicked(sender, args) { |
| var itemLabel = args.get_item().get_value(); |
| switch (itemLabel) { |
| case "Select All": |
| rgFunding.get_masterTableView().selectAllItems(); |
| break; |
| case "Clear All": |
| rgFunding.get_masterTableView().clearSelectedItems(); |
| break; |
| case "Move": |
| var selectedRows = rgFunding.get_masterTableView().get_selectedItems(); |
| for (i = 0; i < selectedRows.length; i++) { |
| iID = selectedRows[i].getDataKeyValue("iID"); |
| bIsFlag= selectedRows[i].getDataKeyValue("bIsFlag"); |
| PageMethods.MoveFunding(iID, bIsFlag == "True" ? false : true, Repaint, HandleError); |
| } |
| break; |
| } |
| } |
| function Repaint(results) { |
| location.reload(true); |
| } |
| </script> |
| </telerik:RadCodeBlock> |
| <telerik:RadAjaxManager ID="RadAjaxManager1" runat="server" |
| DefaultLoadingPanelID="RadAjaxLoadingPanel1"> |
| <ajaxsettings> |
| <telerik:AjaxSetting AjaxControlID="rgFunding"> |
| <updatedcontrols> |
| <telerik:AjaxUpdatedControl ControlID="rgFunding" LoadingPanelID="RadAjaxLoadingPanel1" /> |
| </updatedcontrols> |
| </telerik:AjaxSetting> |
| </ajaxsettings> |
| </telerik:RadAjaxManager> |
| <telerik:RadAjaxLoadingPanel ID="RadAjaxLoadingPanel1" runat="server" Height="75px" |
| Width="75px" Transparency="25" > |
| <img alt="Loading..." src='<%= RadAjaxLoadingPanel.GetWebResourceUrl(Page, "Telerik.Web.UI.Skins.Default.Ajax.loading.gif") %>' |
| style="border: 0px;" /> |
| </telerik:RadAjaxLoadingPanel> |
| <telerik:RadContextMenu ID="rcmFunding" runat="server" |
| Skin="WebBlue" OnClientItemClicked="fundingClientClicked" |
| style="top: 213px; left: 317px" > |
| <Targets> |
| <telerik:ContextMenuControlTarget ControlID="rgFunding" /> |
| </Targets> |
| <CollapseAnimation Type="OutQuint" Duration="200"></CollapseAnimation> |
| </telerik:RadContextMenu> |
| <asp:Label ID="lblFundingHeader" runat="server" CssClass="HeaderTag" /> |
| <telerik:RadGrid ID="rgFunding" runat="server" Skin="WebBlue" |
| AutoGenerateColumns="False" GridLines="None" ShowFooter="True" |
| AllowSorting="True" AllowAutomaticInserts="true" AllowAutomaticUpdates="true" |
| AllowAutomaticDeletes="true" DataSourceID="ldsFunding" |
| AllowMultiRowEdit="true" oncustomaggregate="rgFunding_CustomAggregate" |
| OnDataBound="rgFunding_DataBound" Width="1000px" |
| onitemdeleted="rgFunding_ItemDeleted" oniteminserted="rgFunding_ItemInserted" |
| onitemupdated="rgFunding_ItemUpdated" AllowMultiRowSelection="True" |
| onitemcreated="rgFunding_ItemCreated" > |
| <ClientSettings> |
| <Selecting AllowRowSelect="true" /> |
| <Scrolling AllowScroll="true" UseStaticHeaders="true" ScrollHeight="200px" /> |
| </ClientSettings> |
| <HeaderContextMenu Skin="WebBlue"> |
| <CollapseAnimation Type="OutQuint" Duration="200"></CollapseAnimation> |
| </HeaderContextMenu> |
| <MasterTableView DataSourceID="ldsFunding" CommandItemDisplay="Top" DataKeyNames="iID" ClientDataKeyNames="iID, bIsFlag" AutoGenerateColumns="false" EditMode="InPlace" > |
| <Columns> |
| <telerik:GridEditCommandColumn ButtonType="ImageButton" UniqueName="Edit" ItemStyle-Width="25px" > |
| <ItemStyle CssClass="editbutton" /> |
| </telerik:GridEditCommandColumn> |
| <telerik:GridBoundColumn DataField="iID" HeaderText="ID" ReadOnly="true" SortExpression="iID" UniqueName="iID" Visible="False" /> |
| <telerik:GridDateTimeColumn DataField="dtSettlement" ItemStyle-Width="55px" HeaderText="Settlement" SortExpression="dtSettlement" UniqueName="dtSettlement" DataFormatString="{0:d}" /> |
| <telerik:GridDateTimeColumn DataField="dtMaturity" ItemStyle-Width="55px" HeaderText="Maturity" SortExpression="dtMaturity" UniqueName="dtMaturity" DataFormatString="{0:d}" /> |
| <telerik:GridNumericColumn DataField="curAmount" ItemStyle-Width="55px" HeaderText="Amount" SortExpression="curAmount" UniqueName="curAmount" DataFormatString="{0:N3}" Aggregate="Sum" /> |
| <telerik:GridBoundColumn DataField="iNoOfDays" ReadOnly="true" ItemStyle-Width="45px" HeaderText="# of<br />Days" SortExpression="iNoOfDays" UniqueName="iNoOfDays" DataFormatString="{0:0}" Aggregate="Custom" /> |
| <telerik:GridBoundColumn DataField="sSource" ItemStyle-Width="55px" HeaderText="Source" SortExpression="sSource" UniqueName="sSource" /> |
| <telerik:GridNumericColumn DataField="nCost" ItemStyle-Width="45px" HeaderText="Cost" SortExpression="nCost" UniqueName="nCost" DataFormatString="{0:N3}" Aggregate="Custom" /> |
| <telerik:GridButtonColumn ConfirmText="Delete this Funding?" ConfirmDialogType="RadWindow" ConfirmTitle="Delete" ButtonType="ImageButton" CommandName="Delete" Text="Delete" UniqueName="DeleteColumn"> |
| <ItemStyle HorizontalAlign="Center" CssClass="deletebutton" /> |
| </telerik:GridButtonColumn> |
| </Columns> |
| </MasterTableView> |
| <FilterMenu Skin="WebBlue"> |
| <CollapseAnimation Type="OutQuint" Duration="200"></CollapseAnimation> |
| </FilterMenu> |
| </telerik:RadGrid> |
| <asp:LinqDataSource ID="ldsFunding" runat="server" |
| ContextTypeName="fhlb.debt.middletier.DAL.DebtDataContext" EnableInsert="true" |
| EnableDelete="true" EnableUpdate="true" TableName="Funding_Currents" |
| OnInserting="ldsFunding_Inserting" OnDeleting="ldsFunding_Deleting" |
| OnUpdating="ldsFunding_Updating" oninserted="ldsFunding_Inserted" |
| onupdated="ldsFunding_Updated" Where="bIsFlag == @ bIsFlag&& dtBOM == @dtBOM" > |
| <WhereParameters> |
| <asp:QueryStringParameter Name="bIsFlag" QueryStringField="Flag" DefaultValue="false" Type="Boolean" /> |
| <asp:QueryStringParameter Name="dtBOM" QueryStringField="BOM" Type="DateTime" /> |
| </WhereParameters> |
| </asp:LinqDataSource> |
| <telerik:RadWindowManager ID="RadWindowManager1" runat="server" |
| style="font-weight: 700"> |
| </telerik:RadWindowManager> |
| protected void Page_Load(object sender, EventArgs e) |
| { |
| LoadFormElements(); |
| } |
| private void LoadFormElements() |
| { |
| lblFundingHeader.Text = "Funding"; |
| rcmFunding.Items.Clear(); |
| RadMenuItem rmiMove = new RadMenuItem(); |
| rmiMove.Text = "Move to " + (this.bIsFlag ? "Yes" : "No"); |
| rmiMove.Value = "Move"; |
| rmiMove.Attributes.Add("motype", (this.bIsFlag ? "Yes" : "No")); |
| rmiMove.PostBack = true; |
| RadMenuItem rmiSelectAll = new RadMenuItem(); |
| rmiSelectAll.Text = "Select All"; |
| rmiSelectAll.Value = "Select All"; |
| RadMenuItem rmiClearAll = new RadMenuItem(); |
| rmiClearAll.Text = "Clear All"; |
| rmiClearAll.Value = "Clear All"; |
| rcmFunding.Items.Add(rmiMove); |
| rcmFunding.Items.Add(rmiSelectAll); |
| rcmFunding.Items.Add(rmiClearAll); |
| } |
| [WebMethod] |
| public static void MoveFunding(string sID, Boolean bIsFlag) |
| { |
| Funding.MoveFunding(Convert.ToInt32(sID), bIsFlag); |
| } |
Hi,
I'm trying to integrate RADGrid control in a ASP.NET Dynamic Data Entities Website and I'm getting the following JAVASCRIPT error when I enable column filtering. The filtering does not work after this error is encountered. I have used sample applications that you provided at http://www.telerik.com/community/forums/aspnet-ajax/grid/radgrid-and-dynamicdata-entity-web-site.aspx
Error:
"AutoGenerateWhereClause Cannot be true if Where is defined. "
Can you please provide me some pointers on how to enable filtering for the RADGrid in a Dynamic Data Entities WebSite?
Thanks
Mahipal
function
onNodeDropping(sender, args)
I can able to get the 1st tree view control name as :
var
draggedTree = sender._uniqueId;
I need to this to restrict user to drop nodes from second tree view control into the 1st tree view control .
Regards
Manoj