Choose From List Cancel Button Throws Exception

Hi all,
When I click the "Cancel" Button on my CFL, I get an error....
EXCEPTION: Matrix__EBS_FRM_CRDCLM__64.OnAfterChooseFromList raised
No matching records found (ODBC -2028)
Any ideas???

Hi
in your choose from list event add this condition
If Not pval.SelectedObjects Is Nothing Then
'write your code in this if condition
end if
hope it will help u.
Regards,
Mithun.

Similar Messages

Choose from List-CFL button is not visible

Hi Experts,
I am using SAP B1 8.8 PL 05 in ramp up. I have observed that in some of the clients PCs in Sales Order window I am not able to see the Choose from list button / CFL button for selecting Customer Or say Item.
This happens only in some Client PCs, where as in other clients PCs it works fine.
BR
Samir Gandhi

Hi Rashid,
I did that. Now the indicator is displayed, but still I am not able to see the customer / item list.
BR
Samir Gandhi

Get cardname along with cardcode usuing Choose From List Button

Hi,
I am using Choose From List button in my form. If I click the button then I can see the matrix containing business partners list and if I choose any business partner from that list then I can see the business partners id or cardcode from ocrd table in the corresponding textbox.
But I want the business partner's name or cardname also should come simultaneously in the next textbox of my form. Can some one provide me any code help for this process.
Regards,
Sudeshna.

Hi Sudesha,
You can get the CardName with the following code:
sCardCode = oDataTable.GetValue(0, 0)
sCardName = oDataTable.GetValue(1, 0)
Hope it helps,
Adele

Addon in choose from list

Dear All Technical Experts,
I would like to add new field in choose from list window that is run from production order --> issue for production --> click production order button.
I could not find out how to add new information or filter field there. is it possible for me using addon ? The information I need available is remarks (OWOR.remarks). If yes, will it be UI addon or UI/DI ?
I appreciate your answer. TIA
Rgds,

Hi,
First create the srf which has two buttons- Choose and Cancel
code for creating the grid :- you have to pass the SQL query as a paramter in the below function .In query you choose as many as fields from the table ,at run time columns will automatically created corresponds to your query.
 private bool CreateGrid(string sSQL)
 try
 SAPbouiCOM.Item oItem;
 oItem = oform.Items.Add("Grid", SAPbouiCOM.BoFormItemTypes.it_GRID);
 oItem.Left = 7;
 oItem.Width = 387;
 oItem.Top = 47;
 oItem.Height = 188;
 oform.DataSources.DataTables.Add("dtLookUpTable");
 oDataTable = oform.DataSources.DataTables.Item("dtLookUpTable");
 oDataTable.Clear();
 oDataTable.ExecuteQuery(sSQL);
 oGrid = (SAPbouiCOM.Grid)oItem.Specific;
 oGrid.SelectionMode = SAPbouiCOM.BoMatrixSelect.ms_Single ;
 oGrid.DataTable = oDataTable;
 if(oGrid.Rows.Count > 0)
 oGrid.Rows.SelectedRows.Add(0);
 for (int iColCounter = 0; iColCounter < oGrid.Columns.Count; iColCounter++)
 oGrid.Columns.Item(iColCounter).Width = 50;
 oGrid.Columns.Item(iColCounter).Editable = false;
 oGrid.AutoResizeColumns();
 return true;
 catch(Exception ex)
 oform.Freeze(false);
 throw ex;
choose the value on pressing the button 'Choose'
 protected override void ITEMPRESS_AFTERACTION(ref SAPbouiCOM.ItemEvent pVal, out bool BubbleEvent, SAPbouiCOM.Application oSboApplication, SAPbobsCOM.Company oCompany)
 BubbleEvent = true;
 if (pVal.ItemUID == "choosebuttonuid")
 if (oGrid.Rows.SelectedRows.Count > 0)
 SAPbouiCOM.DataTable oReturnTable = null;
 oform.DataSources.DataTables.Add("dtReturnTable");
 oReturnTable = oform.DataSources.DataTables.Item("dtReturnTable");
 oReturnTable.CopyFrom(oDataTable);
 for (int iRowIndex = 0; iRowIndex < oReturnTable.Rows.Count; iRowIndex++)
 oReturnTable.Rows.Remove(iRowIndex);
 int iRow = oGrid.GetDataTableRowIndex(oGrid.Rows.SelectedRows.Item(0, SAPbouiCOM.BoOrderType.ot_RowOrder));
 oReturnTable.Rows.Add(1);
 //for (int iColIndex = 0; iColIndex < oReturnTable.Columns.Count; iColIndex++)
 // oReturnTable.SetValue(iColIndex, 0, oDataTable.GetValue(iColIndex, iRow));
 oReturnTable.SetValue(0, 0, oDataTable.GetValue(0, iRow ));
 oReturnTable.SetValue(1, 0, oDataTable.GetValue(1, iRow));
 SBOAppAddOn.mLookupForms.Remove(oform.UniqueID.ToString());
