Hi experts!
I have a problem to add the series to deposit.
this is the code.
Dim oService As SAPbobsCOM.CompanyService = SBO.GetCompanyService
Dim dpService As SAPbobsCOM.DepositsService = oService.GetBusinessService(SAPbobsCOM.ServiceTypes.DepositsService)
Dim dpsAddCash As SAPbobsCOM.Deposit = dpService.GetDataInterface(SAPbobsCOM.DepositsServiceDataInterfaces.dsDeposit)
Dim chkLine As SAPbobsCOM.CheckLine
dpsAddCash.DepositType = SAPbobsCOM.BoDepositTypeEnum.dtChecks
dpsAddCash.DepositAccountType = SAPbobsCOM.BoDepositAccountTypeEnum.datBankAccount
dpsAddCash.DepositAccount = ctabcria
dpsAddCash.CheckDepositType = SAPbobsCOM.BoCheckDepositTypeEnum.cdtCashChecks
dpsAddCash.Series = 101 'the Series add to default. no matter what Series I add.
For Each row In Grilla.Rows
If row.Cells("chkboxColumna").Value = True Then
dpsAddCash.DepositCurrency = row.Cells("Currency").Value
chkLine = dpsAddCash.Checks.Add()
chkLine.CheckKey = row.Cells("CheckKey").Value
End If
Next
dpsAddCash.DepositDate = dpdate.Text
dpsAddCash.BankReference = txtrefbancaria.Text
dpsAddCash.ReconcileAfterDeposit = SAPbobsCOM.BoYesNoEnum.tYES
Dim dpsParamAddCash As SAPbobsCOM.DepositParams = dpService.AddDeposit(dpsAddCash)
Any suggestions ??