MS
This commit is contained in:
@@ -683,10 +683,13 @@ Public Class ClassControlValues
|
||||
Dim controlId As Integer = row.Item("CONTROL_ID")
|
||||
Dim controlName As String = row.Item("CONTROL_NAME")
|
||||
|
||||
Dim control As Control = controls.Find(controlName, False)(0)
|
||||
|
||||
LoadDefaultValue(controlId, RecordID, control, parentRecordID, EntityID, defaultValue)
|
||||
|
||||
Try
|
||||
Dim control As Control = controls.Find(controlName, False)(0)
|
||||
LoadDefaultValue(controlId, RecordID, Control, parentRecordID, EntityID, defaultValue)
|
||||
Catch ex As Exception
|
||||
ClassLogger.Add("Unexpected Error in getting default value for control '" & controlName & " - " & ex.Message, True)
|
||||
End Try
|
||||
Next
|
||||
|
||||
|
||||
|
||||
@@ -3815,7 +3815,7 @@ Public Class frmConstructor_Main
|
||||
End If
|
||||
Dim Width = DT_WINDREAM_RESULTLIST.Rows(0).Item(String.Format("{0}_WIDTH", col.ColumnName))
|
||||
If Not IsNothing(Width) And Not IsDBNull(Width) Then
|
||||
GridViewDoc_Search.Columns.Item(rowvalue). = Width
|
||||
' GridViewDoc_Search.Columns.Item(rowvalue). = Width
|
||||
|
||||
End If
|
||||
Next
|
||||
|
||||
Reference in New Issue
Block a user