BELOW FIND TDL:

[Button        :     Refresh TDL]

Title         :     “Refresh TDL”
Key          :     Ctrl+Z
Action      :     Refresh TDL

[#Form         :     Default]

Add          :    Top Button    :    At Beginning      :     Refresh TDL

[#Menu        :    Main Menu]

Add          :    Top Button    :    At Beginning     :     Refresh TDL

[#Menu        :    Default]

Add          :    Top Button    :    At Beginning     :     Refresh TDL

[#Form         :    Voucher]

Add          :    Top Button    :    At Beginning     :     Refresh TDL

BELOW FIND TDL:

BELOW FIND TDL:

[Line : My Ledger Bank Account]

Field :My Ledger Bank Account

[Field :My Ledger Bank Account]
Set As : $LEDBankAccountNo
Width : 20

[Line : MyLedger Phone]

Field :MyLedger Phone

[Field :MyLedger Phone]

Set As : $LedgerPhone

BELOW FIND TDL:

[#Menu : Gateway of Tally]

Add : Item : My Symbols : Display : My Symbols

[Report : My Symbols]

Form  : My Symbols
Object : Ledger : “GetMyTdl”

[Form :My Symbols]

Part :My Symbols
[Part :My Symbols]

Line :My Symbols
[Line :My Symbols]

Field :My Symbols1 , My Symbols 2

[Field : My Symbols1]

Use : Name Field
Set As :  $$CaseConvert:LowerCase:$Name
Border : Thin Box

[Field :My Symbols2]

Use : Name Field
Set As : $$CaseConvert:LowerCase:$LedgerContact
Border : Thin Box

[#Menu : Gateway of tally]

Add : Item : My Report – Ledger : Display : MyReport
Add : Item : My Report – Stock : Display : MyReportStock

[Report : My Report]

Form :My Report
Variable : SVFromDate,SVToDate
Set : SVFromDate  : $$FinyearBeg:##SVCurrentDate:$Startingfrom:Company:##SVCurrentCompany
Set : SVToDate : ##SVCurrentDate

[Form :My Report]

Part : Report MainTL,My ReportTL,My Report
Bottom Part : My ReportBTM
Button : Change Period
Back ground : Light Lily White

[PArt : Report MainTL]

Line : Report MainTL

[Line :Report MainTL]

Field :Report MainTL

[Field :Report MainTL]

Set As : “My Ledger Report From ” + $$String:##SVFromDate + ” to ” + $$string:##SVToDate

[PArt :My ReportTL]

Use : My Report
Delete : Repeat
Delete : Scroll
Local : Field : My Report : Set As : “Particulars”
Local : Field : My Report Closing: Set As : “Closing Balance”
Local : Field : Default : Type : String
Border : Column Titles
Local : Line : My Report :     Local : Field : Default : Style : Small Bold

[Part :My Report]

Line :My Report
Repeat : My Report : My Report Collection
Scroll : Vertical
Common Border : yes
Total : My Report Closing

[Line :My Report]

Field :My Report
Right Field : My Report Closing
Local : Field : Default : Style : Small

[Field :My Report]

Use : Name Field
Set As : $Name

[Field : My Report Closing]

Use : Amount Field
Set As : $ClosingBalance
Border : Thin Left
Format : “DRCR”

[Part : My ReportBTM]

Use : My Report
Delete : Repeat
Delete : Scroll
Delete : Total
Local : Field : My Report : Set As : “Total”
Local : Field : My Report Closing: Set As : $$Total:MyReportClosing
Border : Totals
Local : Line : My Report :     Local : Field : Default : Style : Small Bold

[Collection : My Report Collection]

Type : Ledger

;;—- A Stock report

[Report : MyReportStock]

Use : MyReport
Local : Collection :  My Report Collection : Type : Stockitem
Local : Part : My Report : Local : Line : My Report : Local : Field : My Report Closing : Type : Quantity
Local : Part : My ReportBTM : Local : Line : My Report : Local : Field : MyReport Closing : Type : Quantity

BELOW FIND TDL:

[#Menu : Gateway of tally]
Add : Item : My TrialBalance : Display : My Trial Balance
[Report : My Trial Balance]
Variable : SVFromDate,SVToDate
Set  : SVFrom Date : $$FinYearBeg:##SVCurrentDate:$StartingForm:Company:##SVCurrentCompany
Set  : SVTo Date :##SVCurrentDate
[Form :My Trial Balance]
Part : MT TBTitles,My Trial BalanceTL,My Trial Balance
Bottom Part : MY TBTOTAL
Back ground : Light Lily Yellow
Button  : Change Period
[Part : MT TBTitles]
Line :MT TBTitles
[Line :MT TBTitles]
Field : Simple Field
Local  : Field : Simple Field : Set As : “My Trail Balance form ” + $$String:##SVFromDate + ” To ” + $$String:##SVToDate
[Part :My Trial BalanceTL]
Use : My Trial Balance
Delete : Repeat
Delete : Scroll
Local : Field : My Trial Balance            : Set As : “Particulars”
Local : Field : My TBDRAmount         : Set As : “DR Amount”
Local : Field : My TBCRAmount         : Set As : “CR Amount”
Local : Field : Default : Type : String
Local : Line : My Trial Balance  : Local : Field : Default : Style : Small Bold
Local : Field : Default : Align : Center
Local : Field : My Trial Balance : Align : Left
Border : Column Titles
[Part :My Trial Balance]
Line :My Trial Balance
Repeat : My Trial Balance : MyTBColletion
Scroll : Vertical
Common Border : yes
Total : My TBDRAmount,My TBCRAmount
[Line :My Trial Balance]
Field :My Trial Balance
Right Field : My TBDRAmount,My TBCRAmount
Local : Field : Default : Style : Small
[Field :My Trial Balance]
Use      :  Name Field
Set As  :  $Name
Full Width : yes
[Field      :  My TBDRAmount]
Use      :  Amount Field
Border :  Thin Left
Set as   :  If $$IsDR:$ClosingBalance Then $ClosingBalance Else 0
[Field       :  My TBCRAmount]
Use      :  Amount Field
Set as   :  If Not $$IsDR:$ClosingBalance Then $ClosingBalance Else 0
Border :  Thin Left
[Part : MY TBTOTAL]
Use : My Trial Balance
Delete : Repeat
Delete : Scroll
Delete : Total
Local : Line : My Trial Balance : Local : Field : My Trial Balance     : Set As : “Total”
Local : Field : My TBDRAmount         : Set As : $$Total:MyTBDRAmount
Local : Field : My TBCRAmount         : Set As : $$Total:MyTBCRAmount
Border : Totals
[Collection : MyTBColletion]
Type : Ledger
Fetch : Name,ClosingBalance

BELOW FIND TDL:

[#Menu : Gateway of Tally]
Add : Item : Variable Report : Display : VariableReport
[Report : VariableReport]
Form         :     VariableReport
Variable     :     MyLocalVariable
[Form         :    VariableReport]
Part     :     VariableReport
Button     :     My Config
[Part     :    VariableReport]
Part     :     VariableReport1,VariableReport2,VariableReport3
[Part         :    VariableReport1]
Line         :    VariableReport
Width         :    25 % Page
Height         :    25 % Page
Back ground :    Green
Invisible     :      ##MyLocalVariable
[Line :VariableReport]
Field : name Field
Local : Field : Name Field : Set As : “Local Variable”
[Part         :    VariableReport2]
Use         :     VariableReport1
Local         :     Line : VariableReport : Local : Field : Name Field : Set As :”Global Variable”
Back ground :     Blue
Invisible     :     ##MyGlobalVariable
[Part         :    VariableReport3]
Use         :     VariableReport1
Local         :     Line : VariableReport : Local : Field : Name Field : Set As :”Persistent Variable”
Back ground :     Red
Invisible     :     ##MyPersistentVariable

[Button     :     My Config]
Key     :    F12
Action     :    Execute     :     My ConfigReport

[Report     :     My ConfigReport]
Form     :    My ConfigReport
[Form     :    My ConfigReport]
Part     :    My ConfigReport
[Part     :    My ConfigReport]
Line     :    My ConfigReport1,My ConfigReport2,My ConfigReport3
[Line     :    My ConfigReport1]
Field     :     Medium Prompt,Logical Field
Local     :    Field : Medium Prompt : Set As : “Set invisible – Green ?”
Local     :     field : Logical Field : Modifies : MyLocalVariable
[Line     :    My ConfigReport2]
Field     : Medium Prompt,Logical Field
Local     : Field : Medium Prompt : Set As : “Set invisible – Blue ?”
Local     : field : Logical Field : Modifies : MyGlobalVariable
[Line :My ConfigReport3]
Field : Medium Prompt,Logical Field
Local : Field : Medium Prompt : Set As : “Set invisible – Red ?”
Local : field : Logical Field : Modifies : MyPersistentVariable
;;—————–Local Variable
[Variable : MyLocalVariable]
Type : Logical
Default : No
;;——————- Global Variable
[Variable : MyGlobalVariable]
Type : Logical

[System : Variable]
MyGlobalVariable : No

COPY BELOW TDL:

[#Menu     : Gateway of Tally]
Item: My Group Summary : Display : MyGroupSummary
[Report : MyGroupSummary]
Variable  : MyGroupSummary
[Form     :    MyGroupSummary]
Part     :     MyGroupSummaryTL,MyGroupSummary
[Part     : MyGroupSummaryTL]
Border    :  Column titles
Use         :  MyGroupSummary
Delete     :  Repeat
Delete     :  Scroll
Local      :  Field : Default  : Type : String
Local      :  Field : MyGroupName : Set As : “Particulars”
Local      :  Field : MyGroupClosing : Set As : “ClosingBalance”
Local      :  Line  : MyGroupSummary : Local : Field : Default : Color : Black
[Part :MyGroupSummary]
Line :MyGroupSummary
Repeat : MyGroupSummary : MyGroupSummaryCollection
Scroll : Vertical
Total : MyGroupClosing
[Line :MyGroupSummary]
Field : MyGroupName
Right Field : MyGroupClosing
Local : Field : Default : Color : If $$IsGroup Then “Black” Else “Blue”
[Field : MyGroupName]
Use         : Name Field
Set As         : $Name
Variable     : MyGroupSummary
Display     : MyGroupSummary
Full width     : yes
Style         : If $$IsGroup Then “Small Bold” Else “Small”
[Field :  MyGroupClosing]
Use         :     Amount Field
Set As         :     $ClosingBalance
Style : If $$IsGroup Then “Small Bold” Else “Small”
[Collection : MyGroupSummaryCollection]
Collection : MyLedgerGroup,MyLedgers
[Collection : MyLedgerGroup]
Type :Group
Child of : ##MyGroupSummary
Filter : IsZeroBal
[Collection : MyLedgers]
Type : Ledger
Child of : ##MyGroupSummary
Filter : IsZeroBal
[system : Formula]
IsZeroBal : Not $$IsEmpty:$ClosingBalance
[Variable : MyGroupSummary]
Type : String
Volatile : yes

COPY BELOW TDL:

[#Menu : Gateway of Tally]
Add : Item : Ledger : Menu : MyLedger Create
[Menu : MyLedger Create]
Item : Create Ledger :  Create : CreateMyLedger
Item : Alter Ledger    :    Execute : AlterMyLedgers
Item : Display Ledger : Execute : DisplayMyLedger
[Report : CreateMyLedger]
Form :CreateMyLedger
Object : Ledger
[Form :CreateMyLedger]
Part :CreateMyLedger
Vertical Align : Top
Horizontal Align: Left
On : Form Accept : yes : Form Accept
On : Form Accept : yes : Create : CreateMyLedger
[Part :CreateMyLedger]
Line :CreateMyLedger,MyLedgerGroup,MyLedgerContact,MyLedgerPhone,MyLedger Opening
[Line :CreateMyLedger]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Name :”
Local : Field : Name Field : Storage   : Name
[Line :MyLedgerGroup]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Group :”
Local : Field : Name Field : Storage   : Parent
Local : Field : Name Field : Table   : MyLedgerGroup
Local : Field : Name Field : Show Table : Always
[Line :MyLedgerContact]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Contact Person :”
Local : Field : Name Field : Storage   : Ledger Contact
[Line :MyLedgerPhone]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Phone No. :”
Local : Field : Name Field : Storage   : Ledger Phone
[Line :MyLedger Opening]
Field : Medium Prompt,Amount Field
Local : Field : Medium Prompt : Set As : “Opening Balance :”
Local : Field : Amount Field : Storage :  Opening Balance
[Collection : MyLedgerGroup]
Title : “List of Groups”
Type : Group
Format : $Name,25
Fetch : Name
Full Height : yes
Align : Right

;;—- Ledger Alteration

[Report : AlterMyLedgers]
Form :AlterMyLedgers
[Form :AlterMyLedgers]
Part :AlterMyLedgers
VerticalAlign : Top
No Confirm : yes
On : Form Accept : yes : Alter : AlterLedgerReport
[Part :AlterMyLedgers]
Line :AlterMyLedgers
[Line :AlterMyLedgers]
Field :AlterMyLedgers
[Field :AlterMyLedgers]
Use : Name Field
Table : MyLedger List
Show Table : Always
[Report : AlterLedgerReport]
Object : Ledger : #AlterMyLedgers
Use: CreateMyLedger
Local : Form :CreateMyLedger : Delete:  On : Form Accept : yes : Create : CreateMyLedger
[Collection : MyLedger List]
Title : “List of Ledgers”
Type : Ledger
Format : $Name,25
Fetch : Name
Align : Center
Full Height : yes

;;————– Ledger Display

[Report : DisplayMyLedger]
Form :DisplayMyLedger
[Form : DisplayMyLedger]
Use :AlterMyLedgers
Delete : On : Form Accept : yes : Alter : AlterLedgerReport
Add : On : Form Accept : yes : Display : AlterLedgerReport

COPY BELOW TDL:

[#Menu     : Gateway of Tally]
Item: My Group Summary : Display : MyGroupSummary
[Report : MyGroupSummary]
Variable  : MyGroupSummary
Repeat : SVFromDate,SVToDate
ColumnReport : MyColumnReport
Set : SVFRomDate : $Booksfrom:Company:##SVCurrentCompany
Set : SVToDate : $LastVoucherDate:Company:##SVCurrentCompany
[Form     :    MyGroupSummary]
Part     :     MyGroupSummaryTL1,MyGroupSummaryTL2,MyGroupSummary
[Part     : MyGroupSummaryTL1]
Border     : Thin Top
Use     : MyGroupSummary
Delete     : Repeat
Delete     : Scroll
Local     : Field : Default  : Type : String
Local     : Field : MyGroupName : Set As : “Particulars”
Local     : Field : MyGroupClosing : Set As : “ClosingBalance”
Local     : Line  : MyGroupSummary : Local : Field : Default : Color : Black
[Part : MyGroupSummaryTL2]
Use : MyGroupSummaryTL1
Local : Field : MyGroupClosing : Set As : $$String:##SVFromDate + ” to ” + $$String:##SVToDAte
Local : Field : MyGroupName : Set As : “”
Border : Thin bottom
[Part :MyGroupSummary]
Line :MyGroupSummary
Repeat : MyGroupSummary : MyGroupSummaryCollection
Scroll : Vertical
Total : MyGroupClosing
[Line :MyGroupSummary]
Field : MyGroupName,MyGroupClosing
Repeat : MyGroupClosing
Local : Field : Default : Color : If $$IsGroup Then “Black” Else “Blue”
[Field : MyGroupName]
Use         : Name Field
Set As         : $Name
Variable     : MyGroupSummary
Display     : MyGroupSummary
Style         : If $$IsGroup Then “Small Bold” Else “Small”
[Field :  MyGroupClosing]
Use         :     Amount Field
Set As         :     $ClosingBalance
Style : If $$IsGroup Then “Small Bold” Else “Small”
[Collection : MyGroupSummaryCollection]
Collection : MyLedgerGroup,MyLedgers
[Collection : MyLedgerGroup]
Type :Group
Child of : ##MyGroupSummary
Filter : IsZeroBal
[Collection : MyLedgers]
Type : Ledger
Child of : ##MyGroupSummary
Filter : IsZeroBal
[System : Formula]
IsZeroBal : Not $$IsEmpty:$ClosingBalance
[Variable : MyGroupSummary]
Type : String
Volatile : yes
;;———————–
[Report : MyColumnReport]
Form :MyColumnReport
[Form :MyColumnReport]
Part :MyColumnReport
[Part :MyColumnReport]
Line :MyCulumn Titles,MyColumnReport1,MyColumnReport2
[Line : MyCulumn Titles]
Field : Name Field
Local : Field : Name Field : Info : “Column Details”
Local : Field : Name Field : Align : Center
[Line :MyColumnReport1]
Space Top : 1
Field : Short Prompt,Short date Field
Local : Field : Short Prompt : Set As : “From Date :”
Local : Field : Short Date Field : Modifies :SVFromDate
[Line :MyColumnReport2]
Space Top : 1
Field : Short Prompt,Short date Field
Local : Field : Short Prompt : Set As : “To Date :”
Local : Field : Short Date Field : Modifies :SVToDate

Create Collection ,Display Collection ,Alter Collection 
[#Menu : Gateway of Tally]
Add : Item : Ledger : Menu : MyLedger Create
[Menu : MyLedger Create]
Item : Create Ledger :  Create Collection : CreateMyLedger
Item : Alter Ledger    :    Alter Collection : CreateMyLedger
Item : Display Ledger : Display Collection : CreateMyLedger
[Collection : CreateMyLedger]
Type : Ledger
Report : CreateMyLedger
Trigger : AlterMyLedgers
Variable  : MyLedVariable
[Variable : MyLedVariable]
Type : String
[Report : CreateMyLedger]
Form :CreateMyLedger
Object : Ledger : #MyLedVariable
[Form :CreateMyLedger]
Part :CreateMyLedger
Vertical Align : Top
Horizontal Align: Left
[Part :CreateMyLedger]
Line :CreateMyLedger,MyLedgerGroup,MyLedgerContact,MyLedgerPhone,MyLedger Opening
[Line :CreateMyLedger]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Name :”
Local : Field : Name Field : Storage   : Name
[Line :MyLedgerGroup]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Group :”
Local : Field : Name Field : Storage   : Parent
Local : Field : Name Field : Table   : MyLedgerGroup
Local : Field : Name Field : Show Table : Always
[Line :MyLedgerContact]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Contact Person :”
Local : Field : Name Field : Storage   : Ledger Contact
[Line :MyLedgerPhone]
Field : Medium Prompt,Name Field
Local : Field : Medium Prompt : Set As : “Phone No. :”
Local : Field : Name Field : Storage   : Ledger Phone
[Line :MyLedger Opening]
Field : Medium Prompt,Amount Field
Local : Field : Medium Prompt : Set As : “Opening Balance :”
Local : Field : Amount Field : Storage :  Opening Balance
[Collection : MyLedgerGroup]
Title : “List of Groups”
Type : Group
Format : $Name,25
Fetch : Name
Full Height : yes
Align : Right
;;—- Trigger Report
[Report : AlterMyLedgers]
Form :AlterMyLedgers
[Form :AlterMyLedgers]
Part :AlterMyLedgers
VerticalAlign : Top
No Confirm : yes
[Part :AlterMyLedgers]
Line :AlterMyLedgers
[Line :AlterMyLedgers]
Field :AlterMyLedgers
[Field :AlterMyLedgers]
Use : Name Field
Table : MyLedger List
Show Table : Always
Modifies :MyLedVariable
[Collection : MyLedger List]
Title : “List of Ledgers”
Type : Ledger
Format : $Name,25
Fetch : Name
Align : Center
Full Height : yes