2D Barcode (PDF417) in Smartforms

Question

Hi Gurus,
I have a Smartforms with 2D-Barcode (PDF417).
I have to use header, field separators and foot into the barcode ( [)>, RS, GS, EOT...).
I define these separators like this:
CONSTANTS:
c_head VALUE '\0X5B\0X29\0X3E',       " Complience Indicator
c_rs   VALUE '\0X1E',                 " Format Trailer Character
c_gs   VALUE '\0X1D',                 " Data Field Separator
c_eot  VALUE '\0X04'.                 " Message Trailer
and then fill my barcode variable like this:
CONCATENATE
c_head c_rs '06'              
c_gs '12SGTLVWAG01'      
c_gs '2L'   gv_werk_empf    
c_gs '1L'   label_data-ablad 
c_gs        gv_license_plate  
c_gs 'P'    label_data-kdmat   
c_gs 'Q'    gv_vemng       
c_gs 'B'    label_data-vhmku  
c_gs 'V'    label_data-eikto   
c_gs '12S'  label_data-vbeln  
*c_gs '1T'   label_data-charg  
c_gs c_rs c_eot 
INTO gv_pdf.
The problem is, when I scan my barcode I have the \ separator, and I can't delete it...
\06\12SGTLVWAG01\2L22\1L001X1\1JUN341382615100348063\P 0B1 200 345 E\Q1\B106925\V261988\12S0063397339\\
Any idea how I can delete this \ ?
Regards,
David

Answer 1

SAP ABAP Code to Generate PDF417 Barcodes
 Preparing SAP data to be printed as a linear barcode can be a pain at times; when 2D barcodes with proper field separators are required the pain factor goes up. Most of the problems come from trying to convince SAP to assign non-printing control characters to the output variable. So, I have written a small example which demonstrates both how to generate a PDF417 barcode and the steps required to assign special characters to a string in ABAP. SAPscript cannot handle 2D barcodes, so this code will only really work in SmartForms. 
DATA: gv_pdf417 TYPE string, 
      gv_date_old TYPE likp-wadat,
     gv_serial TYPE num9,
      gv_kdmat TYPE vwahn-kdmat,
      gv_meng TYPE char10,
     lf_masterorsingle TYPE char3,
      lf_hex_rs TYPE x LENGTH 4 VALUE '001E',
      lf_hex_gs TYPE x LENGTH 4 VALUE '001D',
      lf_hex_eot TYPE x LENGTH 4 VALUE '0004',
      lf_char_rs TYPE c,
      lf_char_gs TYPE c,
      lf_char_eot TYPE c.
FIELD-SYMBOLS: <lfs_rs>,
               <lfs_gs>,
               <lfs_eot>.
WRITE is_wahn-wadat TO gv_date_old yymmdd.
WRITE is_wahn-exidv+11(9) TO gv_serial.
" Get non-printing control characters set
ASSIGN lf_hex_rs TO <lfs_rs> CASTING TYPE c.
ASSIGN lf_hex_gs TO <lfs_gs> CASTING TYPE c.
ASSIGN lf_hex_eot TO <lfs_eot> CASTING TYPE c.
lf_char_rs = <lfs_rs>.
lf_char_gs = <lfs_gs>.
lf_char_eot = <lfs_eot>.
" Master or single label
IF is_wahn-zzmastersingle = 'M'.
        lf_masterorsingle = 'M'.
ELSE.
        lf_masterorsingle = 'S'.
ENDIF.
CONCATENATE
'[)>' lf_char_rs
'06' lf_char_gs
'P' gv_kdmat lf_char_gs
'Q' gv_menge lf_char_gs
'V' gv_lifnr lf_char_gs
'D' gv_date_old lf_char_gs
  lf_masterorsingle gv_serial
  lf_char_rs lf_char_eot
INTO gv_pdf417.
If all goes well, then the variable gv_pdf417 should contain a string like the one below (the characters in the angle brackets are the hex codes for the control characters). In SmartForms the variable should be output in a text area with using the PDF417 barcode character formatting (your basis team will have to install it if it is not already available). The barcode at the top of page is generated from the string below.