Hi there!
I've come up against a strange behavior when trying to save a collection of entities.
I'm using self servicing; and I've assigned a validator class to my entity. When saving the collection bound to my data form and the entity validation fails an unhandled exception occurs.
Try
Dim x As BankEntity = CType(Me.bindSource.Current, BankEntity)
x.Validator = New DAL.ValidatorClasses.BankValidator
'Display message when NOT saved
'This fails!!!
If Me.colBank.SaveMulti(True) = 0 Then
If DisplayMessage = True Then
MessageBox.Show("Your entry has NOT been saved. Please try again later.", "Saving Failure ...", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
End If
Return False
Else
Return True
End If
Catch exJCL As SD.LLBLGen.Pro.ORMSupportClasses.ORMEntityValidationException
MessageBox.Show(exJCL.Message, "Bashar Lulu")
Catch ex As Exception
MessageBox.Show(ex.Message, "Bashar Lulu")
End Try
When saving only a single entity (again, and the validation fails) then the exception is handled properly.
Try
Dim x As BankEntity = CType(Me.bindSource.Current, BankEntity)
x.Validator = New DAL.ValidatorClasses.BankValidator
'Display message when NOT saved
'This is OK!!!
If Me.CurrentEntity.Save(True) = False Then
If DisplayMessage = True Then
MessageBox.Show("Your entry has NOT been saved. Please try again later.", "Saving Failure ...", MessageBoxButtons.OK, MessageBoxIcon.Exclamation)
End If
Return False
Else
Return True
End If
Catch exJCL As SD.LLBLGen.Pro.ORMSupportClasses.ORMEntityValidationException
MessageBox.Show(exJCL.Message, "Bashar Lulu")
Catch ex As Exception
MessageBox.Show(ex.Message, "Bashar Lulu")
End Try
What's wrong? I'm using LLBL v2, BTW.
Thanks,
Bashar