Hi Experts, I'm new to TDL. I was successful in creating Ledgers by providing a option in Gateway of Tally. Following is Ledger Creation 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 isplayMyLedger [Form : DisplayMyLedger] Use :AlterMyLedgers Delete : On : Form Accept : yes : Alter : AlterLedgerReport Add : On : Form Accept : yes : Display : AlterLedgerReport ========================================================================== Now, my question is that can we create Voucher (like Journal, Payment, etc) like Ledger creation mentioned above? I have created a TDL for Voucher: [#Menu: Gateway of Tally] Add: Item: Voucher : Menu : Voucher Create [Menu: Voucher Create] Item: Create Voucher : Create: CreateMyVoucher Item: Alter Voucher : Execute: AlterMyVoucher Item: Display Voucher: Execute: DisplayMyVoucher [Report: Create My Voucher] Form: CreateMyVoucherForm Object: Voucher Variable : SVViewName Set : SVViewName : $$SysName:AcctgVchView [Form: Create My VoucherForm] Part: CreateMyVoucherPart Vertical Align: Top Horizontal Align: Left On : Form Accept : Yes : From Accept On : Form Accept : Yes : Create : CreateMyVoucher [Part: CreateMyVoucherPart] Line: CreateJournalVoucher, MyVoucherParty, MyVoucherDr, MyVoucherAmountDr/*, DrTypeofRef*/, MyVoucherCr, MyVoucherAmountCr/*, CrTypeofRef*/, MyVoucherDate, MyVchNarration, MyVoucherView [Line: My Voucher View] Field : Medium Prompt, Name Field Local : Field : Medium Prompt : Set As : "Accounting Vouchers" Local : Field : Name Field : Storage : PersistedView [Line: Create Journal Voucher] Field : Medium Prompt, My Voucher Type Local : Field : Medium Prompt : Set As : "Voucher Type : " [Field : My Voucher Type] Use : VoucherTypeName Storage: VoucherTypeName [Line: My Voucher Party] Field : Medium Prompt, Name Field Local : Field : Medium Prompt : Set As : "Party Ledger Name : " Local : Field : Name Field : Storage : PartyLedgerName Local : Field : Name Field : Table : MyLedgerList Local : Field : Name Field : Show Table : Always [Line: My Voucher Dr] Field : Medium Prompt, Name Field Local : Field : Medium Prompt : Set As : "By : " Local : Field : Name Field : Storage : DrLedgerName Local : Field : Name Field : Table : MyLedgerList Local : Field : Name Field : Show Table : Always [Line: My Voucher Amount Dr] Field : Medium Prompt, Amount Field Local : Field : Medium Prompt : Set As : "Debit : " Local : Field : Amount Field : Storage : Vch DrAmt /* [Line: Dr Type of Ref] Field : Medium Prompt, Name Field Local : Field : Medium Prompt : Set As : "Type of Ref : " Local : Field : Name Field : Storage : DrRef */ [Line: My Voucher Cr] Field : Medium Prompt, Name Field Local : Field : Medium Prompt : Set As : "To : " Local : Field : Name Field : Storage : CrLedgerName Local : Field : Name Field : Table : MyLedgerList Local : Field : Name Field : Show Table : Always [Line: My Voucher Amount Cr] Field : Medium Prompt, Amount Field Local : Field : Medium Prompt : Set As : "Credit : " Local : Field : Amount Field : Storage : VchCrAmt /* [Line: Cr Type of Ref] Field : Medium Prompt, Name Field Local : Field : Medium Prompt : Set As : "Type of Ref : " Local : Field : Name Field : Storage : CrRef */ [Line: My Voucher Date] Field : Medium Prompt, Uni Date Field Local : Field : Medium Prompt : Set As : "Date : " Local : Field : Short Date Field : Storage : Date [Line: My Vch Narration] Field : Medium Prompt, MyNarration Local : Field : Medium Prompt : Set As : "Narration : " [Field : MyNarration] Use : VCH Narration Storage : VCH Narration [Line: My Voucher View] Field : MyVoucherView [Field : MyVoucherView] Use : PersistedView Storage : ##SVViewName [Collection: MyLedgerList] Title : "List of Ledgers" Type : Ledger Format : $Name, 25 Fetch : Name Full Height : Yes Align : Right ========================================================================== I know this is not the right way to create Voucher Object. It will be very helpful if any experts can go through this TDL and help me.