How to set condition in CFL which are alredy assign in EditText

Question

Hi
  All
I create a Screen Printer Form where i assign a edit text to ChooseFromList as follow-
1)1st create a CFL using Collection Tab in screen printer and set the Object type=2 and Unique Id=CFL_2
2)Then assign CFL_2 to EditText in Item Tab window.
In that case CFL show All the Business partners. so my question is how i set the Condition in CFL_2 according to CardType.
thanks
Subhas

Answer 1

Hi,
Give a new Unique Id and assign that to edittext
            Dim oCons As SAPbouiCOM.Conditions
            Dim oCon As SAPbouiCOM.Condition
            oCons = New SAPbouiCOM.Conditions
            oCon = oCons.Add()
             oCon.Alias = "U_CLEARED"
       'oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL
            oCon.CondVal = val        
            Dim oCFL As SAPbouiCOM.ChooseFromList
            Dim oEdit As SAPbouiCOM.EditText
            Dim oCFLs As SAPbouiCOM.ChooseFromListCollection
            oCFLs = oForm.ChooseFromLists
            oitem = oForm.Items.Item(ItemUID)
            oEdit = oitem.Specific
            Dim oCFLCreationParams As SAPbouiCOM.ChooseFromListCreationParams
            oCFLCreationParams = SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams)
            oCFLCreationParams.MultiSelection = False
            oCFLCreationParams.ObjectType = "AUCTIONS"
            Try
                oCFLCreationParams.UniqueID = "CFL1_ACV" & val
            Catch ex As Exception
            End Try
            Try
                oCFL = oCFLs.Add(oCFLCreationParams)
            Catch ex As Exception
            End Try
            Try
                oCFL.SetConditions(oCons)
            Catch ex As Exception
            End Try
            oEdit.ChooseFromListUID = "CFL1_ACV" & val
            oEdit.ChooseFromListAlias = "Code"