Auto Cheque in Narration for Payment, Receipt and Contra

[#Field: VCH Narration]

Use : Voucher Narration Field
Lines : 4
Width : 65% Page
Storage : Narration
Set Always : Yes

Set as : If (($$IsReceipt:##SVVoucherType) And (Not ($$IsEmpty$$FullList:LedgerEntries:$MyBankAllocations))) And (Not ($$IsEmpty$LedgerEntries[1].BankAllocations.BankName))) And (Not ($$IsEmpty$LedgerEntries[1].BankAllocations.BranchName)))) Then +
"Chq No. - " + $$FullList:LedgerEntries:$MyBankAllocations + " dt. " + $$String:$LedgerEntries[1].BankAllocations.InstrumentDate + ", " + "Drawn on " + $LedgerEntries[1].BankAllocations.BankName + ", " + $LedgerEntries[1].BankAllocations.BranchName + "." +
else +
IF (($$IsReceipt:##SVVoucherType) And (Not ($$IsEmpty$$FullList:LedgerEntries:$MyBankAllocations))) And (Not ($$IsEmpty$LedgerEntries[1].BankAllocations.BankName))) And ($$IsEmpty$LedgerEntries[1].BankAllocations.BranchName))) Then +
"Chq No. - " + $$FullList:LedgerEntries:$MyBankAllocations + " dt. " + $$String:$LedgerEntries[1].BankAllocations.InstrumentDate + ", " + "Drawn on " + $LedgerEntries[1].BankAllocations.BankName + "." +
else +
IF (($$IsReceipt:##SVVoucherType) And (Not ($$IsEmpty$$FullList:LedgerEntries:$MyBankAllocations))) And ($$IsEmpty$LedgerEntries[1].BankAllocations.BankName)) And ($$IsEmpty$LedgerEntries[1].BankAllocations.BranchName))) Then +
"Chq No. - " + $$FullList:LedgerEntries:$MyBankAllocations + " dt. " + $$String:$LedgerEntries[1].BankAllocations.InstrumentDate + "." +
else +
If (($$IsPayment:##SVVoucherType) And (Not ($$IsEmpty$$FullList:LedgerEntries:$MyBankAllocations))) And ($$IsEmpty$LedgerEntries[1].BankAllocations.BankName)) And ($$IsEmpty$LedgerEntries[1].BankAllocations.BranchName))) Then +
"Chq No. - " + $$FullList:LedgerEntries:$MyBankAllocations + " dt. " + $$String:$LedgerEntries[1].BankAllocations.InstrumentDate + "." +
else +
If (($$IsContra:##SVVoucherType) And ($$IsEmpty$$FullList:LedgerEntries:$MyBankAllocations))) Then +
" " +
else +
If (($$IsContra:##SVVoucherType)) Then +
"Chq No. - " + $$FullList:LedgerEntries:$MyBankAllocations + " dt. " + $$String:$LedgerEntries[1].BankAllocations.InstrumentDate + "." else " "

[#Object : Ledger Entry]
MyBankAllocations : $$FullList:BankAllocations:$InstrumentNumber

I am getting errors using above tdl. Developers can help me to solve errors
1. If I enter 1 st transation in contra it display cheque no in narration after that any transation in contra it is not display cheque no in narration
2. In altermode i am not get alter cheque no in narration in receipt, payment and contra
3. In single entry mode only get cheque no in narration in receipt, payment and contra but not in single entry mode i am not get cheque number in narration in create mode and altermode

 

Hello Developers can any one provide solutions for above errors.
Thanks in Advance

 

Please, can any one provide solutions for above errors.
Thanks in Advance