Questions on UI for ASP.NET AJAX Forum

110,792 questions

1 answer

119 views

Hi,
I'm using telerik radeditor 5.8.11 version. I added a sentence and three words under it. When I added a bullet to the first word it worked fine and then I added bullet to the sentence then it messed up the format. Attached are the images illustating this issue.

Editor

answered on 03 Oct 2011

2 answers

346 views

[Solved] At which event, the RadGrid Rebind() method should be called?

I have a programmatically created RadGrid@

1) when it's rebound (Rebind() method is called) on Page_Init() event and added to a place holder on the page.

below features work fine:

Normal load
nested tables
Export to excel feature - the properties e.g. ExportDataOnly

Below feature doesn't work:

RadGrid Paging

2) When Rebind() is called on the RadGrid_PreRender event

The below features work fine:

Normal load
nested tables
RadGrid Paging

the below feature doesn't work:

Export to excel feature - the properties e.g. ExportDataOnly

************
Basically, at which event the RadGrid Rebind() method should be called so that all the above features of the RadGrid work?!

I tried these: RadGrid_Load, RadGrid_Init, Page_PreInit, etc but couldn't any location using which all these features work.

Please advise.

Thanks

Grid

answered on 03 Oct 2011

1 answer

49 views

Rad Editor is not working in Firefox 6

Rad Editor is not working in Firefox 6. the details about Rad Editor is Given Below

Name :- RadEditor.Net2

Version :- 7.2.1.0

I also attached Screenshot in it.

Editor

answered on 03 Oct 2011

1 answer

45 views

What's the benefit of using the Google spellchecker as the provider?

What's the benefit of using the Google spellchecker as the provider vs the internal one?

Spell

answered on 03 Oct 2011

1 answer

76 views

RadTabStrip and Page Expire

Wasn't sure where to post this question, so if it needs to be moved... feel free.

My problem is this:

I have a RadTabStrip that I use for navigation. If I then click on a link outside of the radtab strip... and then press the back button to get back to my page with the tabstrip, the webpage expires and I have to manually refresh the page. This is only a problem in Internet Explorer. Firefox let's me return to the previous page with no problems.... however the client likes to use IE. Any ideas?

I've investigated caching but so far have been unable to fix this problem.

TabStrip

answered on 03 Oct 2011

1 answer

91 views

Hierarchical Grid, binding problem

I can not find the problem out.
Hierarchical Grid, autogenerated column, datasource from my business object.
Here is the code

<telerik:RadGrid ID="RadGridTableau"

runat="server"

GridLines="Vertical"

AllowPaging="true"

allowsorting="true"

Skin="Simple"

AllowFilteringByColumn="False"

AutoGenerateColumns="True"

PageSize="10"

Width="1500"

>

<MasterTableView NoMasterRecordsText="Nessun Tableau presente."

GridLines="Vertical"

AllowPaging="true"

AllowFilteringByColumn="False"

TableLayout="Fixed"

Name="TableauMain"

DataKeyNames="idTypology"

>

<DetailTables>

<telerik:GridTableView DataKeyNames="idRisorsa" Name="TableauDetail" AutoGenerateColumns="true">

<Columns>

</Columns>

</telerik:GridTableView>

</DetailTables>

<Columns>

</Columns>

</MasterTableView>

<ClientSettings enablePostBackOnRowClick="true" >

<ClientEvents OnRowContextMenu="RowContextMenu"></ClientEvents>

<Selecting AllowRowSelect="True" />

</ClientSettings>

</telerik:RadGrid>

Protected Sub RadGridTableau_DetailTableDataBind(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridDetailTableDataBindEventArgs) Handles RadGridTableau.DetailTableDataBind

Try

Dim dataItem As GridDataItem = CType(e.DetailTableView.ParentItem, GridDataItem)

Dim idTypology As String = dataItem.GetDataKeyValue("idTypology").ToString()

Dim d1 As Date = RadDatePicker_From.SelectedDate

Dim d2 As Date = RadDatePicker_To.SelectedDate

Dim polInterface As New POL_Manager.CPolInterface(myConn)

Dim myDatasource As DataSet = polInterface.StateResources(idTypology, d1, d2, AvailableState)

LogManager.WriteToDebugLog("c:\log\aa\", "RadGridTableau_DetailTableDataBind myDatasource.Tables(0).Columns.Count " & myDatasource.Tables(0).Columns.Count)

e.DetailTableView.DataSource = myDatasource

'e.DetailTableView.ShowHeader = False

Catch ex As Exception

Call LogManager.WriteToErrorLog(errorPath, ClassName, System.Reflection.MethodBase.GetCurrentMethod.Name.ToString(), ex, Err())

End Try

End Sub

I have a simple button too, it is used to rebind grid with different values for the business object datasource (polInterface.StateResources(idTypology, d1, d2, AvailableState) ) d1 and d2 are here different then first time

<asp:Button ID="btnRebind" runat="server" Text="Reload" />

Protected Sub btnRebind_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnRebind.Click

Try

RadGridTableau.Rebind()

For Each item As GridDataItem In RadGridTableau.MasterTableView.Items

For Each innerView As GridTableView In item.ChildItem.NestedTableViews

innerView.DataSource = Nothing

innerView.Rebind()

Next

Catch ex As Exception

Call LogManager.WriteToErrorLog(errorPath, ClassName, System.Reflection.MethodBase.GetCurrentMethod.Name.ToString(), ex, Err)

End Try

End Sub

For example:
at the beginning d1=today d2=dateadd("m",1,today) everything ok
I change d1 and d2, press reload button. RadGridTableau_DetailTableDataBind is invoked.
Mastertableaview is correct, show colums and data for the changed period, innerviews still shows old data BUT
myDatasource.Tables(0).Columns.Count)
tells me they are bound to the correct datasource (gives back coloumn count of new period).

So I first thought to an ajax problem. I removed all the ajax still does not work

Grid

answered on 03 Oct 2011

1 answer

111 views

Hide expand icon for row which not have child row

hi people
I have a problem with autogenerated hierarchy grid.grid show expand icon for all rows .i want only show for rows which have child.
in picture shown
please help to me

Grid

answered on 03 Oct 2011

1 answer

228 views

Refresh RadSplitter

Hello,

I have 2 RadSplitter with 1 RadPane inside each.
The first RadPane is loading a page which contains a RadTabStrip.
The second RadPane is loading an URL.

Is it possible to refresh the second RadPane or RadSplitter when I modifi the tab on the RadTabStrip?

Thank you for your help.

Donatien

Splitter

answered on 03 Oct 2011

0 answers

136 views

Problem with MasterTableView.SelectRow

Hi,

I am using RadGrid with MasterTableView and ExpandCollapseColumn.

My problem is, when I expand a row, and select any rows below the expanded row, the checkbox against the previous row got selected.
I am calling SelectRow as:

ClientGrid.MasterTableView.SelectRow(ClientGrid.MasterTableView.Rows[rowIndex].Control,

true);

Please suggest.

Regards,
Jeevan

My grid HTML looks like this:

radG:RadGrid AllowFilteringByColumn="false" Skin="Windows" SkinsPath="~/radcontrols/Grid/skins"

ID="RadGrid1" CssClass="bg-AdS-000110" runat="server" CellPadding="4" CellSpacing="1"

GridLines="none" AutoGenerateColumns="false" AllowSorting="true" AllowPaging="true"

AllowCustomPaging="true" AllowMultiRowSelection="true" OnSortCommand="RadGrid1_SortCommand"

OnNeedDataSource="RadGrid1_NeedDataSource" OnDetailTableDataBind="RadGrid1_DetailTableDataBind"

OnItemDataBound="RadGrid1_ItemDataBound" OnItemCommand="RadGrid1_ItemCommand">

<ClientSettings ColumnsReorderMethod="Reorder" AllowExpandCollapse="true" AllowColumnsReorder="true"

ReorderColumnsOnClient="false">

<ClientEvents OnRowSelecting="RowSelecting" OnRowDeselected="RowDeselected" OnRowSelected="RowSelected"

OnGridCreated="GridCreated" />

</ClientSettings>

<MasterTableView AllowMultiColumnSorting="false" AllowCustomSorting="true" DataMember="master"

Name="masterName" HierarchyLoadMode="ServerOnDemand" DataKeyNames="x,y,z"

Width="100%" CellPadding="0" CellSpacing="0" GridLines="None" BorderWidth="0">

</ExpandCollapseColumn>

<radG:GridTableView AllowFilteringByColumn="false" runat="server" GridLines="None"

CellPadding="0" CellSpacing="0" HierarchyLoadMode="Client" HierarchyDefaultExpanded="true"

Width="100%" DataMember="details" Name="detailsName" ShowHeader="false">

<radG:GridTemplateColumn AllowFiltering="false">

<uc1:ItemDetails runat="server" ID="IDetails"></uc1:ItemDetails>

</ItemTemplate>

</radG:GridTemplateColumn>

</Columns>

</radG:GridTableView>

</DetailTables>

<radG:GridClientSelectColumn UniqueName="CS" Reorderable="false">

</radG:GridClientSelectColumn>

<radG:GridTemplateColumn HeaderStyle-HorizontalAlign="left" Reorderable="false">

<asp:ImageButton ID="IB_Notes" onMouseout="hideddrivetip()" runat="server" ImageUrl="~/Images/add_note.gif"

OnClick="NotesView_Click"></asp:ImageButton>

<asp:Image ID="IMG_Notes" Visible="false" onMouseout="hideddrivetip()" runat="server"

ImageUrl="~/images/add_note.gif" />

<asp:Image ID="IB_Error" Visible="false" onMouseout="hideddrivetip()" runat="server"

ImageUrl="~/images/icon/ico_error.gif"></asp:Image>

<asp:ImageButton ID="IB_PreflightChk" Visible="false" runat="server" OnClick="IB_PreflightChk_Click"

ImageUrl="~/Images/icon_success.gif" />

</ItemTemplate>

</radG:GridTemplateColumn>

<radG:GridTemplateColumn SortExpression="BuyerSuppliedProductName" HeaderText="xxx"

HeaderStyle-Wrap="true">

<asp:HyperLink ID="HL_JN" runat="server" NavigateUrl="javascript:;" Text='zzz'></asp:HyperLink>

<asp:HyperLink ID="HL_JN1" runat="server" NavigateUrl="javascript:;" Text='zzz'></asp:HyperLink>

</ItemTemplate>

</radG:GridTemplateColumn>

