Previous Balance in Invoice

Discussion in 'Requests' started by psjain_jal, Aug 8, 2012.

    
  1. psjain_jal

    psjain_jal Member


    what is code for showing the previous balance in invoice printing ?

    & also pl tell what is code for Ledger View at Voucher Entry ?
     


  2. admin

    admin Administrator Staff Member


    For this you can do one thing:: Closing Balance of Party Ledger - Current Invoice Value = Previous Closing Balance
     


  3. psjain_jal

    psjain_jal Member


    but how set in sales invoice printing?
     


  4. admin

    admin Administrator Staff Member



  5. mpal2311

    mpal2311 Active Member


    [Field : TMFldBal]

    Use : Amount Forex Field
    Storage : TMFldBal
    Set AS : If $$IsEmpty:$$Value Then $ClosingBalance:Ledger:$PartyLedgerName Else $$Value

    [System : UDF]
    TMFldBal : Amount : 21000

    ;;Comprehensive Invoice

    [#Part: EXPINV EOE]
    Add : Line :After : EXPINV EOE : EXPINVBalance

    [Line : EXPINVBalance]
    Right Field : EXPINVBalance

    [Field :EXPINVBalance]

    Use : Name Field
    Set As : "Closing Balance : " + $$String:mad:ABC
    ABC:$$ToValue:$Date:$ClosingBalance:Ledger:$PartyLedgerName
     


  6. fannu

    fannu Member


    [#Part: EXPSMP EOE]
    Option : EXPSMP EOE Prev : @@EnPrevBalLeft And Not @@EnPrevBalRight


    [!Part:EXPSMP EOE Prev]
    Add : Part : At End : EXPSMP PrevBal
    Vertical : Yes

    [Part : EXPSMP PrevBal]
    Line : EXPSMP PrevBal,EXPSMP BillAmt, EXPSMP NetBal
    Width : 30 % Screen
    Invisible : ##HidePrevBalVar

    [Line : EXPSMP PrevBal]
    Field : Short Prompt, EXPSMP PrevBal
    Local : Field : Short prompt : Set as : "Prev.Balance"
    Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName

    [Field : EXPSMP PrevBal]
    Use : Amount Field
    Set as : $$AsDrAmt:#EXPSMPNetBal - #EXPSMPBillAmt
    Format : "DrCr"
    Style : Small Bold


    [Line : EXPSMP BillAmt]
    Field : Short Prompt, EXPSMP BillAmt
    Local : Field : Short prompt : Set as : "Bill Amt."
    Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName

    [Field : EXPSMP BillAmt]
    Use : Amount Field
    Set as : $Amount
    Border : Thin Bottom
    Format : "DrCr"
    Style : Small Bold

    [Line : EXPSMP NetBal]
    Field : Short Prompt, EXPSMP NetBal
    Local : Field : Short prompt : Set as : "Net Balance"
    Space Bottom : 3 mms
    Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName


    [Field : EXPSMP NetBal]
    Use : Amount Field
    Set as : $$AsDrAmt:$$ToValue:$Date:$ClosingBalance:Ledger:$PartyLedgerName
    Border : Thin Bottom
    Format : "DrCr"
    Style : Small Bold


    [#Part: EXPINV LeftSign]
    Option : EXPSMP EOE Prev : @@EnPrevBalLeft And Not @@EnPrevBalRight

    [#Part: EXPINV Words]
    Option : EXPSMP EOE PrevRight : @@EnPrevBalRight And Not @@EnPrevBalLeft And ##SASimple

    [!Part:EXPSMP EOE PrevRight]
    Add:Line :After : EXPINV AmtInWords: EXPSMP PrevBalRight,EXPSMP BillAmtRight, EXPSMP NetBalRight


    [Part : EXPSMP PrevBalRight]
    Line : EXPSMP PrevBalRight,EXPSMP BillAmtRight, EXPSMP NetBalRight
    ;;Width : 50 % Page
    Space Top : 0.25
    Invisible : ##HidePrevBalVar

    [Line : EXPSMP PrevBalRight]
    Right Field : Short Prompt, EXPSMP PrevBalRight
    Local : Field : Short prompt : Set as : "Prev.Balance"
    Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName

    [Field : EXPSMP PrevBalRight]
    Use : Amount Field
    Set as : $$AsDrAmt:#EXPSMPNetBalRight - #EXPSMPBillAmtRight
    Format : "DrCr"
    Style : Small Bold


    [Line : EXPSMP BillAmtRight]
    Right Field : Short Prompt, EXPSMP BillAmtRight
    Local : Field : Short prompt : Set as : "Bill Amt."
    Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName

    [Field : EXPSMP BillAmtRight]
    Use : Amount Field
    Set as : $Amount
    Border : Thin Bottom
    Format : "DrCr"
    Style : Small Bold

    [Line : EXPSMP NetBalRight]
    Right Field : Short Prompt, EXPSMP NetBalRight
    Local : Field : Short prompt : Set as : "Net Balance"
    Space Bottom : 3 mms
    Invisible : $$IsGroupCash:$Parent:Ledger:$PartyLedgerName


    [Field : EXPSMP NetBalRight]
    Use : Amount Field
    Set as : $$AsDrAmt:$$ToValue:$Date:$ClosingBalance:Ledger:$PartyLedgerName
    Border : Thin Bottom
    Format : "DrCr"
    Style : Small Bold


    [#Part: EXPINV RightSign]
    Option : EXPINV RightSign Sales : @@EnPrevBalRight And Not @@EnPrevBalLeft

    [!Part:EXPINV RightSign Sales]
    Add : Part : After : EXPINV EOE : EXPSMP PrevBalRight

    [System : Variable]
    HidePrevBalVar : No

    [Variable : HidePrevBalVar]
    Type : Logical
    Default : No

    [#Part : IPCFG Left]
    Add : Line : At End : HidePrevBal

    [Line : HidePrevBal]
    Field : Medium Prompt, Logical Field
    Local : Field : Medium Prompt : Info : $$LocaleString:"Hide Previous Balance Details ?"
    Local : Field : Logical Field : Modifies : HidePrevBalVar
    Local : Field : Logical Field : Set as : ##HidePrevBalVar


    [System:UDF]
    EnPrevBalLeft : Logical : 238
    EnPrevBalRight : Logical : 239

    [System:Formula]
    EnPrevBalLeft : $EnPrevBalLeft:VoucherType:$VoucherTypeName
    EnPrevBalRight : $EnPrevBalRight:VoucherType:$VoucherTypeName


    [System:formula]
    IsInvType : ($$IsSales:$Parent Or $$IsSalesOrder:$Parent Or +
    $$IsDelNote:$Parent Or $$IsPurchase:$Parent Or +
    $$IsRcptNote:$Parent Or $$IsPurcOrder:$Parent Or +
    $$IsDebitNote:$Parent Or $$IsCreditNote:$Parent)

    IsJouType : ($$IsCreditNote:$Parent Or $$IsDebitNote:$Parent)


    [#Part : VTYP BehaviourMain]
    Add : Line : After : VTYP PrintSave : VTYP EnPrevBalLeft, VTYP EnPrevBalRight

    [Line : VTYP EnPrevBalLeft]
    Fields : Long Prompt, Logical Field
    Local : FIeld : Long Prompt : Set as : "Print Previous Balance Left ?"
    Local : Field : Long Prompt : Width : @@LongWidth
    Local : Field : Default : Inactive : Not @@IsInvType
    Local : Field : Logical Field : Storage : EnPrevBalLeft


    [Line : VTYP EnPrevBalRight]
    Fields : Long Prompt, Logical Field
    Local : FIeld : Long Prompt : Set as : "Print Previous Balance Right ?"
    Local : Field : Long Prompt : Width : @@LongWidth
    Local : Field : Default : Inactive : Not @@IsInvType
    Local : Field : Logical Field : Storage : EnPrevBalRight
     


  7. mpal2311

    mpal2311 Active Member


    Not working.
     


  8. fannu

    fannu Member


    accounts info ____voucher type ---------- alter -----sales --- print previous balance left " no "
    '" "' """ "" "" "" right " yes"

    enjoy
     


  9. mpal2311

    mpal2311 Active Member


    Thanks.
     


  10. fannu

    fannu Member


    sir can u gave me ur contact no
     


  11. mpal2311

    mpal2311 Active Member


    your mail id
     


  12. fannu

    fannu Member



  13. N vinoth

    N vinoth Guest



  14. laxman

    laxman Member



    sir please provide this code in simpal invoice printing ....
     


  15. laxman

    laxman Member



    Dear all "Is you can help us"
     


  16. Gagan Jyoti

    Gagan Jyoti Member




    Hello sir

    Nice Work done.

    It is not showing Exact Previous Balance in case of Sales Return.

    Thanks
     


  17. Rohit Raj

    Rohit Raj New Member


    Guyz i tried the above tdls but it didnt worked for me . Its my request to make a fresh copy of tdl and send it to me . My ehatsapp no is 8541827625
     


  18. junaid

    junaid New Member


    try this bro its working

    [*Part: EXPINV Words]
    Lines : EXPINV WordTitle , EXPINV AmtInWords,prevbal,Billamt,Closingbal
    Space Bottom: 0.25
    Option : WithVATValue : (@@IsSales OR @@IsPurchase) AND @@IsIndianVATVch AND @@InvVATAnalysis
    Option : WithExciseValue : @@IsSales AND @@IsIndian AND NOT $$IsEmpty:$ExciseRegn:Company:##SVCurrentCompany AND ##ICFGExcisePrinting
    Option : WithServiceTaxValue : (@@IsSales OR @@IsPurchase OR @@IsReceipt OR @@IsPayment OR @@IsPurcOrder OR @@IsSalesOrder OR @@IsDebitNote OR @@IsCreditNote) AND @@IsIndianServiceTax AND $$STXCanUpdateDutyLed



    [Part:lastbal]
    Line:prevbal
    Line:Billamt
    Line:Closingbal1
    [Line:prevbal]
    Fields:prevbalt,prevbald1
    [Line:Billamt]
    Fields:Billamtt, Billamtd
    [Line:Closingbal]
    Field:Closingbalt,Closingbald
    [Field:prevbalt]
    Info:"Prev.Balance"
    Width:10
    [Field:prevbald1]
    Use :Amount Field
    Set as:($$ToValue:$Date:$ClosingBalance:Ledger:$$CollectionField:$LedgerName:1:LedgerEntries)-$$abs:#EXPINVTOTAL
    [Field:Billamtt]
    Info:"Bill Amount"
    Width:10
    [Field: Billamtd]
    Use:Amount Field
    Set as:#EXPINVTotal
    [Field:Closingbalt]
    Info:"Curr.Balance"
    Width:10
    [Field:Closingbald]
    Use:Amount Field
    Info:$$ToValue:$Date:$ClosingBalance:Ledger:$$CollectionField:$LedgerName:1:LedgerEntries
     
    Bimal likes this.


  19. Ejajkhan

    Ejajkhan New Member


    Sand me tdl files @ejajpathan@gmial.com
     


  20. Sudheer

    Sudheer New Member


    thanks bro working
     


  21. rajiv jain

    rajiv jain Member


    Experts need party previous due Bill details in current invoice
    Sample below
    Invoice no date amount
    005 10/04/2017 15032.00
    011 15/05/2017 15499.00
    027 05/06/2017 25232.00

    Need such detail in current invoice at the end


    Thanks in advance
     


  22. lucky agrawal

    lucky agrawal New Member


    THANKS SIR JI :)
     


Share This Page