then u have to send the oReturnTable with parentuid( issue for production) to the baseform.
 example-> SendData(oReturnTable, strParentFormUID, oSboApplication, oCompany);
 oform.Close();
More:-
You have to include the Doubleclick faclity on the grid
You have to include the find functionality also.

Problem in Choose from list.

Hi,
As I tried CFL for a user defined form, when I select an item from CFL and it is displaying in the relevant field. And when I save the data it is perfectly saving with the message of "Operation has been completed successfully". But the data is not saving in the field in which is the CFL is activating.
It would be appreciated, if any one can give the solution please.
The steps I' ve followed as,
1. In the screen painter I' ve added the choose from list thru' the collection folder.
2. Then the choose from list id is attached and give the allias in the item's specific property.
3. Then I' ve written code in the load form function as follows.
            Oform.DataSources.UserDataSources.Add("EditDS", SAPbouiCOM.BoDataType.dt_SHORT_TEXT)
            txtaccode.DataBind.SetBound(True, "", "EditDS")
4. In the item event
        If pVal.EventType = SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST Then
            Dim oCFLEvento As SAPbouiCOM.IChooseFromListEvent
            oCFLEvento = pVal
            Dim sCFL_ID As String
            sCFL_ID = oCFLEvento.ChooseFromListUID
            Dim oForm As SAPbouiCOM.Form
            oForm = SBO_Application.Forms.Item(FormUID)
            Dim oCFL As SAPbouiCOM.ChooseFromList
            oCFL = oForm.ChooseFromLists.Item(sCFL_ID)
            If oCFLEvento.BeforeAction = False Then
                Dim oDataTable As SAPbouiCOM.DataTable
                oDataTable = oCFLEvento.SelectedObjects
                Dim val As String
                Dim val1 As String
                Dim val2 As String
                Dim val3 As String
                Try
                    Try
                        val = oDataTable.GetValue(0, 0)
                        val1 = oDataTable.GetValue(1, 0)
                        If (pVal.ItemUID = "txtaccode") Then
                            oForm.DataSources.UserDataSources.Item("EditDS").ValueEx = val
                            txtaccode.Value = val
                            oForm.DataSources.UserDataSources.Item("EditDS1").ValueEx = val1
                        End If
                    Catch ex As Exception
                        Exit Sub 'For Exception raised for Cancel Button
                    End Try
                Catch ex As Exception
                    SBO_Application.MessageBox(ex.Message)
                End Try
            End If
        End If
    End Sub

Checks if the property TableName in the field is pointed to the table to store de data.
Go to Example: How to binding CFL to a UDO in a customized System Form. and rate it
regards

Edit and text and choose from list

