Help in Cost Centre wise outstanding report

Discussion in 'Tally Developer' started by Pushpendra, Jul 24, 2014.

    
?

Dear Developer Team, I have faced a problem in my customization. Actually Sir I want to generate

Poll closed Jul 31, 2014.
  1. asap

    1 vote(s)
    100.0%
  2. max three days

    0 vote(s)
    0.0%
  1. Pushpendra

    Pushpendra New Member


    Dear Developer Team,



    I have faced a problem in my customization. Actually Sir I want to generate a cost centre wise outstanding customized report.my problem is that i am selecting cost centre but it does not filter the report according to selection of cost centre name. and report gives same report for every cost centre selection.I hope the filter is not working properly.i am sending my tried code . please send me corrected code asap. it is very urgent sir.










    [#Menu : Gateway of Tally]

    Option : CustomGateway of Tally

    [!Menu : CustomGateway of Tally]
    Add : Item : Customize Report : Menu : CustomMenu



    [Menu : CustomMenu]





    Add : Item : Cost Center Wise : Display Collection:CustLedger Outstandings


    [Collection : CustLedger Outstandings ]

    Type : costcentre

    Variable : costcentrename

    Report : CustLedger Outstandings
    Trigger : sale vch Selection


    [Report : sale vch Selection]

    Form : Ledger Selection
    Use : DspTemplate


    [Form: Ledger Selection]

    Part : cust ledger
    Use : DspTemplate
    Vertical Align : Top



    [Part : cust ledger]


    Line : cost name,CostCentreName1

    [Line : cost name]

    Field : Name Field
    Local : Field : Name Field : Info : $$LocaleString:"Name of Cost Centre"
    Local : Field : Name Field : Align : Center


    [Line : CostCentreName1]

    Fields : CostCentreName

    [#Field : Cost Centre Name]

    Use : Name Field
    Table : Cost Centre BreakUp Extract
    Show Table : Always
    Key : Create Cost Centre
    Modifies : CostCentreName
    CommonTable : No




    ;;;;;; in Default Outstanding report

    [#Report : Ledger Outstandings]

    Delete: Form
    Add : Form:CustLedger Outstandings





    ;;;;;;; Ledgerwise Outstanding






    [Report : CustLedger Outstandings]

    Family: $$Translate:"Ledger"
    Title: $$LocaleString:"Ledgers"


    Variables: DSP AgeByDueDate, DSP HasColumnTotal, DSP HasMultiLevel, DSP NotScaleable, DSP ShowMonthly
    Variables : ExplodeFlag, In NewPages, LedgerName
    Variables: Is BillWiseReport, Is CCReport, Is ForexReport, Is GrpBillReport, Is GrpReport, Is LedgerReport, Is MultiPage, Is VchTypeReport, IsTDSOutstandingReport
    Variables: Show BillRange, Show BillType, Show ContactDetails, Show DaysByBillDate, Show Forex, Show PDC, Show Reminders
    Variables: SV Budget, SV CurrentCompany, SV FromDate, SV SortMethod, SV ToDate, SV Variance
    Variables : cost centre name
    Local: Variable: LedgerName: Table: Ledger OutstandingsExtract
    Set : CostCategoryName : $Category:CostCentre:#CostCentreName
    Variables: AgeFrom, AgeTo
    Repeat: AgeFrom, AgeTo

    Variable: ShowLedParent

    Set: DSP HasColumnTotal: No
    Set : DSP HasMultiLevel : No
    Set : DSP NotScaleable : Yes
    Set : DSP ShowMonthly : No
    Set : Is BillWiseReport : Yes
    Set : Is GrpBillReport : No
    Set : Is LedgerReport : Yes
    Set : Is MultiPage : No
    Set: Show ContactDetails: No
    Set: Show DaysByBillDate: No
    Set: Show PDC: No
    Set: IsTDSOutstandingReport: No
    Set : SV Sort Method : @@Default
    Filtered: Yes
    ;Local : Collection : ledger Bills:Filter: GLHas
    Print Set: ReportTitle: ##LedgerName
    Print Set: ReportSubTitle : $$LocaleString:"Bill-wise Details"
    Print Set : PrintFileName : "LedBills"
    Set: ReportTitle: $$LocaleString:"Cost centre report"
    Print : LEDBILL Print Configure
    Export : Yes

    Form: CustLedger Outstandings

    ;;Fetch Object: Ledger : ##LedgerName: EMail, OnAccountValue, ClosingOnAcctValue, ClosingDrOnAcctValue, TBalClosing, IsDeemedPositive, ClosingBalance, LedIsContactLed

    ;; @@SD NOTE: Fetch Collection hits the performance during opening of report, hence it's commented
    ;;Fetch Collection: Ledger Bills, All Ledger Bills, Ledger OnAccount Vouchers, Final OnAccount Vouchers

    Variables : ShowInterest, InterestRecv, InterestPaya

    Set: ShowInterest: No
    Set : InterestRecv : No
    Set : InterestPaya : No
    Set : SALogoPath : $LogoPath:Company:##SVCurrentCompany
    Set: ReportNameVar: "Ledger Outstanding"
    Set : SACompLogo: (If $$IsEmpty:($$ListValue:RepLogoSpecific:##ReportNameVar) then Yes else $$ListValue:RepLogoSpecific:##ReportNameVar)

    [System : formula]


    GLHas : $costcentreName

    ;;=================================================

    [Form : CustLedger Outstandings]

    Buttons: F2ChangePeriod, Change Company, Change Item, AgeWiseAnalysis, Contact Details
    Bottom Buttons: BlankButton, RelReports, InvReports, AcctReports, Report Operations, Report Config, FilterButton, ValueButton
    Bottom Toolbar Buttons: BottomToolBarBtn1, BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11
    Buttons: PrintButton, ExportButton, MailButton, UploadButton
    Local: Button: RelReports: Action: Related Display: LedgerRelReports
    Local : Button : Report Config: Action: Execute: LEDBILL Configure
    Local: Button : ValueButton: Inactive: Yes
    Local: Button: Contact Details: Inactive : NOT $LedIsContactLed:Ledger:#LedgerName
    Key : ChangePeriod

    Background : @@SV_UNYELLOW

    Space Top : If $$InPrintMode Then 0.1 Else 0.05 inches
    Space Bottom: If $$InPrintMode Then 0.3 Else 0 inches
    Space Left : If $$InPrintMode AND $$InPixelMode Then 0.2 Else 0 inches
    Space Right: If $$InPrintMode AND $$InPixelMode Then 0.2 Else 0 inches
    ;
    Parts : Cust Company , CustColuntTitleLED , CustBodydetL
    Bottom Part : CustGRBillTotalL
    add: Page Break : DSP ClPageBreak, DSP OpPageBreak
    Local : Part : DSP OpPageBreak : Delete : Parts
    Local : Part : DSP OpPageBreak :Add:parts:CustColuntTitleLED

    Option : LO InSamePage : ##IsMultiPage AND NOT ##InNewPages
    Option : LO SeparatePage: NOT ##IsMultiPage OR ##InNewPages
    Option : Small Size Form : $$NumSets > 1

    Option: LedBillSettlement: NOT (##ShowInterest)


    [Part : Cust Logo]


    Use : ExpInv Image

    Width : 25% page
    Invisible : Not $$InPrintMode
    Space Left: 9

    [#Part : ExpInv Image]

    Delete : Vertical
    Delete : Part : empty

    [Part : Cust Company]

    part : cust company1

    [Part : Cust Company1]

    Line : Cust Company, cust comp add ,CustLEDBILL MainTitle
    Repeat : cust comp add : company address
    Space bottom : 1
    Invisible : NOT $$InPrintMode OR NOT $$IsCommon:SVCurrentCompany OR NOT ##PrintWithCompanyName


    [Line : Cust Company]

    Field : Name Field
    Local : Field : Name Field : Set as : @@cmpmailname
    Local : Field : Name Field : Full Width : Yes
    Local : Field : Name Field : Align : Center
    Local : Field : Name Field : Style : Large Bold

    [Line : Cust Comp add]

    Field : Name Field
    Local : Field : Name Field : Set as : $address
    Local : Field : Name Field : Full Width : Yes
    Local : Field : Name Field : Align : Center




    [Line : CustLEDBILL MainTitle]


    Field: name Field
    Local: Field : name Field : Add : Align : Center
    Local: Field : Name Field : Seta s : @@DSPDateStr
    Local: Field : name Field : fullwidth: yes
    Local: Field : nAME fIELD : Style : small

    [Part : CustColuntTitleLed]

    Line : CustColuntTitleLed,CustColuntTitleALed
    Border : Thick Top Bottom
    CommonBorder: yes


    [Line : CustColuntTitleLed]

    Field : CustDateL,CustBillNoL,CustLedgerNamedL,cust partl
    Right Field: CustDescrpL,CustBilledL,CustReceiptL,CustPendingL,CustOverriodL
    Local : Field : default : type : String

    LoCal : Field : CustDateL : info : "Date"
    LoCal : Field : CustBillNoL : Info : "Bill No."
    LoCal : Field : CustLedgerNamedL : info : "Party Name"

    LoCal : Field : cust partl : info : "Particular of"
    LoCal : Field : CustBilledL : Info : "Billed"
    Local : Field : CustDescrpL : Set as: "Description"
    LoCal : Field : CustReceiptL : Info : "Receipt"
    LoCal : Field : CustPendingL : Info : "Pending"
    LoCal : Field : CustOverriodL : Info : $$string:"Overdue"
    LoCal : Field : CustDescrpL : Align : Centre
    Local : Field : Default : delete: Line
    Local : Field : CustOverriodL : Style : small italic


    [Line : CustColuntTitleALed]

    Field : CustDateL,CustBillNoL,CustLedgerNamedL,cust partl
    Right Field : CustDescrpL,CustBilledL,CustReceiptL,CustPendingL,CustOverriodL
    LoCal : Field : CustDateL : info : $$String:""
    LoCal : Field : CustBillNoL : Info : ""
    LoCal : Field : CustLedgerNamedL:Info: ""

    LoCal : Field : CustDescrpL : Info : ""
    LoCal : Field : CustBilledL : Info : "Amount"
    LoCal : Field : CustReceiptL : Info : "Amount"
    LoCal : Field : CustPendingL : Info : "Amount"
    LoCal : Field : cust partl : Info : $$String:"Service"
    LoCal : Field : CustOverriodL: Info : $$String:"by Days"
    Local : Field : CustOverriodL: Style: small italic

    Local : Field : Default :delete: Line



    ;;=============================================

    [Part : CustBodydetL]

    Line : CustBodydetL
    Repeat : CustBodydetL : All ledger Bills
    Scroll : Vertical
    Common Border : yes
    Total : CustBilledL,CustReceiptL,CustPendingL
    Float : No


    [Line : CustBodydetL]
    Field : CustDateL,CustBillNoL,CustLedgerNamedL,cust partl
    Right Field : CustDescrpL,CustBilledL,CustReceiptL,CustPendingL,CustOverriodL
    Option : ExplodeOnEnter
    Border : Thick Bottom


    [Field : CustDateL]

    Use : UniDateField
    Set as : $BillDate
    Border : Thick Left Right
    Width : 18 mms

    [Field : CustBillNoL]
    Use : ShortNameField
    set as : $$CollectionField:$VoucherNumber:1:LedgerEntries
    Width : 30 MMS
    Border : Thick Right
    Align : Centre

    [Field : CustLedgerNamedL]
    use : Name Field
    set as : $LedgerName
    Border : Thick Right
    Line : 3



    [Field : cust partl]

    use : Name Field
    set as : $$CollectionField:$CUSTVCHFirstItemName:1:LedgerEntries
    Width : 35 MMS
    Border : Thick Right
    Line : 3

    [Field : CustDescrpL]

    use : Name Field
    set as : $$CollectionField:$CUSTVCHFirstItemdescName:1:LedgerEntries
    Border : Thick Right
    Line : 3
    Full Width:Yes

    [System : Formula]

    CustFrmm : $$FullList:Userdescription:$UserDescription



    [Field : CustBilledL]
    Use : AmountField
    Type : Amount

    Set as : $OpeningBalance
    Border : Thick Right
    Width : 22 MMS

    [Field : CustReceiptL]

    use : Amount Field
    Type : Amount
    set as : $OpeningBalance - $ClosingBalance
    Border : Thick Right
    Width : 22 MMS

    [Field : CustPendingL]

    Use : AmountField
    Type : Amount
    Set as : $ClosingBalance
    Border : Thick Right
    Width : 22 MMS


    [Field : CustOverriodL]

    Set as : if ##ShowDaysByBillDate then @DaysByBillDate else @DaysByDueDate
    DaysByBillDate : $$String:mad:BillDays
    DaysByDueDate : if @@DSPToDate >= @@CreditPeriod then $$String:mad:OverDueDays else ""
    OverDueDays : @@DSPToDate - @@CreditPeriod
    BillDays : @@DSPToDate - $BillDate
    Width : 8
    Style : Normal Italic
    Align : Right
    Border : Thick Right





    [#Collection: Group Bills]

    Fetch : CUSTVCHFirstItemName
    add : Fetch : InventoryEntries
    add : Fetch : LedgerEntries.InventoryEntries.StockItemName

    [#Collection : Ledger Bills]


    Fetch: CUSTVCHFirstItemName
    add : Fetch : InventoryEntries
    add : Fetch : LedgerEntries.InventoryEntries.StockItemName

    ;;============================================================================================


    [Part : CustGRBillTotalL]

    Line : CustGRBillTotalL




    [Line : CustGRBillTotalL]

    Use : CustBodydetL
    LoCal : Field : CustDateL : info : $$string:""

    LoCal : Field : CustBillNoL : Info : ""
    LoCal : Field : CustLedgerNamedL : Info : ""
    LoCal : Field : CustPartL : Info : ""
    LoCal : Field : CustDescrpL : Info : "Total"
    LoCal : Field : CustBilledL : set as : $$Total:CustBilledL
    LoCal : Field : CustReceiptL : set as : $$Total:CustReceiptL
    LoCal : Field : CustPendingL : set as : $$Total:CustPendingL
    LoCal : Field : CustPartSer : set as : $$String:"";$$Total:CustPartSer
    LoCal : Field : CustOverriodL : Info : ""
    Border : Thick Top Bottom

    LoCal : Field : CustLedgerNamedL : delete :line
    LoCal : Field : CustPartL : delete :line
    LoCal : Field : CustDescrpL : delete :line



    ;;=================================================

    [#Collection : Group Bills]

    Fetch: CUSTVCHFirstItemName
    add : Fetch :InventoryEntries
    add : Fetch :LedgerEntries.InventoryEntries.StockItemName




    [#Object : Bill]

    custee : $CUSTVCHFirstItemName
    CustStockItem : $stockItemName
    custStockItemName : $StockItemName

    [System : Formula]

    CustFrmm : $$FullList:Userdescription:$UserDescription

    [#Object : Voucher]

    CUSTVCHFirstItemName : $$CollectionField:$StockItemName:1:InventoryEntries
    ;;CUSTVCHFirstItemdescName : $$CollectionField:$userDescription:1:InventoryEntries
    CUSTVCHFirstItemdescName : $$CollectionField:mad:@CustFrmm:1:InventoryEntries
    ;


    [#Object : Voucher]

    VUserDescasss: $Description:Stockitem:$Stockitemname
    custStockItemName : $StockItemName


    ;;==============================================================================Collection

    [#Collection : Ledger Bills]
    add : Fetch : StockItemName

    [#Collection : LedgerBillsExists]
    add : Fetch : StockItemName

    [#Collection: NumItem Ledger Bills]

    Fetch : StockItemName

    [#Collection : All Ledger Bills]
    add :Fetch : StockItemName

    [#Collection: Group Bills]
    add : Fetch : StockItemName

    [#Collection : ListofLedger OnAccount Vouchers]
    add : Fetch : StockItemName


    [#Collection: Ledger OnAccount Vouchers]

    add : Fetch : StockItemName

    [#Collection : Ledger Bills]

    Parm Var : ClearLists : Logical : $$ClearLedVchBillAmt

    Type : Bills
    Child of: #LedgerName
    Filter : DueBillsFilter, AgeFilter, BillTypeFilter
    add : Fetch : stockitemname,userDescription,LedPart
    Walk : all Inventory Entries,All ledger Entries
    By : Ledgername : $ledgername
    Compute: Name: $$Name
    Switch : RemoteBills: RemoteBills: $$IsRemoteCompany
    Compute : BasicuserDescription :$basicuserdescription

    Sort : @@Default: $BillDate

    Sort : @@DateIncr : $BillDate
    Sort : @@DateDecr : -$Date
    Sort : @@RefNoIncr : $$Name
    Sort : @@RefNoDecr : -$$Name
    Sort : @@AmtIncr : $$Abs:$ClosingBalance
    Sort : @@AmtDecr: -$$Abs:$ClosingBalance
    Sort : @@DueDateIncr: @@CreditPeriod, $BillDate
    Sort : @@DueDateDecr: -@@CreditPeriod, -$BillDate
    Sort : @@CurrencyIncr : $$Currency:$OpeningBalance
    Sort : @@CurrencyDecr : -$$Currency:$OpeningBalance
     

    Attached Files:



  2. SINTO PARAVA

    SINTO PARAVA Member


    please check code sir..njoy:)
     

    Attached Files:



  3. Pushpendra

    Pushpendra New Member


    Dear sir this code is not working..please first of understand my problem..
    dear sir I Create a customized outstanding report..here we want to this report as cost centre wise..in details when we select costcentre name .. the report will generated according to cost centre ..i am not able to filter my report as cost centre...

    In general..

    we go to customized menu in tally. here is the report cost centre wise .. after then we select cost centre wise ..it goes to cost centre selection list ..after then we select the cost centre.. customized reprot will showing. but this report remains same in any selection of cost centre..
    it means ,,i am not using the filter,,i request to u please use the filter by which my purpose will be solved out and send me corrected code the asap.. Thanks In Advance.
     


  4. SINTO PARAVA

    SINTO PARAVA Member


    [Report: ptypeName] ;;Auto Report

    Use : Collection Variable
    Local : Line : Collection Variable : Field : ptypeName
    Local : Field: MV Title : Info :$$LocaleString:"Name of Cost Centre"
    Local :Form:Modify Variables:On:Form Accept:Yes:Call:serchcoll:#ptypeName


    [Function:serchcoll]
    Parameter:serchvar:String
    Variable: costcentrename:String
    0001 : Set:costcentrename:##serchvar
    0002 : Alter:sale vch Selection


    [Field:ptypeName]

    Use : Name Field

    Table : Cost Centre BreakUp Extract
    Show Table : Always
    Key : Create Cost Centre
    Modifies : CostCentreName
    CommonTable : No










    [Collection : CustLedger Outstandings ]

    Type : costcentre

    Variable : costcentrename

    Report : CustLedger Outstandings
    Trigger : sale vch Selection


    [Report : sale vch Selection]

    Form : Ledger Selection
    Use : DspTemplate


    [Form: Ledger Selection]

    Part : cust ledger
    Use : DspTemplate
    Vertical Align : Top


    [Part : cust ledger]


    Line : cost name,CostCentreName1

    [Line : cost name]

    Field : Name Field
    Local : Field : Name Field : Info : $$LocaleString:"Name of Cost Centre"
    Local : Field : Name Field : Align : Center

    [Line : CostCentreName1]

    Fields : CostCentreName

    [#Field : Cost Centre Name]

    Use : Name Field
    Table : Cost Centre BreakUp Extract
    Show Table : Always
    Key : Create Cost Centre
    Modifies : CostCentreName
    CommonTable : No
     


  5. Asifraza1

    Asifraza1 New Member


    Dear ,
    can i have same report with Sales Register. Mean
    i need to export sales register with the cost centre wise, now i am exporting sales register its not come with the cost center in excel.
    kindly guid and help please....
     


  6. tanzeel

    tanzeel New Member


    mr. Sinto Parava , your last code showing me Active but there is no report appearing at Gateway of Tally
     


Share This Page