COPY & PASTE TDL FILE

Discussion in 'Requests' started by ONKAR, Jul 20, 2018.

    
  1. ONKAR

    ONKAR Active Member


    Dear All Expert, I Need Copy & Paste Button Tdl File, Can Anyone Help Me
     
    J P Shah likes this.


  2. ONKAR

    ONKAR Active Member


    Dear Sir, I need a further help from you, I have downloaded the TDL file of a barcode from the forum, and in it, I made some changes accordingly, but when I see the print preview I see only 2 times in the Barcode in 2 column. , Then I have to make some changes to it, so Sir, I have a small request from you, that you do me a Help, I have below attached the screenshots,


    But if I need 24 barcodes in 3 columns then can you give me this, I have done some editing in excel sheet, so the head should be accordingly.

    I have edited the PDF file using excel sheet, should have similar barcode printing in the Tally.
    BARCODE SCREEN SHOT.JPG
     

    Attached Files:



  3. ONKAR

    ONKAR Active Member


    yes sir, if possible then please help me
     


  4. ONKAR

    ONKAR Active Member


    sir see this tdl file & help me
     

    Attached Files:



  5. ONKAR

    ONKAR Active Member


    yes sir, 24 times the same item I want to print
     


  6. ONKAR

    ONKAR Active Member


    Dear Sir, whatever you have changed in the TDL file of the barcode, it is absolutely correct, just a little problem in it, sir, I have given the attached screenshot, it can create a 4-column barcode, sir and the last line on the second page SCREEN SHOT NO. 1.JPG SCREEN SHOT NO. 2.JPG . Sir, I am requesting you to make a little change in that.

    thank you, sir .
     


  7. mohsin khan

    mohsin khan New Member


    onkar ji can you share 3 coulmn barcode tdl file
     


  8. ONKAR

    ONKAR Active Member


    see this post already posted BARCODE 2
    Code:
    [#Form :SALES Color];; Add Print in sales
    Add : Print  : NS  Label
    Add    : Button :NSLabel
    [Button : NS Label]
        Action    :print Report:NS Label
        Key        :ctrl+F6
    
    [Report : NSLabel]
    Form : NSLabel
    Object : Voucher
    Print Set: ReportTitle : $$LocaleString:"NSLabel Print Label"
    
    [Form : NSLabel]
    Part : NSLabel
    
    [Part : NSLabel]
    Parts : NSPart1, NSPart2
    Vertical : No
    space top: 0.2
    
    [Part : NSPart2]
    Use : NSPart1
    
    [Part : NSPart1]
    Line : NSLabel
    Repeat : NSLabel : Inventory Entries
    Scroll : Vertical
    Width : 20% Page
    
    [Line : NSLabel]
    Field : NSLabel
    Explode : NSNLine
    Explode : NSMLable : $$Number:$BilledQty > = 1
    [#Field:VCH ActualQty]
    set as: "1"
    skip Forward : yes
    
    [Field : NSLine]
    Set as : $$Line
    Invisible : Yes
    
    [Field   : NSLabel]
    Use      : Name Field
    Set as   : $StockItemName
    Align    : Left
    Inactive : Yes
    
    [Part : NSNLine]
    Lines : NSNLine3, NSLName,NSNLine1, NSNLine4 , NSNLine2 ,NSNLine5
    
    [Line : NSLName]
    Fields : NSLine, NSLName ,
    
    [Field : NSLName]
    Use : Name Field
    Set as : "*" + $PartNo:Stockitem:$StockItemName + "*"
    Inactive : $$IsEven:$$ExplodeLevel
    Style : BarCode
    
    [Line : NSNLine1]
    Fields : NSLabel
    Local : Field : NSLabel : Set as : $Name:StockItem:$StockItemName
    Local : Field : NSLabel : Inactive: $$IsEven:$$ExplodeLevel
    
    [Line : NSNLine3]
    Fields : Info Field,
    Local : Field : Info Field : Info : "SHREE MAHALAXMI GENERAL STORES"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel
    
    [Line : NSNLine4]
    Fields : Info Field,
    Local : Field : Info Field : Info : "QTY: 1"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel
    
    [Line : NSNLine2]
    Fields : Info Field, NSRate
    Local : Field : Info Field : Info : "MRP:"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel
    
    [Line : NSNLine5]
    Fields : Info Field,
    Local : Field : Info Field : Info : "Per QTY ( Incl Of All Taxes )"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel
    
    [Field : NSRate]
    Use : Rate Price Field
    Set as : $Rate
    Align : Left
    Style : Normal
    Inactive : $$IsEven:$$ExplodeLevel
    
    [Part : NSMLable]
    Line : NSMLable
    
    [Line : NSMLable]
    Field : NSLabel
    Explode : NSMLable : $$Number:$BilledQty+ ($$ExplodeLevel + $$Line)*4
    [#Field:VCH ActualQty]
    set as: "1"
    skip Forward : yes
    
    [Style : BarCode]
    Font : IDAutomationHC39M
    Height :10
    
       
     


  9. Bhawna

    Bhawna Member


    Hi Onkar - I was going through the Barcode Solution and came across your post . Thanks for sharing . I am trying to modify the tdl as per my need but struggling on below areas . Hope you could help me on this

    1) Creating Barcode at the time of Purchase and Show MRP/ Standard Rate Instead of Purchase Cost. I could achieve it by modifying the Code (i am not too conversant with TDL but tried based on discussion in this forum)
    2) But whatever Qty I put in for purchase , the Print Preview shows only 2 Barcodes. Could you please check the code and Suggest changes
    3) I could Print Item Description also
    4) Pick Barcode on Alias instead of P/N
    5) Set size for Thermal barcode Printer . Is there a way to specify the size of Barcode Print Area

    Thanks again . Looking forward for your inputs !


     

    Attached Files:



  10. ONKAR

    ONKAR Active Member


    HI, BHAWANA, sure, I will help you, this code print perfectly for 24 times of barcode, please do not remove any of part if you have not info, see this

    SEE THIS IMAGE​

    BARCODE.jpg
     
    Bhawna likes this.


  11. Bhawna

    Bhawna Member


    Hi Onkar - Thanks a lot for your reply . Appreciate it. Could you please share the code , so that I could try and connect back for any queries .
    ----


     


  12. ONKAR

    ONKAR Active Member


    HI BHAWANA sure here is add this in the code
    NSNLine3

    then add this line, and next add this field

    [Line : NSNLine3]
    Fields : NSLabel,NSDescription
    Local : Field : Info Field : Info : "DESCRIPTION :"
    Local : Field : NSLabel : Inactive: $$IsEven:$$ExplodeLevel


    [Field : NSDescription]
    Use : Name Field
    Set as : $UserDescription
    Style : Normal
    Align : Right

    BE HAPPY, STAY HAPPY, :):):):)And one thing always helps others.
     


  13. Bhawna

    Bhawna Member


    Thanks Onkar - I tried the original file (Code Below) . I am getting only 2 Barcodes even if I add 10 Qty in the Sales Invoice . Attached Screenshot.
    Is there a latest version of the filer wherein you could get Print 8*3=24 barcodes .

    ----
    Code

    [#Form :SALES Color];; Add Print in sales
    Add : Print : NS Label
    Add : Button :NSLabel
    [Button : NS Label]
    Action :print Report:NS Label
    Key :ctrl+F6

    [Report : NSLabel]
    Form : NSLabel
    Object : Voucher
    Print Set: ReportTitle : $$LocaleString:"NSLabel Print Label"

    [Form : NSLabel]
    Part : NSLabel

    [Part : NSLabel]
    Parts : NSPart1, NSPart2
    Vertical : No
    space top: 0.2

    [Part : NSPart2]
    Use : NSPart1

    [Part : NSPart1]
    Line : NSLabel
    Repeat : NSLabel : Inventory Entries
    Scroll : Vertical
    Width : 20% Page

    [Line : NSLabel]
    Field : NSLabel
    Explode : NSNLine
    Explode : NSMLable : $$Number:$BilledQty > = 1
    [#Field:VCH ActualQty]
    set as: "1"
    skip Forward : yes

    [Field : NSLine]
    Set as : $$Line
    Invisible : Yes

    [Field : NSLabel]
    Use : Name Field
    Set as : $StockItemName
    Align : Left
    Inactive : Yes

    [Part : NSNLine]
    Lines : NSNLine3, NSLName,NSNLine1, NSNLine4 , NSNLine2 ,NSNLine5

    [Line : NSLName]
    Fields : NSLine, NSLName ,

    [Field : NSLName]
    Use : Name Field
    Set as : "*" + $PartNo:Stockitem:$StockItemName + "*"
    Inactive : $$IsEven:$$ExplodeLevel
    Style : BarCode

    [Line : NSNLine1]
    Fields : NSLabel
    Local : Field : NSLabel : Set as : $Name:StockItem:$StockItemName
    Local : Field : NSLabel : Inactive: $$IsEven:$$ExplodeLevel

    [Line : NSNLine3]
    Fields : Info Field,
    Local : Field : Info Field : Info : "SHREE MAHALAXMI GENERAL STORES"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel

    [Line : NSNLine4]
    Fields : Info Field,
    Local : Field : Info Field : Info : "QTY: 1"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel

    [Line : NSNLine2]
    Fields : Info Field, NSRate
    Local : Field : Info Field : Info : "MRP:"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel

    [Line : NSNLine5]
    Fields : Info Field,
    Local : Field : Info Field : Info : "Per QTY ( Incl Of All Taxes )"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel

    [Field : NSRate]
    Use : Rate Price Field
    Set as : $Rate
    Align : Left
    Style : Normal
    Inactive : $$IsEven:$$ExplodeLevel

    [Part : NSMLable]
    Line : NSMLable

    [Line : NSMLable]
    Field : NSLabel
    Explode : NSMLable : $$Number:$BilledQty+ ($$ExplodeLevel + $$Line)*4
    [#Field:VCH ActualQty]
    set as: "1"
    skip Forward : yes

    [Style : BarCode]
    Font : IDAutomationHC39M
    Height :10


     

    Attached Files:



  14. Amit Kamdar

    Amit Kamdar Administrator Staff Member


    What is the point of having a "hard coded" code?

    1. -- for every Company, you need to have a separate TDL.
    2 -- Manual specification of number of labels in above code..... Explode : NSMLable : $$Number:$BilledQty+ ($$ExplodeLevel + $$Line)*4 .. so for every invoice change, one needs to set this value.

    Try to get automated to save time and efforts.
     


  15. ONKAR

    ONKAR Active Member


    hi, bhawana code is already uploaded, just add this part, lines so you will get a description and 24 times of barcode, and which version of tally you have, it's perfectly working.

    SEE THIS IMAGE

    BARCODE.jpg
     
    Last edited: May 3, 2019


  16. Bhawna

    Bhawna Member


    Hello Amit - Thanks for your input. Really appreciate it. I am new to TDL coding and have started learning the structure. Will spend sometime figuring out the coding for the suggestion shared by you. Thanks again for the inputs
    ---


     


  17. Bhawna

    Bhawna Member


    Hi Onkar - I do not seem to find the code for 3*8=24 Prints. Would you mind sharing it again .
    I downloaded the earlier file (Dated July 23 ,2018) shared by you (named - "BARCODE 2") and added the description line into it. I am attaching the Code , Invoice and Output for your reference. I am still getting only 2 Barcodes Could you please check if this is the latest one . Thanks again for all the help :)

    P.S. - I am using Tally release 6.3
    Invoice.JPG Barcode Output.JPG


    ---

     

    Attached Files:



  18. ONKAR

    ONKAR Active Member


    hi bhawana , here is the final code , please load this tdl do not remove or change in this code , its perfectly working



    [#Form :pURCHASE Color];; Add Print in PURCHASE
    Add : Print : NS Label
    Add : Button :NSLabel
    [Button : NS Label]
    Action :print Report:NS Label
    Key :ctrl+F6

    [Report : NSLabel]
    Form : NSLabel
    Object : Voucher
    Print Set: ReportTitle : $$LocaleString:"NSLabel Print Label"

    [Form : NSLabel]
    Part : NSLAbleTop
    Full Height: Yes
    Full Width : Yes
    Space Left :5
    Space Top : 1


    [Part : NSLAbleTop]
    Part : NSLabelHor1, NSLabelHor2,NSLAbleTop3,NSLAbleTop4,NSLAbleTop5,NSLAbleTop6,NSLAbleTop7,NSLAbleTop8
    Vertical : Yes


    [Part : NSLAbleTop3]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSLAbleTop4]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSLAbleTop5]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSLAbleTop6]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSLAbleTop7]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSLAbleTop8]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSLabelHor2]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSLabelHor1]
    Parts : NSPart1, NSPart2,NSPart3
    Vertical : No
    space top: 0

    [Part : NSPart2]
    Use : NSPart1

    [Part : NSPart3]
    Use : NSPart1

    [Part : NSPart1]
    Line : NSLabel
    Repeat : NSLabel : Inventory Entries
    Scroll : Vertical
    Width : 32% Page

    [Line : NSLabel]
    Field : NSLabel
    Explode : NSNLine
    Explode : NSMLable : $$Number:$BilledQty > = 1

    [#Field:VCH ActualQty]
    set as: "1"
    skip Forward : yes

    [Field : NSLine]
    Set as : $$Line
    Invisible : Yes

    [Field : NSLabel]
    Use : Name Field
    Set as : $StockItemName
    Align : Left
    Inactive : Yes



    [Part : NSNLine]
    Lines : NSLName,NSNLine1, NSNLine4 , NSNLine2 ,NSNLine3, NSNLine5

    [Line : NSLName]
    Fields : NSLine, NSLName ,

    [Field : NSLName]
    Use : Name Field
    Set as : "*" + $PartNo:Stockitem:$StockItemName + "*"
    Inactive : $$IsEven:$$ExplodeLevel
    Style : BarCode


    [Line : NSNLine1]
    Fields : NSLabel
    Local : Field : NSLabel : Set as : $Name:StockItem:$StockItemName
    Local : Field : NSLabel : Inactive: $$IsEven:$$ExplodeLevel


    [Line : NSNLine4]
    Fields : Info Field,
    Local : Field : Info Field : Info : "QTY: 1"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel

    [Line : NSNLine2]
    Fields : Info Field, NSRate
    Local : Field : Info Field : Info : "MRP:"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel

    [Line : NSNLine3]
    Fields : NSLabel,NSDescription
    Local : Field : Info Field : Info : "DESCRIPTION :"
    Local : Field : NSLabel : Inactive: $$IsEven:$$ExplodeLevel

    [Line : NSNLine5]
    Fields : Info Field,
    Local : Field : Info Field : Info : "Per QTY ( Incl Of All Taxes )"
    Local : Field : Info Field : Inactive: $$IsEven:$$ExplodeLevel

    [Field : NSRate]
    Use : Rate Price Field
    Set as : $Rate
    Align : Left
    Style : Normal
    Inactive : $$IsEven:$$ExplodeLevel

    [Field : NSDescription]
    Use : Name Field
    Set as : $UserDescription
    Style : Normal
    Align : Right

    [Part : NSMLable]
    Line : NSMLable

    [Line : NSMLable]
    Field : NSLabel
    Explode : NSNLine
    Explode : NSMLable : $$Number:$BilledQty+ ($$ExplodeLevel + $$Line)*5


    [Style : BarCode]
    Font :idautomationhc39m
    Height : 8
     
    Bhawna likes this.


  19. Bhawna

    Bhawna Member


    Onkar - Thanks a lot for all your help . Really Appreciate it

    ---

     


  20. ONKAR

    ONKAR Active Member


    are you satisfied with this, then please share here your screenshots
     


  21. Bhawna

    Bhawna Member


    Hi Onkar

    It is working good except description is slightly misaligned . I will try and move it with the barcode and share . Thanks again for all the help


     

    Attached Files:



  22. ONKAR

    ONKAR Active Member



  23. Bhawna

    Bhawna Member



  24. ONKAR

    ONKAR Active Member


    @Bhawna , congratulation , good and keep it up
     


  25. Bhawna

    Bhawna Member


    @ONKAR- trust you are doing well. I am currently using a barcode for Stock Item (Alias) using the TDL. Is there a way I could use QR Code for Stock Item Labels? Would appreciate any inputs regarding the same. Thanks
     


Share This Page