Update Price List in SBO

Question

Hallo All,
I try to update a specific price list in Business One, but keep on getting errors. There are 2 objects to use: oItems and Items_Prices which is the child object, but I can't seem to put everything together! Can somebody help please. I do not find an update example in the help samples.

Answer 1

Hi Carin,
Herewith an example. You can search by the price list name or the number. I am not aware of another way to update the prices.
        Dim oItem As SAPbobsCOM.Items
        Dim i As Integer
        oItem = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oItems)
        oItem.GetByKey("A1001")
        For i = 0 To oItem.PriceList.Count - 1
            oItem.PriceList.SetCurrentLine(i)
            If oItem.PriceList.PriceListName = "Sales Price list Small Customers" Then
                oItem.PriceList.Price = 500
                Exit For
            End If
        Next
        If oItem.Update <> 0 Then
            MessageBox.Show("Error: " & oCompany.GetLastErrorDescription)
        Else
            MessageBox.Show("Updated")
        End If
Hope it helps,
Adele