<radG:GridBoundColumn SortExpression="ProductName" DataField="ProductName" HeaderText="xxx"

HeaderStyle-Wrap="true" ItemStyle-HorizontalAlign="left" HeaderStyle-HorizontalAlign="left">

</radG:GridBoundColumn>

<radG:GridTemplateColumn SortExpression="Cost" HeaderText="xxx"

HeaderStyle-Wrap="false">

<asp:HyperLink ID="HL_Quote" Target="_blank" runat="server" Text='xxx'></asp:HyperLink>

</ItemTemplate>

</radG:GridTemplateColumn>

<radG:GridTemplateColumn SortExpression="DueDate" HeaderText="xxx"

HeaderStyle-Wrap="false">

<asp:Label ID="LBL_ItmDD" runat="server" Text='xxx'></asp:Label>

</ItemTemplate>

</radG:GridTemplateColumn>

<radG:GridBoundColumn DataField="CopOrgImp" AllowSorting="false" HeaderText="xxx"

ItemStyle-HorizontalAlign="right" ItemStyle-Wrap="false" HeaderStyle-HorizontalAlign="left"

ItemStyle-Width="1">

</radG:GridBoundColumn>

<radG:GridTemplateColumn HeaderText="ccc" HeaderStyle-Wrap="false">

<asp:Label ID="LBL_ItmNUP" runat="server" Text='xxx'></asp:Label>

</ItemTemplate>

</radG:GridTemplateColumn><radG:GridTemplateColumn SortExpression="OutputName" HeaderText="<%$ String:OperatorView.OutPut %>"

HeaderStyle-Wrap="false">

<asp:Label ID="LBL_ItmOP" runat="server" Text='aaa'></asp:Label>

</ItemTemplate>

</radG:GridTemplateColumn>

<radG:GridBoundColumn SortExpression="StatusName" DataField="StatusName" HeaderText="vvv"

HeaderStyle-Wrap="false" ItemStyle-HorizontalAlign="left" HeaderStyle-HorizontalAlign="left">

</radG:GridBoundColumn>

<radG:GridBoundColumn SortExpression="OperatorName" DataField="OperatorName" HeaderText="bvb"

HeaderStyle-Wrap="false" ItemStyle-HorizontalAlign="left" HeaderStyle-HorizontalAlign="left">

</radG:GridBoundColumn>

</Columns>

</MasterTableView>

</ClientSettings>

</radG:RadGrid>

Grid

asked on 03 Oct 2011

1 answer

166 views

RadGrid Alignment Issue in IE7 ,Works fine in IE8

Hi,





   My need is to display the header like this dynamically, 

 

    
        
            LEFT
            RIGHT
        
        
            IN
            OUT
            IN
            OUT
        
        
            This cell spans 4 columns
        
    














  The following code does this exactly,In IE8 it works fine but in IE7 the column width differs ,

  Itemstyle width of each column increases if we increase the headerstlyle width.

  I have uploded the image both in IE7 and IE8.











<%@ Page Language="VB" AutoEventWireup="false"  CodeFile="Default2.aspx.vb" Inherits="Default2" %>

LEFT	RIGHT
IN	OUT	IN	OUT
This cell spans 4 columns

<!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">

<head runat="server">

<title></title>

<style type="text/css">

.Insert

{

width: 115px;

}

.Update

{

width: 113px;

}

.Delete

{

width: 221px;

}

</style>

<style type="text/css">

.RadPicker

{

padding-bottom:15px !important;

}

</style>

<style type="text/css">

.RadGrid .rgDataDiv

{

position: relative;

}

</style>

<script type="text/javascript" language="javascript">

function RowDblClick(sender, eventArgs) {

editedRow = eventArgs.get_itemIndexHierarchical();

$find("dgdPrgSetup").get_masterTableView().editItem(editedRow);

}

function SelectGridRow(ItemIndex) {

var Grid = $find("dgdPrgSetup");

var table = Grid.get_masterTableView();

var row = table.get_dataItems()[ItemIndex];

table.clearSelectedItems();

table.selectItem(ItemIndex);

}

function valueChanged() {

document.getElementById("ctl00_Content_hidKeyPress").value = "1";

}

//

String.prototype.ReplaceAll = function(stringToFind, stringToReplace) {

var temp = this;

var index = temp.indexOf(stringToFind);

while (index != -1) {

temp = temp.replace(stringToFind, stringToReplace);

index = temp.indexOf(stringToFind);

}

return temp;

}

var ControlID = "", tname = "", tDp = "", DpSelIn = "", tOrginalId = "", dpss = "0", HiddenTxt, tDp1 = "",

saveButtonID;

var dpSelectedIndex;

var dpIntialSlind; var i = 0; var j = 0;

