or
Private
Sub
rgvContractDetails_CellEndEdit(sender
As
Object
, e
As
Telerik.WinControls.UI.GridViewCellEventArgs)
Handles
rgvContractDetails.CellEndEdit
Try
If
rgvContractDetails.SelectedRows.Count > 1
Then
Select
Case
e.Column.Name
Case
"Quantity"
For
Each
Row
As
GridViewRowInfo
In
rgvContractDetails.SelectedRows
Dim
oSelectedItem
As
SalesContractDetail = Row.DataBoundItem
Row.Cells(
"Quantity"
).Value = e.Value
oSelectedItem.QuantityStr = e.Value
oSelectedItem.CalculateBalance()
Row.Cells(
"QtyBalance"
).Value = oSelectedItem.BalanceStr
Next
Case
"QtyCancel"
For
Each
Row
As
GridViewRowInfo
In
rgvContractDetails.SelectedRows
Dim
oSelectedItem
As
SalesContractDetail = Row.DataBoundItem
Row.Cells(
"QtyCancel"
).Value = e.Value
oSelectedItem.CancelStr = e.Value
oSelectedItem.CalculateBalance()
Row.Cells(
"QtyBalance"
).Value = oSelectedItem.BalanceStr
Row.Cells(
"CancelDate"
).Value = Today.ToShortDateString
Next
End
If
Catch
ex
As
Exception
MessageBox.Show(ex.Message,
"Error"
, MessageBoxButtons.OK, MessageBoxIcon.
Error
)
End
Try
End
Sub