Skip to Content

Not able to Change font size for barcode

Hi,

We have to modify an existing program and accomodate more characters in a barcode label which is printed directly through a zebra printer without a smartform or sapscript.Complete barcode is not getting printed on the label and therefore we want to reduce the size of barcode but not able identify on how to do so.

below is the code which we are not able to understand.

GV_PCODE TYPE STRING VALUE 'B10,10,0,E30,3,6,188,B,"',
GV_PCODE1 TYPE CHAR2 VALUE '"',
GV_PCODE2 TYPE STRING VALUE 'A50,115,0,4,1,1,N,"',
** gv_pcode2 TYPE string VALUE 'A38,115,0,4,1,1,N,"',

** BEGIN-REPLACE-BNT-20.04.2017
** TO OBTAIN GS1-128 BAR CODE
** gv_pcode3 TYPE string VALUE 'B30,10,0,1,2,6,101,N,"'.
GV_PCODE3 TYPE STRING VALUE 'B1,8,0,1E,2,6,103,N,"'.

CONCATENATE GV_PCODE2 '(01)0' WA_FINAL-EXTWG '(17)' WA_FINAL-VFDAT+0(6) '(10)' WA_FINAL-CHARG '(21)' WA_FINAL-SERNR
GV_PCODE1 INTO LV_BCODE.

CONCATENATE GV_PCODE3 '010' WA_FINAL-EXTWG '17' WA_FINAL-VFDAT+0(6) '10' WA_FINAL-CHARG '21' WA_FINAL-SERNR
GV_PCODE1 INTO LV_BCODE1.

WRITE:/ 'rN'.
WRITE:/ 'S5'.
WRITE:/ 'D10'.
WRITE:/ 'ZT'.
WRITE:/ 'JF'.
WRITE:/ 'O'.
WRITE:/ 'R120,0'.
** WRITE:/ 'R136,0'.
WRITE:/ 'f100'.
WRITE:/ 'N'.
** END-REPLACE-BNT-20.04.2017
WRITE:/ LV_BCODE.
WRITE:/ LV_BCODE1.
WRITE:/ 'P1'.
NEW-PAGE PRINT OFF.

ENDFORM. " GENERATE_LABEL_E129

Kindly guide on where to make the changes.

Add comment
10|10000 characters needed characters exceeded

  • Get RSS Feed

1 Answer

  • Jul 24, 2017 at 09:02 AM

    The only way you're going to solve this is to get a Zebra programming manual and manually decode what they are doing. I don't think any one on this site will give you an answer because the amount of research to get this (unless they have a programming manual handy) would be quite a lot...

    Why don't you take the opportunity to change it to a Smartform ?

    Add comment
    10|10000 characters needed characters exceeded