1. CLICK HERE TO JOIN WHATSAPP CHANNEL FOR TDL PROGRAMS

Need Help Regardind data Fetch

Discussion in 'Free Source Codes' started by NainaSiraj, Jan 15, 2022.

    
  1. NainaSiraj

    NainaSiraj Member


    HI GOOD DAY
    KINDLY FIND THE ATTACHED CODE
    I WANT O ADD 1 COLUMN RENT TAX (JOURNAL vOUCHER) AND WANT TO FETCH DATA
    KINDY SEE SCREEN SHOOT AS WELL THANKS
    I WILL WATING YOUR REPLY
    PLZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ

    [#Menu:Gateway of Tally]
    Add:Button:Returns
    ;Add:Key Item:Tax Return:I:Display Collection:SJGroupColl00:NOT $$IsEmpty:$$SelectedCmps

    [Button:Returns]
    Title:"Returns Data"
    Key:ALT + I
    Action:Display Collection:SJGroupColl00

    [Collection:SJGroupColl00]
    Use:Remote My Ledger Coll00
    Delete:Report
    Add:Report:SJGroup00

    [Collection:Remote My Ledger Coll00]
    Use:Alias Collection
    Type:Ledger
    Variable:LedgerName
    Trigger:Remote Triggered Led Report00
    Report:Remote Final Led Report00
    Fetch:Name

    [Report:Remote Triggered Led Report00]
    Title:"Select Ledger"
    Form:Remote Triggered Led Report00
    Variable:SVFromDate, SVToDate
    Variable:DSPShowOpening, DSPShowClosing

    [Form:Remote Triggered Led Report00]
    Parts:Remote Triggered Led Report00

    [Part:Remote Triggered Led Report00]
    Lines:Remote Triggered Led Report00

    [Line:Remote Triggered Led Report00]
    Fields:Medium Prompt, Remote Triggered Led Report00
    Local:Field:Medium Prompt:Set as:"Ledger :"

    [Field:Remote Triggered Led Report00]
    Use:Name Field
    Table:Remote My Ledger Coll00
    Show Table:Always
    Modifies:LedgerName

    [System:Formulae]
    SundryDebtors00:$$IsBelongsTo:$$GroupSundryDebtors

    [Report:SJGroup00]
    Form:SJGroup00
    Object:VOUCHER:##VOUCHERID
    Title:""
    Print Set:REPORT TITLE:","
    Fetch Object:Ledger:#LedgerName:Name, LedgerContact, LedgerPhone, OpeningBalance, LedOpeningBalance, TBalOpening

    [Form:SJGroup00]
    Top Part:SJGroupTop00
    Space Top:0.3 INCH
    Space Left:0.5 INCH
    Space Right:0.3 INCH
    Space Bottom:0.10 INCH
    Button:print Button
    Button:changeperiod


    [Part:SJGroupTop00]
    Part:SJGroupTopCmp00,SJGroupTopCmpTit00
    Vertical:yes

    [Part:SJGroupTopCmp00]
    Line:SJGroupTopCmp00,SJGroupTopCAdd00,SJGroupTopCEMN00,SJGroupTopCEMN100

    [Line:SJGroupTopCmp00]
    Field:Name Field
    Local:Field:Name Field:Set as:mad:@CmpMailName
    Local:Field:Name Field:Full Width:Yes
    Local:Field:Name Field:Align:Center
    Local:Field:Name Field:Style:LARGE Bold
    Local:Field:Name Field:Border:Thin Bottom
    Local:Field:Name Field:print FG:Blue
    Local:Field:Name Field:Color:Blue

    [Line:SJGroupTopCAdd00]
    Field:Name Field
    Local:Field:Name Field:Set as:$$FullList:SJCompanyaddress:$Address
    Local:Field:Name Field:Full Width:Yes
    Local:Field:Name Field:Align:Center
    Local:Field:Name Field:Style:Normal Bold
    Local:Field:Name Field:Color:Blue
    Local:Field:Name Field:print FG:Blue

    [Collection:SJCompanyaddress1]
    Type:Address:Company
    Child Of:##SVCurrentCompany
    Filter:IsNotBlankAddr

    [Line:SJGroupTopCEMN00]
    Space Top:2
    Field:Name Field,Short Name Field
    Local:Field:Name Field:Set as:"Email:- " + $Email:Company:##SVCurrentCompany
    Local:Field:Name Field:Full Width:Yes
    Local:Field:Name Field:Align:Left
    Local:Field:Name Field:Style:Normal bold
    Local:Field:Name Field:Color:Green
    Local:Field:Name Field:print FG:Green


    Local:Field:Short Name Field:Set as:"Contact:-030 " + $MobileNumbers:Company:##SVCurrentCompany
    Local:Field:Short Name Field:Full Width:Yes
    Local:Field:Short Name Field:Align:Right
    Local:Field:Short Name Field:Style:Normal bold
    Local:Field:Short Name Field:Color:Green
    Local:Field:Short Name Field:print FG:Green


    [Line:SJGroupTopCEMN100]
    Space Top:1.5
    Field:Name Field,Short Name Field
    Local:Field:Name Field:Set as:""
    Local:Field:Name Field:Width:480
    Local:Field:Name Field:Align:cENTre
    Local:Field:Name Field:Style:large Bold
    Local:Field:Name Field:print fg:Royal Blue
    Local:Field:Name Field:Color:Green
    Local:Field:Name Field:Set as:$Name:Ledger:#LedgerName

    [Part:SJGroupTopCmpTit00]
    Line:SJGroupTopCmpTit0010,SJGroupTopCmpTit0070,SJGroupTopCmpTFDet0010,SJGroupTopCmpTFDet00,SJGroupTopCmpTFDet10
    Line:SJGroupTopCmpTFDet101,SJGroupTopCmpTFDet102,SJGroupTopCmpTFDet103,SJGroupTopCmpTFDet104
    Line:SJGroupTopCmpTFDet105,SJGroupTopCmpTFDet106,SJGroupTopCmpTFDet107,SJGroupTopCmpTFDet108,SJGroupTopCmpTFDet109

    [Line:SJGroupTopCmpTit0010]
    Field:Name Field
    Space top:1
    Local:Field:Name Field:Set as:"YEARLY RENT/CAM RECOVERY & TAX DEDUCTION SCHEDULE."
    Local:Field:Name Field:full Width:yes
    Local:Field:Name Field:Align:Center
    Local:Field:Name Field:print BG:ROYAL Green
    Local:Field:Name Field:Color:Green
    Local:Field:Name Field:Style:Normal Bold
    Local:Field:Name Field:print Fg:White
    Local:Field:Name Field:Background:Yellow






    [Line:SJGroupTopCmpTit0070]
    Left Fields:Name Field,SJGroupStart0130
    Right Fields:Short Name Field,SJGroupShNo0130,SJGroupShNo0140
    Border:Thin top

    Local:Field:Name Field:Set as:"Month:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left
    Local:Field:Name Field:print BG:Dark Green
    Local:Field:Name Field:Color:White
    Local:Field:Name Field:Style:Normal Bold
    Local:Field:Name Field:print fg:White
    Local:Field:Name Field:Background:Green

    Local:Field:Short Name Field:Set as:"Tax Month:"
    Local:Field:Short Name Field:Full Width:yes
    Local:Field:Short Name Field:Align:left
    Local:Field:Short Name:print BG:Dark Green
    Local:Field:Short Name Field:Color:White
    Local:Field:Short Name Field:Style:Normal Bold
    Local:Field:Short Name Field:print fg:White
    Local:Field:Short Name Field:Background:Green


    [Field:SJGroupStart0130]
    Use:Short Name Field
    Set as:Invoice Amt
    Align:left
    Width:50
    Style:Normal Bold
    Color:White
    Background:Green



    [Field:SJGroupShNo0130]
    Use:Name Field
    Set as:Rent Tax
    Align:left
    Width:30
    Style:Normal Bold
    Color:White
    Background:Green


    [Field:SJGroupShNo0140]
    Use:Name Field
    Set as:Total Credit/Recovery
    Align:Center
    Width:100
    Style:Normal Bold
    Color:White
    Background:Green





    [Line:SJGroupTopCmpTFDet0010]
    Left Fields:Name Field,SJGroupStart010
    Right Fields:Short Name Field,SJGroupShNo010
    Border:Thin top

    Local:Field:Name Field:Set as:"For Month July:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left
    Local:Field:Short Name Field:Set as:"Tax For Month July:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left


    [Field:SJGroupStart010]
    Use:Name Field
    Set as:$$AsDrAmt:$$FromValue:("01-07-19"):$$ToValue:("31-7-19"):$BsDebits:LEDGER:#LEDGERNAME
    Align:LEFT
    fULL Width:YES
    Style:Normal Bold



    [Field:SJGroupShNo010]
    Use:Name Field
    Set as:$$ascramt:$$FromValue:("01-07-2019"):$$ToValue:("31-07-2019"):$Bscredits:LEDGER:#LEDGERNAME
    Align:LEFT
    Full width:Yes
    Style:Normal Bold



    [Line:SJGroupTopCmpTFDet00]
    Left Fields:Name Field, SJGroupStart033
    Right Fields:Short Name Field, SJGroupShNo033



    Local:Field:Name Field:Set as:"For Month August"
    local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left

    Local:Field:Short Name Field:Set as:"Tax For Month August"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left




    [Line:SJGroupTopCmpTFDet10]
    Left Fields:Name Field, SJGroupStart141
    Right Fields:Short Name Field, SJGroupShNo0131

    Local:Field:Name Field:Set as:"For Month September:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month September:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart033]
    Use:name Field
    Set as:$$AsDrAmt:$$FromValue:("01-07-2019"):$$ToValue:("31-07-2019"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    fULL Width:YES
    Style:Normal Bold


    [Field:SJGroupShNo033]
    Use:Name Field
    Set as:$$AscrAmt:$$FromValue:("01-08-2019"):$$ToValue:("31-08-2019"):$Bscredits:LEDGER:#LEDGERNAME
    fULL Width:YES
    Style:Normal Bold



    [Line:SJGroupTopCmpTFDet101]
    Left Fields:Name Field, SJGroupStart142
    Right Fields:Short Name Field, SJGroupShNo0132

    Local:Field:Name Field:Set as:"For Month October:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month October:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Line:SJGroupTopCmpTFDet102]
    Left Fields:Name Field, SJGroupStart143
    Right Fields:Short Name Field, SJGroupShNo0133

    Local:Field:Name Field:Set as:"For Month November:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month November:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left




    [Field:SJGroupStart141]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-09-2019"):$$ToValue:("30-09-2019"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold

    [Field:SJGroupShNo0131]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-09-2019"):$$ToValue:("30-09-2019"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold



    [Field:SJGroupStart142]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-10-2019"):$$ToValue:("31-10-2019"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0132]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-10-2019"):$$ToValue:("31-10-2019"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold




    [Field:SJGroupStart143]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-11-2019"):$$ToValue:("30-10-2019"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0133]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-11-2019"):$$ToValue:("30-11-2019"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold



    [Line:SJGroupTopCmpTFDet103]
    Left Fields:Name Field, SJGroupStart144
    Right Fields:Short Name Field, SJGroupShNo0134

    Local:Field:Name Field:Set as:"For Month December:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month December:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart144]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-12-2019"):$$ToValue:("31-12-2019"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0134]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-12-2019"):$$ToValue:("31-12-2019"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold


    [Line:SJGroupTopCmpTFDet104]
    Left Fields:Name Field, SJGroupStart145
    Right Fields:Short Name Field, SJGroupShNo0135

    Local:Field:Name Field:Set as:"For Month January:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month January:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart145]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-01-2020"):$$ToValue:("31-01-2020"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0135]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-01-2020"):$$ToValue:("31-01-2020"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold



    [Line:SJGroupTopCmpTFDet105]
    Left Fields:Name Field, SJGroupStart146
    Right Fields:Short Name Field, SJGroupShNo0136

    Local:Field:Name Field:Set as:"For Month February:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month February:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart146]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-02-2020"):$$ToValue:("29-02-2020"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0136]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-02-2020"):$$ToValue:("29-02-2020"):$Bscredits:LEDGER:#LEDGERNAME
    Align:Left
    full width:yes
    Style:Normal Bold


    [Line:SJGroupTopCmpTFDet106]
    Left Fields:Name Field, SJGroupStart147
    Right Fields:Short Name Field, SJGroupShNo0137

    Local:Field:Name Field:Set as:"For Month March:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month March:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart147]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-03-2020"):$$ToValue:("31-03-2020"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0137]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-03-2020"):$$ToValue:("31-03-2020"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold

    [Line:SJGroupTopCmpTFDet107]
    Left Fields:Name Field, SJGroupStart148
    Right Fields:Short Name Field, SJGroupShNo0138

    Local:Field:Name Field:Set as:"For Month April:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month April:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart148]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-04-2020"):$$ToValue:("30-04-2020"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0138]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-04-2020"):$$ToValue:("30-04-2020"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold


    [Line:SJGroupTopCmpTFDet108]
    Left Fields:Name Field, SJGroupStart149
    Right Fields:Short Name Field, SJGroupShNo0139

    Local:Field:Name Field:Set as:"For Month May:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month May:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart149]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-05-2020"):$$ToValue:("30-05-2020"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:Left
    full Width:yes
    Style:Normal Bold


    [Field:SJGroupShNo0139]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-05-2020"):$$ToValue:("30-05-2020"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold




    [Line:SJGroupTopCmpTFDet109]
    Left Fields:Name Field, SJGroupStart150
    Right Fields:Short Name Field, SJGroupShNo0141

    Local:Field:Name Field:Set as:"For Month June:"
    Local:Field:Name Field:Width:120
    Local:Field:Name Field:Align:Left



    Local:Field:Short Name Field:Set as:"Tax For Month june:"
    Local:Field:Short Name Field:Width:248
    Local:Field:Short Name Field:Align:left



    [Field:SJGroupStart150]
    Use:amount Field
    Set as:$$AsDrAmt:$$FromValue:("01-06-2020"):$$ToValue:("30-06-2020"):$Bsdebits:LEDGER:#LEDGERNAME
    Align:Left
    full Width:yes
    Style:Normal Bold

    [Field:SJGroupShNo0141]
    Use:Amount Field
    Set as:$$AscrAmt:$$FromValue:("01-06-2020"):$$ToValue:("30-06-2020"):$Bscredits:LEDGER:#LEDGERNAME
    Align:left
    full width:yes
    Style:Normal Bold






    upload_2022-1-15_16-13-11.png
     
    Last edited: Jan 21, 2022
    NainaSiraj, Jan 15, 2022
    #1


Share This Page