Dim strRules As mmSaveDataResult Dim bprule As mmBusinessRule = Me.GetBusinessRuleObject() strRules = bprule.CheckRules(Me.oRemitBatch.GetCurrentDataSet, Me.oRemitBatch.TableName, True)strRules comes back showing that a rule was broken but the Business process’s rules object never gets updated to show that rules have been broken. So when I use the business process in the code below I don’t get the broken rules .
Dim voidresult As OakLeaf.MM.Main.Business.mmSaveDataResult = Me.obpVoidBatch.ExecuteEvent(CType(Me.txtStartingDLN.Text, Int64), CType(Me.txtEndingDLN.Text, Int64), Me.dtpProcessDate.Value) 'check the results If voidresult = OakLeaf.MM.Main.Business.mmSaveDataResult.RulesBroken Then 'rules have been broken, get the messages that say why and pass them to the user MsgBox(Me.obpVoidBatch.GetBusinessRuleObject.GetAllBrokenRules(), MsgBoxStyle.Exclamation + MsgBoxStyle.OkOnly, "Unable to insert batch") End IfI think this workied in 2.4 but insnt working in the new release.