Add a Reserved Invoice - SAP B1 SDK Help

Add a Reserved Invoice
See Also

Dim Inv As SAPbobsCOM.Documents

Dim InvLine As SAPbobsCOM.Document_Lines



'Get Invoice Object

Inv = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oInvoices)



'Set Invoice to be reserved

Inv.ReserveInvoice = SAPbobsCOM.BoYesNoEnum.tYES



Inv.DocType = SAPbobsCOM.BoDocumentTypes.dDocument_Items

Inv.DocDate = Now



'Set Card Code

Inv.CardCode = "C20000"



'Add a line to the Invoice

InvLine = Inv.Lines



InvLine.ItemCode = "A00005"

InvLine.Quantity = 1

InvLine.Price = 100



'Add the Reserced Invoice

Inv.Add()