hello,
I am trying to create a form that resemle to the purchase order form.
In the purchase order form when we select the card code from the choose from list
the system fill all the fileds like the name docnum .. with relevant information.
i tried to do that by using the vent et_evaluate of the edit text bind with the Card code in my form.
The problem is that when i clik on the choose from list button the event is lanched and then the value of the card code is "" so i can't crate my queries to get the infomation like suplier name and ..
does any body have an answer?
This my code:
switch (pVal.ItemUID)
                                            case "3":
                                                    _Form.Freeze(true);
                                                    try
                                                        string NumFournisseur =
                                                            ((EditText) _Form.Items.Item("3").Specific).Value;
                                                        ArrayList DFournisseur =
                                                            new DB.PurchaseRequest(_SboCompany).
                                                                GetDetailsFournisseur(NumFournisseur);
                                                        EditText Textvar;
                                                        // remplir nom fournisseur et nom contact
                                                        Textvar = (EditText) _Form.Items.Item("2").Specific;
                                                        Textvar.String = DFournisseur[0].ToString();
                                                        Textvar = (EditText) _Form.Items.Item("4").Specific;
                                                        Textvar.String = DFournisseur[1].ToString();
                                                        // remplir les dates comptable , de livraiosn et du document
                                                        Textvar = (EditText) _Form.Items.Item("17").Specific;
                                                        Textvar.String = DateTime.Today.ToString();
                                                        Textvar = (EditText) _Form.Items.Item("19").Specific;
                                                        Textvar.String = DateTime.Today.ToString();
                                                        Textvar = (EditText) _Form.Items.Item("21").Specific;
                                                        Textvar.String = DateTime.Today.ToString();
                                                        // remplir devise partenaire et numéro document
                                                        ((EditText) _Form.Items.Item("59").Specific).String =
                                                            new DB.PurchaseRequest(_SboCompany).GetCurrencyCode(
                                                                NumFournisseur);
                                                        _Form.Items.Item("59").Visible = true;
                                                        _Form.Items.Item("59").Enabled = false;
                                                        ((ComboBox) _Form.Items.Item("10").Specific).Select(
                                                            "primary",
                                                            BoSearchKey.
                                                                psk_Index);
                                                        ((EditText) _Form.Items.Item("11").Specific).String =
                                                            new DB.PurchaseRequest(_SboCompany).GetLastDocNum().
                                                                ToString();
                                                        ((EditText) _Form.Items.Item("12").Specific).String = "0";
                                                    catch (Exception e)
                                                        Console.WriteLine(e.Message);
                                                    _Form.Freeze(false);
                                                    break;
                                        break;
                                    catch (Exception ex)
                                        Console.Write(ex.Message);
                            break;

Hey Achref,
You can use the event and code like this:
string vendCode = string.Empty;
SAPbouiCOM.IChooseFromListEvent oCFLEvento = (SAPbouiCOM.IChooseFromListEvent) pVal;
string sCFL_ID = oCFLEvento.ChooseFromListUID;
SAPbouiCOM.ChooseFromList oCFL = oVendorSourcingForm.ChooseFromLists.Item(sCFL_ID);
SAPbouiCOM.DataTable oDataTable = oCFLEvento.SelectedObjects;
if (oDataTable != null)
     //get selected value from datatable
     if (oDataTable.Rows.Count > 0)vendCode = oDataTable.GetValue(0, 0).ToString();
Also check out 17.ChooseFromList in the samples that you can download.
Hope that helps
Curtis

Choose from list in the system

Hi
I want to create the Choose from list in the System form (Employee Master Data) in the edit box. what is the coding for this ? can anyone help me ...
Regards
Bhuvana
Edited by: bhuvana eshwari on Aug 7, 2008 8:23 AM

