1. CLICK HERE TO JOIN WHATSAPP CHANNEL FOR TDL PROGRAMS

free code :- Sales & Purchases Monthly summery (Details)

Discussion in 'Free Source Codes' started by psjain_jal, Apr 27, 2013.

    
Page 2 of 2
  1. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Do not remove " ;; "

    BTW.... this code is working fine...... So what exactly are you trying to change???
     
    Amit Kamdar, Dec 17, 2018
    #26
    panam likes this.


  2. Rais Ahmed

    Rais Ahmed Member


    I Also removed If I want remove ;;
    [#Menu: Account Books]
    ;; Add : Item : Monthly Sales Summery : Display : RptMonthlySummaryRegister
    monthly Summary register is not coming and in that repeated function error is coming And if I not remove colons then only page with voucher selection opens and can not do anything. And sir I removed Keep Source: (). so bad formula error stop is it correct?
    Regards.
     
    Last edited: Dec 17, 2018
    Rais Ahmed, Dec 17, 2018
    #27
    panam likes this.


  3. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Use this code as it is....no changes required.........

    Code:
    [System : UDF]                                
    UDFColNo : Number : 500                            
[#Part: MST LED Details]                                
    Add : Option        : PrtNonPartyLed                : NOT $IsDebtorCreditor    
[!Part: PrtNonPartyLed]                                
    Lines : LnColNoInColReport                                
[Line: LnColNoInColReport]                                
    Field      : Long Prompt, FldColNoInColReport                            
    Local      : Field : Long Prompt : Setas  : "Column No in Columer Report :"                                
    [Field : FldColNoInColReport]                            
        Use : Number Field                        
    Storage : UDFColNo                            
[#Menu: Account Books]                                
    Add : Item : Before : @@locQuit : Details Monthly Summery  :  Display Collection : ClnVoucherTypes :  NOT $$IsEmpty:$$SelectedCmps                                
[Collection : ClnVoucherTypes]                                
    Type        : Voucher Type                                
    Format      : $$Name, 20                                
    Align      : Right                                
    FullHeight  : Yes                                
    Title      : $$LocaleString:"Select Voucher Type"                                
    Fetch        : Name, Parent, IsDeemedPositive                    
    Report      : RptMonthlySummaryRegister                                
    Variable    : SVoucherType                                
    Trigger    : SVoucherType1                                
    Filter      : OnlySalePurchase                            
    BelongsTo  : Yes                                
    WithAlias  : Yes                                
    Set as      : $Name                                
    Fetch        : SortPosition, AdditionalName                    
    [Report: SVoucherType1]                            
        Use    : Collection Variable                        
        Title    : $$LocaleString:"Select Voucher Type"                    
        Local  : Line : Collection Variable : Field : SVoucherType1                                
        Local  : Field: MV Title            : Info  : $$LocaleString:"Voucher Type"                                

        [Field: SVoucherType1]                        
              Use        : Name Field                                
              Table      : ClnVchrList                                
              Show Table  : Always                                
              Key        : Create Voucher Type                                
            Modifies    : SVoucherType                                
[Collection : ClnVchrList]                                
    use    : ExtractVoucherType                        
    Filter  : OnlySalePurchase                            
[Report : RptMonthlySummaryRegister]                                
    Use            : DSP Template                        
    Title        : "Columnar Register - Monthly Summery"                            
    Form        : FrmMonthlySummaryRegister                    
    Family      : $$Translate:"Sales Register"                                
    [Form    : FrmMonthlySummaryRegister]                            
        Use        : DSP Template                    
        Parts    : DSP AccTitles, PrtMSmryTitles, PrtMSmryColTitles, PrtMSmryDetails                        
        Option  : SmallSizeForm : NOT $$InPrintMode                            

        [Part    : PrtMSmryTitles]                            
            Lines        : Empty, LnMSmryTitles, LnMSmryTitles2                    
            [Line    : LnMSmryTitles]                            
                Fields        : Name Field, FldCheckVchrTypeDRCR                    
                Local : Field : Name Field : Set As : "Monthly Summary of " + ##SVoucherType                            
            [Line    : LnMSmryTitles2]                            
                Fields        : Name Field                    
                Local : Field : Name Field : Set As : "For the period from " + $$String:##SVFromDate + " to " + $$String:##SVToDate                            
                Local : Field : Name Field : FullWidth : Yes                            
                Border      : Thick Bottom                        
                [Field : FldCheckVchrTypeDRCR]                
                    Use : Logical Field            
                    set as : $IsDeemedPositive:VoucherType:##SVoucherType            
                Invisible : Yes                
        [Part    : PrtMSmryColTitles]                            
            Lines        : LnMSmryColTitles                        
            Common Border    : Yes                            
            [Line    : LnMSmryColTitles]                            
                Use : LnMSmryColDetails                
                Local : Field : Default : Type : String                
                Local : Field : Short Name Field : Set As : "Month"                
                Local : Field : FldMSmryMONTH      : Set As : "Month"            
                Local : Field : FldMSmryAmt        : Set As : $LName            
                Local : Field : FldMSmryAmt        : Line  : 0            
                Local : Field : FldMTotal          : Set As : "Total"            
                Border      : Thick Bottom                            
        [Part    : PrtMSmryDetails]                            
            Lines  : LnMSmryColDetails, LnMSmryColTotals                                
            Repeat : LnMSmryColDetails : ClnDatewiseSales                                
            Scroll : Vertical                                
            [Line    : LnMSmryColDetails]                            
                Fields : Short Name Field, FldMSmryMONTH, FldMSmryAmt, FldMTotal                                
                Repeat : FldMSmryAmt : ClnSaleLeds                                
                Local : Field : Short Name Field : Set As : $PMonth + " - " + $PYear                
            Local : Field : FldMSmryMONTH : Set As : $mDate                    
            Local : Field : FldMSmryAmt  : Set As : @ExactAmt                    
            Local : Field : FldMTotal    : Set As : $MAmount1                    
            [Line    : LnMSmryColTotals]                            
                Fields : Short Name Field, FldMSmryMONTH, FldMSmryAmtTot, FldMTotalTot                                
                Repeat : FldMSmryAmtTot : ClnSaleLeds                                
                Local : Field : Short Name Field : Set As : "Total"                
                Local : Field : FldMSmryMONTH : Set As : ""                
                Local : Field : FldMSmryAmtTot  : Set As : @ExactAmt                
                Local : Field : FldMTotalTot    : Set As : $$CollAmtTotal:ClnSaleLeds:$MAmount                
                Border : Totals                
[Field : FldMSmryMONTH]                                
    Use        : Short Name Field                            
    Invisible : Yes                            
[Field : FldMSmryAmt]                                
    Use : Amount Field                                
    mSrchKey : #FldMSmryMONTH + $LName                            
    mAmt : $$ReportObject:$$CollectionFieldByKey:$MAmount:@mSrchKey:ClnMonthLedMatrix                            
    ExactAmt : if #FldCheckVchrTypeDRCR then (if $$IsDr:@mAmt then @mAmt * -1 else @mAmt) else (if $$IsDr:@mAmt then @mAmt else @mAmt * -1)                                
[Field : FldMTotal]                                
    Use : Amount Field                            
[Field :FldMSmryAmtTot]                                
    Use : Amount Field                            
    mAmt : $$ReportObject:$$CollectionFieldByKey:$MAmount:$LName:ClnSaleLeds                            
    ExactAmt : if #FldCheckVchrTypeDRCR then (if $$IsDr:@mAmt then @mAmt * -1 else @mAmt) else (if $$IsDr:@mAmt then @mAmt else @mAmt * -1)                                
[Field : FldMTotalTot]                                
    Use : Amount Field                            
[Collection: ClnSaleVchrs]                                
    Type        : Voucher                    
    Fetch        : Date, SanVchrYearMonth, PartyLedgerName, Amount                    
    Filter        : SanSelectedVchr                    
[Collection: ClnSaleLeds]                                
    Source Collection    : ClnSaleVchrs                        
    Walk                : All Ledger Entries            
    By                    : LName            : $LedgerName
    By                  : ColNo        : $mColNo                            
    Aggr Compute        : MAmount        : SUM    : $Amount        
    Filter                : SanNonParty            
    Keep Source            : ().                
    Search Key            : $LName                
    Sort : Default : $ColNo                            
[#Object : Voucher]                                
    SanVchrYearMonth : $$String:@@mVchrYear + $$ZeroFill:@@mVchrMonthNo:2                            
[#Object : Ledger Entry]                                
    mColNo : $UDFColNo:Ledger:$LedgerName                            
[#Object : Ledger]                                
    IsDebtorCreditor : $$IsBelongsTo:$$GroupSundryDebtors OR $$IsBelongsTo:$$GroupSundryCreditors                            
[System : Formula]                                
    mVchrYear        : $$YearOfDate:$Date                        
    MVchrMon          : $$MonthOfDate:$Date                        
    mVchrMonthNo      : $$String:@@MVchrMon                        
[Collection: ClnDatewiseSales]                                
    Source Collection    : ClnSaleVchrs                        
    By                    : PYear    : $$YearOfDate:$Date    
    By                    : PMonth    : $$FullMonthName:$Date      
    By                  : mDate    : $SanVchrYearMonth                            
    Aggr Compute        : MAmount1    : SUM    : $Amount            
    Keep Source            : ().                
    Sort                : Default    : $mDate        
    Search Key            : $mDate                
[Collection: ClnMonthLedMatrix]                                
    Source Collection    : ClnSaleVchrs                        
    Walk                : All Ledger Entries            
    By                    : PYear    : $$YearOfDate:$Date    
    By                    : PMonth    : $$FullMonthName:$Date      
    By                  : mDate    : $SanVchrYearMonth                            
    By                    : LName        : $LedgerName
    Aggr Compute        : MAmount    : SUM    : $Amount            
    Keep Source            : ().                
    Search Key            : $mDate + $LName                
    Filter                : SanNonParty            
[System: Formula]                                
    SanNonParty    : NOT $IsDebtorCreditor:Ledger:$LName                            
    SanSelectedVchr    : $VoucherTypeName = ##SVoucherType                        
    OnlySalePurchase : $$IsSales:$Parent OR $$Ispurchase:$Parent OR $$IsDebitNote:$Parent OR $$IsCreditNote:$Parent                                
;;==============
     
    Amit Kamdar, Dec 17, 2018
    #28
    panam and Jaydeep Shah like this.


  4. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    I am not able to attach any PHOTOS........but it is working as it is..............with no changes made by me in the code.........
     
    Amit Kamdar, Dec 17, 2018
    #29
    panam likes this.


  5. Rais Ahmed

    Rais Ahmed Member


    What me rony wrote same happen with me 2 even i remove ; from Gateway Field also.Nor Column no function works 4 me. I can not understand which repeater function has 2 be entered. It is collection function so I tried both the collection but could not succeed.
     
    Rais Ahmed, Dec 17, 2018
    #30


  6. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    From my point of view....it is working.........

    Refer to my Post # 23/24 ................. I stand by the same.
     
    Amit Kamdar, Dec 17, 2018
    #31
    panam likes this.


  7. sekharchana

    sekharchana Member

    sekharchana, Dec 17, 2018
    #32


  8. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Thank You.........Enjoy the code..........
     
    Amit Kamdar, Dec 17, 2018
    #33
    panam likes this.


  9. Rais Ahmed

    Rais Ahmed Member


    Dear Amitji,
    4 me still error :"" Bad formula (). can not understand"". Actually it is collection Attribute Keep Source: (). If I remove (). bad formula error goes but only plain page with voucher selection page dialog appears and can not select any thing. I went through TD earlier tally has Keep source has 5 definition Keep source : YES, NO, . , .. , ... All 5 I tried nothing. Still trying something Diff. meanwhile if any one has idea pl.
    Thanks and Regards
     
    Rais Ahmed, Dec 20, 2018
    #34


  10. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Thanks for the update Mr. Rais, but unfortunately nothing can be done from my side............ I mean it is working fine here and so how do I go about finding the error. So the solutions should be found from your side only. And I have already given my opinion on "why not working" earlier. That is the only cause I can explain. Also you can try this TDL on somebody else's system (which has a different Tally version).

    So keep trying the various permutations and combinations and good luck. Happy coding.

    Keep me posted on your trials and tabulations on this TDL.
     
    Amit Kamdar, Dec 20, 2018
    #35
    panam likes this.


  11. Rais Ahmed

    Rais Ahmed Member


    Definitely sir. Thanks
     
    Rais Ahmed, Dec 21, 2018
    #36


  12. M K RAJU

    M K RAJU New Member


    SIR SEND ME CODE
     
    M K RAJU, Jul 12, 2019
    #37


  13. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Code is already attached in this thread.........
     
    Amit Kamdar, Jul 12, 2019
    #38
    panam likes this.


  14. udaya

    udaya Active Member


    sir u are great!!!!!!!
     
    udaya, Jul 13, 2019
    #39


  15. panam

    panam Member


    go to display-accountsbook- click or select on details monthly summary.
     
    panam, Oct 11, 2020
    #40


  16. panam

    panam Member


    dear tdl experts,
    Thanks for the original developer for sharing this amazing code.
    my suggestion & feed back regarding this code.
    This code is working fine but one small point request for getting total of total column.
     

    Attached Files:

    panam, Oct 11, 2020
    #41


  17. panam

    panam Member


    thank u sir for the sharing useful code.
     
    Last edited: Oct 11, 2020
    panam, Oct 11, 2020
    #42


  18. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Your problem is coming......due to CASH sales / POS Invoices........

    Total all the columns........the negative ones and positives one.... it comes to ZERO........hence it looks blank.

    You need to exclude the CASH ledger from the collection also.
     
    Last edited: Oct 11, 2020
    Amit Kamdar, Oct 11, 2020
    #43
    panam likes this.


  19. subash pal

    subash pal Member


    Sir Please Provide collection for party wise and whole year sales register
     
    subash pal, Jun 28, 2021
    #44


  20. NIRMALGHORAWATIN

    NIRMALGHORAWATIN New Member


    Code:
     
[#Object : Ledger]                               
    IsDebtorCreditor : $$IsBelongsTo:$$GroupSundryDebtors OR $$IsBelongsTo:$$GroupSundryCreditors Or $$IsBelongsTo:$$GroupCash
     
    NIRMALGHORAWATIN, Mar 15, 2024
    #45


Page 2 of 2

Share This Page