function whichElement(e, getCID, getHfcid, getButtonID) {

saveButtonID = getButtonID;

HiddenTxt = getHfcid;

var targ;

if (!e)

{ var e = window.event; }

if (e.target) { targ = e.target; }

else if (e.srcElement) { targ = e.srcElement; }

if (targ.nodeType == 3) { targ = targ.parentNode; }

tOrginalId = targ.id;

tname = getCID;

tDp = targ.type;

tDp1 = targ.className

var Kycode = event.keyCode;

if (tDp1 != "rcbInput" && tDp != "select-one") {

if (Kycode != "0" && Kycode != "9") {

var myRegExp = tname;

var matchPos1 = ControlID.indexOf(myRegExp);

if (matchPos1 == -1) {

ControlID = ControlID + "," + tname;

document.getElementById(getHfcid).value = ControlID;

if (document.getElementById(getButtonID) != null) {

document.getElementById(getButtonID).disabled = false;

}

else {

dpSelectedIndex = document.getElementById(HiddenTxt).selectedIndex;

if (tDp1 == "rcbInput") {

tOrginalId = targ.name;

tOrginalId = tOrginalId.ReplaceAll("$", "_");

var combo = $find(tOrginalId);

combo.get_events().addHandler("selectedIndexChanged", RadCmbOnChange);

}

else {

document.getElementById(tOrginalId).setAttribute("onchange", dpOnChange);

}

function UpperCase(rowID, id) {

// var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

// var itemPrgmId = masterTable.get_dataItems()[rowID];

// var txtProgmIdenfer = itemPrgmId.findControl("txtProgIdentifier")._textBoxElement.value;

//            itemPrgmId.findControl("txtProgIdentifier")._textBoxElement.value = txtProgmIdenfer.toUpperCase();

var ctrl = document.getElementById(id.id);

var ctrlVal = document.getElementById(id.id).value;

ctrl.value = ctrlVal.toUpperCase();

}

function CurrencyCodeValidation(sender, args) {

var txtCurrencyCode = sender.get_text();

if (txtCurrencyCode == '') {

callconfirmbuttoncurrency("okButton");

var oAlert = radalert("Value required for this item.", 300, 110, "");

oAlert.add_close(function() { $find(sender._onFocus()); });

// radalert("Value required for this item.", 300, 110, "");

// $find(sender._clientID).focus();

return false;

}

function HolidayValidation(rowID, id) {

// var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

//            //var x = $find("ctl00_Content_dgdPrgSetup").get_masterTableView().getColumnByUniqueName("Holiday");

// var itemCloseYear = masterTable.get_dataItems()[rowID];

// //var txtHolidayGroup = itemCloseYear.findControl("txtHolidayGroup")._textBoxElement.value;

var ctrlVal = document.getElementById(id.id).value;

callconfirmbutton("okButton");

if (ctrlVal == '') {

var oAlert = radalert("Value required for this item.", 300, 110, "");

oAlert.add_close(function() { document.getElementById(id.id).focus(); });

// radalert("Value required for this item.", 300, 110, "");

return false;

}

function HolidayValidation1(sender, args) {

var x = $find("ctl00_Content_dgdPrgSetup").get_masterTableView().getColumnByUniqueName("Holiday");

var txtHolidayGroup = sender.get_value();

callconfirmbutton("okButton");

if (txtHolidayGroup == '') {

if (document.getElementById("ctl00_Content_hidRowID").value != 1) {

var oAlert = radalert("Value required for this item.", 300, 110, "");

oAlert.add_close(function() { $find(sender._clientID).focus(); });

}

document.getElementById("ctl00_Content_hidRowID").value = 1

return false;

}

function fnCallOK() {

var rowID = document.getElementById("ctl00_Content_hidRowID").value;

var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var itemHolidayGroup = masterTable.get_dataItems()[rowID];

itemHolidayGroup.findControl("txtHolidayGroup")._textBoxElement.focus();

document.getElementById("ctl00_Content_hidRowID").value = "";

}

function RadCmbOnChange() {

var myRegExp = tname;

var matchPos1 = ControlID.indexOf(myRegExp);

if (matchPos1 == -1) {

ControlID = ControlID + "," + tname;

document.getElementById(HiddenTxt).value = ControlID;

}

function dpOnChange() {

var dpSelIndex = document.getElementById(tOrginalId).selectedIndex;

var currentDpSelIndex;

if (ControlID != "" && ControlID != ",") {

var myRegExp = tname;

var matchPos1 = ControlID.indexOf(myRegExp);

if (matchPos1 == -1)

i = 0;

}

if (i == 0) {

dpIntialSlind = dpSelectedIndex;

currentDpSelIndex = dpSelIndex;

i = 1;

}

else {

currentDpSelIndex = dpSelIndex;

}

if (dpIntialSlind != currentDpSelIndex) {

var myRegExp = tname;

var matchPos1 = ControlID.indexOf(myRegExp);

if (matchPos1 == -1) {

ControlID = ControlID + "," + tname;

if (document.getElementById(saveButtonID) != null)

document.getElementById(saveButtonID).disabled = false;

}

///

function setGlCloseDate(rowID) {

var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var itemCloseYear = masterTable.get_dataItems()[rowID];

var txtEndMonth = itemCloseYear.findControl("FiscalYearEndMonth")._textBoxElement.value;

var txtEndDay = itemCloseYear.findControl("FiscalYearEndDay")._textBoxElement.value;

var txtCloseYear = itemCloseYear.findControl("HardCloseYear")._textBoxElement.value;

//var txtHolidayGroup = itemCloseYear.findControl("holiday_group")._textBoxElement.value;

var mYear = txtCloseYear.substr(0, 4)

if ((txtEndDay > 0 && txtEndDay < 32) || (txtEndDay == '')) {

}

else {

radalert("Please enter a valid day.", 300, 110, "");

itemCloseYear.findControl("FiscalYearEndDay")._textBoxElement.focus();

return false;

}

if ((txtEndMonth > 0 && txtEndMonth < 13) || (txtEndMonth == '')) {

}

else {

radalert("Please enter a valid month", 300, 110, "");

itemCloseYear.findControl("FiscalYearEndMonth")._textBoxElement.focus();

return false;

}

if ((txtEndMonth != "") && (txtEndDay != "") && (txtCloseYear != "")) {

if (mYear.length == 2) {

var mToday = new Date();

//If the year is greater than 30 years from now use 19, otherwise use 20

var checkYear = mToday.getFullYear() + 30;

var mCheckYear = '20' + mYear;

if (mCheckYear >= checkYear)

mYear = '19' + mYear;

else

mYear = '20' + mYear;

}

var isDate = txtEndMonth + '/' + txtEndDay + '/' + mYear;

if (isValidDate(isDate)) {

var d = new Date();

if (mYear > d.getFullYear()) {

//alert("Only current or earlier year are allowed.")

radalert("Only current or earlier year are allowed.", 400, 110, "");

return false;

} else {

itemCloseYear._element.cells[31].childNodes[0].value = isDate;

itemCloseYear._element.cells[31].childNodes[0].style.background = "gray";

//itemCloseYear.findControl("txtCloseDay_Edit")._textBoxElement.value = isDate;

//itemCloseYear.findControl("txtCloseDay_Edit")._textBoxElement.style.background = "gray";

}

else if (txtCloseYear != "") {

var d = new Date();

if (txtCloseYear > d.getFullYear()) {

radalert("Only current or earlier year are allowed.", 400, 110, "");

return false;

}

// }

function isValidDate(dateStr) {

// Checks for the following valid date formats:

// MM/DD/YY MM/DD/YYYY MM-DD-YY MM-DD-YYYY

// Also separates date into month, day, and year variables

var datePat = /^(\d{1,2})(\/|-)(\d{1,2})\2(\d{2}|\d{4})$/;

// To require a 4 digit year entry, use this line instead:

// var datePat = /^(\d{1,2})(\/|-)(\d{1,2})\2(\d{4})$/;

var matchArray = dateStr.match(datePat); // is the format ok?

if (matchArray == null) {

// alert("Date is not in a valid format.")

return false;

}

month = matchArray[1]; // parse date into variables

day = matchArray[3];

year = matchArray[4];

if (month < 1 || month > 12) { // check month range

//alert("Month must be between 1 and 12.");

return false;

}

if (day < 1 || day > 31) {

//alert("Day must be between 1 and 31.");

return false;

}

if ((month == 4 || month == 6 || month == 9 || month == 11) && day == 31) {

//alert("Month " + month + " doesn't have 31 days!")

return false

}

if (month == 2) { // check for february 29th

var isleap = (year % 4 == 0 && (year % 100 != 0 || year % 400 == 0));

if (day > 29 || (day == 29 && !isleap)) {

// alert("February " + year + " doesn't have " + day + " days!");

return false;

}

return true; // date is valid

}

// End -->

function OnRequestStart(sender, args) {

if (args.EventTarget == 'ctl00$Content$cmdDelete') // Delete

{

callconfirmbutton("okButton");

radconfirm("Current Record will be DELETED!", confirmCallDelete, 350, 100, null, "ConfirmDelete");

return false;

}

else if (args.EventTarget == 'ctl00$Content$cmdExit') // Exit

{

callconfirmbutton("yesButton");

var isModified = document.getElementById("ctl00_Content_hidKeyPress").value;

if (isModified != "") {

radconfirm("Data has been altered without an UPDATE. Do you still wish to EXIT?", confirmClose, 350, 100,

null, "Update Error!");

return false;

}

function confirmClose(arg) {

if (arg == true) {

__doPostBack("ctl00$Content$lnkExit", "");

}

function confirmCallDelete(arg) {

if (arg == true) {

__doPostBack("ctl00$Content$lnkDelete", "");

}

function callconfirmbuttoncurrency(param) {

if (param == "yesButton") {

Telerik.Web.UI.RadWindowUtils.Localization =

{

"OK": "Yes",

"Cancel": "No"

};

focus();

}

else if (param == "okButton") {

Telerik.Web.UI.RadWindowUtils.Localization =

{

"OK": "OK",

"Cancel": "Cancel"

};

focus();

}

function callconfirmbutton(param) {

if (param == "yesButton") {

Telerik.Web.UI.RadWindowUtils.Localization =

{

"OK": "Yes",

"Cancel": "No"

};

}

else if (param == "okButton") {

Telerik.Web.UI.RadWindowUtils.Localization =

{

"OK": "OK",

"Cancel": "Cancel"

};

}

function dateSelected(sender, args) {

sender.set_value = args.get_newValue();

valueChanged();

}

function OnRequestStartWhichElement(sender, eventArgs) {

var eventtargetname = eventArgs.EventTarget;

if (eventtargetname.indexOf("ctl00$Content$dgdPrgSetup") >= 0) {

if (document.getElementById('ctl00_Content_hidKeyPress').value != "") {

eventArgs.set_cancel(true);

radconfirm("Save the Changes or If you want to go next Page Click OK", callfn, 390, 105, null,

"Confirm");

function callfn(args) {

if (args == true) {

ControlID = ""

document.getElementById('ctl00_Content_hidKeyPress').value = '';

__doPostBack(eventtargetname);

}

function setRowSelection(obj) {

var curRow;

var curRowID;

try {

curRow =

obj.parentElement.parentElement.parentElement.parentElement.parentElement.parentElement.parentElement.id;

if (curRow == "") {

curRow = obj.parentElement.parentElement.id;

}

curRowID = curRow.lastIndexOf("__");

curRowID = curRow.substr(curRowID + 2);

var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

masterTable.clearSelectedItems();

masterTable.selectItem(masterTable.get_dataItems()[curRowID].get_element());

}

catch (e) {

}

function OnFocus(sender, eventArgs) {

var oWnd;

var grid = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

if (sender.get_textBoxValue() != '') {

var chkDot;

var focusAmt, splitDot;

///

var curControl;

curControl = sender._clientID.lastIndexOf("_");

curControl = sender._clientID.substr(curControl + 1);

if (curControl == 'coverage') {

focusAmt = sender._textBoxElement.value; ;

}

else if (curControl == 'pct') {

focusAmt = sender._textBoxElement.value;

}

else if (curControl == 'fee') {

focusAmt = sender._textBoxElement.value;

}

sender.set_textBoxValue(focusAmt);

}

function OnValueChanged(sender, eventArgs) {

var oWnd;

var grid = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var curControl;

curControl = sender._clientID.lastIndexOf("_");

curControl = sender._clientID.substr(curControl + 1);

if (curControl == 'coverage') {

sender._textBoxElement.value = eventArgs._newValue;

}

else if (curControl == 'pct') {

sender._textBoxElement.value = eventArgs._newValue;

}

else if (curControl == 'fee') {

sender._textBoxElement.value = eventArgs._newValue;

}

function OnBlur(sender, eventArgs) {

if (sender.get_textBoxValue() != '') {

var grid = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var focusAmt, splitDot;

var curControl;

curControl = sender._clientID.lastIndexOf("_");

curControl = sender._clientID.substr(curControl + 1);

if (curControl == 'coverage') {

focusAmt = sender._element.value;

sender.set_textBoxValue(((focusAmt * 100).toFixed(2)) + '%');

}

else if (curControl == 'pct') {

focusAmt = sender._element.value;

sender.set_textBoxValue(((focusAmt * 100).toFixed(3)) + '%');

}

else if (curControl == 'fee') {

focusAmt = sender._element.value

sender.set_textBoxValue(((focusAmt * 100).toFixed(3)) + '%');

}

// sender.set_textBoxValue(((focusAmt * 100).toFixed(3)) + '%');

}

else {

sender.set_textBoxValue("");

}

//*************Shortcut keys starting here*****************

document.onkeydown = KeyDownHandler;

var CTRL = false;

var SHIFT = false;

var ALT = false;

var CHAR_CODE = -1;

function KeyDownHandler(e) {

var x = '';

if (document.all) {

var evnt = window.event;

x = evnt.keyCode;

}

else {

x = e.keyCode;

}

DetectKeys(x, true);

}

function DetectKeys(KeyCode, IsKeyDown) {

var Delete = document.getElementById('ctl00_Content_cmdDelete');

var Exit = document.getElementById('ctl00_Content_cmdExit');

if (KeyCode == '16') {

SHIFT = IsKeyDown;

}

else if (KeyCode == '17') {

CTRL = IsKeyDown;

}

else if (KeyCode == '18') {

ALT = IsKeyDown;

}

else {

if (IsKeyDown)

CHAR_CODE = KeyCode;

else

CHAR_CODE = -1;

}

var item;

var toolBar;

if (CTRL && ALT && KeyCode == "68") {

if (Delete.disabled == false) {

Delete.click();

}

//2.Exit -Ctrl+U

else if (CTRL && ALT && KeyCode == "69") {

if (Exit.disabled == false) {

Exit.click();

}

//*********************************************************

function HideDatePickerPopup(rowID) {

var x = '';

if (document.all) {

var evnt = window.event;

x = evnt.keyCode;

}

if (x == 9) {

var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var itemPrgmId = masterTable.get_dataItems()[rowID];

itemPrgmId.findControl("program_end").hidePopup();

}

function HidePopupStartDatePicker(rowID) {

var x = '';

if (document.all) {

var evnt = window.event;

x = evnt.keyCode;

}

if (x == 9) {

var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var itemPrgmId = masterTable.get_dataItems()[rowID];

itemPrgmId.findControl("program_start").hidePopup();

}

function HidePopupTriggerDatePicker(rowID) {

var x = '';

if (document.all) {

var evnt = window.event;

x = evnt.keyCode;

}

if (x == 9) {

var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var itemPrgmId = masterTable.get_dataItems()[rowID];

itemPrgmId.findControl("loc_flr_reached").hidePopup();

}

function HidePopupProcessedDatePicker(rowID) {

var x = '';

if (document.all) {

var evnt = window.event;

x = evnt.keyCode;

}

if (x == 9) {

var masterTable = $find("ctl00_Content_dgdPrgSetup").get_masterTableView();

var itemPrgmId = masterTable.get_dataItems()[rowID];

itemPrgmId.findControl("processed_through").hidePopup();

}

function ShowAlert(id) {

}

</script>

</head>

<body>

<form id="form1" runat="server">

<div>

<telerik:RadScriptManager ScriptMode="Release" ID="tsmMaster" runat="server" AsyncPostBackTimeout="360000">

</telerik:RadScriptManager>

<telerik:RadAjaxManager ID="rjxProgramSetup" runat="server">

<AjaxSettings>

<telerik:AjaxSetting>

<UpdatedControls>

<telerik:AjaxUpdatedControl ControlID="tajxpnlProgramSetup" LoadingPanelID="tajxlpnlProgramSetup" />

</UpdatedControls>

</telerik:AjaxSetting>

</AjaxSettings>

</telerik:RadAjaxManager>

<telerik:RadAjaxLoadingPanel ID="tajxlpnlProgramSetup" runat="server" Skin="Windows7">

</telerik:RadAjaxLoadingPanel>

<telerik:RadAjaxPanel ID="tajxpnlProgramSetup" ClientEvents-OnRequestStart="OnRequestStart" runat="server"

LoadingPanelID="tajxlpnlProgramSetup">

<div style="width: 970px;">

<div style="margin-bottom: 5px;">

<table style="width: 80%">

<tr>

<td class="Insert">

<asp:Button ID="cmdInsert" runat="server" Text="INSERT" Width="80px" Font-Bold="true"

Height="25px" />

</td>

<td class="Update">

<asp:Button ID="cmdUpdate" runat="server" Text="UPDATE" Width="80px" Font-Bold="true"

Height="25px" />

</td>

<td class="Delete">

<asp:Button ID="cmdDelete" runat="server" Text="DELETE" Width="80px" Font-Bold="true"

Height="25px" /><asp:LinkButton ID="lnkDelete" runat="server"></asp:LinkButton>

</td>

<td>

<asp:Button ID="cmdExit" runat="server" Text="EXIT" Width="80px" Font-Bold="true"

Height="25px" /><asp:LinkButton ID="lnkExit" runat="server"></asp:LinkButton>

</td>

</tr>

</table>

</div>

<div runat="server" id="drvdgdPrgSetup">

<%--<div style="width: 980px; height: 404px; position: relative; overflow: hidden;" id="divProgramSetup">--%>

<telerik:RADGrid ID="dgdPrgSetup" runat="server" AutoGenerateColumns="False"

AllowPaging="true" GridLines="None" Height="400px" onmousedown="whichElement(event,'dgdPrgSetup','ctl00_Content_hidKeyPress','')"

onkeyup="whichElement(event,'dgdPrgSetup','ctl00_Content_hidKeyPress','')" onkeypress="whichElement(event,'dgdPrgSetup','ctl00_Content_hidKeyPress','')" HeaderStyle-Wrap="false">

<MasterTableView DataKeyNames="issue_id" EditMode="InPlace" Width="2100px" HeaderStyle-Wrap="false">

<Columns>

<telerik:GridBoundColumn HeaderText="Program Identifier" ColumnEditorID="txtProgIdentifier"

UniqueName="issue_id" DataField="issue_id" MaxLength="8" HeaderStyle-Width="60px" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="60px">

</telerik:GridBoundColumn>

<telerik:GridDropDownColumn HeaderText="Program <br/> Sponsor" ColumnEditorID="drpProgSponsor"

UniqueName="programsponsor" HeaderStyle-Wrap="true" HeaderStyle-Width="290px" ItemStyle-Width="290px" HeaderStyle-HorizontalAlign="Center"

ItemStyle-HorizontalAlign="Left">

</telerik:GridDropDownColumn>

<telerik:GridBoundColumn HeaderText="Program <br/> Name" ColumnEditorID="txtProgramName"

UniqueName="programname" DataField="program_name" HeaderStyle-Width="290px" ItemStyle-Width="290px" HeaderStyle-HorizontalAlign="Center"

ItemStyle-HorizontalAlign="Left" >

</telerik:GridBoundColumn>

<telerik:GridDateTimeColumn HeaderText="Program <br/> Start Date" ColumnEditorID="txtProgramStart"

DataField="program_start" UniqueName="program_start" HeaderStyle-HorizontalAlign="Center" HeaderStyle-Width="100px" ItemStyle-Width="80px"

DataFormatString="{0:MM/dd/yyyy}" >

</telerik:GridDateTimeColumn>

<telerik:GridDateTimeColumn HeaderText="Program <br/> End Date" ColumnEditorID="txtProgramEnd"

DataField="program_end" UniqueName="program_end" HeaderStyle-Width="100px" ItemStyle-VerticalAlign="Middle"

DataFormatString="{0:MM/dd/yyyy}" HeaderStyle-HorizontalAlign="Center" ItemStyle-HorizontalAlign="Center">

</telerik:GridDateTimeColumn>

<telerik:GridNumericColumn HeaderText="Maximum Providers" ColumnEditorID="txtMaxProviders_Edit"

HeaderStyle-Width="90px" UniqueName="max_providers" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign="Center" DataField="max_providers">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Maximum Swing Line" ColumnEditorID="txtMaxSwing_Edit"

HeaderStyle-Width="100px" ItemStyle-Width="90px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign="Center" UniqueName="max_swline" DataField="max_swline">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Maximum Letter of Credit" ColumnEditorID="txtMaxLetter_Edit"

HeaderStyle-Width="80px" UniqueName="max_loc" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign="Center" DataField="max_loc">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Maximum Liquidity Loan" ColumnEditorID="txtMaxLiquid_Edit"

HeaderStyle-Width="100px" ItemStyle-Width="90px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign="Center" UniqueName="max_lqloan" DataField="max_lqloan">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Maximum <br/> Suppl. Enhance" ColumnEditorID="txtMaxSupp_Edit"

HeaderStyle-Width="100px" ItemStyle-Width="90px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign="Center" UniqueName="max_suplenh" DataField="max_suplenh">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Fee" ColumnEditorID="txtFee_Edit" HeaderStyle-Width="50px"

UniqueName="program_fee" DataField="program_fee" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign="Center" ItemStyle-Width="50px">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Minimum" ColumnEditorID="txtMinimum_Edit"

HeaderStyle-Width="80px" HeaderStyle-HorizontalAlign="Center" ItemStyle-HorizontalAlign="Right" UniqueName="prog_fee_flr" ItemStyle-Width="80px" DataField="prog_fee_flr">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Freq." ColumnEditorID="txtProgFreq_Edit" HeaderStyle-Width="50px"

UniqueName="prog_fee_freq" ItemStyle-Width="50px" DataField="prog_fee_freq" ItemStyle-HorizontalAlign="Center">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Cycle" ColumnEditorID="txtProgCycle_Edit"

HeaderStyle-Width="50px" ItemStyle-Width="50px" HeaderStyle-HorizontalAlign="Center" ItemStyle-HorizontalAlign="Center" UniqueName="prog_fee_cycle" DataField="prog_fee_cycle">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Fee " ColumnEditorID="txtCreditFee_Edit" HeaderStyle-Width="50px"

UniqueName="loc_fee" DataField="loc_fee" HeaderStyle-HorizontalAlign="Center" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="50px">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Comm. Pct" ColumnEditorID="txtCommPct_Edit"

HeaderStyle-Width="100px" ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Center" UniqueName="loc_comm_pct" DataField="loc_comm_pct">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Commitment Flr." ColumnEditorID="txtCommitment_Edit"

HeaderStyle-Width="100px" ItemStyle-Width="70px" ItemStyle-HorizontalAlign="Right" HeaderStyle-HorizontalAlign="Center" UniqueName="loc_comm_flr" DataField="loc_comm_flr">

</telerik:GridNumericColumn>

<telerik:GridDateTimeColumn HeaderText="Trigger Dt." ColumnEditorID="txtTriggerDate"

DataField="loc_flr_reached" UniqueName="loc_flr_reached" HeaderStyle-HorizontalAlign="Center"

DataFormatString="{0:MM/dd/yyyy}" HeaderStyle-Width="100px" ItemStyle-HorizontalAlign="Center" ItemStyle-VerticalAlign="Bottom">

</telerik:GridDateTimeColumn>

<telerik:GridNumericColumn HeaderText="Freq. " ColumnEditorID="txtCreditFrequency_Edit"

HeaderStyle-Width="60px" ItemStyle-Width="55px" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Center" UniqueName="loc_fee_freq" DataField="loc_fee_freq">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Cycle " ColumnEditorID="txtCreditCycle_Edit"

HeaderStyle-Width="60px" ItemStyle-Width="55px" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Center" UniqueName="loc_fee_cycle" DataField="loc_fee_cycle">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Liquidity Coverage" ColumnEditorID="txtLiquidCoverage_Edit"

HeaderStyle-Width="90px" ItemStyle-Width="85px" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Center" UniqueName="liq_coverage" DataField="liq_coverage">

</telerik:GridNumericColumn>

<telerik:GridDateTimeColumn HeaderText="Processed Through" ColumnEditorID="txtProcessed"

DataField="processed_through" UniqueName="processed_through" HeaderStyle-HorizontalAlign="Center"

DataFormatString="{0:MM/dd/yyyy}" HeaderStyle-Width="100px" ItemStyle-HorizontalAlign="Center" ItemStyle-VerticalAlign="Middle">

</telerik:GridDateTimeColumn>

<telerik:GridBoundColumn HeaderText="Holiday Group" ColumnEditorID="txtHolidayGroup"

UniqueName="holiday_group" DataField="holiday_group" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Center" ItemStyle-Width="50px" HeaderStyle-Width="50px">

</telerik:GridBoundColumn>

<telerik:GridDropDownColumn HeaderText="Product Code" ColumnEditorID="drpProductCode"

UniqueName="productcode" HeaderStyle-Width="70px" HeaderStyle-HorizontalAlign="Center" ItemStyle-Width="60px">

</telerik:GridDropDownColumn>

<telerik:GridDropDownColumn HeaderText="Currency <br/> Code" ColumnEditorID="drpCurrency"

UniqueName="drpCurrency" ItemStyle-Width="130px" HeaderStyle-Wrap="true" HeaderStyle-HorizontalAlign="Center" HeaderStyle-Width="140px">

</telerik:GridDropDownColumn>

<telerik:GridCheckBoxColumn HeaderText="Book Value Accrual

Interest Flag" UniqueName="chkBookValue" HeaderStyle-HorizontalAlign="Center" HeaderStyle-Width="110px" ColumnEditorID="chkBookValue"></telerik:GridCheckBoxColumn>

<telerik:GridTemplateColumn HeaderStyle-Width="70px" HeaderStyle-HorizontalAlign="Center"

ItemStyle-HorizontalAlign="Center" ItemStyle-Width="70px" HeaderText="Rule Categories">

<ItemTemplate>

<telerik:RadButton Height="18px" ToggleType="None" ButtonType="StandardButton" ID="cmdRuleCategory"

OnClick="cmdRuleCategory_Click" runat="server" Width="15px" Text="--">

</telerik:RadButton>

</ItemTemplate>

</telerik:GridTemplateColumn>

<telerik:GridTemplateColumn HeaderStyle-Width="55px" HeaderStyle-HorizontalAlign="Center"

ItemStyle-HorizontalAlign="Center" ItemStyle-Width="55px" HeaderText="Assign Rating">

<ItemTemplate>

<telerik:RadButton Height="18px" ID="cmdAssignRate" OnClick="cmdRuleCategory_Click"

Width="15px" runat="server" Text="--">

</telerik:RadButton>

</ItemTemplate>

</telerik:GridTemplateColumn>

<telerik:GridNumericColumn HeaderText="Fiscal End Month" ColumnEditorID="txtFiscalEndMonth_Edit"

HeaderStyle-Width="90px" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="80px" HeaderStyle-HorizontalAlign="Center" UniqueName="FiscalYearEndMonth" DataField="FiscalYearEndMonth">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Fiscal End Month" ColumnEditorID="txtFiscalEndDay_Edit"

HeaderStyle-Width="90px" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="80px" HeaderStyle-HorizontalAlign="Center" UniqueName="FiscalYearEndDay" DataField="FiscalYearEndDay">

</telerik:GridNumericColumn>

<telerik:GridNumericColumn HeaderText="Hard Close Year" ColumnEditorID="txtCloseYear_Edit"

HeaderStyle-Width="90px" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="80px" HeaderStyle-HorizontalAlign="Center" UniqueName="HardCloseYear" DataField="HardCloseYear">

</telerik:GridNumericColumn>

<telerik:GridBoundColumn HeaderText="GLClose Date" ColumnEditorID="txtCloseDay_Edit"

UniqueName="GLCloseDate" DataFormatString="{0:MM/dd/yyyy}" ItemStyle-HorizontalAlign="Center" DataField="GLCloseDate" HeaderStyle-HorizontalAlign="Center" ItemStyle-Width="60px" HeaderStyle-Width="70px">

</telerik:GridBoundColumn>

<telerik:GridTemplateColumn HeaderStyle-VerticalAlign="Middle" HeaderStyle-Width="90px" HeaderStyle-HorizontalAlign="Center"

ItemStyle-HorizontalAlign="Center" HeaderText="Update User">

<ItemTemplate>

<telerik:RadTextBox ID="txtUpdateUser" runat="server" Width="90px" Text="<%#

Bind('UpdateUser') %>" ReadOnly="true" EnabledStyle-HorizontalAlign="Center" CssClass="readonly">

</telerik:RadTextBox>

</ItemTemplate>

</telerik:GridTemplateColumn>

<telerik:GridTemplateColumn HeaderStyle-VerticalAlign="Middle" HeaderStyle-Width="150px" ItemStyle-HorizontalAlign="Center"

HeaderStyle-HorizontalAlign="Center" HeaderText="Update Date/time">

<ItemTemplate>

<telerik:RadTextBox ID="txtUpdateDate" runat="server" Width="140px" Text='<%#

Bind("UpdateDateTime","{0:MM/dd/yyyy H:mm:ss}") %>' ReadOnly="true" CssClass="readonly" EnabledStyle-HorizontalAlign="Center">

</telerik:RadTextBox>

</ItemTemplate>

</telerik:GridTemplateColumn>

<telerik:GridTemplateColumn HeaderStyle-Width="130px" HeaderStyle-VerticalAlign="Middle" HeaderStyle-HorizontalAlign="Center"

ItemStyle-HorizontalAlign="Center" headertext="Add User">

<ItemTemplate>

<telerik:RadTextBox ID="txtAddUser" CssClass="readonly" runat="server" Width="120px" Text="<%#

Bind('AddUser') %>" ReadOnly="true" EnabledStyle-HorizontalAlign="Center">

</telerik:RadTextBox>

</ItemTemplate>

</telerik:GridTemplateColumn>

<telerik:GridTemplateColumn HeaderStyle-Width="150px" HeaderText="Add Date/Time" HeaderStyle-VerticalAlign="Middle" HeaderStyle-HorizontalAlign="Center">

<ItemTemplate>

<telerik:RadTextBox ID="txtAddDateTime" runat="server" CssClass="readonly" Width="140px" Text='<%#

Bind("AddDateTime","{0:MM/dd/yyyy H:mm:ss}") %>' ReadOnly="true" EnabledStyle-HorizontalAlign="Center">

</telerik:RadTextBox>

</ItemTemplate>

</telerik:GridTemplateColumn>

<telerik:GridTemplateColumn HeaderStyle-Width="190px" HeaderText="Add/Update Process" HeaderStyle-HorizontalAlign="Center" HeaderStyle-VerticalAlign="Middle"

ItemStyle-HorizontalAlign="Center">

<ItemTemplate>

<telerik:RadTextBox ID="txtAddUpdatePro" runat="server" CssClass="readonly" Width="180px" Text="<%#

Bind('AppName')%>" ReadOnly="true">

</telerik:RadTextBox>

</ItemTemplate>

</telerik:GridTemplateColumn>

</Columns>

</MasterTableView>

<ClientSettings AllowKeyboardNavigation="true" >

<KeyboardNavigationSettings AllowSubmitOnEnter="false" EnableKeyboardShortcuts="false" />

<Selecting AllowRowSelect="True" />

<Scrolling AllowScroll="true" UseStaticHeaders="true" />

<ClientEvents OnRowDblClick="RowDblClick" />

</ClientSettings>

<HeaderStyle Wrap="true" />

</telerik:RADGrid>

<telerik:GridTextBoxColumnEditor runat="server" ID="txtProgIdentifier">

</telerik:GridTextBoxColumnEditor>

<telerik:GridDropDownListColumnEditor runat="server" ID="drpProgSponsor" DropDownStyle-Width="270">

<DropDownStyle Width="270px" />

</telerik:GridDropDownListColumnEditor>

<telerik:GridTextBoxColumnEditor runat="server" ID="txtProgramName" TextBoxStyle-Width="290px">

</telerik:GridTextBoxColumnEditor>

<telerik:GridDateTimeColumnEditor runat="server" ID="txtProgramStart" TextBoxStyle-CssClass="txtlongdate">

</telerik:GridDateTimeColumnEditor>

<telerik:GridDateTimeColumnEditor runat="server" ID="txtProgramEnd" TextBoxStyle-CssClass="txtlongdate">

</telerik:GridDateTimeColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtMaxProviders_Edit">

<NumericTextBox runat="server" ID="txtMaxProviders" MaxLength="10">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtMaxSwing_Edit">

<NumericTextBox runat="server" ID="txtMaxSwing" MaxLength="16">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtMaxLetter_Edit">

<NumericTextBox runat="server" ID="txtMaxLetter" MaxLength="16">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtMaxLiquid_Edit">

<NumericTextBox runat="server" ID="txtMaxLiquid" MaxLength="16">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtMaxSupp_Edit">

<NumericTextBox runat="server" ID="txtMaxSupp" MaxLength="16">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtLiquidCoverage_Edit">

<NumericTextBox runat="server" ID="txtLiquidCoverage">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridDateTimeColumnEditor runat="server" ID="txtProcessed" TextBoxStyle-CssClass="txtlongdate">

</telerik:GridDateTimeColumnEditor>

<telerik:GridTextBoxColumnEditor runat="server" ID="txtHolidayGroup">

</telerik:GridTextBoxColumnEditor>

<telerik:GridCheckBoxColumnEditor ID="chkBookValue" runat="server">

</telerik:GridCheckBoxColumnEditor>

<telerik:GridDropDownListColumnEditor runat="server" ID="drpProductCode">

</telerik:GridDropDownListColumnEditor>

<telerik:GridDropDownListColumnEditor runat="server" ID="drpCurrency">

</telerik:GridDropDownListColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtFiscalEndMonth_Edit">

<NumericTextBox runat="server" ID="txtFiscalEndMonth" MaxLength="2">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtFiscalEndDay_Edit">

<NumericTextBox runat="server" ID="txtFiscalEndDay" MaxLength="2">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtCloseYear_Edit">

<NumericTextBox runat="server" ID="txtCloseYear" MaxLength="4">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridTextBoxColumnEditor runat="server" ID="txtCloseDay_Edit">

</telerik:GridTextBoxColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtCreditFee_Edit">

<NumericTextBox runat="server" ID="txtCreditFee">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtCommPct_Edit">

<NumericTextBox runat="server" ID="txtCommPct">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtCommitment_Edit">

<NumericTextBox runat="server" ID="txtCommitment" MaxLength="4">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridDateTimeColumnEditor runat="server" ID="txtTriggerDate">

</telerik:GridDateTimeColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtCreditFrequency_Edit">

<NumericTextBox runat="server" ID="txtCreditFrequency">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

<telerik:GridNumericColumnEditor runat="server" ID="txtCreditCycle_Edit">

<NumericTextBox runat="server" ID="txtCreditCycle" MaxLength="4">

</NumericTextBox>

</telerik:GridNumericColumnEditor>

</div>

<telerik:RadWindow ID="rwIssue" runat="server" VisibleStatusbar="false" ReloadOnShow="true">

</telerik:RadWindow>

<asp:HiddenField ID="hidKeyPress" runat="server" Value="" />

<asp:HiddenField ID="hidRowID" runat="server" Value="" />

<asp:HiddenField ID="hidIsEditable" runat="server" Value="False" />

<asp:HiddenField ID="hidEditRowID" runat="server" Value="" />

</telerik:RadAjaxPanel>

</div>

</form>

</body>

</html>

Imports System.Data

Imports System.Data.SqlClient

Imports Telerik.Web.UI

Partial Class Default2

Inherits System.Web.UI.Page

Private mCurrencyDT As DataTable

Private mProgramSetupDT As DataTable

Private mSponserDT As DataTable

Private mEditedRowID As String

Protected Sub dgdPrgSetup_ItemCommand(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridCommandEventArgs) Handles dgdPrgSetup.ItemCommand

Try

Dim editedItem As GridDataItem

If e.CommandName.ToString() = "Edit" Then

editedItem = DirectCast(e.Item, GridDataItem)

mEditedRowID = editedItem.GetDataKeyValue("issue_id").ToString()

End If

mCurrencyDT.Constraints.Clear()

mCurrencyDT.ReadXmlSchema("Currency.xsd")

mCurrencyDT.ReadXml("Currency.xml")

mSponserDT.Constraints.Clear()

mSponserDT.ReadXmlSchema("Sponser.xsd")

mSponserDT.ReadXml("Sponser.xml")

OverWriteProgramSetupTable()

dgdPrgSetup.DataSource = mProgramSetupDT

Catch ex As Exception

End Try

End Sub

Protected Sub dgdPrgSetup_ItemCreated(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles dgdPrgSetup.ItemCreated

Dim gdItem As GridEditableItem

Dim lastCtrlIsYear As Boolean

If (e.Item.ItemType = GridItemType.Header) Then

Dim headerItem As GridHeaderItem = DirectCast(e.Item, GridHeaderItem)

Dim newHeaderItem As New GridHeaderItem(headerItem.OwnerTableView, -1, -1)

Dim THead As GridTHead = DirectCast(headerItem.NamingContainer, GridTHead)

Dim dummyCell As New TableHeaderCell()

newHeaderItem.Cells.Add(dummyCell)

dummyCell = New TableHeaderCell()

newHeaderItem.Cells.Add(dummyCell)

For Each cell As TableCell In headerItem.Cells

If cell.Text.Equals("Fee") Then

cell.ColumnSpan = 4

cell.Text = "Program Fees"

cell.ForeColor = Drawing.Color.Blue

cell.Attributes.Add("style", "text-align:center;font-weight:bold;")

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Fee"

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Minimum") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Minimum"

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Freq.") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Freq."

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Cycle") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Cycle"

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Fee ") Then

cell.ColumnSpan = 6

cell.Text = "Letter of Credit Fees"

cell.ForeColor = Drawing.Color.Blue

cell.Attributes.Add("style", "text-align:center;font-weight:bold")

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Fee"

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Comm. Pct") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Comm. Pct"

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Commitment Flr.") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Commitment Flr."

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Trigger Dt.") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Trigger Dt."

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Freq. ") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Freq. "

newHeaderItem.Cells.Add(extraCell)

ElseIf cell.Text.Equals("Cycle ") Then

cell.Text = ""

Dim extraCell As New TableHeaderCell()

extraCell.Text = "Cycle "

newHeaderItem.Cells.Add(extraCell)

Else

cell.RowSpan = 2

End If

If (cell.Text = "") Then

cell.Attributes.Add("style", "display:none")

End If

Next

THead.Controls.Add(newHeaderItem)

End If

If e.Item.ItemType = GridItemType.EditItem Then

gdItem = DirectCast(e.Item, GridEditableItem)

For Each ctrl As Control In gdItem.Controls

If ctrl.GetType().ToString() = "Telerik.Web.UI.GridTableCell" Then

For Each childCtrl As Control In ctrl.Controls

Select Case childCtrl.GetType().ToString()

Case "Telerik.Web.UI.RadDatePicker"

With TryCast(childCtrl, RadDatePicker)

SetDatePicker(TryCast(childCtrl, RadDatePicker), e.Item.ItemIndexHierarchical)

End With

Case "Telerik.Web.UI.RadComboBox"

With TryCast(childCtrl, RadComboBox)

SetRadCombo(TryCast(childCtrl, RadComboBox), e.Item.ItemIndexHierarchical)

End With

Case "Telerik.Web.UI.RadNumericTextBox"

If Not TryCast(childCtrl, RadNumericTextBox).ReadOnly Then

With TryCast(childCtrl, RadNumericTextBox)

SetNumericText(TryCast(childCtrl, RadNumericTextBox), e.Item.ItemIndexHierarchical)

lastCtrlIsYear = (.ID.ToLower() = "rntb_hardcloseyear")

End With

End If

Case "System.Web.UI.WebControls.TextBox"

If Not TryCast(childCtrl, System.Web.UI.WebControls.TextBox).ReadOnly Then

'If lastCtrlIsYear Then

' gdItem("hdnCloseYear").Text = TryCast(childCtrl, TextBox).ClientID

' lastCtrlIsYear = False

'End If

SetAttribRadTextBox(TryCast(childCtrl, System.Web.UI.WebControls.TextBox), e.Item.ItemIndexHierarchical, TryCast(childCtrl, System.Web.UI.WebControls.TextBox).ClientID.Substring(TryCast(childCtrl, System.Web.UI.WebControls.TextBox).ClientID.LastIndexOf(

"_") + 1))

End If

End Select

Next

End If

Next

If hidIsEditable.Value = "False" Then

hidIsEditable.Value = "True"

hidEditRowID.Value = e.Item.ItemIndex

End If

End Sub

Protected Sub cmdRuleCategory_Click(ByVal sender As Object, ByVal e As System.EventArgs)

Dim issueRT As RadTextBox = Nothing

Dim issueId As String = String.Empty

Dim indexDataset As Integer

Dim selectedDataRowCollection() As DataRow

Dim dtRow As DataRow

Dim UserCtrlFlag As String

'OverWriteProgramSetupTable()

indexDataset = DirectCast(DirectCast(DirectCast(DirectCast

(sender, Telerik.Web.UI.RadButton).Parent, System.Web.UI.Control).BindingContainer, System.Web.UI.Control), Telerik.Web.UI.GridDataItem).DataSetIndex

selectedDataRowCollection = mProgramSetupDT.Select(1 = 1, "", DataViewRowState.Added + DataViewRowState.Unchanged + DataViewRowState.ModifiedOriginal)

dtRow = selectedDataRowCollection.GetValue(indexDataset)

issueId = dtRow("issue_Id").ToString().Trim

End Sub

Private Sub SetRadCombo(ByVal Ctrl As RadComboBox, ByVal rowIndexCtrl As String)

Select Case Ctrl.ID

Case "RCB_programsponsor"

Ctrl.Width = 290

Ctrl.OnClientSelectedIndexChanging = "valueChanged"

Case "RCB_productcode"

Ctrl.Width = 90

Ctrl.OnClientSelectedIndexChanging = "valueChanged"

Case "RCB_drpCurrency"

Ctrl.Width = 90

Ctrl.OnClientBlur = "CurrencyCodeValidation"

Ctrl.OnClientSelectedIndexChanging = "valueChanged"

End Select

End Sub

Private Sub SetDatePicker(ByVal Ctrl As RadDatePicker, ByVal rowIndexCtrl As String)

Select Case Ctrl.ID

Case "RDIPprogram_start"

Dim rdCdProgram As RadCalendarDay = New RadCalendarDay

Ctrl.Attributes.Add("onkeydown", "HidePopupStartDatePicker(" + rowIndexCtrl + ")")

Ctrl.Width = 110

Ctrl.DatePopupButton.Visible = True

Ctrl.Calendar.FastNavigationStep = 12

Ctrl.ShowPopupOnFocus = True

Ctrl.MinDate = "1/1/1800"

Ctrl.MaxDate = "1/1/3020"

Ctrl.DateInput.ID = "DateInput1"

Ctrl.DateInput.DateFormat = "MM/dd/yyyy"

Ctrl.DateInput.Attributes.Add("style", "text-align:center")

Ctrl.Style.Add("style", "text-align:center")

Ctrl.DateInput.DisplayDateFormat = "MM/dd/yyyy"

Ctrl.Calendar.ID = "Calendar1"

rdCdProgram.Repeatable = Calendar.RecurringEvents.Today

rdCdProgram.ItemStyle.BackColor = Drawing.Color.Green

Ctrl.Calendar.SpecialDays.Add(rdCdProgram)

Case "RDIPprogram_end"

Dim rdCdProgram As RadCalendarDay = New RadCalendarDay

Ctrl.Attributes.Add("onkeydown", "HideDatePickerPopup(" + rowIndexCtrl + ")")

Ctrl.Width = 110

Ctrl.Calendar.FastNavigationStep = 12

Ctrl.ShowPopupOnFocus = True

Ctrl.MinDate = "1/1/1800"

Ctrl.MaxDate = "1/1/3020"

Ctrl.DatePopupButton.Visible = True

Ctrl.ShowPopupOnFocus = True

Ctrl.DateInput.ID = "DateInput1"

Ctrl.DateInput.DateFormat = "MM/dd/yyyy"

Ctrl.DateInput.Attributes.Add("style", "text-align:center")

Ctrl.Style.Add("style", "text-align:center")

Ctrl.DateInput.DisplayDateFormat = "MM/dd/yyyy"

Ctrl.Calendar.ID = "Calendar1"

rdCdProgram.Repeatable = Calendar.RecurringEvents.Today

rdCdProgram.ItemStyle.BackColor = Drawing.Color.Green

Ctrl.Calendar.SpecialDays.Add(rdCdProgram)

Case "RDIPprocessed_through"

Dim rdCdProgram As RadCalendarDay = New RadCalendarDay

Ctrl.Attributes.Add("onkeydown", "HidePopupProcessedDatePicker(" + rowIndexCtrl + ")")

Ctrl.DatePopupButton.Visible = True

Ctrl.Width = 80

Ctrl.Calendar.FastNavigationStep = 12

Ctrl.ShowPopupOnFocus = True

Ctrl.MinDate = "1/1/1800"

Ctrl.MaxDate = "1/1/3020"

Ctrl.DateInput.ID = "DateInput3"

Ctrl.DateInput.DateFormat = "MM/dd/yyyy"

Ctrl.DateInput.Attributes.Add("style", "text-align:center")

Ctrl.DateInput.DisplayDateFormat = "MM/dd/yyyy"

Ctrl.Calendar.ID = "Calendar3"

rdCdProgram.Repeatable = Calendar.RecurringEvents.Today

rdCdProgram.ItemStyle.BackColor = Drawing.Color.Green

Ctrl.Calendar.SpecialDays.Add(rdCdProgram)

Case "RDIPloc_flr_reached"

Dim rdCdProgram As RadCalendarDay = New RadCalendarDay

Ctrl.Attributes.Add("onkeydown", "HidePopupTriggerDatePicker(" + rowIndexCtrl + ")")

Ctrl.DatePopupButton.Visible = True

Ctrl.Width = 90

Ctrl.Calendar.FastNavigationStep = 12

Ctrl.ShowPopupOnFocus = True

Ctrl.MinDate = "1/1/1800"

Ctrl.MaxDate = "1/1/3020"

Ctrl.ShowPopupOnFocus = True

Ctrl.DateInput.ID = "DateInput4"

Ctrl.DateInput.DateFormat = "MM/dd/yyyy"

Ctrl.DateInput.Attributes.Add("style", "text-align:center")

Ctrl.DateInput.DisplayDateFormat = "MM/dd/yyyy"

Ctrl.Calendar.ID = "Calendar4"

rdCdProgram.Repeatable = Calendar.RecurringEvents.Today

rdCdProgram.ItemStyle.BackColor = Drawing.Color.Green

Ctrl.Calendar.SpecialDays.Add(rdCdProgram)

End Select

End Sub

Private Sub SetNumericText(ByVal Ctrl As RadNumericTextBox, ByVal rowIndexCtrl As String)

Select Case Ctrl.ID.ToLower()

Case "rntb_max_providers"

Ctrl.Width = 90

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Ctrl.MaxLength = 10

Ctrl.NumberFormat.DecimalDigits = 0

Ctrl.Attributes.Add("style", "text-align:right;")

Case "rntb_max_swline"

Ctrl.Width = 100

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Ctrl.MaxLength = 16

Ctrl.NumberFormat.AllowRounding = True

Ctrl.NumberFormat.DecimalDigits = 2

Ctrl.NumberFormat.KeepNotRoundedValue = True

Ctrl.Attributes.Add("style", "text-align:right;")

Case "rntb_max_loc"

Ctrl.Width = 110

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.MaxLength = 16

Ctrl.NumberFormat.AllowRounding = True

Ctrl.NumberFormat.DecimalDigits = 2

Ctrl.NumberFormat.KeepNotRoundedValue = True

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Case "rntb_max_lqloan"

Ctrl.Width = 130

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.MaxLength = 16

Ctrl.NumberFormat.AllowRounding = True

Ctrl.NumberFormat.DecimalDigits = 2

Ctrl.NumberFormat.KeepNotRoundedValue = True

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Case "rntb_max_suplenh"

Ctrl.Width = 130

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Ctrl.MaxLength = 16

Ctrl.NumberFormat.AllowRounding = True

Ctrl.NumberFormat.DecimalDigits = 2

Ctrl.NumberFormat.KeepNotRoundedValue = True

Case "rntb_program_fee"

Ctrl.MaxLength = 16

Ctrl.Width = 50

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Ctrl.NumberFormat.DecimalDigits = 0

Case "rntb_prog_fee_flr"

Ctrl.NumberFormat.AllowRounding = True

Ctrl.NumberFormat.DecimalDigits = 2

Ctrl.NumberFormat.KeepNotRoundedValue = True

Ctrl.Attributes.Add("style", "text-align:right;")

Ctrl.MaxLength = 16

Ctrl.Width = 90

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Case "rntb_prog_fee_freq"

Ctrl.MaxLength = 5

Ctrl.Width = 50

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.NumberFormat.DecimalDigits = 0

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Center

Ctrl.DataType = Type.GetType("System.Int64")

Ctrl.NumberFormat.DecimalDigits = 0

Ctrl.Attributes.Add("style", "text-align:center;")

Case "rntb_prog_fee_cycle"

Ctrl.MaxLength = 5

Ctrl.Width = 50

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.DataType = Type.GetType("System.Int64")

Ctrl.NumberFormat.DecimalDigits = 0

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Center

Case "rntb_loc_fee"

Ctrl.Width = 50

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.MaxLength = 10

Ctrl.Type = NumericType.Percent

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.NumberFormat.DecimalDigits = 3

'Ctrl.ClientEvents.OnFocus = "setRowSelection"

Ctrl.ClientEvents.OnFocus = "OnFocus"

Ctrl.ClientEvents.OnValueChanged = "OnValueChanged"

Ctrl.ClientEvents.OnBlur = "OnBlur"

Ctrl.Attributes.Add("style", "text-align:center;")

Case "rntb_loc_comm_pct"

Ctrl.MaxLength = 10

Ctrl.Width = 100

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.Type = NumericType.Percent

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.NumberFormat.DecimalDigits = 3

Ctrl.ClientEvents.OnFocus = "setRowSelection"

Ctrl.ClientEvents.OnFocus = "OnFocus"

Ctrl.ClientEvents.OnValueChanged = "OnValueChanged"

Ctrl.ClientEvents.OnBlur = "OnBlur"

Ctrl.Attributes.Add("style", "text-align:center;")

Case "rntb_loc_comm_flr"

Ctrl.MaxLength = 16

Ctrl.Width = 100

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Right

Ctrl.NumberFormat.AllowRounding = True

Ctrl.NumberFormat.DecimalDigits = 2

Ctrl.NumberFormat.KeepNotRoundedValue = True

Case "rntb_loc_flr_reached"

Case "rntb_loc_fee_freq"

Ctrl.MaxLength = 5

Ctrl.Width = 50

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.DataType = Type.GetType("System.Int64")

Ctrl.NumberFormat.DecimalDigits = 0

Ctrl.Attributes.Add("style", "text-align:center;")

Case "rntb_loc_fee_cycle"

Ctrl.MaxLength = 5

Ctrl.Width = 50

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.DataType = Type.GetType("System.Int64")

Ctrl.NumberFormat.DecimalDigits = 0

Ctrl.Attributes.Add("style", "text-align:center;")

Case "rntb_liq_coverage"

Ctrl.Width = 80

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.Type = NumericType.Percent

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.ClientEvents.OnFocus = "setRowSelection"

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Center

Ctrl.NumberFormat.DecimalDigits = 2

Ctrl.ClientEvents.OnFocus = "OnFocus"

Ctrl.ClientEvents.OnValueChanged = "OnValueChanged"

Ctrl.ClientEvents.OnBlur = "OnBlur"

Case "rntb_fiscalyearendmonth"

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.Width = 90

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Center

Ctrl.Attributes.Add("onkeydown", "setGlCloseDate(" + rowIndexCtrl + ")")

Ctrl.MaxLength = 2

Ctrl.DataType = Type.GetType("System.Int64")

Ctrl.NumberFormat.DecimalDigits = 0

Case "rntb_fiscalyearendday"

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Center

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.Width = 90

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.Attributes.Add("onkeydown", "setGlCloseDate(" + rowIndexCtrl + ")")

Ctrl.MaxLength = 2

Ctrl.DataType = Type.GetType("System.Int64")

Ctrl.NumberFormat.DecimalDigits = 0

Case "rntb_hardcloseyear"

Ctrl.SelectionOnFocus = SelectionOnFocus.SelectAll

Ctrl.NumberFormat.GroupSeparator = ""

Ctrl.Width = 90

Ctrl.EnabledStyle.HorizontalAlign = HorizontalAlign.Center

Ctrl.Attributes.Add("onblur", "setGlCloseDate(" + rowIndexCtrl + ")")

Ctrl.MaxLength = 4

Ctrl.DataType = Type.GetType("System.Int64")

Ctrl.NumberFormat.DecimalDigits = 0

Ctrl.Attributes.Add("style", "text-align:center;")

End Select

End Sub

Private Sub SetAttribRadTextBox(ByVal Ctrl As TextBox, ByVal rowIndexCtrl As String, ByVal CtrlID As String)

Select Case CtrlID

Case "ctl00"

Ctrl.MaxLength = 8

Ctrl.Width = 80

Ctrl.Attributes.Add("style", "text-align:Center;text-transform:uppercase;")

Case "ctl01"

Ctrl.MaxLength = 50

Ctrl.Width = 270

Case "ctl02"

Ctrl.MaxLength = 10

Ctrl.Width = 45

Ctrl.Attributes.Add("onblur", "HolidayValidation(" + rowIndexCtrl + "," + Ctrl.ClientID + ")")

Case "ctl03"

Ctrl.ReadOnly = True

Ctrl.Width = 65

Ctrl.ReadOnly = True

Ctrl.BackColor = Drawing.Color.Red

Ctrl.Attributes.Add("style", "text-align:Center;")

Case "ctl04"

Ctrl.MaxLength = 10

Ctrl.Width = 100

End Select

End Sub

Private Sub OverWriteProgramSetupTable()

Dim gridItm As GridDataItem

Dim dtRow As DataRow = Nothing

Dim selectedDataRowCollection() As DataRow

Dim checkBoxChecked As String

Dim startIndex As Integer

Dim endindex As Integer

startIndex = dgdPrgSetup.CurrentPageIndex * dgdPrgSetup.PageSize

endindex = startIndex + dgdPrgSetup.PageSize - 1

If mProgramSetupDT.Rows.Count > 0 Then

selectedDataRowCollection = mProgramSetupDT.Select(1 = 1, "", DataViewRowState.Added + DataViewRowState.Unchanged + DataViewRowState.ModifiedOriginal)

Dim j As Integer = 0

For i As Integer = startIndex To endindex

If i >= mProgramSetupDT.Select(1 = 1, "", DataViewRowState.Added + DataViewRowState.Unchanged + DataViewRowState.ModifiedOriginal).Length Then Exit For

gridItm = dgdPrgSetup.Items(j)

dtRow = selectedDataRowCollection.GetValue(i)

If gridItm.Edit Then

With DirectCast(gridItm("issue_id").Controls(0), TextBox)

If .Text.ToString.Trim <> dtRow("issue_id").ToString().Trim() Then

dtRow("issue_id") = .Text

End If

End With

With DirectCast(gridItm("programname").Controls(0), TextBox)

If .Text.ToString.Trim <> dtRow("program_name").ToString().Trim() Then

dtRow("program_name") = .Text

End If

End With

With DirectCast(gridItm("programsponsor").Controls(0), RadComboBox)

If .SelectedValue.ToString().Trim() <> dtRow("sponsor_id").ToString().Trim() Then

If Not IsNothing(.SelectedValue) Then

dtRow("sponsor_id") = .SelectedValue

Else

dtRow("sponsor_id") = DBNull.Value

End If

End With

With DirectCast(gridItm("program_start").Controls(0), RadDatePicker)

If .SelectedDate.ToString().Trim() <> dtRow("program_start").ToString().Trim() Then

If Not IsNothing(.SelectedDate) Then

dtRow("program_start") = .SelectedDate

Else

dtRow("program_start") = DBNull.Value

End If

End With

With DirectCast(gridItm("program_end").Controls(0), RadDatePicker)

If .SelectedDate.ToString().Trim() <> dtRow("program_end").ToString().Trim() Then

If Not IsNothing(.SelectedDate) Then

dtRow("program_end") = .SelectedDate

Else

dtRow("program_end") = DBNull.Value

End If

End With

With DirectCast(gridItm("max_providers").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("max_providers").ToString().Trim() Then

dtRow("max_providers") = .Text.ToString()

End If

End With

With DirectCast(gridItm("max_swline").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("max_swline").ToString().Trim() Then

dtRow("max_swline") = .Text

End If

End With

With DirectCast(gridItm("max_loc").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("max_loc").ToString().Trim() Then

dtRow("max_loc") = .Text

End If

End With

With DirectCast(gridItm("max_lqloan").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("max_lqloan").ToString().Trim() Then

dtRow("max_lqloan") = .Text

End If

End With

With DirectCast(gridItm("max_suplenh").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("max_suplenh").ToString().Trim() Then

dtRow("max_suplenh") = .Text

End If

End With

With DirectCast(gridItm("program_fee").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("program_fee").ToString().Trim() Then

dtRow("program_fee") = .Text

End If

End With

With DirectCast(gridItm("prog_fee_flr").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("prog_fee_flr").ToString().Trim() Then

dtRow("prog_fee_flr") = .Text

End If

End With

With DirectCast(gridItm("prog_fee_freq").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("prog_fee_freq").ToString().Trim() Then

dtRow("prog_fee_freq") = .Text

End If

End With

With DirectCast(gridItm("prog_fee_cycle").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("prog_fee_cycle").ToString().Trim() Then

dtRow("prog_fee_cycle") = .Text

End If

End With

With DirectCast(gridItm("loc_fee").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("loc_fee").ToString().Trim() Then

dtRow("loc_fee") = .Text

End If

End With

With DirectCast(gridItm("loc_comm_pct").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("loc_comm_pct").ToString().Trim() Then

dtRow("loc_comm_pct") = .Text

End If

End With

With DirectCast(gridItm("loc_comm_flr").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("loc_comm_flr").ToString().Trim() Then

dtRow("loc_comm_flr") = .Text

End If

End With

With DirectCast(gridItm("loc_flr_reached").Controls(0), RadDatePicker)

If .SelectedDate.ToString().Trim() <> dtRow("loc_flr_reached").ToString().Trim() Then

If Not IsNothing(.SelectedDate) Then

dtRow("loc_flr_reached") = .SelectedDate

Else

dtRow("loc_flr_reached") = System.DBNull.Value

End If

End With

With DirectCast(gridItm("loc_fee_freq").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("loc_fee_freq").ToString().Trim() Then

dtRow("loc_fee_freq") = .Text

End If

End With

With DirectCast(gridItm("loc_fee_cycle").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("loc_fee_cycle").ToString().Trim() Then

dtRow("loc_fee_cycle") = .Text

End If

End With

With DirectCast(gridItm("liq_coverage").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("liq_coverage").ToString().Trim() Then

dtRow("liq_coverage") = .Text

End If

End With

With DirectCast(gridItm("processed_through").Controls(0), RadDatePicker)

If .SelectedDate.ToString() <> dtRow("processed_through").ToString().Trim() Then

If Not IsNothing(.SelectedDate) Then

dtRow("processed_through") = .SelectedDate

Else

dtRow("processed_through") = System.DBNull.Value

End If

End With

With DirectCast(gridItm("holiday_group").Controls(0), TextBox)

If .Text.ToString.Trim <> dtRow("holiday_group").ToString().Trim() Then

dtRow("holiday_group") = .Text

End If

End With

With DirectCast(gridItm("productcode").Controls(0), RadComboBox)

If .SelectedValue.ToString().Trim() <> dtRow("product").ToString().Trim() Then

If Not IsNothing(.SelectedValue) Then

dtRow("product") = .SelectedValue

Else

dtRow("product") = DBNull.Value

End If

End With

With DirectCast(gridItm("drpCurrency").Controls(0), RadComboBox)

If .SelectedValue.ToString().Trim() <> dtRow("currency_type").ToString().Trim() Then

If Not IsNothing(.SelectedValue) Then

dtRow("currency_type") = .SelectedValue

Else

dtRow("currency_type") = DBNull.Value

End If

End With

With DirectCast(gridItm("chkBookValue").Controls(0), CheckBox)

If .Checked Then

checkBoxChecked = "T"

Else

checkBoxChecked = "F"

End If

If dtRow.RowState <> DataRowState.Added Then

If dtRow("BookValueAccrIntFlag", DataRowVersion.Original).ToString <> checkBoxChecked Then

dtRow("BookValueAccrIntFlag") = checkBoxChecked

End If

Else

dtRow("BookValueAccrIntFlag") = checkBoxChecked

End If

End With

With DirectCast(gridItm("FiscalYearEndMonth").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("FiscalYearEndMonth").ToString().Trim() Then

dtRow("FiscalYearEndMonth") = .Text

End If

End With

With DirectCast(gridItm("FiscalYearEndDay").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("FiscalYearEndDay").ToString().Trim() Then

dtRow("FiscalYearEndDay") = .Text

End If

End With

With DirectCast(gridItm("HardCloseYear").Controls(0), RadNumericTextBox)

If .Text.ToString.Trim <> dtRow("HardCloseYear").ToString().Trim() Then

dtRow("HardCloseYear") = .Text

End If

End With

With DirectCast(gridItm("GLCloseDate").Controls(0), TextBox)

If .Text.ToString.Trim <> dtRow("GLCloseDate").ToString().Trim() Then

dtRow("GLCloseDate") = .Text

End If

End With

End If

j = j + 1

Next

End If

End Sub

Protected Sub dgdPrgSetup_ItemDataBound(ByVal sender As Object, ByVal e As Telerik.Web.UI.GridItemEventArgs) Handles dgdPrgSetup.ItemDataBound

Dim drpProductCode As RadComboBox

Dim drpCurrencyCode As RadComboBox

Dim drpSponsorCode As RadComboBox

Dim programIdentifier As RadTextBox = Nothing

Dim programIdentifierLabel As Label = Nothing

Dim glCloseDateRT As RadTextBox = Nothing

Dim txtPrgName As RadTextBox = Nothing

Dim glCloseDate As String = Nothing

Dim dtRow As DataRow = Nothing

Dim selectedDataRowCollection() As DataRow

Dim gdItemSponsor As GridDataItem

Dim gdItemCurrency As GridDataItem

Dim gdItemProduct As GridDataItem

Dim gdItem As GridDataItem

If e.Item.ItemType = GridItemType.AlternatingItem OrElse e.Item.ItemType = GridItemType.Item Then

If e.Item.DataSetIndex >= 0 Then

selectedDataRowCollection = mProgramSetupDT.Select(1 = 1, "", DataViewRowState.Added + DataViewRowState.Unchanged + DataViewRowState.ModifiedOriginal)

dtRow = selectedDataRowCollection.GetValue(e.Item.DataSetIndex)

e.Item.Attributes.Add("onclick", "SelectGridRow('" + e.Item.ItemIndex.ToString() + "');")

If dtRow("GLCloseDate").ToString().Trim.Length > 0 Then

glCloseDateRT = DirectCast(e.Item.FindControl("txtCloseDay"), RadTextBox)

If Not IsNothing(glCloseDateRT) Then

glCloseDateRT.Text = CDate(dtRow("GLCloseDate")).ToString("MM/dd/yyyy")

End If

If dtRow("program_name").ToString().Trim.Length > 0 Then

txtPrgName = DirectCast(e.Item.FindControl("txtProgramName"), RadTextBox)

If Not IsNothing(txtPrgName) Then

txtPrgName.Text = dtRow("program_name").ToString().Trim()

End If

programIdentifier = DirectCast(e.Item.FindControl("txtProgIdentifier"), RadTextBox)

programIdentifierLabel = DirectCast(e.Item.FindControl("lblProgIdentifier"), Label)

If Not IsNothing(programIdentifier) Then

If dtRow.RowState = DataRowState.Added Then

programIdentifier.Visible = True

programIdentifierLabel.Visible = False

Else

programIdentifier.Visible = False

programIdentifierLabel.Visible = True

End If

If e.Item.ItemType = GridItemType.AlternatingItem Or e.Item.ItemType = GridItemType.Item Then

gdItemSponsor = e.Item

gdItemSponsor("programsponsor").Text = dtRow("sponsor_id").ToString

gdItemCurrency = e.Item

gdItemCurrency("drpCurrency").Text = dtRow("currency_type").ToString

gdItemProduct = e.Item

gdItemProduct("productcode").Text = dtRow("product").ToString

End If

ElseIf e.Item.ItemType = GridItemType.EditItem Then

gdItem = e.Item

gdItemSponsor = e.Item

drpSponsorCode = (DirectCast(gdItemSponsor("programsponsor").Controls(0), RadComboBox))

drpSponsorCode.DataSource = mSponserDT

drpSponsorCode.DataTextField = "sponsor_name"

drpSponsorCode.DataValueField = "sponsor_id"

drpSponsorCode.DataBind()

gdItemCurrency = e.Item

drpCurrencyCode = DirectCast(gdItemCurrency("drpCurrency").Controls(0), RadComboBox)

gdItemCurrency = e.Item

drpCurrencyCode.DataSource = mCurrencyDT

drpCurrencyCode.DataTextField = "CurrencyDesc"

drpCurrencyCode.DataValueField = "CurrencyCode"

drpCurrencyCode.DataBind()

drpProductCode = DirectCast(gdItemCurrency("productcode").Controls(0), RadComboBox)

drpProductCode.Items.Insert(0, New RadComboBoxItem("CP", "CP"))

drpProductCode.Items.Insert(0, New RadComboBoxItem("CLO", "CLO"))

drpProductCode.Items.Insert(0, New RadComboBoxItem("MCCP", "MCCP"))

drpProductCode.Items.Insert(0, New RadComboBoxItem("MCCLO", "MCCLO"))

dgdPrgSetup.MasterTableView.ClearSelectedItems()

gdItem.Selected = True

End If

End Sub

Private Sub CreateObject()

mProgramSetupDT = New DataTable

mSponserDT = New DataTable

mCurrencyDT = New DataTable

End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

CreateObject()

If Not IsPostBack Then

mProgramSetupDT.ReadXmlSchema("MainGrid.xsd")

mProgramSetupDT.ReadXml("MainGrid.xml")

dgdPrgSetup.DataSource = mProgramSetupDT

dgdPrgSetup.DataBind()

Else

mProgramSetupDT.ReadXmlSchema("MainGrid.xsd")

mProgramSetupDT.ReadXml("MainGrid.xml")

End If

End Sub

End Class

General Discussions

answered on 03 Oct 2011

Top users last month