New to TDL: Need help in Voucher Creation TDL

Hey guys, I'm new to TDL world. I'm trying to create Accounting Vouchers by providing a menu in Gateway of Tally. Help me with this code.

[#Menu: Gateway of Tally]
Add: Item: Voucher : Menu : Voucher Create

[Menu: Voucher Create]
Item: Create Voucher : Create : CreateMyVoucher

[Report: Create My Voucher]
Form: CreateMyVoucher
Object: Voucher
Variable : SVViewName
Set : SVViewName : $$SysName:AcctgVchView

[Form: Create My Voucher]
Part: CreateMyVoucher
Vertical Align: Top
Horizontal Align: Left
On : Form Accept : Yes : From Accept
On : Form Accept : Yes : Create : CreateMyVoucher

[Part: Create My Voucher]

Line: CreateJournalVoucher, 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 Voucher View"
Local : Field : Name Field : Stoarge : PersistedView

[Line: Create Journal Voucher]
Field : Medium Prompt, Name Field
Local : Field : Medium Prompt : Set As : "Voucher Type : "
Local : Field : Name Field : Storage: VoucherTypeName

[Line: My Voucher Dr]
Field : Medium Prompt, Name Field
Local : Field : Medium Prompt : Set As : "By : "
Local : Field : Name Field : Storage : PartyLedgerName
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 : Amount

[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 : LedgerName
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 : Amount

[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, Short Date Field
Local : Field : Medium Prompt : Set As : "Date : "
Local : Field : Short Date Field : Storage : Date

[Line: My Vch Narration]
Field : Medium Prompt, Name Field
Local : Field : Medium Prompt : Set As : "Narration : "
Local : Field : Name Field : Storage : VCHNarration

[Collection: MyLedgerList]
Title : "List of Ledgers"
Type : Ledger
Format : $Name, 25
Fetch : Name
Full Height : Yes
Align : Right

 

Try with this Following Code

Code:

[#Menu: Gateway of Tally]
Add: Item: Voucher : Menu : Voucher Create

[Menu: Voucher Create]
Item: Create Voucher : Create Collection : CreateMyVoucher

[Collection: CreateMyVoucher]

    Type        : Voucher
    Child of    : ##SVCurrentDate
    Report      : Create My Voucher

[Report: Create My Voucher]
Form: CreateMyVoucher
Object: Voucher
Variable : SVViewName
Set : SVViewName : $$SysName:AcctgVchView

 

SIR CAN WE MAKE A NEW VOUCHER FROM GATEWAY OF TALLY

 

I think the above mentioned code is for the same purpose