Hi
i am adding three fields in Employe Master Data under Adminstration folder and fourth field in Employe Master Data,
Choose from list is added in the fourth field. please see this coding...
Public Class class1
 Public WithEvents oApplication As SAPbouiCOM.Application
 Private oOrderForm As SAPbouiCOM.Form
 Private oNewItem As SAPbouiCOM.Item
 Private oItem As SAPbouiCOM.Item
 Private oFolderItem As SAPbouiCOM.Folder
 Private oOptionBtn As SAPbouiCOM.OptionBtn
 Private oCheckBox As SAPbouiCOM.CheckBox
 Dim ostatic As SAPbouiCOM.StaticText
 Dim ocombo As SAPbouiCOM.ComboBox
 Dim oCompany As SAPbobsCOM.Company
 Dim oRecordSet, rs1, rs2 As SAPbobsCOM.Recordset
 Dim oSboGuiApi As SAPbouiCOM.SboGuiApi
 Dim nerr As Long
 Dim oedit, oedit1, oedit2 As SAPbouiCOM.EditText
 Dim obutton As SAPbouiCOM.Button
 Dim oform As SAPbouiCOM.Form
 Dim oCFLs As SAPbouiCOM.ChooseFromListCollection
 Dim oCons As SAPbouiCOM.Conditions
 Dim oCon As SAPbouiCOM.Condition
 Dim oCFL As SAPbouiCOM.ChooseFromList
 Dim oCFLCreationParams As SAPbouiCOM.ChooseFromListCreationParams
 Public Sub setapplication()
 Dim Cookie, EncryptedCookie, Connstring As String
 Dim nerr As Long
 oCompany = New SAPbobsCOM.Company
 Connstring = Environment.GetCommandLineArgs.GetValue(1)
 oSboGuiApi = New SAPbouiCOM.SboGuiApi
 oSboGuiApi.Connect(Connstring)
 oApplication = oSboGuiApi.GetApplication
 oApplication.MessageBox("hi u r connected to the application")
 Cookie = oCompany.GetContextCookie
 EncryptedCookie = oApplication.Company.GetConnectionContext(Cookie)
 nerr = oCompany.SetSboLoginContext(EncryptedCookie)
 oApplication.MessageBox("single sign on worked")
 If oCompany.Connected = False Then
 nerr = oCompany.Connect
 If nerr <> 0 Then
 Else
 oApplication.MessageBox("Company got connected successfully")
 End If
 End If
 End Sub
 Private Sub AddItemsToOrderForm()
 oItem = oOrderForm.Items.Item("90")
 oNewItem = oOrderForm.Items.Add("s1", SAPbouiCOM.BoFormItemTypes.it_STATIC)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 ostatic = oNewItem.Specific
 ostatic.Caption = "Referal Name"
 oNewItem.FromPane = 3
 oNewItem.ToPane = 3
 oItem = oOrderForm.Items.Item("81")
 oNewItem = oOrderForm.Items.Add("e1", SAPbouiCOM.BoFormItemTypes.it_EDIT)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 oedit = oNewItem.Specific
 oNewItem.FromPane = 3
 oNewItem.ToPane = 3
 oedit.DataBind.SetBound(True, "OHEM", "U_rename")
 oItem = oOrderForm.Items.Item("s1")
 oNewItem = oOrderForm.Items.Add("s2", SAPbouiCOM.BoFormItemTypes.it_STATIC)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 ostatic = oNewItem.Specific
 ostatic.Caption = "ReferalEmp No "
 oNewItem.FromPane = 3
 oNewItem.ToPane = 3
 oItem = oOrderForm.Items.Item("e1")
 oNewItem = oOrderForm.Items.Add("e2", SAPbouiCOM.BoFormItemTypes.it_EDIT)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 oedit = oNewItem.Specific
 oNewItem.FromPane = 3
 oNewItem.ToPane = 3
 oedit.DataBind.SetBound(True, "OHEM", "U_reid")
 oItem = oOrderForm.Items.Item("s2")
 oNewItem = oOrderForm.Items.Add("s3", SAPbouiCOM.BoFormItemTypes.it_STATIC)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 ostatic = oNewItem.Specific
 ostatic.Caption = "Floor"
 oNewItem.FromPane = 3
 oNewItem.ToPane = 3
 oItem = oOrderForm.Items.Item("e2")
 oNewItem = oOrderForm.Items.Add("e3", SAPbouiCOM.BoFormItemTypes.it_COMBO_BOX)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 ocombo = oNewItem.Specific
 ocombo.ValidValues.Add("", "")
 ocombo.ValidValues.Add("FLOOR1", 0)
 ocombo.ValidValues.Add("FLOOR2", 1)
 ocombo.ValidValues.Add("FLOOR3", 2)
 ocombo.ValidValues.Add("FLOOR4", 3)
 ocombo.ValidValues.Add("FLOOR5", 4)
 oNewItem.FromPane = 3
 oNewItem.ToPane = 3
 ocombo.DataBind.SetBound(True, "OHEM", "U_refl")
 oItem = oOrderForm.Items.Item("3")
 oNewItem = oOrderForm.Items.Add("s4", SAPbouiCOM.BoFormItemTypes.it_STATIC)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 ostatic = oNewItem.Specific
 ostatic.Caption = "Referal Details"
 oNewItem.FromPane = 0
 oNewItem.ToPane = 0
 oItem = oOrderForm.Items.Item("33")
 oNewItem = oOrderForm.Items.Add("e4", SAPbouiCOM.BoFormItemTypes.it_EDIT)
 oNewItem.Left = oItem.Left
 oNewItem.Top = oItem.Top + 18
 oNewItem.Width = oItem.Width
 oNewItem.Height = oItem.Height
 oNewItem.Visible = True
 oedit = oNewItem.Specific
 oNewItem.FromPane = 0
 oNewItem.ToPane = 0
 addcfl()
 oedit.DataBind.SetBound(True, "OHEM", "U_refer")
 oedit.ChooseFromListUID = "cfl_1"
 oedit.ChooseFromListAlias = "firstName"
 End Sub
 Public Sub New()
 MyBase.New()
 setapplication()
 End Sub
 Private Sub LoadFromXML(ByRef FN As String)
 Dim oXmlDoc As Xml.XmlDocument = New Xml.XmlDocument
 Dim sPath As String
 sPath = IO.Directory.GetParent(Application.StartupPath).ToString
 oXmlDoc.Load(sPath & "\" & FN)
 oApplication.LoadBatchActions(oXmlDoc.InnerXml)
 End Sub
 Public Sub oApplication_ItemEvent(ByVal FormUID As String, ByRef pVal As SAPbouiCOM.ItemEvent, ByRef BubbleEvent As Boolean) Handles oApplication.ItemEvent
 If pVal.FormType = "60100" Then
 If ((pVal.EventType = SAPbouiCOM.BoEventTypes.et_FORM_LOAD) And (pVal.Before_Action = True)) Then
 oOrderForm = oApplication.Forms.GetFormByTypeAndCount(pVal.FormType, pVal.FormTypeCount)
 AddItemsToOrderForm()
 End If
 End If
 If pVal.FormTypeEx = "60100" And pVal.ItemUID = "e4" And pVal.EventType = SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST And pVal.InnerEvent = False Then
 Dim oCFLEvento As SAPbouiCOM.IChooseFromListEvent
 oCFLEvento = pVal
 If oCFLEvento.Before_Action = True Then
 oform = oApplication.Forms.ActiveForm
 Try
 oCFL = oform.ChooseFromLists.Item("cfl_1")
 Dim oDataTable As SAPbouiCOM.DataTable
 Dim oEdit As SAPbouiCOM.EditText
 Dim Name As String
 oform = oApplication.Forms.Item("60100")
 oDataTable = oCFLEvento.SelectedObjects
 oEdit = oform.Items.Item("e4").Specific
 Name = oDataTable.GetValue("firstName", 0)
 oEdit.String = Name
 Catch ex As Exception
 oApplication.StatusBar.SetText(ex.Message, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_None)
 End Try
 End If
 End If
 If oedit.Value = "firstName" Then
 LoadFromXML("new.srf")
 oform = oApplication.Forms.Item("re_form")
 oform.Visible = True
 oedit = oform.Items.Item("cf1").Specific
 End If
 End Sub
 Private Sub addcfl()
 Dim ocflcreation As SAPbouiCOM.IChooseFromListCollection
 ocflcreation = oApplication.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams)
 ocflcreation.MultiSelection = True
 ocflcreation.ObjectType = "171"
 ocflcreation.UniqueID = "cfl_1"
 oCFLs = oform.ChooseFromLists
 oCFL = oCFLs.Add(ocflcreation)
 End Sub
