Humble request to help

Discussion in 'Tally Developer' started by Rakesh Kumar, Jun 10, 2021.

    
  1. Rakesh Kumar

    Rakesh Kumar Member


    Respected Experts, I had a GST purchase report, in which the Basic value of which we are maintaining inventories is displaying, but the service basic value is not reflected. Screenshot is attached.

    [Field : MyVchAmount2x]
    Use : Amount Field
    Align : Right
    Width : 12
    Set As: $$CollAmtTotal:allinventoryEntries:$Amount



    ;Set as:$$FilterAmtTotal:allLedgerEntries:2:$Amount
    ;Set as : $$NettAmount:$GSTExpTaxableAmt:$GSTIncTaxableAmt
    ;Set As: $$CollAmtTotal:allinventoryEntries: $Amount

    I have tried a lot to do the same, but couldn't get the result.

    upload_2021-6-10_17-25-26.png
     


  2. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Try.......$$CollAmtTotal:LedgerEntries:$Amount ........ with a IF Condition in Set As.
     


  3. Rakesh Kumar

    Rakesh Kumar Member


    [Field : MyVchAmount2x]
    Use : Amount Field
    Align : Right
    Width : 12
    Set As: If $$CollAmtTotal:allinventoryEntries:$Amount else $$CollAmtTotal:LedgerEntries:$Amount




    ;Set as:$$FilterAmtTotal:allLedgerEntries:2:$Amount
    ;Set as : $$NettAmount:$GSTExpTaxableAmt:$GSTIncTaxableAmt
    ;Set As: $$CollAmtTotal:allinventoryEntries: $Amount

    Sir, not getting the result it is showing error.
     


  4. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Nice progress..........

    Now apply logic..........
    If Empty:ValueGST then ValueLED else ValueGST......

    look up in Developer and see how this syntax works.... in your case.... it will be --- if Empty:$$CollAmtTotal:allinventoryEntries: $Amount ....

    Keep on....and you will get it..........
     


  5. Rakesh Kumar

    Rakesh Kumar Member


    Amit Sir, yet to get the result.

    Also, I have tried to show the only Ledger Amount instead of inventory by adding the below line :
    $$CollAmtTotal:LedgerEntries:$Amount

    But, Sir every time, I got the error.

    Humble request u to please help me to resolve this.
     


  6. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    If $$IsEmpty:$$CollAmtTotal:allinventoryEntries:$Amount Then $$CollAmtTotal:LedgerEntries:$Amount Else $$CollAmtTotal:allinventoryEntries:$Amount
     


  7. Rakesh Kumar

    Rakesh Kumar Member


    Thanks a lot, Amit Sir for your prompt reply, but Sir, the problem still remains. Not picking up Ledger Amount.

    Please Sir, I request you with folded hand. please help me.
     


  8. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Sending your doctor a selfie and expecting him to diagnose your illness is not the right way. :):););)

    What you sent, we saw and we opined.

    You want proper results then submit codes.....as sometimes problems are due to collection, code structure etc..........
     
    PHOENIX HELIOS likes this.


  9. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    Also since you have service bills also...send dummy tally data also, so proper study can be done.

    Experts cannot make tally data for each and every module, it is very time consuming.
     


  10. PHOENIX HELIOS

    PHOENIX HELIOS New Member


    Cannot help much without seeing the entire code but you can try this in your Collection.

    Compute : ServiceCost : $AllLedgerEntries[1,@@IsExpLed].Amount... try adding more to make provision for two or more expenses head. This worked for me.
     


  11. Rakesh Kumar

    Rakesh Kumar Member


    Sir below is the full code. I red coloured the Field which I need to resolve.

    [#Menu : Gateway of Tally]
    Add : Item : GST Report1 : Menu : GST Report

    [Menu : GST Report]
    Add : Item : All GST Purchase : Display : GST Purchase
    Add : Item :""


    [Report : GST Purchase]
    Title: GST Purchase
    Variables : SV CurrentCompany

    Form :GST Purchase
    Variable : SVFromDate,SVToDate
    Set : SVFromDate : $$MonthStart:##SVCurrentDate
    Set : SVToDate : $$MonthEnd:##SVCurrentDate
    Set : Is Day Book : Yes

    [Form :GST Purchase]
    Space Right : 1.5
    Space left : 1.5
    ;Space tOP : 1.5
    ;Space Bottom : 1.5

    Part :DSP AccTitles, daybookheadbb2, GST Purchase,daybookbottam2 ;;,daybookhead22 ;;;daybookhead2,
    Buttons : ExplodeFlag,ChangeDybkDate,ChangePeriod
    BottomButton: BlankButton, RelReports, InvReports, AcctReports, Report Operations, FilterButton, ValueButton
    Buttons : PrintButton, ExportButton, UploadButton, MailButton
    Bottom Toolbar Buttons : BottomToolBarBtn1, BottomToolBarBtn2_EditVch, BottomToolBarBtn3, BottomToolBarBtn4, BottomToolBarBtn5, BottomToolBarBtn6, BottomToolBarBtn7, BottomToolBarBtn8, BottomToolBarBtn9, BottomToolBarBtn10, BottomToolBarBtn11, BottomToolBarBtn12
    Background : white

    Page Break : UsCs GI ClPgBrk2 , UsCs GI OpPgBrk2


    [Part: UsCs GI ClPgBrk2]

    Lines : UsCs GI ClPgBrk2

    [Line: UsCs GI ClPgBrk2]

    Fields : Simple Field
    Local : Field : Simple Field : Set As : "Continued..."
    Local : Field : Simple Field : FullWidth : Yes
    Local : Field : Simple Field : Align : Right
    Border : Full Thin Top


    [Part: UsCs GI OpPgBrk2]

    Parts : SD Title2, daybookheadbb2 ;;;;, UsCs GI Inventory Title
    Vertical : Yes





    [Part: SD Title2]
    Line: SD Title2, daybookheadB2

    [Line: SD Title2]

    Fields : Simple Field
    Local : Field : Simple Field : Set As : @@CmpMailName
    Local : Field : Simple Field : Align : Center
    Local : Field : Simple Field : FullWidth : Yes
    Local : Field : Simple Field : WideSpaced: Yes
    SpaceBottom : 1




    [Line :daybookheadB2]
    Field : Simple Field
    Local : Field : Simple Field : Info : "GST Purchase from " + $$String:##SVFromDate +" to " + $$String:##SVToDate


    ;;==================GST Purchase==============================



    [Part : daybookheadbb2]
    Use : GST Purchase
    Delete : Repeat
    Delete : Scroll
    Border : ColumnTitles
    Local : Field : Default : Type : string
    Local : Field : My Voucher Srl2 : Set As : "Sr.No"
    Local : Field : MyVoucherParty2: Set As : "Party Name"
    Local : Field : MyVchTIN2 : Set As : "GST No"
    Local : Field : MyVchNo2 : Set As : "Bill No"
    Local : Field : My Voucher Date2 : Set As : "Bill Date"
    Local : Field : Item : Set As : "Item Details"
    Local : Field : IE Qty : Set As : "Quantity"
    Local : Field : IGST PER:Set as:"%"
    Local : Field : HSNCodeSS : Set As : "HSN CODE"
    Local : Field : IGST PER1:Set as:"%"
    Local : Field : HSNCodeSS1 : Set As : "Ledger HSN CODE"
    Local : Field : MyVchAmount2x : Set As : "Basic Amount"
    Local : Field : MyVchfNo2 : Set As : "CGST "
    Local : Field : MyVchfNo3 : Set As : "SGST "
    Local : Field : MyVchfNo4 : Set As : "IGST "
    Local : Field : MyVchTotAmount2x : Set As : "Total Amount"

    Local :Field : Default : Style : Normal
    Local: Field: Default: Align: Center


    [Part :GST Purchase]
    Line : GST Purchase
    Repeat :GST Purchase :My Voucher Rep Collection2
    tOTAL : My Voucher Srl2,MyVchAmount2x,MyVchfNo4,MyVchfNo2,MyVchfNo3,MyVchfNo4,MyVchTotAmount2x
    Common Border : Yes
    Scroll : Vertical


    [Line :GST Purchase]
    Explode : stkitemdets : Yes


    Field :My Voucher Srl2,MyVoucherParty2,MyVchTIN2,MyVchNo2,My Voucher Date2, Item, IE Qty, IGST PER,HSNCodeSS, IGST PER1, HSNCodeSS1, MyVchAmount2x,MyVchfNo4,MyVchfNo2,MyVchfNo3,MyVchfNo4,MyVchTotAmount2x
    Option : Alter on enter
    Option : DisplayOnAltEnter
    ;Explode : My TB Inv Explosion : ##ExplodeFlag or $$KeyExplode
    Option:Colorfull display:$amount>10000
    [!Line:Colorfull Display]
    Local:Field:MyVoucherParty2:Color:Black
    Local:Field:MyVchAmount2x:Color:Black

    [Part: stkitemdets]
    Lines : stkitemdets
    Repeat : stkitemdets : Inventory Entries
    Scroll : Vertical

    [Line : stkitemdets]
    Field : My TB Inv ExplosionItem, IE Qty1, Percentage, HSN CODE, Basic ; here add other fields
    Indent : 5






    [Field: My TB Inv ExplosionItem]
    USe : Name field
    Set as : $StockItemName
    Width : 98
    Align: Right




    [Field: IE Qty1]
    USe : Number field
    Set as : $BilledQty
    Width : 9
    Align: Right





    [Field:percentage]
    Use: Number Field
    Set as:$GSTIGSTRate:Stockitem:$StockItemName
    Format : "NoZero,Percentage"
    Set Always: Yes
    Border : Thin Right
    Color : "Dark Green"
    Align:Center
    Width:6





    [Field: HSN CODE]
    Use : Name Field
    Set As : $GSTHSNCode:StockItem:$StockItemName
    Style : Small Italic
    Border : Thin Right
    Color : "Dark Green"
    Align:Center
    Width : 10




    [Field : Basic]
    Use : Amount Field
    Set As: $Amount
    Border : Thin Right
    Width : 25












    ;Option : Alter On Enter

    [Field :My Voucher Srl2]
    Use : Number Field
    SET AS:$$LINE
    Width : 4% Screen
    Align: Right
    Border : Thin LEFT Right


    [Field :My Voucher Date2]
    Use : Short Date Field
    Set As : $Date
    Border : Thin Right
    Format:"Short Date"


    [Field : MyVoucherParty2]
    Use : NAme Field
    Set As : $LedgerName ;;;$BASICBUYERNAME
    Width : 35
    Border : Thin Right
    Alter : Voucher
    Display : Ledger Vouchers:$$ISLedger
    Variable: Ledger Name

    [Field : MyVchTIN2]
    Use : Name Field
    Set As :$PartyGSTIN:Ledger:$PartyLedgerName
    Width : 11
    Border : Thin Right


    [Field : MyVchNo2]
    Use : NAme Field
    Set As : $REFERENCE
    Width : 10
    Border : Thin Right
    Align:Center


    [Field: Item]
    Use : Name Field
    Set As : $StockItemName
    Style : Small Italic
    Border : Thin Right
    Display : Item Vouchers:$$ISItem
    Variable: Item Name
    Color : "Dark Red"
    Align:Left
    Width : 30



    [Field: IE Qty]
    Use : Number Field
    Set as : $$CollQtyTotal:InventoryEntries:$BilledQty ;;;;$$Total:BilledQty
    Border : Thin Right
    Format : "NoSymbol"
    Align : Right
    Color : "Dark Red"
    Width : 10


    [Field:IGST PER]
    Use: Number Field
    Set as:$GSTIGSTRate:Stockitem:$StockItemName
    ;Set as:$(Stockitem,$stockitem).GSTIGSTRate
    Format : "NoZero,Percentage"
    Set Always: Yes
    ;Border : Thin Right
    Color : "Blue"
    Align:Center
    Width:4

    [Field: HSNCodeSS]
    Use : Name Field
    Set As : $GSTHSNCode:StockItem:$StockItemName
    Style : Small Italic
    ;Border : Thin Right
    Color : "Blue"
    Align:Center
    Width : 10

    [Field:IGST PER1]
    Use: Number Field
    Set as:$GSTIGSTRate:Ledger:($$FuncDSPLedAccName:$IsPayroll:##DSPNameStyle)
    ;Set as:$(Stockitem,$stockitem).GSTIGSTRate
    Format : "NoZero,Percentage"
    Set Always: Yes
    Border : Thin Right
    Color : "Dark Green"
    Align:Center
    Width:4

    [Field: HSNCodeSS1]
    Use : Name Field
    Set As : $GSTHSNCode:Ledger:($$FuncDSPLedAccName:$IsPayroll:##DSPNameStyle)
    Format : "NoZero,Value"
    Style : Small Italic
    Border : Thin Right
    Color : "Dark Green"
    Align:Center
    Width : 8


    [Field : MyVchAmount2x]
    Use : Amount Field
    Align : Right
    Width : 12
    Set As: If $$IsEmpty:$$CollAmtTotal:allinventoryEntries:$Amount Then $$NettAmount:$GSTExpTaxableAmt:$GSTIncTaxableAmt Else $$CollAmtTotal:allinventoryEntries:$Amount




    ;Set as:$$FilterAmtTotal:allLedgerEntries:2:$Amount
    ;Set as : $$NettAmount:$GSTExpTaxableAmt:$GSTIncTaxableAmt
    ;Set As: $$CollAmtTotal:allinventoryEntries: $Amount
    ;Compute : ServiceCost : $AllLedgerEntries[1,@@IsExpLed].Amount

    ;Border : Thin Right



    ;***********************
    [Field : MyVchfNo2]
    Use : Amount Forex Field
    Set as:$$FilterAmtTotal:LedgerEntries:CGST1:$Amount; $CGSTAmount is ok
    Border : Thin Right
    Width : 9

    ;***********************
    [Field : MyVchfNo3]
    Use : Amount Forex Field
    Set as : $$FilterAmtTotal:LedgerEntries:SGST1:$Amount;$SGSTAmount
    Border : Thin Right
    Width : 9

    ;***********************
    [Field : MyVchfNo4]
    Use : Amount Forex Field
    Set as : $$FilterAmtTotal:LedgerEntries:IGST1:$Amount;$IGSTAMOUNT ; this problems
    Border : Thin Right
    Width : 9

    ;***********************

    [Field : MyVchTotAmount2x]
    Use : Amount Field
    Set As : $Amount
    Border : Thin Right

    ;***********************


    [System: Formula]
    SGST :$$FilterAmtTotal:LedgerEntries:SGST1:$Amount
    SGST1 :$Name:Ledger:$LedgerName Contains $$LocaleString:"SGST"

    CGST :$$FilterAmtTotal:LedgerEntries:CGST1:$Amount
    CGST1 :$Name:Ledger:$LedgerName Contains $$LocaleString:"CGST"

    IGST :$$FilterAmtTotal:LedgerEntries:IGST1:$Amount
    IGST1 :$Name:Ledger:$LedgerName Contains $$LocaleString:"IGST"




    [Collection : My Voucher Rep Collection2]
    Type : Ledger
    ;Sort : Default : $BASICBUYERNAME
    Type : Vouchers
    Walk : allLedgerEntries
    Filter : IsSalesVT2 ;;;;,CSTFilter2 ;;,Recfiltee2
    Fetch : Date,Amount,VoucherTypeName ,PArtyLedgerName,VoucherNumber,REFERENCE,ReferenceDate, Item, IE Qty,HSNCodeSS, HSNCodeSS1, GSTDutyAmount,BASICBUYERNAME,CGSTAmount,SGSTAmount,IGSTAmount

    Fetch : *.*

    Compute:IGSTAmount:$$CollAmtTotal:InventoryEntries:$Amount * $(Stockitem,$stockitem).GSTIGSTRate / 100 ; ledger entries
    Compute:CGSTAmount :$$CollAmtTotal:InventoryEntries:$Amount * $(Stockitem,$stockitem).GSTIGSTRate / 100/2
    Compute:SGSTAmount:$$CollAmtTotal:InventoryEntries:$Amount * $(Stockitem,$stockitem).GSTIGSTRate / 100/2

    [Part: daybookbottam2]

    Lines : daybookTotalLine2

    [Line: daybookTotalLine2]

    Use : GST Purchase
    Local: Field: Default : Style : Small Bold
    ;Local: Field: Default: Type: String
    Local: Field: Default: Align: Right
    Local : Field : My Voucher Srl2 : Set as:$$NumItems:MyVoucherRepCollection2;$$PrevLine:#MyVoucherSrl2
    Local : Field : MyVoucherParty2: Set As : "Total"
    Local : Field : MyVchNo2 : Set As : ""
    Local : Field : MyVchAmount2x : Set As : $$Total:MyVchAmount2x
    LOCAL : FIELD: MyVchfNo2:Set as:$$Total:MyVchfNo2
    LOCAL : FIELD: MyVchfNo3:Set as:$$Total:MyVchfNo3
    LOCAL : FIELD: MyVchfNo4:Set as:$$Total:MyVchfNo4
    LOCAL : FIELD: MyVchTotAmount2x:Set as:$$Total:MyVchTotAmount2x



    Border : Totals

    [System: Formula]

    IsSalesVT2 : $$IsPurchase:$VoucherTypeName


    CSTFilter2 : not ##IsRevChargeAppl
     


Share This Page