How to default Ledger to SLA.: Create Subledger Journal Entry

Here we have default the ledger for Data access sets , but also here not default the ledger.
steps:
1. AP-> ACCOUNTING
Subledger Journal Entry Headers:
Ledger[ ]

Dear SAP Student
It is just like inter unit cash transfers. Also each department is spending cash on its own. Now that I would like to know the balance cash departmentwise.
As you said if I receive and pay through vendors I would be in a position to know only vendor wise balances. It does not serve my very purpose of deparmentwise balance of cash.
I agree with Selva to go in for creating deparmentwise cash journals in the company code since each deparment is incurring expenses also and each department wise balance is also required.
Aravind

Similar Messages

How to do an incoming payment based on journal entry whit SDK ?

Hello
Somebody have the code for SDK of Business One, how to do an incoming payment based on journal entry?
Tks

Hello Julio,
Here some example code from the SDK helpfile.
Private Sub cmdTest_Click()
   On Error GoTo ErrorHandler
   Dim vCompany As SAPbobsCOM.Company
   'create company object
   Set vCompany = New SAPbobsCOM.Company
   'set paras for connection
   vCompany.CompanyDB = "SBODemo_US"
   vCompany.Password = "manager"
   vCompany.UserName = "manager"
   vCompany.Server = "(local)"
   'connect to database server
   If (0 <> vCompany.Connect()) Then
      MsgBox "Failed to connect"
      Exit Sub
   End If
   Dim nErr As Long
   Dim errMsg As String
   'Set the object's properties
   Dim vPay As SAPbobsCOM.Payments
   Set vPay = vCompany.GetBusinessObject(oIncomingPayments)
   vPay.Address = "622-7"
   vPay.ApplyVAT = 1
   vPay.CardCode = "D10006"
   vPay.CardName = "Card D10004"
   vPay.CashAccount = "288000"
   vPay.CashSum = 0
   'vPay.CheckAccount = "280001"
   vPay.ContactPersonCode = 1
   vPay.DocCurrency = "Eur"
   vPay.DocDate = Now
   vPay.DocRate = 0
   vPay.DocTypte = 0
   vPay.HandWritten = 0
   vPay.JournalRemarks = "Incoming - D10004"
   vPay.LocalCurrency = tYES
   vPay.Printed = 0
   vPay.Reference1 = 8
   vPay.Series = 0
   vPay.SplitTransaction = 0
   vPay.TaxDate = Now
   vPay.TransferAccount = "10100"
   vPay.TransferDate = Now
   vPay.TransferSum = 0
   vPay.Invoices.AppliedFC = 0
   vPay.Invoices.AppliedSys = 0
   vPay.Invoices.DocEntry = 8
   vPay.Invoices.DocLine = 0
   vPay.Invoices.DocRate = 0
   vPay.Invoices.InvoiceType = 13
   vPay.Invoices.LineNum = 0
   vPay.Invoices.SumApplied = 5031.2
   Call vPay.Invoices.Add
   Call vPay.Invoices.SetCurentLine(1)
   vPay.Invoices.AppliedFC = 0
   vPay.Invoices.AppliedSys = 1089.65
   vPay.Invoices.DocEntry = 11
   vPay.Invoices.DocLine = 1
   vPay.Invoices.DocRate = 0
   vPay.Invoices.InvoiceType = it_Invoice
   vPay.Invoices.LineNum = 1
   vPay.Invoices.SumApplied = 1000
   vPay.CreditCards.AdditionalPaymentSum = 0
   vPay.CreditCards.CardValidUntil = CDate("10/31/2004")
   vPay.CreditCards.CreditAcct = "295000"
   vPay.CreditCards.CreditCard = 3
   vPay.CreditCards.CreditCardNumber = "884848448"
   vPay.CreditCards.CreditCur = "EUR"
   vPay.CreditCards.CreditRate = 0
   vPay.CreditCards.CreditSum = 5031.2
   vPay.CreditCards.CreditType = 1
   vPay.CreditCards.FirstPaymentDue = CDate("11/29/2002")
   vPay.CreditCards.FirstPaymentSum = 5031.2
   vPay.CreditCards.LineNum = 0
   vPay.CreditCards.NumOfCreditPayments = 1
   vPay.CreditCards.NumOfPayments = 1
   vPay.CreditCards.OwnerIdNum = "3993939"
   vPay.CreditCards.OwnerPhone = "383838888"
   vPay.CreditCards.PaymentMethodCode = 1
   Call vPay.CreditCards.Add
   Call vPay.CreditCards.SetCurentLine(1)
   vPay.CreditCards.AdditionalPaymentSum = 0
   vPay.CreditCards.CardValidUntil = CDate("10/31/2004")
   vPay.CreditCards.CreditAcct = "295000"
   vPay.CreditCards.CreditCard = 3
   vPay.CreditCards.CreditCardNumber = "884848448"
   vPay.CreditCards.CreditCur = "EUR"
   vPay.CreditCards.CreditRate = 0
   vPay.CreditCards.CreditSum = 1000
   vPay.CreditCards.CreditType = 1
   vPay.CreditCards.FirstPaymentDue = CDate("11/29/2002")
   vPay.CreditCards.FirstPaymentSum = 1000
   vPay.CreditCards.LineNum = 1
   vPay.CreditCards.NumOfCreditPayments = 1
   vPay.CreditCards.NumOfPayments = 1
   vPay.CreditCards.OwnerIdNum = "3993939"
   vPay.CreditCards.OwnerPhone = "383838888"
   vPay.CreditCards.PaymentMethodCode = 1
   If (vPay.Add() <> 0) Then
       MsgBox ("Failed to add a payment")
   End If
   'Check Error
   Call vCompany.GetLastError(nErr, errMsg)
   If (0 <> nErr) Then
       MsgBox ("Found error:" + Str(nErr) + "," + errMsg)
   Else
       MsgBox ("Succeed in payment.add")
   End If
   'disconnect the company object, and release resource
   Call vCompany.Disconnect
   Set vCompany = Nothing
   Exit Sub
