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
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user