1. CLICK HERE TO JOIN WHATSAPP CHANNEL FOR TDL PROGRAMS

Filter Button not working,New to TDL Help!!!!!!!

Discussion in 'Tally Developer' started by gautam sood, Dec 4, 2020.

    
Tags:
  1. gautam sood

    gautam sood New Member


    Code:
    [#Menu : Gateway of Tally]
Item : Sales Summary - Item wise : Display : My SalesSummary
[Report :My SalesSummary]
Form :My SalesSummary
Variable : SVFromDate,SVToDate
Set : SVFromDate : $$MonthStart:##SVFromdate
Set : SVToDate : $$MonthEnd:##SVFromdate
Set : BeatChqVar : "Full"
Set : BeatName : ""

[Form :My SalesSummary]
Part : MyReportTitle,My SalesSummaryTL,My SalesSummary
Button : Change Period,Print Button,Export Button
Button:Stkgroupbtn
Bottom Part : My SalesSummaryBTM
Background : @@SV_UNYELLOW


[Part : MyReportTitle]
Line :MyReportTitle
[Line :MyReportTitle]
Field : Simple Field
Local : Field : Simple Field : Set As : "Sales Summary - Item wise from " + $$String:##SVFromDate +" to " + $$String:##SVToDate +"-" +$$String:##parent
Local : Field : Simple Field : Style : Normal Bold
[Part : My SalesSummaryTL]
Use : My SalesSummary
Delete : Repeat
Delete : Scroll
Border : ColumnTitles
Local : Field : Default : Type : string
Local : Field : My SalesSummaryItem : Set As : "Particulars"
Local : Field : MyItemsSalesQty: Set As : "Sales Qty"
Local : Field : MyBeat : Set As : "BEAT"
Local :Field : Default : Style : Small Bold
[Part :My SalesSummary]
Line : My SalesSummary
Repeat : My SalesSummary :MySalesItems
Scroll : Vertical
Total : MyItemsSalesQty,MyItemsSalesAmount
[Line :My SalesSummary]
Field : My SalesSummaryItem
Right Field : MyItemsSalesQty,MyBeat
Border : Thin bottom
[Field : My SalesSummaryItem]
Set As : $Stockitem
Style : Small
Display : Item Monthly Summary
Variable : StockitemName


[Field : MyItemsSalesQty]
Use : Qty Primary Field
Style : Small
Set As : $BilledQtyToT


[Field : MyBeat]
Set As : $Parent
Style : Small
Display : BEAT
Variable : BEAT
VCHBrokerName : If $$IsEndOfList:##FilterBroker or ##FilterBroker="" Then "Show All" Else ##FilterBroker

[Part : My SalesSummaryBTM]
Use : My SalesSummary
Delete : Repeat
Delete : Scroll
Delete : Total
Border : Totals
Local : Field : My SalesSummaryItem : Set As : "Total"
Local : Field : MyItemsSalesQty: Set As : $$Total:MyItemsSalesQty
Local : Field : MyItemsSalesAmount : Set As : $$Total:MyItemsSalesAmount
Local :Field : Default : Style : Small Bold

[Collection : MySalesSummaryCollection]
Type : voucher
Filter : IsSalesVT
Childof : $$GroupSundryDebtors
Belongs To : yes
Fetch : Date,Inventory Entries
Filter : BWRFilter


[Collection : MySalesItems]
Source Collection : MySalesSummaryCollection
Walk : Inventory Entries
By : Date       :$date
By : PName     : $PartyLedgerName
By : Stockitem : $StockitemName
Compute : Parent: $Parent:Ledger:$PartyLedgerName
Aggr Compute : BilledQtyToT : Sum : $BilledQty




[System: Formula]
IsSalesVT : $$IsSales:$VoucherTypeName
NonEmptyQty : NOT $$IsEmpty:$BilledQtyToT
BWRFilter : $Parent=@@BeatWise
BeatWise : If $$IsEndOfList:##BeatName or ##BeatName="" Then $Parent Else ##BeatName

[Button:Stkgroupbtn]
Title:"BEAT"
Key:Alt+B
Action:Execute:BeatFilter
;Action  : Modify Variable : Iname

[Report:BeatFilter]
Form : BeatFilter
;Set : BeatName : ""
Set : BeatChqVar : "Filter"   

[Form:BeatFilter]
Part:Beatfilter
;Height : 10% Page
Width : 18% Page
Vertical Alignment:Top
Horizontal Align:Center
Full Width:No
No Confirm:Yes

[Part:Beatfilter]
Line:Beatfilter
Horizontal Align:Center

[Line: Beatfilter]

Field : Medium Prompt,BeatFilter
Local : Field : Medium Prompt : Set as : "Select Beat Name: "


[Field:BeatFilter]
Use:Name
Table:Group,EndOfList
Width:20
Align:Center
Border:thin box
Set Always : Yes
Show Table : Always
Variable : BeatName
Modifies : BeatName

[Variable:BeatName]
Type : String

[Variable:BeatChqVar]
Type : String

[System:Variable]
BeatName : ""
BeatChqVar :""


[System:UDF]
EnableBeat : Logical : 1000
     
    gautam sood, Dec 4, 2020
    #1


  2. gautam sood

    gautam sood New Member


    I am trying to get sales summary and filter the report on ledger groups , but the filter button is not working ,as on selection it does not filter the output
     
    gautam sood, Dec 4, 2020
    #2


  3. Aldrin Prabhakaran

    Aldrin Prabhakaran Member


    Try This,

    Problem in Filtration Check your collection and System formula

    [#Menu : Gateway of Tally]
    Item : Sales Summary - Item wise : Display : My SalesSummary
    [Report :My SalesSummary]
    Form :My SalesSummary
    Variable : SVFromDate,SVToDate
    Set : SVFromDate : $$MonthStart:##SVFromdate
    Set : SVToDate : $$MonthEnd:##SVFromdate
    Set : BeatChqVar : "Full"
    Set : BeatName : ""

    [Form :My SalesSummary]
    Part : MyReportTitle,My SalesSummaryTL,My SalesSummary
    Button : Change Period,Print Button,Export Button
    Button:Stkgroupbtn
    Bottom Part : My SalesSummaryBTM
    Background : @@SV_UNYELLOW


    [Part : MyReportTitle]
    Line :MyReportTitle
    [Line :MyReportTitle]
    Field : Simple Field
    Local : Field : Simple Field : Set As : "Sales Summary - Item wise from " + $$String:##SVFromDate +" to " + $$String:##SVToDate +"-" +$$String:##parent
    Local : Field : Simple Field : Style : Normal Bold
    [Part : My SalesSummaryTL]
    Use : My SalesSummary
    Delete : Repeat
    Delete : Scroll
    Border : ColumnTitles
    Local : Field : Default : Type : string
    Local : Field : My SalesSummaryItem : Set As : "Particulars"
    Local : Field : MyItemsSalesQty: Set As : "Sales Qty"
    Local : Field : MyBeat : Set As : "BEAT"
    Local :Field : Default : Style : Small Bold
    [Part :My SalesSummary]
    Line : My SalesSummary
    Repeat : My SalesSummary :MySalesItems
    Scroll : Vertical
    Total : MyItemsSalesQty,MyItemsSalesAmount
    [Line :My SalesSummary]
    Field : My SalesSummaryItem
    Right Field : MyItemsSalesQty,MyBeat
    Border : Thin bottom
    [Field : My SalesSummaryItem]
    Set As : $Stockitem
    Style : Small
    Display : Item Monthly Summary
    Variable : StockitemName


    [Field : MyItemsSalesQty]
    Use : Qty Primary Field
    Style : Small
    Set As : $BilledQtyToT


    [Field : MyBeat]
    Set As : $Parent
    Style : Small
    Display : BEAT
    Variable : BEAT
    VCHBrokerName : If $$IsEndOfList:##FilterBroker or ##FilterBroker="" Then "Show All" Else ##FilterBroker

    [Part : My SalesSummaryBTM]
    Use : My SalesSummary
    Delete : Repeat
    Delete : Scroll
    Delete : Total
    Border : Totals
    Local : Field : My SalesSummaryItem : Set As : "Total"
    Local : Field : MyItemsSalesQty: Set As : $$Total:MyItemsSalesQty
    Local : Field : MyItemsSalesAmount : Set As : $$Total:MyItemsSalesAmount
    Local :Field : Default : Style : Small Bold

    [Collection : MySalesSummaryCollection]
    Type : voucher
    Filter : IsSalesVT
    Childof : $$GroupSundryDebtors
    Belongs To : yes
    Fetch : Date,Inventory Entries



    [Collection : MySalesItems]
    Source Collection : MySalesSummaryCollection
    Walk : Inventory Entries
    By : Date :$date
    By : PName : $PartyLedgerName
    By : Stockitem : $StockitemName
    Compute : Parent: $Parent:Ledger:$PartyLedgerName
    Aggr Compute : BilledQtyToT : Sum : $BilledQty
    Filter : BWRFilter



    [System: Formula]
    IsSalesVT : $$IsSales:$VoucherTypeName
    NonEmptyQty : NOT $$IsEmpty:$BilledQtyToT
    BWRFilter : If $$IsSysName:##BeatName Then Yes Else $Parent=##BeatName
    BeatWise : If $$IsEndOfList:##BeatName or ##BeatName="" Then $Parent Else ##BeatName

    [Button:Stkgroupbtn]
    Title:"BEAT"
    Key:Alt+B
    Action:Execute:BeatFilter
    ;Action : Modify Variable : Iname

    [Report:BeatFilter]
    Form : BeatFilter
    ;Set : BeatName : ""
    Set : BeatChqVar : "Filter"

    [Form:BeatFilter]
    Part:Beatfilter
    ;Height : 10% Page
    Width : 18% Page
    Vertical Alignment:Top
    Horizontal Align:Center
    Full Width:No
    No Confirm:Yes

    [Part:Beatfilter]
    Line:Beatfilter
    Horizontal Align:Center

    [Line: Beatfilter]

    Field : Medium Prompt,BeatFilter
    Local : Field : Medium Prompt : Set as : "Select Beat Name: "


    [Field:BeatFilter]
    Use:Name Field
    Table:Group,EndOfList
    Width:20
    Align:Center
    Border:thin box
    Set Always : Yes
    Show Table : Always
    Variable : BeatName
    Modifies : BeatName

    [Variable:BeatName]
    Type : String

    [Variable:BeatChqVar]
    Type : String

    [System:Variable]
    BeatName : ""
    BeatChqVar :""


    [System:UDF]
    EnableBeat : Logical : 1000
     
    Aldrin Prabhakaran, May 9, 2021
    #3


Share This Page