Party wise Turnover Report

Code:

;; Shree Ganeshay Namah
;; 03/04/2015
;; Party wise Turn over Report

[#Menu: Account Books]
    Add: Item: After: @@locLedger : Turnover Report : Display: Turnover Report : NOT $$IsEmpty:$$SelectedCmps
   
[Report: Turnover Report]
    Title: $$LocaleString:"Turn Over Report"
    Use  : DSP Template
    Form : Turnover Report
   
[Form: Turnover Report]
    Use   : DSP Template
    Width : 100% Page
    Height: 100% Page
    Part: TurnOver
    FetchObject        : Ledger: @@AllLedEntryList    : PrevYearTurnover, CurrentTurnover, CreditLimit
[Part: TurnOver]
    Line: TurnOverTitles, TurnOverDetails
    Repeat: TurnOverDetails : TurnOverColl
    Scroll: Vertical

[Line: TurnOverTitles]
    Use: TurnOverDetails
    Local: Field: PartyName : Info: $$LocaleString:"Name of Debtors"
    Local: Field: PartyName : Full Width: Yes   
    Local: Field: PrevYrTurnOver:Info: $$LocaleString:"Prev. Year TurnOver"
    Local: Field: CurrYrTurnOver:Info: $$LocaleString:"Curr. Year TurnOver"
    Local: Field: PartyCreditLimit:Info: $$LocaleString:"Credit Limit"
    Local: Field: Default: Type: String
    Local: Field: Default: Align: Center
    Local: Field: Default: Style: Normal Bold
    Border: Column Titles
   
[Line: TurnOverDetails]
    Field: PartyName
    Right Fields: PrevYrTurnOver, CurrYrTurnOver, PartyCreditLimit
   
[Field: PartyName]
    Use: Name Field
    Set as: $Name
    Border: Thin Right
    Full Width: Yes
   
[Field: PrevYrTurnOver]
    Use: Amount Forex Field
    Set as: $$FromValue:@@PrevYearStart:$$ToValue:@@PrevYearEnd:$DebitTotals
    Border: Thin Right
   
[Field: CurrYrTurnOver]
    Use: Amount Forex Field
    Set as: $$ToValue:##SVCurrentDate:$DebitTotals
    Border: Thin Right
   
[Field: PartyCreditLimit]
    Use: Amount Forex Field
    Set as: $CreditLimit   
    Format      : ("AllSymbols,NoZero,DrCr")

   
[Collection: TurnOverColl]
    Type        : Ledger
    Child Of: $$GroupSundryDebtors
    Belongs To: Yes
    Fetch: PrevYearTurnover, CurrentTurnover, CreditLimit

;;End of File

;; Note : Company have at least two years of Transactions

 

Thanks for sharing...