Hi All, Is there any latest developments on Bar Code Printing thru TDL (except the known method of using Font for Barcode) ? Please enlighten.
Sir, The source code is available in Tally Developer Book(7.2 Version) I here with attachment the code [#Form: Sales Order Color] Add: Print : VT LabelPrint Add:Button:VT LabelPrint [Button:VT LabelPrint] Actionrint Report:VT LabelPrint Key:ctrl+F6 [Report: VT LabelPrint] Form: VT LabelPrint Object: Voucher [Form: VT LabelPrint] Part: VT LabelPrint Width: 3 CMs [Part: VT LabelPrint] Line: VT LabelPrint Repeat: VT LabelPrint : Inventory Entries Scroll: Vertical [Line: VT LabelPrint] Line:VT IT line,VT Ino Line,VT TS Line,VT PN Line [Line:VT IT line] Field:VT IT Fld,VT DD Fld Space Top:.50 [Field:VT IT Fld] Use:Name Field set as:$Vouchertypename Style:Normal Width:5 Align:Centre [Field:VT DD Fld] Use : Due Date Field Storage : OrderDueDate Inactive : ($$IsSysName:$StockItemName) OR (($$ExplodeLevel < 1) AND @@OrdExplBatch) width:8 Style:Normal [Line:VT Ino Line] Field:VT Ino Fld,VT Qty Fld [Field:VT Ino Fld] Set as:$vouchernumber Style:Normal Width:5 Align:Centre [Field:VT Qty Fld] Use:Qty Primary Field Set as:$BilledQty style:Normal Format : "NoZero,Decimals:0" [Line:VT TS Line] Field:VT Service Type Prn Fld,VT Service [Field:VT Service Type Prn Fld] Use:Name Field Set as:$VTServicetype Style:Normal width: 8 [Field:VT Service ] Use:Name Field Set as:$VCServiceCat Style:Normal width: 8 [Line:VT PN Line] Field: VT Product Name Fld Explode: EIMoreLabels: $$Number:$BilledQty>1 Space Bottom: 1;;1.5 [Part: EIMoreLabels] Line :VT IT line,VT Ino Line,VT TS Line,VT More Lables [Line: VT More Lables] Field : VT Product Name Fld Explode : EIMoreLabels : $$Number:$BilledQty >($$ExplodeLevel+1) Space bottom: 1;;1.5 ;;1.5 [Field: VT Product Name Fld] Use: Name Field Set as: $StockItemName Style: Normal Bold Fullwidth:Yes Align:Centre ;;----------------------------- Service Type Entry Line ------------------------- [#Line:EI Columnone] Add:Right Fields:Before:VCH QtyTitle:VT Service Type Title Add:Right Field:Before:VT Service Type Title:VT SERvice Type;;,Vch Discamttitle,Vch Discpertitle,VCH Gross,Vchs Ratetitle [Field:VT Service Type Title] Info:"Service Type" Width:10 Style:Normal Bold Align:Right Invisible:Not @@ISSalesorder [Field:VT SERvice Type] Info:"Service Catagory" Width:10 Style:Normal Bold Align:Right Invisible:Not @@ISSalesorder [#Line:EI ColumnTwo] Add:Right Fields:Before:VCH ActualQtyTitle:VT Service Type Title Add:Right Field:Before:VT Service Type Title:VT SERvice Type Local:Field:VT Service Type Title:Info:"" Local:Field:VT SERvice Type:Info:"" [#Line: CI InvInfo] Add:Right Fields:Before:VCHActualQty:VT Service Type Fld Add:Right Field:Before:VT Service Type Fld:VC SERvice Type [#Line:EI Invinfo] Add:Right fields:Before:VCH ActualQty:VT Service Type Fld Add:Right Field:Before:VT Service Type Fld:VC SERvice Type [Field:VT Service Type Fld] Use:Name Field Storage:VTServicetype Style:Normal Table : Vt Service Type Show Table : Always Width:10 Invisible:Not @@ISSalesorder Inactive : $$IsEnd:$StockItemName OR @@NoBaseUnits [Field:VC SERvice Type] Use:Name Field Storage:VCServiceCat Style:Normal Table : VT Service Cat Show Table : Always Width:10 Invisible:Not @@ISSalesorder Inactive : $$IsEnd:$StockItemName OR @@NoBaseUnits [System:UDF] VTServicetype:String:715 VCServiceCat:String:716 [Collection:VT Service Type] ObjectC,LUND,POL,IR,Polish Title:"Service Cat" [ObjectC] Name:"Dryclean" [Object:LUND] Name:"Loundary" [ObjectOL] Name:"MTO" [Object:IR] Name:"Wash" [Objectolish] Name:"Polish" [Collection:VT Service Cat] Object:LS,MS,HS,NS,Stain,LSStain,MSStain,HSStain,NSStain Title:"Service Cat" [Object:LS] Name:"LS" [Object:MS] NAME:"MS" [Object:HS] Name:"HS" [Object:NS] Name:"NS" [Object:STAIN] Name:"STAIN" [Object:LSStain] Name:"LS/STAIN" [Object:MSSTAIN] NAME:"MS/STAIN" [Object:HSSTAIN] NAME:"HS/STAIN" [Object:NSSTAIN] NAME:"NS/STAIN"
Respected Sir, Thanks a lot for your valuable support ! May i have some favor from you as i am looking for printing the Bar Code Labels using Purchase Voucher. i.e. The Similar Number of Bar Code Labels can get printed as the materials arrived.
Thanks Sir, I am adding a file for your reference. Presently i am getting the Bar Codes vertically. I want to get the labels printed in A4 Size Paper with 56 Labels 4 x 14 labels. Is it Possile ?
Dear Deepak K Swain, Pls share your knowledge, i am also want to know how it is possible. Thanks in advance