End Class
Regards
Bhuvana

"Choose from list" / "giving up after" error

I have the following included in my script:
set whattodolist to {"Tag with iDentify", "Add to iTunes", "Cancel"}
set my_choice to choose from list whattodolist with prompt ("MP4 Detected: " & this_text)
It works as expected with the script. I'd like to add a way for the script to dismiss itself after a set interval if the user doesn't take any action. So, I tried this:
set whattodolist to {"Tag with iDentify", "Add to iTunes", "Cancel"}
set my_choice to choose from list whattodolist with prompt ("MP4 Detected: " & this_text) giving up after 30
Note that I added the "giving up after..." to the end of the prompt. However, it won't compile. I get an error stating "Expected end of line, but found identifier". Any advice?

The standard display dialog command actually supports three options, so you might be able to fit your near-term needs with that:
display dialog "MP4 Detected. What would you like to do?" buttons {"Cancel", "Tag with iDentify", "Add to iTunes"} default button 3 giving up after 30
Once you get past three choices your options are limited...

Reagrding the choose from list using user tables

Hi
 I need to link the choose from List to my user defined table and not to system tables.
for eg., i have created a table namely opp. Now i want to link choose from list to this table.
can anyone help me??
its very urgent...
thanks in advance
Lee

hi Adele
thanks for your concern.i have used this code
 Dim OCFLS As SAPbouiCOM.ChooseFromListCollection
 Dim OConds As SAPbouiCOM.Conditions
 Dim OCond As SAPbouiCOM.Condition
 OCFLS = OForm.ChooseFromLists
 Dim OCFL As SAPbouiCOM.ChooseFromList
 Dim OCPack As SAPbouiCOM.ChooseFromListCreationParams
 OCPack = SBO_Application.CreateObject(SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams)
 OCPack.MultiSelection = False
 OCPack.UniqueID = "CFL3"
 OCPack.ObjectType = "OPRQ"
 OCFL = OCFLS.Add(OCPack)
 Catch ex As Exception
 MsgBox(Err.Description())
 End Try
