Hi Guys,
i am using this code for generate new Journal entry.
Dim vJE As SAPbobsCOM.JournalEntries
vJE = OCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oJournalEntries)
accntcode1="101010"
vJE.Lines.SetCurrentLine(0)
vJE.TaxDate = Now
vJE.Lines.AccountCode = accntcode1
vJE.Lines.ContraAccount = "450020"
vJE.Lines.Credit = 200
vJE.Lines.Debit = 0
vJE.Lines.DueDate = CDate(Now)
vJE.Lines.ReferenceDate1 = Now
vJE.Lines.ShortName = accntcode1
vJE.Lines.TaxDate = Now
Call vJE.Lines.Add()
vJE.TaxDate = Now
vJE.Lines.AccountCode = "450020"
vJE.Lines.ContraAccount = accntcode1
vJE.Lines.Credit = 200
vJE.Lines.Debit = 0
vJE.Lines.DueDate = CDate(Now)
vJE.Lines.ReferenceDate1 = Now
vJE.Lines.ShortName = "450020"
vJE.Lines.TaxDate = Now
Call vJE.Lines.Add()
Coding is working fine .. its not showing any error but its not creating new JE in jE form. its also not updating CoA value.
another code which i had used.
vJE.Lines.SetCurrentLine(0) '; '''''''''' 0
vJE.Lines.AccountCode = accntcode1 ';
vJE.Lines.Debit = 500 'Convert.ToDouble(strSum1) '; '''' for first debit
vJE.Lines.Add() ';
vJE.Lines.AccountCode = "101500" ';
vJE.Lines.Credit = 500 'Convert.ToDouble(strSum1) '; '''' for first credit
vJE.Lines.Add() ';
please i want suggestion ..
Regards,
Avijit