Problem binding a matrix in the Sales Order Form

Question

Hi everybody!
I am working in an Add-On. What I do is modify the sales order form in runtime. I catch the event when the form is loading and then I add a new folder with some fields and a matrix.
I've got a matrix in this form with the employees that participate in an order and when I go through all the orders by using the next and previous record buttons I have to rebind it to show the participants in a specific order. The code for the event is the following:
        If (pVal.ItemUID = "57") And pVal.Before_Action = False And pVal.EventType = et_ITEM_PRESSED Then
            BindParticipantGrid
            BubbleEvent = False
        End If
After bind the grid, BO shows a System message indicating that the form has been changed and asking me if I want to save the changes to the order. Looks like, whenever the bind function finds rows to add to the matrix it changes the mode of the form by adding rows to the matrix. How can I prevent that when I'm in view mode?
This is the code for the binding function
Sub BindParticipantGrid()
    Dim myForm As SAPbouiCOM.Form
    Dim oMatrix As SAPbouiCOM.Matrix
    Dim rs As sapbobsCOM.Recordset
    Dim strSQL, OrdreNr As String
    Dim oText As SAPbouiCOM.EditText
    Set myForm = SBOApplication.Forms.GetFormByTypeAndCount(139, 1)
    Set oText = myForm.Items("8").Specific
    If oText.Value <> "" Then
        OrdreNr = oText.Value
    Else
        OrdreNr = "0"
    End If
    Set oMatrix = myForm.Items("matrix").Specific
    oMatrix.Clear
    Set rs = myCompany.GetBusinessObject(sapbobsCOM.BoObjectTypes.BoRecordset)
    strSQL = "SELECT [@HL_PART].Code as Code, [@HL_PART].U_DocNum as DocNum, [@HL_PART].U_EmpId as EmpId, [@HL_PART].U_EmpName as EmpName, [@HL_PART].U_Message as Message, [@HL_PART].U_MessRead as MessRead, [@HL_PART].U_MainPart as MainPart, [@HL_PART].U_StartDt as StartDt, [@HL_PART].U_StartHr as StartHr, [@HL_PART].U_FinishDt as FinishDt, [@HL_PART].U_FinishHr as FinishHr, [@HL_PART].U_Finished as Finished FROM [@HL_PART] WHERE [@HL_PART].U_DocNum = " & OrdreNr
    rs.DoQuery strSQL
    While Not rs.EOF
        myForm.DataSources.UserDataSources.Item("EmpId").Value = rs.fields("EmpId").Value
        myForm.DataSources.UserDataSources.Item("EmpName").Value = rs.fields("EmpName").Value
        myForm.DataSources.UserDataSources.Item("Message").Value = rs.fields("Message").Value
        myForm.DataSources.UserDataSources.Item("MessRead").Value = rs.fields("MessRead").Value
        myForm.DataSources.UserDataSources.Item("MainPart").Value = rs.fields("MainPart").Value
        myForm.DataSources.UserDataSources.Item("StartDt").Value = rs.fields("StartDt").Value
        myForm.DataSources.UserDataSources.Item("StartHr").Value = rs.fields("StartHr").Value
        myForm.DataSources.UserDataSources.Item("FinishDt").Value = rs.fields("FinishDt").Value
        myForm.DataSources.UserDataSources.Item("FinishHr").Value = rs.fields("FinishHr").Value
        myForm.DataSources.UserDataSources.Item("Finished").Value = rs.fields("Finished").Value
        oMatrix.AddRow
        rs.MoveNext
    Wend
    oMatrix.SelectionMode = ms_Auto
End Sub
I will apreciate all king of help
Thanks in advance.

Answer 1

You have a property of the form which allows you to change the mode
myForm.Mode = fm_ADD_MODE
myForm.Mode = fm_EDIT_MODE
myForm.Mode = fm_VIEWMODE_MODE
You may change it after you modify you matrix data to fm_VIEWMODE_MODE and I guess you won't have the system question again.
Sebastien