Description
The following is a VB.NET sample that adds a new series to documents numbering.
Dim oCmpSrv As SAPbobsCOM.CompanyService
Dim oSeriesService As SAPbobsCOM.SeriesService
Dim oSeries As Series
Dim oSeriesParams As SeriesParams
oCmpSrv = oCompany.GetCompanyService
oSeriesService = oCmpSrv.GetBusinessService(ServiceTypes.SeriesService)
oSeries = oSeriesService.GetDataInterface(SeriesServiceDataInterfaces.ssdiSeries)
oSeries.Name = "Series1"
oSeries.Document = 15
oSeries.PeriodIndicator = "Default"
oSeries.GroupCode = 1
oSeries.InitialNumber = 300
oSeries.LastNumber = 350
oSeriesParams = oSeriesService.AddSeries(oSeries)
|