how to get tax % , cgst , sgst value for taxable amount for selected period

Discussion in 'Free Source Codes' started by mayur sancheti12, Jun 29, 2021.

    

  1. please check this in tally prime , it not showing tax % and cgst, sgst. please someone correct my tdl.


    Code:
    [#Menu: Gateway of Tally]
        Add:Item:GST : Display: report2
    
    
    [Report     :report2]
        Form    :form1
        Object  :StockItem
       
    [Form    :form1]
       
        Part    :part1
               
        [Part    :part1]
            Line    : line1,line2
            Repeat    : line2:newcol;Subcoll;
            Border    : Thin Top Bottom
            Common Border: Yes
                       
            [Line        :line1]   
                Use    : line2
               
                Local:Field:Default    :Type: String
                Local:Field:srl        :Set as:"Srl no"
                Local:Field:vtypenew    :Set as:"Voucher type"
                Local:Field:Tx        :Set as:"TAX %"
                Local:Field:tval    :set as:"TAXABLE VALUE"
                Local:Field:CGSTVal    :set as:"CGST"
                Local:Field:SGSTVal    :set as:"SGST"
                Local:Field:IGSTVal    :set as:"IGST"
                Local:Field:CessVal    :set as:"Total"
                Border    : Thin Bottom
               
            [Line        :line2]
                Field    :srl,vtypenew,tx,tval;,StocNm
                Right Field:CGSTVal,SGSTVal,IGSTVal,CessVal
               
    [Field: srl]
        Use: number field
        Set as:$$Line
       
    [Field: vtypenew]
        Use: name field
        Set as:"Sales"
       
    [Field: tx]
        Use: number field
        Set as: $$CollectionField:$gstrt:2:Subcoll    ;$(StockItem, $Name).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsIGST].GSTRate
               
                [Field:tval]
                    Use    : number Field
                    Set as:$amt;$$CollectionField:$amt:1:newcol
                    Border: Thin Left
                    ;;Both are correct
                [Field:CGSTVal]
                    Use    : name Field                   
                    ;Set as: if ($GSTRateDutyHead = $$SysName:CGST) then $GSTRate else "";;By using collection
                    Set as:$trate;($(StockItem, $Name).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsCGST].GSTRate)*2
                    Border: Thin  Left Right
                   
                [Field:SGSTVal]
                    Use    : name Field
                    ;Set as: if ($GSTRateDutyHead = $$SysName:SGST) then $GSTRate else ""
                    Set as:$trate;($(StockItem, $Name).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsSGST].GSTRate)*2
                    Border: Thin Right
                   
                [Field:IGSTVal]
                    Use    : name Field
                    ;Set as: if ($GSTRateDutyHead = $$SysName:IGST) then $GSTRate else ""
                    Set as:$trate;$(StockItem, $Name).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsIGST].GSTRate
                    Border: Thin Right
                   
                [Field:CessVal]
                    Use    : name Field
                    ;Set as: if ($GSTRateDutyHead = $$SysName:Cess) then $GSTRate else ""
                    Set as:$(StockItem, $Name).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsAddlCess].GSTRate
                    Border: Thin Right
                   
    ;;Also correct
    [Collection    : Trycoll]
        Type    : StockItem
        Fetch    : Name
       
    [Collection    : Subcoll]
        Source Collection    : Trycoll
        Walk    : GSTDetails,StatewiseDetails,RateDetails
        Fetch    : .*
        Compute: $gstrt : $GSTRate
    ;;select * from Subcoll
    
    [collection: coll]
        Type        : Vouchers    : VoucherType   
        Child Of    : $$VchTypeSales
        Belongs To    : Yes
    ;select $vouchernumber from coll
    [collection: newcol]
    source collection: coll
    walk: ALLINVENTORYENTRIES
    Fetch:SFLD
    ;By: vchnum:$vouchernumber
    By: vch:$vouchertypename
    ;By: stk: $STOCKITEMNAME
    
      By: trate:  $SFLD;($(StockItem, $StockItemName).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsCGST].GSTRate)*2
    aggr compute: amt:sum:$amount
    ;select *from newcol
    ;Filter:fltnew
    ;Search Key:$trate
    
    [System: Formula]
        fltnew:$trate=#tx;$$AsRate:5
    ;search Key: $trate
    ;select $vchnum,$stk,$amt,$trate from newcol
    ;select $stk,$amt,$trate from newcol
    
    ;$$collectionfieldbykey:$amt:#tx:newcoll
    
    ;;;;;;;-------------------------------------------------------------------;;;;;;;;;;;;;;;;;;;
    [#Line: EI InvInfo]
        Add: Left Field: After: vchstockitem:tstfld
       
    [Field: tstfld]
        Use: number field
        Set as:($(StockItem, $StockItemName).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsCGST].GSTRate)*2
        Storage: sfld
       
    [System: UDF]
        sfld: Number:9001
    [Collection: ledcoll]
        Source Collection: coll
        Walk: allledgerentries
        By: vch:$vouchertypename
    ;    Compute: trate:  ($(StockItem, $StockItemName).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsCGST].GSTRate)*2
    
        By: led:$ledgername
        Compute: pr:$parent:ledger:$ledgername
        Filter: flt
        ;select $vch,$trate,$led from ledcoll
        [Collection: unicoll]
        Collection: newcol,ledcoll
        Fetch:*.*
    [System: Formula]
        flt:$pr="Duties & Taxes"
     


  2. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    [Collection : Subcoll]
    Source Collection : Trycoll
    Walk : GSTDetails,StatewiseDetails,RateDetails
    Fetch : .*
    Compute: gstrt : $GSTRate
     



  3. ok i remove $ but not getting related tax % .
    for example - 100 is taxable value for 5%
    2000 is taxable value for 18%, like that 12,28, 0, nil rate
     


  4. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Depends.... on your collection........

    From what i know, if it is Voucherwise then %age will come...if aggregate then how will it know which %age to show.
     


  5. Amit Kamdar

    Amit Kamdar Administrator Staff Member




  6. aggregate amount only , % is integrated tax fetch
     


  7. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    And....more important..........
    If a single voucher contains items of multiple Tax %age, then again it will be a problem, so you need to revise your collection and show it itemwise.
     





  8. can you show me
    this collection
     



  9. please help , how can i correct this code,
     



  10. now i have change code , which showing tax % , taxable value only cgst, sgst, igst not coming .
    as you told i have walk through all inventory entries. can someone help me in getting cgst, sgst, igst



    Code:
    [#Menu: Gateway of Tally]
        Add:Item:GST : Display: report2
    
    [Report     :report2]
        Form    :form1
        Object  :StockItem
    
    [Form : form1]
        Part : part1
    
    [Part    :part1]
        Line    : line1,line2
        Repeat    : line2:newcol;Subcoll;
        Border    : Thin Top Bottom
        Common Border: Yes
    
    [Line: line1]   
        Use    : line2
        Local:Field:Default    :Type: String
        Local:Field:srl        :Set as:"Srl no"
        Local:Field:vtypenew    :Set as:"Voucher type"
        Local:Field:Tx        :Set as:"TAX %"
        Local:Field:tval    :set as:"TAXABLE VALUE"
        Local:Field:CGSTVal    :set as:"CGST"
        Local:Field:SGSTVal    :set as:"SGST"
        Local:Field:IGSTVal    :set as:"IGST"
        Local:Field:CessVal    :set as:"Total"
        Border    : Thin Bottom
    
    [Line: line2]
        Field    :srl,vtypenew,tx,tval;,StocNm
        Right Field:CGSTVal,SGSTVal,IGSTVal,CessVal
    
    [Field: srl]
        Use: number field
        Set as:$$Line
    
    [Field: vtypenew]
        Use: name field
        Set as:"Sales"
    
    [Field: tx]
        Use: number field
        Set as: $trate
    
    [Field:tval]
        Use    : number Field
        Set as:$amt
        Border: Thin Left
       
    [Field:CGSTVal]
        Use    : name Field                   
        Set as:$trate
        Border: Thin  Left Right
    
    [Field:SGSTVal]
        Use    : name Field
        Set as:$trate
        Border: Thin Right
    
    [Field:IGSTVal]
        Use    : name Field
        Set as:$trate
        Border: Thin Right
    
    [Field:CessVal]
        Use    : name Field
        Set as:$(StockItem, $Name).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsAddlCess].GSTRate
        Border: Thin Right
    
    [collection: coll]
        Type        : Vouchers    : VoucherType   
        Child Of    : $$VchTypeSales
        Belongs To    : Yes
        ;select $vouchernumber from coll
    [collection: newcol]
        source collection: coll
        walk: ALLINVENTORYENTRIES
        Fetch:SFLD
        Compute: vch:$vouchertypename
        By: trate:  $SFLD
        aggr compute: amt:sum:$amount
    
    [System: Formula]
        fltn:$vch="sales1"
        ;select $vch,$trate,$amt from newcol
        fltnew:$trate=#tx;$$AsRate:5
        integrtx: $GSTRateDutyHead = 'Integrated Tax'
        flt:$pr="Duties & Taxes"
    
    [#Line: EI InvInfo]
        Add: Left Field: After: vchstockitem:tstfld
    
    [Field: tstfld]
        Use: number field
        Set as:($(StockItem, $StockItemName).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsCGST].GSTRate)*2
        Storage: sfld
    
    [System: UDF]
        sfld: Number:9001
    
     



  11. now i have change in code,
    Code:
    [#Menu: Gateway of Tally]
        Add:Item:GST : Display: report2
    
    [Report     :report2]
        Form    :form1
        Object  :StockItem
    
    [Form : form1]
        Part : part1
    
    [Part    :part1]
        Line    : line1,line2
        Repeat    : line2:newcol;Subcoll;
        Border    : Thin Top Bottom
        Common Border: Yes
    
    [Line: line1]  
        Use    : line2
        Local:Field:Default    :Type: String
        Local:Field:srl        :Set as:"Srl no"
        Local:Field:vtypenew    :Set as:"Voucher type"
        Local:Field:Tx        :Set as:"TAX %"
        Local:Field:tval    :set as:"TAXABLE VALUE"
        Local:Field:CGSTVal    :set as:"CGST"
        Local:Field:SGSTVal    :set as:"SGST"
        Local:Field:IGSTVal    :set as:"IGST"
        Local:Field:CessVal    :set as:"Total"
        Border    : Thin Bottom
    
    [Line: line2]
        Field    :srl,vtypenew,tx,tval;,StocNm
        Right Field:CGSTVal,SGSTVal,IGSTVal,CessVal
    
    [Field: srl]
        Use: number field
        Set as:$$Line
    
    [Field: vtypenew]
        Use: name field
        Set as:$vch
    
    [Field: tx]
        Use: number field
        Set as: $trate
        Format:Percentage
    [Field:tval]
        Use    :Amount Field
        Set as:$amt
        Border: Thin Left
        Width:23
    [Field:CGSTVal]
        Use    :Amount Field                  
        Set as:#tval*$cgst/100
        Border: Thin  Left Right
        Width:23
    [Field:SGSTVal]
        Use    :Amount Field
        Set as:#tval*$Sgst/100
        Border: Thin Right
        Width:23
    [Field:IGSTVal]
        Use    :Amount Field
        Set as:#tval*$Igst/100
        Border: Thin Right
        Width:23
    [Field:CessVal]
        Use    : Amount Field
        Set as:#IGSTVal+#tval
        Width:23
        Border: Thin Right
    
    [collection: coll]
        Type        : Vouchers    : VoucherType  
        Child Of    : $$VchTypeSales
        Belongs To    : Yes
        ;select $vouchernumber from coll
    [collection: newcol]
        source collection: coll
        walk: ALLINVENTORYENTRIES
        Fetch:SFLD
        Compute: vch:$vouchertypename
        By: trate:   $$GetGSTRate:$Date:@@Inv_GSTEntryLedgerName:$StockItemName:@@IGSTDutyHead
        Compute:cgst: $$GetGSTRate:$Date:@@Inv_GSTEntryLedgerName:$StockItemName:@@CGSTDutyHead
        Compute:SGST:$$GetGSTRate:$Date:@@Inv_GSTEntryLedgerName:$StockItemName:@@SGSTDutyHead
        Compute:IGST:$$GetGSTRate:$Date:@@Inv_GSTEntryLedgerName:$StockItemName:@@IGSTDutyHead
    
        aggr compute: amt:sum:$amount
       
    [System: Formula]
        fltn:$vch="sales1"
        ;select $vch,$trate,$amt from newcol
        fltnew:$trate=#tx;$$AsRate:5
        integrtx: $GSTRateDutyHead = 'Integrated Tax'
        flt:$pr="Duties & Taxes"
    
    [#Line: EI InvInfo]
        Add: Left Field: After: vchstockitem:tstfld
    
    [Field: tstfld]
        Use: number field
        Set as:($(StockItem, $StockItemName).GSTDetails[Last].StatewiseDetails[1, @@IsAnyState].RateDetails[1, @@IsCGST].GSTRate)*2
        Storage: sfld
    
    [System: UDF]
        sfld: Number:9001
    But how to handle this three cases,
    1) in case purchase as service suppose i purchase tally addon at 18% IGST tax , how can handle this case.
    2) in case for perticular period cgst, sgst blank , how interstate purchase will handle
    3) for perticular period how to show this(ex. from 1 may to 20 may)
     



  12. please help someone
    my output should as attached image
     

    Attached Files:



Share This Page