ErrorHandler:
   MsgBox ("Exception:" + Err.Description)
End Sub
HTH Regards Teun
Edited by: Teun Aben on Aug 4, 2010 9:00 PM

How to add a petty cash payment in journal entry

HI, I was just wondering if anybody could help me with regards to making a petty cash payment, for example if i went to the shop for and spent £15.00 on stationary etc, how would i post this payment in the journal entry screen?
many thanks.

Hello RWCS...welcome to the forums...
OK, first things first - the definition of petty cash. Petty cash is a function inside any company which allows employees to purchase products out of their own pocket and allows the Petty Cash Person to pay/reimburse for some item or services under a certain amount (say $25). Petty Cash is generally a sum of money maintained in the company in a box or drawer - that is what the accounts says - petty cash. The WHOLE purpose of petty cash is to avoid cutting a check for each and every minor purchase or payment - so there would be no payment created at all until it is time to replenish Petty Cash with more money.
So in essence, if you are using Petty Cash, there is no journal entry or SAP B1 payment for individual transactions until it is time to replenish. The Petty Cash Clerk (person having the box or drawer) would collect receipts as the money is being paid out.
At a certain point in time (usually at month-end or when the cash is low in the Petty Cash drawer), a journal entry is made Crediting Petty Cash and Debiting the various Expense Accounts by using the receipts collected.
Then an AP "Service Type" Invoice and an outgoing payment is made to the Petty Cash Person where the clerk goes to the bank and gets more money for the drawer. While creating the AP Invoice, the Petty Cash GL Account is selected on the line. That will create an automatic journal entry of credit to Operating Cash and debit to the Petty Cash.
If you are not doing this procedure, you do not have Petty Cash. So hopefully that describes what you are doing...
Regards - Zal

"Trying to create a journal entry of the local BP with foreign amounts" error

I have an addon that needs to set the Total (LC) field on the invoice form when a Delivery is copied to an Invoice. In this case, it's $169,978.62. The original Unit Price on the row is $7,000.00, with quantity of 5 MT (selling UoM). After populating the line total field through SDK UI, it calculated discount% to be -385.653. When I press Add, it gives me red bar error "Trying to create a journal entry of the local BP, with foreign amounts [message 3530-11]". This BP uses local currency and there is no foreign currency involved on this document. If I perform the same action through normal UI without SDK, I can add the invoice without a problem. I know it probably has to do with rounding, but how can I get past this error if I have to set the line total through SDK?

Hi Ronnie,
Glad you have found the issue
Regardss,d
Eric

Error in creating GL journal entry

Hi all,
I'm looking for some help with an error code. I'm trying to Add a direct time entry that is currently saved in draft form only, and I encounter the following message:
Error creating GL Journal entries: 10000415 - Linked value 1329 does not exist
Presumably the 'linked value' refers to the first column of our time entry form, where we enter one of our old format reference numbers and sap brings back its own version of that reference number - so there must be a typo here somewhere? and if this is the case, is there a way sap will point out the relevant entry?
Thanks

HI.....
Where you are saving this Journal Entry as Draft?
Is it in Posting Voucher. If yes then is this entry still exists in Posting Voucher?
Please check that first.....
Regards,
Rahul

