Quantcast
Viewing all articles
Browse latest Browse all 9052

Re: how to add price list in item master while adding...

Hi,

 

Also check this: Found it in SDK Help Center.

 

 

Dim lErrCode As Long

        Dim sErrMsg As String

        Dim bRetVal As Boolean

        Dim oItems As SAPbobsCOM.Items

        Dim oItemPrice As SAPbobsCOM.Items_Prices

        Dim i As Integer

 

 

        'Retrieve Items object

        oItems = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oItems)

 

 

        'Retrieve specific item

        bRetVal = oItems.GetByKey("X0004")

 

 

        'Check errors

        If Not bRetVal Then

            oCompany.GetLastError(lErrCode, sErrMsg)

            MsgBox("Failed to Retrieve the record " & lErrCode & " " & sErrMsg)

            Exit Sub

        End If

 

 

        'get item price object

        oItemPrice = oItems.PriceList

 

 

        'print price lists names and prices

        For i = 0 To oItemPrice.Count - 1

            oItemPrice.SetCurrentLine(i)

            'print price list name

            Debug.WriteLine(oItemPrice.PriceListName())

            'print the items price

            Debug.WriteLine(oItemPrice.Price())

        Next

 

 

        'change the price of the item in the last price list

        oItemPrice.Price = 600

 

 

        'save changes

        oItems.Update()

 

 

 

Hope it helps.

 

 

Thanks & Regards

 

Ankit Chauhan


Viewing all articles
Browse latest Browse all 9052

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>