ChooseList

Hi

  I have written the below code to select employee . I want that it should return name also & display in other field . Secondly it  should show only active employees in list.

Private Sub AddChooseFromList()

        Try

            Dim oCFLs As SAPbouiCOM.ChooseFromListCollection

            Dim oCons As SAPbouiCOM.Conditions

            Dim oCon As SAPbouiCOM.Condition

            oCFLs = oForm0.ChooseFromLists

            Dim oCFL As SAPbouiCOM.ChooseFromList

            Dim oCFLCreationParams As SAPbouiCOM.ChooseFromListCreationParams

            oCFLCreationParams = SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams)

            ' Adding 2 CFL, one for the button and one for the edit text.

            oCFLCreationParams.MultiSelection = False

            oCFLCreationParams.ObjectType = "171"

            oCFLCreationParams.UniqueID = "CFL1"

            oCFL = oCFLs.Add(oCFLCreationParams)

            ' Adding Conditions to CFL1

            'oCons = oCFL.GetConditions()

            'oCon = oCons.Add()

            'oCon.Alias = "CardType"

            'oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL

            'oCon.CondVal = "C"

            'oCFL.SetConditions(oCons)

        Catch

            MsgBox(Err.Description)

        End Try

    End Sub