BUG in TechDemo AddOn - Version 2

Question

There is a bug in the TechDemo Addon related to CFLs in the Matrix. This is the scenario is which I discovered this bug:
1) The number of rows in the matrix is say 5.
2) A user edits the CFL enabled column of the third row and clicks update.
3) When the matrix refreshs all of the rows below the edited row are deleted. That is, the original resultset has 5 records and the updated resultset has three records, even though only an edit occured, not a delete.
Any ideas?
Can someone at SAP address this issue with CFLs in a Matrix?
Thanks,
Shannon Best

Answer 1

Hello Shannon,
I couldn't reproduce the error you get, but there was a strange behaviour in the function. 
try the code below, I tried it, and it seems to work. I tried it a lot of time (deleting, adding row, updating row) and I didn't get any error.
let me know if it works on your computer, if yes, I'll see with SDN to update the downloadable version.
Sebastien
PS: Thanks a lot Curtis to look at the problem. I can't give you point, but you deserve them
                        Case SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST
                            If Not IsNothing(pCFL(pVal).SelectedObjects) Then
                                Select Case pVal.ItemUID.ToUpper
                                    Case enControlName.cst_mtMatrix.ToUpper
                                        'Me.FormCellEdit(pVal.ItemUID, pVal.ColUID, pVal.Row).Value = pCFL(pVal).SelectedObjects.GetValue(0, 0)
                                        Me.FormMatrix(enControlName.cst_mtMatrix).FlushToDataSource()
                                        Me.FormMatrix(enControlName.cst_mtMatrix).GetLineData(pVal.Row)
                                        msa_DBDatasourceLink.SetValue(tbl_MasterDataHardCodingLine.fst_ItemCode, DBDS(tbl_MasterDataHardCodingLine.cst_TableName).Offset, pCFL(pVal).SelectedObjects.GetValue(0, 0))
                                        Me.FormMatrix(enControlName.cst_mtMatrix).SetLineData(pVal.Row)
                                        Me.FormItem(pVal.ItemUID).Refresh()
                                        Me.FormItem(pVal.ItemUID).Update()
                                        If Me.msa_DBDatasourceLink.GetValue(tbl_MasterDataHardCodingLine.fst_ItemCode _
                                                                    , Me.msa_DBDatasourceLink.Size - 1) <> "" Then
                                            'there are data in last value, a record must be added
                                            Me.msa_DBDatasourceLink.Clear()
                                            Me.FormMatrix(enControlName.cst_mtMatrix).AddRow()
                                        End If
                                        If Me.m_SBO_Form.Mode = SAPbouiCOM.BoFormMode.fm_OK_MODE Then
                                            Me.m_SBO_Form.Mode = SAPbouiCOM.BoFormMode.fm_UPDATE_MODE
                                        End If
                                End Select
                            End If