then i link the choose from list to the Button(choosefromlist) namely OLBut. the code is follws
 ONewItem = OForm.Items.Item("67")
 OLBut = ONewItem.Specific
 OLBut.ChooseFromListUID = "CFL3"
but this is not working.i.e when i click the choose from list button nothing it is showing.what mistake i have done?please help me
thanks in advance

Is it possible to populate a Choose From List manually?

Hi
I've got a requirement in a SDK screen that needs to be written to have a Choose From List contained on a Matrix column that should allow the selection of Item Masters as well as the selection of specific data contained within a User Defined Table. Whenever using ChooseFromLists I've always only ever used them to link to a object such as Items, Sales Order etc. and not a combination, or even to a User Defined Table. Is this even possible.
If not I guess the only way around it would be to create a form mimicking the ChooseFromList which I could populate with what ever I like?
Thanks
Steve

Hi Steven,
Yes, Its possible which behaves as system CFL.
Design the form like cfl having grid, choose button, cancel button and edittext of find. When you tab on edittext on form open the CFL form and after load form fill the grid by Datatable using sql query. Write code for select grid line on click of grid. Write the code on choose button which retrive value from grid.
Thanks,
Mahesh

Removing Duplicates from a choose from list

Hi All,
I have a choose from list of obj 73 )Catalog Numbers (Table OSCN)
I also added conditions in the CFL that it only shows the Substitute for the CardType = 'S' (Supllier) Business Partners.
But I want to remove all the duplicate Substitutes from the CFL so that only distinct Catalog Numbers shows in the CFL.
        // Adding 2 CFL, one for the button and one for the edit text.
                oCFLCreationParams.MultiSelection = false;
                oCFLCreationParams.ObjectType = "73";
                oCFLCreationParams.UniqueID = "CFL1";
                oCFL = oCFLs.Add(oCFLCreationParams);
                //Adding Conditions to CFL1
                oCons = oCFL.GetConditions();
                oCon = oCons.Add();
                oCon.Alias = "Substitute";
                SAPbobsCOM.Recordset oSuppliers = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
                oSuppliers.DoQuery("Select Distinct t1.Substitute From OSCN t1 Join OCRD t2 on t1.CardCode = t2.CardCode Where t2.CardType = 'S' Group By t1.Substitute");
                oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL;
                while (!oSuppliers.EoF)
                    oCon.CondVal = oSuppliers.Fields.Item(0).Value.ToString();
                    oCon.Relationship = SAPbouiCOM.BoConditionRelationship.cr_OR;
                    oCon = oCons.Add();
                    oCon.Alias = "Substitute";
                    oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL;
                    oSuppliers.MoveNext();
                oCFL.SetConditions(oCons);
Please advise....
Kind Regards,
Brenden Draper

Hi Brenden,
what you are trying to archieve won't work. Simply because CFL is getting all row data from OSCN and ItemCode or CardCode can differ for a specific substitute.
For example.
ItemCode,CardCode,Substitute
ItemA,BP1,sub1
ItemA,BP2,sub1
Would be 2 resultlines both with sub1 as substitute.
SQL equivalent :
Select Distinct t0.* from oscn t0 inner join OCRD t1 on t0.CardCode = t1.CardCode where t1.CardType = 'S'
My advise would be to open a simple form with a grid and datatable bound.
Some lines of coding and you get all you need.
regards,
Maik

Choose From List and Golden arrow link in System Matrix UDF column

I'm wondering if there is a way through the SDK to create a 'Choose From List' and Golden arrow linked button in a System Matrix UDF column?
For example the Item Code in a sales order matrix does both.