Goods Issue creates no Journal Entry

Hello-
I'm in something of a unique situation in that (not going into any details) I've been given an only partially complete add-on to Business One and must now finish it. I've had no formal training in the SDK; everything I've learned has been through this forum, the help files and simply experimenting with the code. Given this, there are probably many things of which I'm not aware.
My question, then:
Is there some sort of way to "turn off" the creation of Journal Entries, either in the SDK or in a company's settings, when a Goods Issue is made? I ask because right now no Journal Entry is being created, even though one is made for all other documents (Goods Receipt, Inventory Transfer, etc.). I'd like to turn it back on again, because not creating a Journal Entry doesn't seem like the right thing to do.
Thank you.

Hi Van,
There is no setting that will turn off GL postings and a Goods Issue will create journal entries unless it is saved as a draft.
Have you logged this will SAP Support?
Kind Regards,
Owen

How to create a journal entries by sdk

hi Experts
I know how to create invoice or order by sdk . but I do not know how to create Journal Entry by sdk. i mean what fields are required. Plz send me a basic template for Journal Entry.
Regards
Gorge

Dim oJounalEntry As SAPbobsCOM.JournalEntries
            ''Passing Jounal Entry
            System.Runtime.InteropServices.Marshal.ReleaseComObject(oRecset)
            oJounalEntry = Me.SBO_Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oJournalEntries)
            oJounalEntry.Series = 14
            oJounalEntry.DueDate = Now
            oJounalEntry.ReferenceDate = Now
            oJounalEntry.TaxDate = Now
            oJounalEntry.Lines.ShortName = bpcode
            oJounalEntry.Lines.Credit = amount
            oJounalEntry.Lines.Debit = 0
            oJounalEntry.Lines.DueDate = Now
            oJounalEntry.Lines.TaxDate = Now
            oJounalEntry.Lines.ReferenceDate1 = Now
            oJounalEntry.Lines.Add()
            oJounalEntry.Lines.AccountCode = AccountCode
            oJounalEntry.Lines.Credit = 0
            oJounalEntry.Lines.Debit = amount
            oJounalEntry.Lines.DueDate = Now
            oJounalEntry.Lines.TaxDate = Now
            oJounalEntry.Lines.ReferenceDate1 = Now
            oJounalEntry.Lines.Add()
            lRetCode = oJounalEntry.Add()

How to get Data from SAP B1 through Journal Entries objects (Excel VBA)

Hi Genius
i had try to login SAB B1 thorugh MS Excel VBA code and it worked well. but i need some questions regards getting the data from after login. that means i want the Posting date, Transaction No, account code, debit and credit amount from Journal entries posted in a particular day through MS excel VBA into excel sheets 1 cell A1:E1
how i get it if any possible ways to do that
here my code to login
Public Sub login()
    Sheets("Login").Select 'access the login tab
    Worksheets("Login").Range("B1").Activate 'put focus on cell B1 (manager)
    B1UserID = Trim(ActiveCell.Value2) 'set Businsss One user
    ActiveCell.Offset(1, 0).Activate
    B1Password = Trim(ActiveCell.Value2) 'set Business One password
    ActiveCell.Offset(1, 0).Activate
    sqluser = Trim(ActiveCell.Value2) 'set SQL user
    ActiveCell.Offset(1, 0).Activate
    sqlpass = Trim(ActiveCell.Value2) 'set SQL password
    ActiveCell.Offset(1, 0).Activate
    Db = Trim(ActiveCell.Value2)      'set Database name
    ActiveCell.Offset(1, 0).Activate
    Server = Trim(ActiveCell.Value2) 'set Server name
    Set company1 = New SAPbobsCOM.Company 'initialate DI company object
    company1.DbServerType = dst_MSSQL2005
    company1.Server = Server
    company1.DbUserName = sqluser
    company1.DbPassword = sqlpass
    company1.CompanyDB = Db
    company1.UserName = B1UserID
    company1.Password = B1Password
    'connect to the database
     lRetCode = company1.Connect
        If lRetCode <> 0 Then
            sErrMsg = company1.GetLastErrorDescription
            MsgBox (sErrMsg)
        Else
            MsgBox ("Connected to: " & company1.CompanyName)
        End If
End Sub
pls help me
advance thanks to solvers

Gordons way is the easiest - just query the OJDT table for journal entry headers and JDT1 for journal entry lines if needed.
But if you want to work with the business objects:
'Journal entry
   Dim oJE As SAPbobsCOM.JournalEntries
   Set oJE = company1.GetBusinessObject(oJournalEntries)
   oJE.GetByKey(1234)
   Dim postingDate as String
   postingDate = oJE.DueDate
