or
<
div
class
=
"qsfexAdvEditControlWrapper"
>
<
telerik:RadTextBox
ID
=
"RadTextBox1"
runat
=
"server"
Text='<%# Bind("Subject") %>'
Skin="Office2007" BorderStyle="Solid" Width="95%" Label="Subject:">
</
telerik:RadTextBox
><
br
/><
br
/>
<
asp:Label
ID
=
"Label2"
AssociatedControlID
=
"RadDateTimePicker3"
runat
=
"server"
>Start time:</
asp:Label
>
<
telerik:RadDateTimePicker
ID
=
"RadDateTimePicker3"
runat
=
"server"
SelectedDate='<%# Bind("Start") %>' Skin="Office2007"
EnableTyping="false" TimeView-Interval="00:15:00" TimeView-Height="300px" TimeView-Columns="4">
</
telerik:RadDateTimePicker
>
<
asp:Label
ID
=
"Label3"
AssociatedControlID
=
"RadDateTimePicker4"
runat
=
"server"
>End time:</
asp:Label
>
<
telerik:RadDateTimePicker
ID
=
"RadDateTimePicker4"
runat
=
"server"
SelectedDate='<%# Bind("End") %>' Skin="Office2007"
EnableTyping="false" TimeView-Interval="00:15:00" TimeView-Height="300px" TimeView-Columns="4">
</
telerik:RadDateTimePicker
>
<
telerik:RadSchedulerRecurrenceEditor
ID
=
"RecurrenceEditor1"
runat
=
"server"
/>
<
telerik:RadWindowManager
ID
=
"RadWindowManager1"
runat
=
"server"
Width
=
"250px"
Height
=
"750px"
></
telerik:RadWindowManager
>
<
br
/><
br
/>
<
telerik:RadTextBox
ID
=
"RadTextBox2"
runat
=
"server"
Text='<%# Bind("Description") %>'
Skin="Office2007" BorderStyle="Solid" Width="95%" Columns="20" Rows="5" TextMode="MultiLine" Label="Description:">
</
telerik:RadTextBox
><
br
/><
br
/>
<
asp:TextBox
ID
=
"TextBox3"
runat
=
"server"
Text='<%# Bind("intGroupID") %>' Visible="false" Width="0" Height="0" />
<
asp:TextBox
ID
=
"TextBox2"
runat
=
"server"
Text='<%# Bind("ID") %>' Visible="false" Width="0" Height="0" />
<
asp:TextBox
ID
=
"txtUsersListEd"
Text='<%# Bind("Users") %>' runat="server" Visible="false" Width="0" Height="0" />
</
div
>
function OpenPageSelectWindow(idControl, textControl, id) {
document.getElementById('<%= uxPageSelectorIDControl.ClientID %>').value = idControl;
document.getElementById('<%= uxPageSelectorTextControl.ClientID %>').value = textControl;
var rwManager = $find("<%= uxRwmAP.ClientID %>");
var radCombo = $find('<%= uxPagesDdl.ClientID %>');
radCombo.trackChanges();
var item = radCombo.findItemByValue(id);
if (item) {
item.select();
}
radCombo.updateClientState();
radCombo.commitChanges()
rwManager.open(null, "uxPageSelector");
return false;
}
<script type=
"text/javascript"
>
function
realPostBack(eventTarget, eventArgument) {
__doPostBack(eventTarget, eventArgument);
}
</script>
<
telerik:GridTemplateColumn
UniqueName
=
"templateColPrint"
ItemStyle-HorizontalAlign
=
"Center"
HeaderStyle-Width
=
"45px"
HeaderText
=
"Print"
HeaderStyle-HorizontalAlign
=
"Center"
>
<
ItemTemplate
>
<
asp:Button
runat
=
"server"
Text
=
""
ID
=
"btnPrint"
CommandName
=
"PrintReceipt"
CssClass
=
"btnPrintIcon"
/>
</
ItemTemplate
>
</
telerik:GridTemplateColumn
>
Protected
Sub
SearchGrid_ItemCreated(
ByVal
sender
As
Object
,
ByVal
e
As
Telerik.Web.UI.GridItemEventArgs)
Handles
SearchGrid.ItemCreated
If
(
TypeOf
e.Item
Is
GridDataItem)
And
e.Item.OwnerTableView.Name =
"ReceiptNumber"
Then
Dim
dataItem
As
GridDataItem =
CType
(e.Item, GridDataItem)
Dim
button1
As
Button =
CType
(dataItem(
"templateColPrint"
).FindControl(
"btnPrint"
), Button)
button1.Attributes.Add(
"onclick"
,
String
.Format(
"realPostBack('{0}', '{1}');"
, button1.UniqueID, button1.CommandArgument))
End
If
End
Sub
Protected
Sub
SearchGrid_ItemCommand(
ByVal
source
As
Object
,
ByVal
e
As
Telerik.Web.UI.GridCommandEventArgs)
Handles
SearchGrid.ItemCommand
Select
Case
e.CommandName
Case
"Print"
CreatePDFReport(
CType
(SearchGrid.MasterTableView.DataKeyValues.Item(e.Item.ItemIndex)(
"Number"
),
Integer
))
Case
Else
Exit
Sub
End
Select
End
Sub
Protected
Sub
RadGrid2_NeedDataSource(
ByVal
sender
As
Object
,
ByVal
e
As
Telerik.Web.UI.GridNeedDataSourceEventArgs)
Dim
GridExperience
As
RadGrid = RadPanelBar1.FindItemByValue(
"Step1"
).FindControl(
"RadGrid2"
)
Dim
dSet
As
Global.PICT.Web.CVDataSet = Session(
"CV"
)
GridExperience.DataSource = dSet.Jobs
End
Sub
Protected
Sub
RadGrid2_PreRender(
ByVal
sender
As
Object
,
ByVal
e
As
EventArgs)
If
Not
IsPostBack
Then
Dim
GridExperience
As
RadGrid = RadPanelBar1.FindItemByValue(
"Step1"
).FindControl(
"RadGrid2"
)
GridExperience.EditIndexes.Add(0)
GridExperience.MasterTableView.Rebind()
End
If
End
Sub
Protected
Sub
RadGrid2_InsertCommand(
ByVal
sender
As
Object
,
ByVal
e
As
Telerik.Web.UI.GridCommandEventArgs)
Dim
editedItem
As
GridEditableItem =
CType
(e.Item, GridEditableItem)
Dim
dSet
As
Global.PICT.Web.CVDataSet = Session(
"CV"
)
Dim
newRow
As
DataRow = dSet.Jobs.NewRow
Dim
ExpKey
As
Long
= 0
If
dSet.Jobs.Compute(
"MAX(PKEY)"
,
String
.Empty)
Is
DBNull.Value
Then
ExpKey = 1
Else
ExpKey = dSet.Jobs.Compute(
"MAX(PKEY)"
,
String
.Empty) + 1
End
If
newRow(
"PKEY"
) = ExpKey
newRow(
"JOB_CODE"
) = 1
newRow(
"IS_ACTIVE"
) = 1
Dim
newValues
As
Hashtable =
New
Hashtable
e.Item.OwnerTableView.ExtractValuesFromItem(newValues, editedItem)
Try
For
Each
entry
As
DictionaryEntry
In
newValues
newRow(
CType
(entry.Key,
String
)) = entry.Value
Next
dSet.Jobs.Rows.Add(newRow)
Catch
ex
As
Exception
e.Canceled =
True
End
Try
e.Item.OwnerTableView.IsItemInserted =
False
Session(
"CV"
) = dSet
End
Sub
<
asp:Content
ID
=
"Content2"
ContentPlaceHolderID
=
"ContentPlaceHolder1"
runat
=
"server"
>
<
telerik:RadScriptManager
ID
=
"RadScriptManager1"
Runat
=
"server"
>
</
telerik:RadScriptManager
>
<
telerik:RadAjaxLoadingPanel
ID
=
"RadAjaxLoadingPanel1"
Runat
=
"server"
Skin
=
"Default"
>
<
telerik:RadAjaxManager
ID
=
"RadAjaxManager1"
runat
=
"server"
>
<
AjaxSettings
>
<
telerik:AjaxSetting
AjaxControlID
=
"RadPanelBar1"
>
<
UpdatedControls
>
<
telerik:AjaxUpdatedControl
ControlID
=
"RadPanelBar1"
LoadingPanelID
=
"RadAjaxLoadingPanel1"
/>
</
UpdatedControls
>
</
telerik:AjaxSetting
>
</
AjaxSettings
>
</
telerik:RadAjaxManager
>
</
telerik:RadAjaxLoadingPanel
>
<
telerik:RadPanelBar
ID
=
"RadPanelBar1"
runat
=
"server"
Skin
=
"Web20"
Width
=
"720px"
ExpandMode
=
"SingleExpandedItem"
>
<
Items
>
<
telerik:RadPanelItem
runat
=
"server"
Expanded
=
"True"
Selected
=
"True"
Text="Step 1: Personal Information >>>" >
<
Items
>
<
telerik:RadPanelItem
Value
=
"Step1"
>
<
ItemTemplate
>
<
telerik:RadGrid
ID
=
"RadGrid2"
runat
=
"server"
AutoGenerateColumns
=
"False"
CellSpacing
=
"0"
GridLines
=
"None"
oninsertcommand
=
"RadGrid2_InsertCommand"
onitemcommand
=
"RadGrid2_ItemCommand"
onitemdatabound
=
"RadGrid2_ItemDataBound"
onneeddatasource
=
"RadGrid2_NeedDataSource"
onprerender
=
"RadGrid2_PreRender"
onupdatecommand
=
"RadGrid2_UpdateCommand"
Skin
=
"Web20"
>
<
HeaderContextMenu
CssClass
=
"GridContextMenu GridContextMenu_Default"
>
</
HeaderContextMenu
>
<
MasterTableView
EditMode
=
"PopUp"
CommandItemDisplay
=
"Top"
>
<
CommandItemSettings
ExportToPdfText
=
"Export to PDF"
/>
<
RowIndicatorColumn
FilterControlAltText
=
"Filter RowIndicator column"
>
<
HeaderStyle
Width
=
"20px"
/>
</
RowIndicatorColumn
>
<
ExpandCollapseColumn
FilterControlAltText
=
"Filter ExpandColumn column"
>
<
HeaderStyle
Width
=
"20px"
/>
</
ExpandCollapseColumn
>
<
Columns
>
<
telerik:GridBoundColumn
FilterControlAltText
=
"Filter Skill column"
UniqueName
=
"PKey"
DataField
=
"POSITION"
HeaderText
=
"Position"
HeaderStyle-Width
=
"250"
Visible
=
"false"
>
<
HeaderStyle
HorizontalAlign
=
"Center"
/>
</
telerik:GridBoundColumn
>
</
Columns
>
<
EditFormSettings
EditFormType
=
"Template"
>
<
FormTemplate
>
<
asp:TextBox
ID
=
"TextBox1"
runat
=
"server"
Text='<%# Bind("POSITION") %>' ></
asp:TextBox
>
<
telerik:RadButton
ID
=
"BtnAddExperience"
runat
=
"server"
Text='<%# IIf (TypeOf Container is GridEditFormInsertItem, "Insert", "Update") %>'
Skin="Web20" Width="50px" CssClass="btnInsertItem"
CommandName='<%# IIf (TypeOf Container is GridEditFormInsertItem, "PerformInsert", "Update") %>'>
</
telerik:RadButton
>
</
FormTemplate
>
<
PopUpSettings
Modal
=
"True"
Width
=
"480px"
/>
</
EditFormSettings
>
</
MasterTableView
>
<
FilterMenu
EnableImageSprites
=
"False"
>
</
FilterMenu
>
</
telerik:RadGrid
>
</
ItemTemplate
>
</
telerik:RadPanelItem
>
</
Items
>
</
telerik:RadPanelItem
>
</
Items
>
</
telerik:RadPanelBar
>
</
asp:Content
>