Hi,
Try this code for adding CFL.
               SAPbouiCOM.ChooseFromListCollection oCFLs = null;
                SAPbouiCOM.Conditions oCons = null;
                SAPbouiCOM.Condition oCon = null;
                oCFLs = oForm.ChooseFromLists;
                SAPbouiCOM.ChooseFromList oCFL = null;
                SAPbouiCOM.ChooseFromListCreationParams oCFLCreationParams = null;
                oCFLCreationParams = ( ( SAPbouiCOM.ChooseFromListCreationParams )( SBO_Application.CreateObject( SAPbouiCOM.BoCreatableObjectType.cot_ChooseFromListCreationParams ) ) );
                oCFLCreationParams.MultiSelection = false;
                oCFLCreationParams.ObjectType = "object id ";
                oCFLCreationParams.UniqueID = "CFL1";
                oCFL = oCFLs.Add( oCFLCreationParams );
               oColumn.ChooseFromListUID = "CFL1";
              //where oColumn is the instance of that column.
Hope u will get help....
Thanks and Regards,
Lalit

Choose From List Condition

Dear Experts,
i want to select Items in Sales Quotation Screen which is from Particular Group, I'm using following code
If pVal.EventType = SAPbouiCOM.BoEventTypes.et_CHOOSE_FROM_LIST And pVal.BeforeAction = True Then
            If pVal.FormTye = "149" And pVal.ItemUID = "38" And (pVal.ColUID = "1" Or pVal.ColUID = "3") Then
                Try
                    oForm = SBO_Application.Forms.ActiveForm
                    Dim oCFLEvento As SAPbouiCOM.IChooseFromListEvent = pVal
                    Dim sCFL_ID As String = oCFLEvento.ChooseFromListUID
                    Dim oCFL As SAPbouiCOM.ChooseFromList = Nothing
                    oCFL = oForm.ChooseFromLists.Item(sCFL_ID)
                    oCons = Nothing
                    oCon = Nothing
                    oCons = oCFL.GetConditions()
                    oCon = oCons.Add()
                    oCon.Alias = "ItmsGrpCod"
                    oCon.Operation = SAPbouiCOM.BoConditionOperation.co_EQUAL
                    oCon.CondVal = "100"
                    oCFL.SetConditions(oCons)
                Catch ex As Exception
                    SBO_Application.MessageBox(ex.Message)
                End Try
            End If
        End If
First time Its working fine. but i'm selecting the next time in next row or same row its not showing any item. it opens only empty Choose from list. what is the prblm
Mathi

The problem is that when this event is called again, the Conditions object still has the conditions from the last call :
oConditions = oCFL.GetConditions(); // this has all the previous set conditions
So the conditions set before are also taken into consideration. What you need to do is :
oCFL.SetConditions(null);
oConditions = oCFL.GetConditions();
This way the Conditions object will be empty. There is no method to remove a Condition from a Conditions collection, so you have to make it null.

Choose from list in find mode

I have a form build in Screen painter and i have added a Choose from list to that form. I have asocieted the CFL with a EdiText. It work perfectly in add mode, but i cannot open the CFL when the form is in find mode.(I cannot even see the button to press for oppening the CFL). Can someone help me?

I am in the phase of binding the edittext, comoboxes and other controls on my form. I want to search by parameters. For instance i want to find all the entrys from a business partener.
I would like to know if I can choose from a list of business partener when i am in a find mode using CFL .
My problem it is not when i click find button but when i complete the fields, how can i select a business partener from a list?

Choose from list in Matrix

Hey All,
Has anyone been able to get the choose from list in a matrix text field working in SBO 2005 patch level 6? We have tried the tech demo and it works for new rows but not for existing rows. Also we have written our own code to set the matrix text box on the choose from list event and we get a general failure exception even though the value still gets set properly.
If anyone has this working please post so we can all know how to do this properly.

Hi there,
This "Choose from list" thing is new for me, there's a Choose from List example in the new techDemo but i don't understand the code.. too complicated for me.. Is there any simple code/sample for this?
Well i manage to trigger the choose from list .. but don't know how to put the selected value to the cell..
Bruce..

Choose From List Cancel Button Throws Exception

Similar Messages

Maybe you are looking for