'etc etc

How to update UDF from marketing documents to Journal Entry UDF

Hi Experts,
I have a UDF in the marketing documents and I want to save the value to Journal Entry UDF.
Regards,
Jummie

Hello Jummie,
If I understand correctly, the scenario is that copy the value of UDF from marketing document to the UDF its target JE from when the marketing document is created.
if so, just listen to FormDataAdd Event for the marketing document, copy the value of udf when document is created.
Here is the sample code.
Private Sub FormDataEventHandler( _
    ByRef BusinessObjectInfo As SAPbouiCOM.BusinessObjectInfo, _
    ByRef BubbleEvent As Boolean) Handles oApp.FormDataEvent
        'You may add the target documents, 133 - A/R invoice.
        'Before action = true, start the transation
        If BusinessObjectInfo.FormTypeEx = "133" _
                And BusinessObjectInfo.EventType = SAPbouiCOM.BoEventTypes.et_FORM_DATA_ADD _
                And BusinessObjectInfo.BeforeAction = True Then
            oCompany.StartTransaction()
            'BubbleEvent = False
        End If
        'Before Action = false,
        'Update product item tree
        'Succeed, commit, otherwise rollback
        If BusinessObjectInfo.FormTypeEx = "133" _
        And (BusinessObjectInfo.EventType = SAPbouiCOM.BoEventTypes.et_FORM_DATA_ADD) Then
            If BusinessObjectInfo.BeforeAction = False And BusinessObjectInfo.ActionSuccess Then
                Dim objectKey As String = String.Empty
                oCompany.GetNewObjectCode(objectKey)
                MsgBox(BusinessObjectInfo.Type)
                Dim oInvoice As SAPbobsCOM.Documents = Nothing
                oInvoice = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oInvoices)
                If oInvoice.GetByKey(CInt(objectKey)) Then
                    'Retrieve the UDF value in documents
                    Dim udfValueInDoc As String = oInvoice.UserFields.Fields.Item("***").Value
                    Dim oJE As SAPbobsCOM.JournalEntries = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oJournalEntries)
                    'Retrieve the JE for the document
                    oJE.GetByKey(CInt(oInvoice.JournalMemo))
                    Dim succeeded = True
                    'add you code to copy the UDF from document into JE
                    If succeeded Then
                        'update the production tree succesfully,
                        oCompany.EndTransaction(SAPbobsCOM.BoWfTransOpt.wf_Commit)
                    Else
                        oCompany.EndTransaction(SAPbobsCOM.BoWfTransOpt.wf_RollBack)
                    End If
                End If
            End If
        End If
    End Sub
Regards, Yatsea

B1if - Create a journal entry

Hello everyone,
i hope this is the right section for that scenario, which should be easy but i cannot get it to work. I am trying to create a simple journal entry with the given structure from the B1if Object list. It all works like a charm, except for the scenario when i am trying to use a business partner in the
<AccountCode>K123456</AccountCode>
results in: Exception : DI Error: (-5011) Invalid Account Code
It is necessary for me, to be able to do so. Help is greatly appreciated. Here my full xsl. As of right now it is all hardcoded.
<AdmInfo xmlns="">
<Object>30</Object>
<Version>1</Version>
</AdmInfo>
<QueryParams xmlns="">
<JdtNum/>
</QueryParams>
<JournalEntries xmlns="">
<row>

<ReferenceDate>12.08.2014</ReferenceDate>
<Memo>Memo</Memo>
<Reference>Ref 1</Reference>
<Reference2>Ref 2</Reference2>
<TaxDate>13.08.2014</TaxDate>
<DueDate>13.08.2014</DueDate>
</row>
</JournalEntries>
<JournalEntries_Lines xmlns="">
<row>
<AccountCode>K123456</AccountCode>
<Debit>1.00</Debit>
<Credit>0.00</Credit>
<DueDate>13.08.2014</DueDate>
<LineMemo>string</LineMemo>
<Reference1>R1</Reference1>
<Reference2>R2</Reference2>
</row>
<row>
<AccountCode>102000</AccountCode>
<Debit>0.00</Debit>
<Credit>1.00</Credit>
<DueDate>13.08.2014</DueDate>
<LineMemo>string</LineMemo>
<Reference1>R1</Reference1>
<Reference2>R2</Reference2>
</row>
</JournalEntries_Lines>

I found the solution myself. You need to use the <ShortName> for the business partner and in the <AccountCode> you need to put your Accounts Receivable account.

How to update Ref fields in JDT1 for Journal Entries update

