Hello Experts I need to know, What TDL Code or Field name (storage name) at voucher entry screen For Example ; Payment Entry, select Cash or Bank, next selecting ledger from List of Ledger <= here what name of this field. I want to do something using this. i will share it after complete. Plz. guid. Thanks -H.Patel
Dear Ketan Patel & Gunasekaran I need to know name of field, selecting second ledger from list of ledgers, as imageadded. Plz. guid. thanks
Dear HVG88 Please find the coding. [#Field: ACLSLed] Storage : Ledger Name Any dificult then revert back.
Thanks Mr. Gunasekaran Now i need what form name for ledger Screen From Gateway of Tally > Display > Account Books > Ledger > List of Ledger(Table to select a ledger) > Ledger Form (Party or Any Ledger) having Date, Particulars, Vch Type, Vch.No., Debit, Credit and so on.. I have to know that form name.?
Thanks a Lot, I have done what my purpose. Created a Button into Payment & Receipt Voucher Entry Screen, Pressing this Button, User get Ledger Report in Display mode., and Press Esc. to return back to Voucher Entry Screen.
Using Sample Reference file (Object Fetch.txt) available with TDL Samples folder, I had make changes in it, add Code button at Voucher Entry screen Remove Triggered Report code Changed #LedgerName to #ACLSLed where required I GOT RESULT. Thanks, Happy Tallying....
You have attached Sample Reference file (Object Fetch.txt) available with TDL Samples folder as you committed to share it after complete. Please attach the actual code.
Dear Garg I had shared it, and Experts (Mr. Guna, Mr. Ketan) or others understood, how it done, As here we have to learn ourselves, and do some extra from shared code, not to use readymade code.
Dear Manoj, If you have tally developer you can also do the same which H.Patel wants. As this type of solution already available in Tally since long. If you want to check then do as bellow. Go to Accounting Voucher, F8:Sales, Type any Stock Item Name, now if you see in Right side of screen you find button name "Stock Query" or press Alt+S, If you press it stock query report opens of that particular item. Now you have to check this code and you have to use it in your own way as per your requirement. Hope you can definatelly do it in now. Regards, Ritesh Mehta
Dear Mr. Patel, As you have not shared the codes for reference. Please find the codes below for the same. ;; Shows the Ledger Report in Vouchers for the Ledger Selected in all Vouchers ;; Key COmbination : ALT+Y [#Line : EI AccInfo] Add : Field : ACC LedNameVar Add : Key : RJ Show Ledger Report [Field : ACC LedNameVar] Use : Name Field Set as : $LedgerName Set Always : Yes Variable : LedgerName InVisible : Yes [Key : RJ Show Ledger Report] Key : ALT+Y Action : Display : LEdger Vouchers [System : Formula] [#Line: VCHACC Info] Add : Field : ACC LedNameVar Add : Key : RJ Show Ledger Report [#Line : EI COnsignee] Add : Field : ACC LedNameVar Add : Key : RJ Show Ledger Report [#Line: ACLSFixedLed] Add : Field : ACC LedNameVar Add : Key : RJ Show Ledger Report [#Line : ACLSInfo] Add : Field : ACC LedNameVar Add : Key : RJ Show Ledger Report **~~!! Share The Knowledge !!~~** !!!Happy Tallying!!! Manoj Garg
Dear Manoj Bhai thanks for sharing ! Can you please add Button for this TDL will be very Thankful for that
br bro try this..... [Button : Ledger Vouchers] Title : "Ledger Report" Key : Ctrl+L Action : Display Collection: Monthly Ledger Extract [#Form : Voucher] Add : Top Buttons : At Beginning : Ledger Vouchers
Hello sir, I edit tdl according to my requirement, ;;========== Narration Part ==================;; [#Field: VCH Narration] Use : Voucher Narration Field Lines : 4 Storage : Narration Set as : If ($$InCreateMode Or $$InAlterMode) And ($$IsReceipt:##SVVoucherType) And @@IsBankLedPresent And Not $$IsEmpty:#JLChequeNo And Not $$IsEmpty:#JLBnkName And Not $$IsEmpty:#JLBnchName then "Chq No. - " + #JLChequeNo + " dt. " + $$String:#JLChequeDt + " Drawn On " + #JLBnkName + ", " + #JLBnchName + "." else + If ($$InCreateMode Or $$InAlterMode) And ($$IsReceipt:##SVVoucherType ) And @@IsBankLedPresent And Not $$IsEmpty:#JLChequeNo And Not $$IsEmpty:#JLBnkName And $$IsEmpty:#JLBnchName then "Chq No. - " + #JLChequeNo + " dt. " + $$String:#JLChequeDt + " Drawn On " + #JLBnkName + "." else + If ($$InCreateMode Or $$InAlterMode) And ($$IsReceipt:##SVVoucherType ) And @@IsBankLedPresent And Not $$IsEmpty:#JLChequeNo And $$IsEmpty:#JLBnkName And $$IsEmpty:#JLBnchName then "Chq No. - " + #JLChequeNo + " dt. " + $$String:#JLChequeDt + "." else + If ($$InCreateMode Or $$InAlterMode) And ($$IsPayment:##SVVoucherType Or $$IsContra:##SVVoucherType) And @@IsBankLedPresent And Not $$IsEmpty:#JLChequeNo And $$IsEmpty:#JLBnkName And $$IsEmpty:#JLBnchName then "Chq No. - " + #JLChequeNo + " dt. " + $$String:#JLChequeDt + "." else $$IsEmpty:#JLChequeNo + $Narration Width : 65% Screen Key : PrevVchNarration, PrevLedNarration Set Always : Yes ;;====================adding at narration part ==================;; [#Line: ACLSTitle] Add: Left Fields: After: VCH NameTitle: JLChequNo, JLChequDt, JLBnkNam, JLBnchNam [Field: JLchequNo] Width : @@VCHNameWidth Setas : $$LocaleString:"Cheque No." Style : Normal Bold Indent : 4 Skip : Yes Fixed : Yes Invisible : (Not $$IsReceipt:##SVVoucherType) And (Not $$IsPayment:##SVVoucherType) And (Not $$Iscontra:##SVVoucherType) Inactive : Not @@IsBankLedPresent [Field: JLChequDt] Width : @@VCHNameWidth Setas : $$LocaleString:"Date" Style : Normal Bold Indent : 4 Skip : Yes Fixed : Yes Invisible : (Not $$IsReceipt:##SVVoucherType) And (Not $$IsPayment:##SVVoucherType) And (Not $$Iscontra:##SVVoucherType) Inactive : Not @@IsBankLedPresent [Field: JLBnkNam] Width : @@VCHNameWidth Setas : $$LocaleString:"Bank Name" Style : Normal Bold Indent : 4 Skip : Yes Fixed : Yes Invisible : (Not $$IsReceipt:##SVVoucherType) Inactive : Not @@IsBankLedPresent [Field: JLBnchNam] Width : @@VCHNameWidth Setas : $$LocaleString:"Branch Name" Style : Normal Bold Indent : 4 Skip : Yes Fixed : Yes Invisible : (Not $$IsReceipt:##SVVoucherType) Inactive : Not @@IsBankLedPresent [#Line: ACLSInfo] Add: Left Fields: After: VCHDirectTaxBills: JLChequeNo, JLChequeDt, JLBnkName, JLBnchName [Field : JLChequeNo] Use : Name Field Set as : $DueDateOfPymt Storage : DueDateOfPymt Invisible : (Not $$IsReceipt:##SVVoucherType) And (Not $$IsPayment:##SVVoucherType) And (Not $$Iscontra:##SVVoucherType) Set Always : Yes Inactive : Not @@IsBankLedPresent Or $$IsEndofList:#ACLSLed Width : @@VCHNameWidth Align : left [Field : JLChequeDt] Use : unidate Field Type : Date : Forced Storage : MyDate Set as : $Date Invisible : (Not $$IsReceipt:##SVVoucherType) And (Not $$IsPayment:##SVVoucherType) And (Not $$Iscontra:##SVVoucherType) Set Always : Yes Inactive : Not @@IsBankLedPresent Or $$IsEndofList:#ACLSLed Width : @@VCHNameWidth Align : left [Field : JLBnkName] use : Name Field set as : $BnkName storage : BnkName Invisible : (Not $$IsReceipt:##SVVoucherType) Set Always : Yes Inactive : Not @@IsBankLedPresent Or $$IsEndofList:#ACLSLed Width : @@VCHNameWidth Align : left [Field : JLBnchName] use : Name Field set as : $BnchName storage : BnchName Invisible : (Not $$IsReceipt:##SVVoucherType) Set Always : Yes Inactive : Not @@IsBankLedPresent Or $$IsEndofList:#ACLSLed Width : @@VCHNameWidth Align : left [*Field: VchBankAllocChequeNo] Use : InstrumentNumber Storage : InstrumentNumber Set By Condition: ($$InCreateMode And Not $$InCreateMode) And ($$IsReceipt:##SVVoucherType or $$IsPayment:##SVVoucherType or $$IsContra:##SVVoucherType): #JLChequeNo [*Field: VchBankAllocBankName] Use : BankName Storage : BankName Set By Condition: ($$InCreateMode And Not $$InCreateMode) And ($$IsReceipt:##SVVoucherType or $$IsPayment:##SVVoucherType or $$IsContra:##SVVoucherType): #JLBnkName [*Field: VchBankAllocBranch] Use : BranchName Storage : BranchName Set By Condition: ($$InCreateMode And Not $$InCreateMode) And ($$IsReceipt:##SVVoucherType or $$IsPayment:##SVVoucherType or $$IsContra:##SVVoucherType): #JLBnchName [System : udf] DueDateOfPymt : String : 1000 MyDate : Date : 1001 BnkName : String : 1002 BnchName : String : 1003 InstrumentNumber: String: 1004 BankName: String: 10005 BranchName: String: 1006 [System : Formula] AbcFilter : $$IsBelongsTo:$$GroupBank OR $$IsBelongsTo:$$GroupBankOD OR $$IsBelongsto:$$GroupCash IsBankLedger : ($$IsLedofGrp:$LedgerName:$$GroupBank Or $$IsLedofGrp:$LedgerName:$$GroupBankOD) IsBankLedPresent: $$FilterCount:AllLedgerEntries:IsBankLedger > 0 In above code I am not get alter cheque no in Instrument Number, alter bank name in Bank name and alter branch name in branch name in alter mode, in red color text plz solve my error it is need full to me
Respected Raju sir . thanks for your Help the button is visible now but the problem is that if we press this apart from ledger field then it shows error and close the tally on the other hand Hot key ALT+Y not hot key only works when Ledger field is selected in voucher entry. I will Try with this code to make changes but please you also suggest me in this regard
hello experts , I need a help , i am using old tally and i want that at the time of vch entry ledger can be searched from middle name also. please help with codes
Not Possible....lots of integral changes from Old version to new version. Also to make it possible the coder would also have to use OLD version.....and since TDL has also developed exponentially, it will not be possible. So upgrade your Tally to new version.
