SELECTED VOUCHERS DELETE HIGH SPEED

[#Line : DSP VchDetail]

Option : DSP VchDetailOwner : $$IsCmpOwner

[!Line : DSP VchDetailOwner]

Add : Keys : At end : Deleted Voucher Object, OptionalSelected

[Key: Deleted Voucher Object]

Title : $$LocaleString:"Delete"
Key : CTRL + F6
Action : Call : Deleted Voucher Object

[Function: Deleted Voucher Object]

001 : If : Not $$IsEmpty$$NumItems:SelectedMaster)
005 : Start Progress : ($$NumItems:SelectedMaster) :"COMPANY VOUCHERS IS DELETING": ##SVCURRENTCOMPANY : "**************DELETE PROCESSING**************"
010 : Start Batch Post: 500
020 : Walk Collection : Selected Master
030 : Show Progress : $$LoopIndex:$$Sprintf:"Files Deleting : %s - - %s - - %s":$Date:$VoucherNumber:$VoucherTypeName
040 : Set Target
050 : Delete Target
060 : End Walk
070 : End Batch Post
100 : End Progress
200 : End If

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

[Collection:Selected Master]

Data Source : Report : Selected

 

very nice

 

Add Confirmation message before delete..

 

Please Add this function

[Function: Deleted Voucher Object]

001 : If : Not $$IsEmpty$$NumItems:SelectedMaster)
002 : QUERY BOX : "Delete Vouchers ?" : Yes:No
003 : IF : $$LastResult
005 : Start Progress : ($$NumItems:SelectedMaster) :"COMPANY VOUCHERS IS DELETING": ##SVCURRENTCOMPANY : "**************DELETE PROCESSING**************"
010 : Start Batch Post: 500
020 : Walk Collection : Selected Master
030 : Show Progress : $$LoopIndex:$$Sprintf:"Files Deleting : %s - - %s - - %s":$Date:$VoucherNumber:$VoucherTypeName
040 : Set Target
050 : Delete Target
060 : End Walk
070 : End Batch Post
100 : End Progress
200 : End If
300 : End If

 

th

Thank you Sir !

 

Thank you Sir !

 

Hello!! How can i restore these deleted vouchers?? Please help

 

This TDL Not Working in Tally.Erp 9 R 6.6.3 , Please Rectify the code

[#Line : DSP VchDetail]

Option : DSP VchDetailOwner : $$IsCmpOwner

[!Line : DSP VchDetailOwner]

Add : Keys : At end : Deleted Voucher Object, OptionalSelected

[Key: Deleted Voucher Object]

Title : $$LocaleString:"Delete"
Key : CTRL + F6
Action : Call : Deleted Voucher Object

[Function: Deleted Voucher Object]

001 : If : Not $$IsEmpty$$NumItems:SelectedMaster)
005 : Start Progress : ($$NumItems:SelectedMaster) :"COMPANY VOUCHERS IS DELETING": ##SVCURRENTCOMPANY : "**************DELETE PROCESSING**************"
010 : Start Batch Post: 500
020 : Walk Collection : Selected Master
030 : Show Progress : $$LoopIndex:$$Sprintf:"Files Deleting : %s - - %s - - %s":$Date:$VoucherNumber:$VoucherTypeName
040 : Set Target
050 : Delete Target
060 : End Walk
070 : End Batch Post
100 : End Progress
200 : End If

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

[Collection:Selected Master]

Data Source : Report : Selected

 

Please Check. it is already working Tally ERP9 6.6.3.

Note - Select Voucher > Press Key CTRL + F6

 

Great.