Hi Forum,
I am this situation:
While Creating Journal Entries using DTW:
==================================
I can create Ref1 and Ref2 data at JE Header level using OJDT DTW template.
I can not update Ref1 and Ref2 (different from Ref1 and Ref2 data at header level) at line level using JDT1 template. No error in DTW, all successful, however, the Ref1 and Ref2 data at line level is copied from header level.
While updating using JDT1 DTW Template:
===================================
I thought may be DTW can update since the entries are present. It does not even do that. That is DTW does not update Ref1 and Ref2 data on JDT1 line level even with update DTW. Just to ensure I am using right template etc. I tried to update the due date and it seems to work.
Note: While entering manual Journal Entires directly on SAP B1, I could put different Ref1 and Ref2 at header and line levels.
Thanks for you help.

hi
u may use the follwing fields to do it
RecordKey     LineNum     AccountCode     ContraAccount     CostingCode     Credit     Debit     DueDate     LineMemo     ShortName
RecordKey     LineNum     AccountCode     ContraAccount     CostingCode     Credit     Debit     DueDate     LineMemo     ShortName
1     0                         3274426     20110430     Basic     520010
1     1                         1344031     20110430     Hra     520020
1     2                         229251     20110430     Convey     520030
1     3                         631301     20110430     Bonus     525020
1     4                         2128839     20110430     Spl All     520040
1     5                         44003     20110430     CCA/Outlocation     520050
Regards
Manish

How to make a form not create a second entry

I'm using the PDF entry for a form. Very cool. But if a user submits it, then adds more data and submits again it creates two entries. How can I 'key' the form so it only updates the same entry?

Sorry, we do not support this feature at this time.
If your form as a unique idenfier fields like an Email field or a First Name and a Last Name fields then sort by that column and look at the latest submission by a same user and delete other row manually. Each submission has a "Time Submitted" column in the response table (View Responses Tab).
Gen

HOW TO KNOW THE TCODE FOR CREATING A NEW ENTRY IN A PARTICULAR TABLE

HI,
CAN YOU PLEASE LET ME KNOW THE PROCEDURE TO GET THE TCODE FOR CREATING A NEW ENTITY IN A TABLE .
EG: IS THERE ANY PROCEDURE TO KNOW THAT IF I CREATE A NEW ENTITY IN MM01 IT WILL BE STORED IN TABLE MARA.
THANKING YOU.

Hi Venkata,
If you want to know, for a given table, which transaction/program(s) will create a new record, there is no easy procedure, other than to refer to experts who deal with these programs.
It is possible to get a list of programs that refer to a table. SE11, select the table, select the 'where-used' icon, select programs, execute. You will be presented with a list of programs that read or write to that table. From that list you would have to determine which one(s) create records, using your ABAP skills. From those selected programs you would have to find which, if any, had a transaction assigned.
Many tables are updated by more than one program/transaction. Many other tables are not updated by ANY interactive transaction.
If you ever decide to go ahead with this research, make sure you publish it. You could probably make yourself a bit of money.
Regards,
DB49

How to maintain petty cash dept wise cash journal entry(FBCJ)?

Dear All,
Cash journal fund transfer department to department (ex. Finance dept to Sales dept)
I want maintain dept wise petty cash, how can do it explain deeply.
*I example given one scenario
*Com.code : (AB01) ABC LTD
Finance dept sending Rs.10000
Sales Dept Received amount Rs.10000
Sales dept will do it some expenses through cash.
I want intercompany department wise how will be maintain petty cash in sap.
I have some solution in my mind that solution should be correct or wrong i donu2019t know suppose i done wrong correct me, Create new cash journal dept wise through, T.Code: (FBCJC0) and then we have to maintain cash journal in dept wise. Otherwise any solutions there explain detail.
Thanks & Regards
Selva

Dear SAP Student
It is just like inter unit cash transfers. Also each department is spending cash on its own. Now that I would like to know the balance cash departmentwise.
As you said if I receive and pay through vendors I would be in a position to know only vendor wise balances. It does not serve my very purpose of deparmentwise balance of cash.
I agree with Selva to go in for creating deparmentwise cash journals in the company code since each deparment is incurring expenses also and each department wise balance is also required.
Aravind

How to imort opening balance through template of journal entry

Dear Experts
I want to import opening balance through the date transfer workbench how can i do this ? is there any way to import opening balance in SAP ?
Pls reply ASAP
Regards
Rajani P. Patel

Dear Rajani P. Patel,
You may check these threads first:
Re: Uploading Opening Balances
Re: Importing Opening Balances from Legacy System
Thanks,
Gordon

How to default Ledger to SLA.: Create Subledger Journal Entry

Similar Messages

Maybe you are looking for