04-05-2006 12:24 PM
Hello everybody in this forum,
does anybody know, how to print a barcode on a simple ABAP-report?
I recently read the docu about PRINT-CONTROL but I was not able to benefit of the explanations given in the way that the solution is clear now.
I tried with our own SPAD-device type and checked the table entries on TSP03 and T022D. As entries exist, I received an hexcode like '1B28733370323437303054'
WRITE : /.
PRINT-CONTROL FUNCTION 'SBP01'.
WRITE : '123456789'.
PRINT-CONTROL FUNCTION 'SBS01'.
But how to continue? Or maybe this ain't work in that way!
Thank you very much in advance.
Regards
Markus
04-05-2006 12:42 PM
I wonder whether you will have this functionality in reporting.
Cheers,
Abdul Hakim
04-05-2006 1:00 PM
hai markus,
here is a sample program to print barcode using report.
Sample ABAP Program:
DATA: BAR_CODE1(16) VALUE `ABC01230123A01'
NEW-PAGE PRINT ON IMMEDIATELY `X'.
FORMAT COLOR OFF INTENSIFIED OFF.
If the barcode is the first element on the page, the following Write
statement is needed (otherwise you get a date in the first print
control.
WRITE:/
Turn on the barcode font, print the data, and switch back to the
printer's default font. Be sure to use NO-GAP to avoid unwanted
characters or CR/LF.
PRINT-CONTROL FUNCTION `BCPFX'
WRITE: BAR_CODE1 NO-GAP
PRINT-CONTROL FUNCTION `BCSFX'
Add a Write statement to prevent insertion of CR/LF into the barcode.
WRITE:/
(or)
data: begin of precom9, "command for printer language PRESCRIBE
con1(59) value
'!R!SCF;SCCS;SCU;SCP;FONT62;UNITD;MRP0,-36;BARC21,N,''123456''',
con3(55) value
',40,40,2,7,7,7,4,9,9,9;MRP0,36;RPP;RPU;RPCS;RPF;EXIT,E;',
end of precom9.
...................
*replace 123456 of precom9+52(06) with the actual material number..
.....................
new-page print on. "barcode printer
Write: 'material number', precom9. "barcode for matnr
new-page print off.
hope this is helpful.
regards,
praba.
04-05-2006 1:12 PM
HI,
Refer this link:
http://www.makebarcode.com/info/appnote/app_024.html#Introduction
Regards,
Gayathri