Printing Labels in Sapscript Printer SATO, Code 128

Hello Experts, i need your help.
Please, i want print labels in my form Sapscript. The printer is the type SATO and the code is 128.
The label is the material number.
I don't have any idea how to do it, what i must declare in my form, wich style. In the internet, i see that we do some calcul and we add some symbols. I don't understand why the calcul, what these symbols.
Please, can anybody explain me the steps and what i must do it?
Thank you very much.
<MOVED BY MODERATOR TO THE CORRECT FORUM>
Edited by: Alvaro Tejada Galindo on Jul 10, 2008 4:10 PM

--> Or else, you could do it in a more manual fashion. Condition records are required in this case also, when the event happen(eg : when Packing done in Delivery ), SAP creates a flat file, and save it in the destined folder.  Then, a person manually login to the Label software, select the particular label and the flatfile from which data should flow..and click print... In this case also, no sap script, no standard text...
It is your job to find, which approach your company is using...This is the way Bartender, Label shop Pro (Intermec Printers design tool ), Auto Label (autobag printers design tool )  etc work. Disclaimer  : i have never worked on either SATO or Label Gallery.
Now about Label Design..
1. You create a label using your label design tool. (it is just like Visual basic or even our dear SAP's screen design tool.)
2. you can drag and drop the barcodes, text containers, variable fields etc. For eg, if you have something like
Customer Part  Number :  |||||||||||||||||||||||||||||||||||||||
                                                   PRN ZYZSDFGH
--> drag a text field : write Customer Part number in that.
--> drag a barcode field. when you place a barcode field, you will have option to select whether code 128 or data matrix of whatever the standard you need. also in the properties box of the bar code, you can select, where do you want to print the human readable form of partnumber. (whether on top of barcode, center or below the barcode).
3. Save the label. there should be a provision on the label design tool, to convert this label into ITF format. do that. now we have for eg, barcode_label1. ITF.
4. go to SO10 in SAP.  give name zbarcode_label and hit create. From Menu> Text> Upload--> select radio button ITF. then browse in your system for barcode_label1.ITF.  save the standard text. here is a sample of a standard text.
<STX>H6;o727,23;f3;c20;h1;w1;d3,Quantity:;<ETX>
<STX>H7;o1008,444;f3;c20;h1;w1;d3,Line:;<ETX>
<STX>H8;o1008,26;f3;c20;h1;w1;d3,Customer PO#:;<ETX>
<STX>H9;o867,25;f3;c20;h1;w1;d3,Customer P/N:;<ETX>
<STX>H10;o94,26;f3;c20;h1;w1;d3,Item:;<ETX>
<STX>H11;o124,26;f3;c20;h1;w1;d3,Desc:;<ETX>
<STX>H12;o1167,497;f3;c20;h1;w1;d3,Phone:;<ETX>
<STX>H22;o1102,28;f3;c20;h1;w1;d3,Cust:;<ETX>
<STX>H23;o1073,497;f3;c20;h1;w1;d3,GTC Line: ;<ETX>
<STX><ESC>F0<DEL>&ADRC-NAME1&<ETX>
<STX><ESC>F1<DEL>&MAINITEM-MATNR&<ETX>
<STX><ESC>F2<DEL>&MAINITEM-ARKTX&<ETX>
<STX><ESC>F3<DEL>&MAINITEM-BSTKD&<ETX>
<STX><ESC>F4<DEL>&MAINITEM-ZSUNITQTY&<ETX>
<STX><ESC>F5<DEL>&MAINITEM-POSEX&<ETX>
<STX><ESC>F13<DEL>&ADRC-TEL_NUMBER&<ETX>

Similar Messages

  • How to print labels on zebra printer LP2844

    Hi,
    can anybody help me regarding how to print labels on zebra printer LP2844.
    Thanks

    Thanks for reply
    I had gone thru the manuals but how to send the Escape sequence to the printer from a java program?
    Any sample code for that in java will be very helpful.
    Thanks.

  • When printing labels for each printed label a blank label comes out of the printer

    Hello Experts
    We have a CR report which is designed to prints labels for the items using a label printer. After an upgrade that we have last month the settings for this report are missing so the labels were coming out wrong.
    Due to this I have had to reconfigure this report and its printing preferences and so far I have managed to make the prints fit in each label. But the problem is that if I try to print 5 copies of a label, the 5 labels come out of the printer just fine, butt after it another 5 blank labels come out of the printer too.
    I have tried with all parameters in "Printing preferences", mainly in the "Material" tab but nothing works.
    Thanks in advance and regards

    Hi,
    Please check below SAP note and let me know your feedback:
    1043235 - Label/thermal printers are not supported by SAP Business
    One
    Thanks & Regards,
    Nagarajan

  • HT2486 I'm entering in my address book I enter the names etc but when I go to Print labels it only prints the address not the name??

    I am entering in my address book, enter whole name address etc but when I go to print a label only the address get printed no name

    Thunderbird gets all suggestions for addressing from one of your address books. You have two books by default. The Personal and the Collected books. If you have sent an email to the wrong address then it will be in your collected book for sure. You need to go there and delete it and then find any other occurrences of the incorrect address and fix or delete it.

  • Is it possible to print labels on thermal printers using BI Publisher

    Hello,
    I am aware that BI Publisher can print barcodes on its output. But what I am not sure of is if it can print to thermal printers. A search didn't return anything specific on this. The way I have used thermal printers (Zebra, in my experience) in the past is that we send an encoded text output to the printer which decodes the text and prints the label. The codes contain the formatting attributes for the label.
    I am wondering if BI Publisher is the correct tool to use in our EBS instance or if we should just create a concurrent program and send the encoded output to the printer (of course, we will not be able to view the final output from the view requests form).
    We have a single instance and have the need to print labels in various font types (code 128, EAN-13) on thermal printers. Could someone throw some light on this? Thanks
    Shreedev

    Have your DBA install FOP and then find a good xml style sheet editor. Or have them install jasperreports and then use ireports to format them...
    Thank you,
    Tony Miller
    Webster, TX
    On the road of life...There are 'windshields', and there are 'bugs'
    (splat!)
    "Squeegees Wanted"
    If this question is answered, please mark the thread as closed and assign points where earned..

  • Printing label on TEC SX4 from Sapscript

    I try to print label on TEc printer SX4 from Sapscript. i am studying TEC Sample code. for example following below:
         [ESC]C[LF][NULL]
         [ESC]D0500[LF][NULL]
         [ESC]PC00;0020,0050,2,2,2,00,01[LF][NULL]
         [ESC]PB01;0020,0200,4,6,0,0100[LF][NULL]
         [ESC]RC00;MAt[LF][NULL]
         [ESC]RB01;1234567890[LF][NULL]
         [ESC]I[LF][NULL]
    i am sending this text on command prompt  as   > copy test1.txt lpt1 
    but i can not print a label.
    Does anybody know how to do it ?
    Thanks in advance

    Hi Manish,
    You will have to go ahead and get the license for the software.
    Barone software is another option for designing Labels for Zebra Printer.
    Compare and make your decision.
    Cheers
    Ajay

  • Not able to print label getting standard text as it appears in so10

    Hi,
    I have a  so10 object ,script contains only one window i.e main and we call so10 object  in script  by using statement    'Include &standrdtxt& object text id ST lang EN' ( standrdrxt contains text name)but instead of printing label it is printing the exact thing maintained in so10 object. the so10 object contains lines as mention below
    <STX><ESC>K<ETX>
    <STX><60>SI<62>L1000<ETX> , etc.....
    As it is apperaing in the print preview,what is the <STX>....<ETX> and where it is maintained .What should i do so that  label get print .

    Hi,
    The below is the full information what exactly is happening .
    the user  had a Win 2000 computer that the Intermec 3600 is attached through nullmodem serial cable as a local printer.  The user would log on to SAP on that computer and selected the ZNW_DTILABEL transaction (driver program). Within the transaction, the user would specify LOCL to send communication to printer.  The Win 2000 machine is being replaced due to  discontinued support issues later this year.The new machine has Win XP and does not currently communicate with printer.
    user is telling that
    There must be something in this transaction programming that assumes language from Win 2000 that a recent 1/12/2010 Hotfix KB97220 had to be removed off the Win 2000 computer in order for the SAP transaction to communicate to the printer.
    I don't find anything in coding which is not allowing to print label, if i print from my PC i am getting text <STX>...<ETX> as said in first post instead of label.what would be the problem with XP or wht needs to be maintained in XP.

  • Printing sapscript label using zebra printer

    Hi,
    Can anybody please help me regarding "printing sapscript label using zebra printer"?
    i hav set the following print default settings in the transaction mb90:
    output device :
    NO01
    device type: YZZX_ZEB
    but when i try to print ,i am getting error message stating that "the respective sapscript form is not active ".
    i hav also attached my print program for ur easy reference.
    ====================================================================*
    FORM open_form_slv.
    *'  Description:
    *'  Add information for the SAP spooler
    *'  Change the name of the standard customized form for Zebra print
    *'  Last Change Vers Programmer   Reason
    *1
      DATA: BEGIN OF print_infos.
              INCLUDE STRUCTURE itcpo.
      DATA: END OF print_infos.
      DATA: form_name(16) TYPE c, char1(1) TYPE c, ind_beg TYPE i.
      PERFORM itcpo_fuellen.
      MOVE-CORRESPONDING itcpo TO print_infos.
      WRITE sy-datum USING EDIT MASK '__.__.____'
                                               TO print_infos-tdcovtitle+1.
      WRITE sy-uzeit USING EDIT MASK '__:__:__'
                                              TO print_infos-tdcovtitle+12.
      CONCATENATE itcpo-tddest sy-uname ' PO'(001) ekpo-ebeln ' Doc.No'(002)
                                           mseg-mblnr print_infos-tdcovtitle
                              INTO print_infos-tdcovtitle SEPARATED BY space.
    form name from the table YZZM_GR_LABEL
      IF NOT g_fonam IS INITIAL.
        tnapr-fonam = g_fonam.
      ENDIF.
    if the used printer is a Zebra label printer, then the customized
    layout set name ???_???_XXX will be changed to ???_???_ZP
      SELECT SINGLE * FROM  tsp03d WHERE  padest  = nast-ldest.
      IF tsp03d-patype = 'YZZX_ZEB'.
        ind_beg := 15.
        WHILE ind_beg > -1.
          char1 := tnapr-fonam+ind_beg.     " substr(tnapr-fonam,ind_beg,1)
          IF char1 = '_'.
            form_name := tnapr-fonam(ind_beg).
            CONCATENATE form_name '_ZP' INTO tnapr-fonam.
            EXIT.
          ENDIF.
          ind_beg := ind_beg - 1.
        ENDWHILE.
      ENDIF.
      CALL FUNCTION 'OPEN_FORM'
        EXPORTING
          device   = 'PRINTER'
          language = language
          OPTIONS  = print_infos
          form     = tnapr-fonam
          dialog   = ' '.
      x_open := x.
      IF mseg-weanz = 0. mseg-weanz = 1. ENDIF.
      IF syst-tcode <> 'MB90'  AND  NOT g_flag_popup IS INITIAL.
    check for requirement of printing label and ask for gr-quantities (popup)
        SELECT SINGLE * FROM yzzm_gr_quantity WHERE ebeln = mseg-ebeln.
        CLEAR yzzm_gr_quantity-no_popup.
      ELSE.
    and ask not for gr-quantities
        IF syst-tcode = 'MB90'.
          yzzm_gr_quantity-erfmg := mseg-menge.
        ELSE.
          yzzm_gr_quantity-erfmg := mseg-menge / mseg-weanz.
        ENDIF.
        yzzm_gr_quantity-no_popup := x.
      ENDIF.
    determination inspection lot number
      CLEAR qals-prueflos.
      SELECT SINGLE * FROM qals WHERE mblnr = mseg-mblnr
                           AND zeile = mseg-zeile
                           AND mjahr = mseg-mjahr.
    determination vendor batch
      CLEAR mch1-licha.
      SELECT SINGLE * FROM mch1 INTO mch1 WHERE matnr = mseg-matnr
                                            AND charg = mseg-charg.
    ENDFORM.                    "open_form_label
    =================================================================== *
    FORM we01_print_slv.
    *'  Description:
    *'  print out of hazardous symbol
    *'  controls the Zebra printer
    *'  Last Change Vers Programmer   Reason
    *****26.09.2007 Starts
      DATA: l_objky TYPE nast-objky,"Object key
            l_vstat TYPE nast-vstat. "Processing status of message
    *****26.09.2007 Starts
      TABLES: mgef, t300.
      FIELD-SYMBOLS: .
      DATA: aux_index LIKE sy-index.
      DATA: count_haz_sym, position TYPE n, zw TYPE p DECIMALS 1.
      DATA: aux_value(5) TYPE c.
      DATA: txt(10) TYPE c, pos(5) TYPE c.
      t001w-werks = r_werks.
      t001w-name1 = r_name1.
      PERFORM read_address.
    *2
      SELECT SINGLE * FROM ekpo WHERE ebeln = mseg-ebeln
                                  AND ebelp = mseg-ebelp.
      CLEAR mara-stoff.
      SELECT SINGLE stoff INTO mara-stoff FROM mara WHERE matnr = mseg-matnr.
      IF NOT mara-stoff IS INITIAL.
        CLEAR t300.
        SELECT SINGLE * FROM t300 WHERE lgnum = mseg-lgnum.
        IF NOT sy-subrc IS INITIAL.
      for plants without warehouses try to use the country code
          CASE mseg-werks.
            WHEN 'BUP'.
              t300-regkz := 'US '.
          ENDCASE.
        ENDIF.
        CLEAR mgef.
        SELECT SINGLE * FROM mgef WHERE stoff = mara-stoff
                                  AND   regkz = t300-regkz.
      ENDIF.
    in case of more then one label, use for each a new output window
    (not only for the first)
      IF g_count > 1.
        CALL FUNCTION 'CONTROL_FORM'
          EXPORTING
            command = 'NEW-WINDOW'.
      ENDIF.
    Ausgabe Gefahrstoffsysmbole        Neustadt,  V.Hilgert  14.07.98
    *For output type YNL7, the hazardous warning symbol has to be printed at  the bottom of the label.So label is called before that.
      IF tnapr-kschl = 'YNL7'.
        CALL FUNCTION 'WRITE_FORM'
          EXPORTING
            element = 'LABEL'.
      ENDIF.
      count_haz_sym = 0. position = 0.
      WHILE count_haz_sym  = 'XN'.
    For output type YNL7, the width of the standard text is small.
          IF tnapr-kschl = 'YNL7'.
            zw = position * '0.2' + '0.1'. pos = zw.
          ELSE.
            zw = position * '1.3' + '0.1'. pos = zw.
          ENDIF.
          IF tsp03d-patype = 'YZZX_ZEB'. " device type for ZEBRA label priter
            aux_value := count_haz_sym.
          ELSE.
            aux_value := pos.              " HP/Kyocera or other laser printer
          ENDIF.
          CALL FUNCTION 'TEXT_SYMBOL_SETVALUE'
            EXPORTING
              name   = '&XPOS&'
              value  = aux_value
            EXCEPTIONS
              OTHERS = 1.
          CALL FUNCTION 'WRITE_FORM'
            EXPORTING
              element   =
              window    = 'MAIN'
            EXCEPTIONS
              element   = 1
              function  = 2
              type      = 3
              unopened  = 4
              unstarted = 5
              window    = 6
              OTHERS    = 7.
          IF sy-subrc = 0.
    *Varying the position for YNL7
            IF tnapr-kschl = 'YNL7'.
              position = position + 2.
            ELSE.
              position = position + 1.
            ENDIF.
          ENDIF.
        ENDIF.
      ENDWHILE.
      IF NOT mseg-vfdat IS INITIAL.
        am07m-mhtxt = text-105.
      ENDIF.
      IF NOT am07m-mhdat IS INITIAL.
        am07m-mhztx = text-106.
      ENDIF.
      IF ekko-bsart = 'UB'.
        am07m-litxt = text-101.
        am07m-libzg = ekko-reswk.
      ELSE.
        am07m-litxt = text-100.
        am07m-libzg = ekko-lifnr.
      ENDIF.
      belpos-mblnr = mkpf-mblnr.
      belpos-zeile = mseg-zeile.
      CONDENSE belpos NO-GAPS.
      am07m-belpos = belpos.
      IF t156-shkzg = h.
        am07m-hdlne = text-020.
      ELSE.
        am07m-hdlne = text-010.
      ENDIF.
    Ausgabe der Etiketten mit den ind. Mengen
      IF NOT g_flag_popup IS INITIAL.
        SELECT SINGLE * FROM yzzm_gr_quantity WHERE ebeln = mseg-ebeln
                                              AND   weanz = g_count.
      ELSE.
    * print the number of labels is handeled by the Zebra printer
    IF tsp03d-patype = 'YZZX_ZEB'. " device type for Zebra label prts
    g_lbls_tot := mseg-weanz - g_count + 1.
    g_break_print := x.
    ENDIF.
    ENDIF.
    mseg-erfmg := yzzm_gr_quantity-erfmg.*
    ********26.09.2007 Starts
    CONCATENATE mseg-mblnr mseg-mjahr mseg-zeile INTO l_objky.
    SELECT SINGLE vstat INTO l_vstat FROM nast WHERE kappl = 'ME' AND
    objky = l_objky AND
    kschl = 'YNL7'.
    ********26.09.2007 Ends
    CALL FUNCTION 'TEXT_SYMBOL_SETVALUE'
    EXPORTING
    name = '&nummer&'
    value = g_count.
    IF tnapr-kschl <> 'YNL7'.
    CALL FUNCTION 'WRITE_FORM'
    EXPORTING
    element = 'LABEL'.
    else.
    CALL FUNCTION 'WRITE_FORM'
    EXPORTING
    ELEMENT = 'BAR_CODE'
    EXCEPTIONS
    ELEMENT = 1
    FUNCTION = 2
    TYPE = 3
    UNOPENED = 4
    UNSTARTED = 5
    WINDOW = 6
    BAD_PAGEFORMAT_FOR_PRINT = 7
    SPOOL_ERROR = 8
    CODEPAGE = 9
    OTHERS = 10.
    IF sy-subrc <> 0. MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
             WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
         ENDIF.
      ENDIF.
    ENDFORM.                    "GR_label_print
    *&      Form  lesen
          text
         -->OBJKY      text
    FORM lesen USING objky.
      nast_key = objky.
      CLEAR retco.
      SELECT SINGLE * FROM mkpf WHERE mblnr = nast_key-mblnr
                                AND   mjahr = nast_key-mjahr.
      SELECT SINGLE * FROM mseg WHERE mblnr = mkpf-mblnr
                                AND   zeile = nast_key-zeile
                                AND   mjahr = mkpf-mjahr.
      IF sy-subrc NE 0.
        retco = sy-subrc.
        EXIT.
      ENDIF.
      PERFORM tab156_lesen.
      xskkz = t156-rstyp.
      PERFORM tab001w_lesen.
      IF NOT mseg-evers IS INITIAL.         "Versandvorschriften lesen.
        PERFORM t027_lesen.
      ENDIF.
      PERFORM bestellung_lesen.
      IF NOT ekpo-knttp IS INITIAL AND NOT
             ekpo-weunb IS INITIAL.
        PERFORM kontierung_lesen.           "für multikontierte Bestellungen
      ENDIF.
      IF NOT mseg-ematn IS INITIAL.
        PERFORM lesen_htn.
      ELSE.                                                     "111277/PH
        CLEAR am07m-mfrpn.                                      "111277/PH
      ENDIF.
      IF mseg-matnr IS INITIAL.
        mseg-menge = mseg-bpmng.
        mseg-meins = mseg-bprme.
        PERFORM bestelltext_lesen.
        CLEAR mabdr.
      ELSE.
        PERFORM material_lesen.
      ENDIF.
      PERFORM tab024_lesen.
      PERFORM t064b_lesen.
      PERFORM ladr_lesen.
    ENDFORM.                    "lesen
    Lesen für WE-Schein Fert.Auftrag -
    FORM lesen_wf USING objky.
      nast_key = objky.
      CLEAR retco.
      SELECT SINGLE * FROM mkpf WHERE mblnr = nast_key-mblnr
                                AND   mjahr = nast_key-mjahr.
      SELECT SINGLE * FROM mseg WHERE mblnr = mkpf-mblnr
                                AND   zeile = nast_key-zeile
                                AND   mjahr = mkpf-mjahr.
      IF sy-subrc NE 0.
        retco = sy-subrc.
        EXIT.
      ENDIF.
      PERFORM tab156_lesen.
      xskkz = t156-rstyp.
      PERFORM tab001w_lesen.
      PERFORM auftrag_lesen.
      IF NOT mseg-matnr IS INITIAL.
        PERFORM material_lesen.
      ELSE.
        mseg-menge = mseg-erfmg.
        mseg-meins = mseg-erfme.
      ENDIF.
      PERFORM tab024d_lesen.
      PERFORM t064b_lesen.
      PERFORM ladr_lesen.
    ENDFORM.                    "lesen_wf
    Lesen für Warenausgang -
    FORM lesen_wa USING objky.
      nast_key = objky.
      CLEAR retco.
      SELECT SINGLE * FROM mkpf WHERE mblnr = nast_key-mblnr
                                AND   mjahr = nast_key-mjahr.
      SELECT SINGLE * FROM mseg WHERE mblnr = mkpf-mblnr
                                AND   zeile = nast_key-zeile
                                AND   mjahr = mkpf-mjahr.
      IF sy-subrc NE 0.
        retco = sy-subrc.
        EXIT.
      ENDIF.
      PERFORM tab156_lesen.
      xskkz = t156-rstyp.
      PERFORM tab001w_lesen.
      IF NOT mseg-matnr IS INITIAL.
        PERFORM material_lesen.
      ENDIF.
      PERFORM ladr_lesen.
    ENDFORM.                    "lesen_wa
    Druck Vorbereiten -
    FORM open_form.
      PERFORM itcpo_fuellen.
      CALL FUNCTION 'OPEN_FORM'
        EXPORTING
          device   = 'PRINTER'
          language = language
          OPTIONS  = itcpo
          dialog   = ' '.
      PERFORM lesen_t159p.
      x_open = x.
    ENDFORM.                    "open_form
    Druck Vorbereiten Sammelscheine -
    FORM open_form_sammel.
      PERFORM lesen_t159p.
      PERFORM itcpo_fuellen.
      CALL FUNCTION 'OPEN_FORM'
        EXPORTING
          device   = 'PRINTER'
          language = language
          OPTIONS  = itcpo
          form     = tnapr-fonam
          dialog   = ' '.
      x_open = x.
    ENDFORM.                    "open_form_sammel
    Druck schließen -
    FORM close_form.
      CHECK NOT x_open IS INITIAL.
      CALL FUNCTION 'CLOSE_FORM'.
      CLEAR x_open.
    ENDFORM.                    "close_form
    Hilfsfelder versorgen für Sammelscheindruck -
    FORM helpdata1.
       *mkpf = mkpf.
       *mseg-lgort = mseg-lgort.
       *ladr = ladr.
      save_mkpf = *mkpf-usnam.
      save_mblnr = *mkpf-mblnr.
      save_budat = *mkpf-budat.
      save_cpudt = *mkpf-cpudt.
      save_ematn = *mseg-ematn.
      save_lgort = *mseg-lgort.
      save_ladr = *ladr.
       *t001w = t001w.
      save_werks = *t001w-werks.
      save_name1 = *t001w-name1.
       *ekko = ekko.
       *am07m = am07m.
      save_lifnr = *ekko-lifnr.
      save_ebeln = *ekko-ebeln.
      save_ekgrp = *ekko-ekgrp.
      save_linam = *am07m-name1.
      save_lina2 = *am07m-name2.
       *t024 = t024.
      save_eknam = *t024-eknam.
      save_ektel = *t024-ektel.
       *mkpf-usnam = old_mkpf.
       *mkpf-mblnr = old_mblnr.
       *mkpf-cpudt = old_cpudt.
       *mkpf-budat = old_budat.
       *mseg-ematn = old_ematn.
       *mseg-lgort = old_lgort.
       *ladr = old_ladr.
       *t001w-werks = old_werks.
       *t001w-name1 = old_name1.
       *t024-eknam = old_eknam.
       *t024-ektel = old_ektel.
       *ekko-lifnr = old_lifnr.
       *ekko-ebeln = old_ebeln.
       *ekko-ekgrp = old_ekgrp.
       *am07m-name1 = old_linam.
       *am07m-name2 = old_lina2.
      save_lfa1  = lfa1.
      IF NOT old_lfa1 IS INITIAL.
        lfa1  = old_lfa1.
      ENDIF.
    ENDFORM.                                                    "helpdata1
    --- Versorgung der Hilfsfelder vor CLOSE_FORM bei Sammelscheindruck --
    FORM helpdata2.
      old_lfa1 = save_lfa1.
      lfa1     = save_lfa1.
      old_mkpf = save_mkpf.
      old_lgort = save_lgort.
      old_ladr = save_ladr.
      old_budat = save_budat.
      old_cpudt = save_cpudt.
      old_werks = save_werks.
      old_name1 = save_name1.
      old_mblnr = save_mblnr.
      old_lifnr = save_lifnr.
      old_linam = save_linam.
      old_lina2 = save_lina2.
      old_ebeln = save_ebeln.
      old_ekgrp = save_ekgrp.
      old_eknam = save_eknam.
      old_ektel = save_ektel.
      old_ematn = save_ematn.
       *mkpf-usnam = save_mkpf.
       *mkpf-mblnr = save_mblnr.
       *mkpf-budat = save_budat.
       *mkpf-cpudt = save_cpudt.
       *mseg-ematn = save_ematn.
       *mseg-lgort = save_lgort.
       *ladr = save_ladr.
       *t001w-werks = save_werks.
       *t001w-name1 = save_name1.
       *t024-eknam  = save_eknam.
       *t024-ektel  = save_ektel.
       *ekko-lifnr  = save_lifnr.
       *ekko-ebeln  = save_ebeln.
       *ekko-ekgrp  = save_ekgrp.
       *am07m-name1 = save_linam.
       *am07m-name2 = save_lina2.
    ENDFORM.                                                    "helpdata2
    Form Lesen Warenausgang Lohnbearbeiter -
    FORM lesen_wlb USING objky.
      nast_key = objky.
      CLEAR retco.
      SELECT SINGLE * FROM mkpf WHERE mblnr = nast_key-mblnr
                                AND   mjahr = nast_key-mjahr.
      SELECT SINGLE * FROM mseg WHERE mblnr = mkpf-mblnr
                                AND   zeile = nast_key-zeile
                                AND   mjahr = mkpf-mjahr.
      IF sy-subrc NE 0.
        retco = sy-subrc.
        EXIT.
      ENDIF.
      PERFORM tab156_lesen.
      xskkz = t156-rstyp.
      PERFORM tab001w_lesen.
      IF NOT mseg-matnr IS INITIAL.
        PERFORM material_lesen.
      ENDIF.
      ON CHANGE OF mseg-lifnr.
        PERFORM read_address.
      ENDON.
    ENDFORM.                    "lesen_wlb
    *eject
    Fuellen der ITCPO -
    FORM itcpo_fuellen.
      IF xscreen NE space.
    *- Testausgabe auf Bildschirm -
        itcpo-tdpreview = 'X'.
        itcpo-tdnoprint = 'X'.
      ELSE.
        CLEAR: itcpo-tdpreview,
               itcpo-tdnoprint.
      ENDIF.
      MOVE-CORRESPONDING nast TO itcpo.
      itcpo-tdcover   = nast-tdocover.
      itcpo-tddest    = nast-ldest.
      itcpo-tddataset = nast-dsnam.
      itcpo-tdsuffix1 = nast-dsuf1.
      itcpo-tdsuffix2 = nast-dsuf2.
      itcpo-tdimmed   = nast-dimme.
      itcpo-tddelete  = nast-delet.
      itcpo-tdcopies  = nast-anzal.
      itcpo-tdprogram = sy-repid.
    ITCPO-TDTELELAND = US_COUNTRY.
      itcpo-tdsenddate = nast-vsdat.
      itcpo-tdsendtime = nast-vsura.
      itcpo-tdnewid   = x.
    ENDFORM.                    "itcpo_fuellen
    *eject.
    ------------ FORM lesen der Lagerortadr. ---------------------------*
    FORM ladr_lesen.
      DATA:    BEGIN OF addr_sel.
              INCLUDE STRUCTURE addr1_sel.
      DATA:    END OF addr_sel.
      CLEAR ladr.
      SELECT SINGLE * FROM twlad WHERE werks = mseg-werks
                           AND  lgort = mseg-lgort
                           AND  lfdnr = '001'.
      IF NOT twlad-adrnr IS INITIAL AND sy-subrc IS INITIAL.
        MOVE twlad-adrnr TO addr_sel-addrnumber.
      ENDIF.
      CALL FUNCTION 'ADDR_GET'
        EXPORTING
          address_selection = addr_sel
        IMPORTING
          sadr              = ladr
        EXCEPTIONS
          OTHERS            = 1.
    ENDFORM.                    "ladr_lesen
    **&      Form  REPRINT
          text
    *FORM reprint.
    TABLES : nase.
    DATA  : x TYPE string.
    IF nase-vermo = 2.
       x = 'REPRINT'.
    ENDIF.
    *ENDFORM.                    "REPRINT
    Kindly do the needful.
    Thanks in advance
    Regards
    Swarna

    Hi Swarna,
    CALL FUNCTION 'OPEN_FORM'
    EXPORTING
    device = 'PRINTER'
    language = language
    OPTIONS = print_infos
    <b>form = tnapr-fonam</b>
    dialog = ' '.
    x_open := x.
    I thing its not a good way to pass the Form name to the Parameter.
    Try like,
    data : temp_form like tnapr-fonam.
    <b>form = temp_form</b>
    Thanks.

  • Sapscript label prints - problem with high print quantity

    Hello,
    we are printing labels out of deliveries using sapscript.
    To allow print copies, I have set the DIALOG to 'X' on the function call for OPEN_FORM (see below).
    We usually print 1 copy for each label. It is working fine for low quantities like for example we print out five labels with a copy for each label.
    But for higher quantities, for example 25 labels with a copy for each label, it is still printing out all labels, but on the copy labels, certain information are just missing. Strange thing is, the missing information all have different source tables or text fields. For example the date of the delivery is not showing up, then our part number or the shop order number entered as text field on item level of the delivery.
    Is there any setting that could cause this issue? Any other suggestions?
    Thanks
    Anne
    CALL FUNCTION 'OPEN_FORM'
       EXPORTING
          FORM           = TNAPR-FONAM
         LANGUAGE       = NAST-SPRAS
          OPTIONS        = ITCPO
          ARCHIVE_INDEX  = TOA_DARA
          ARCHIVE_PARAMS = ARC_PARAMS
         DEVICE         = XDEVICE
    DIALOG         = 'X'*
       EXCEPTIONS
          OTHERS         = 1.
    Edited by: Anne on Mar 12, 2010 3:39 PM

    Probably a bug in your code, we can't help. Only option is to debug!

  • How can i print all the contect of the code in sapscript window ? ?

    how can i print all the contect of the code in sapscript window ? ?

    Hi,
    Do you mean that you want to print the ABAP code to SAPscrip form ?
    Svetlin

  • Code 128 Barcode printed from Application Express

    Hi,
    My colleague and I have written a procedure to generate Code128 Barcodes. These appear fine on the screen within Application Express 3. But when we export the file as an RTF or PDF document to our BI_Publisher server running under LINUX RedHat the Barcodes are greyed out and cannot be seen.
    Anyone any ideas on how to solve this? It is extremely irritating only to be able to offer our users the ability to print the Application Express page off rather than a proper document.
    Thanks

    Hi kcbemssr,
    I don't know weather you can see this reply, but i still want to say something about this.
    Did you used another type of code 128?
    you can try this. and here is a site i recommand you, it's all about barcode, you can get code 128
    [Content Removed]

  • Bar code printing issue in sapscript

    hi guys,
    there is an issue to capture bar code with special symbol in sapscript.
    please advise what can be done here to solve the problem. Thanks.
    zebra code in sapscript:
    ^BY2,3.0^FO36,66^B3N,N,56,N,N^FR^FD>:15[]=/\+|-79{}-02<30#$%^@?^FS
    value capture through scanner:
    15/+-79-0230
    zebra code in sapscript:
    BY2,3.0FO36,222B3N,N,56,N,NFRFD>:K7R161884B-FC16(DC>501)FS
    value capture through scanner:
    K7R161884B-FC16DC501

    hi!!!!!!!!!!!
    to print barcodes in sapscripts you have to do following steps..
    1.choose Character format options
    2. Then choose change mode.
    3. provide a name say C1 in character format option and then press enter.
    4.provide description for that character format say C1.
    5.you can find barcode option.place the cursor in that one and press F4 then it will display the list of barcodes available.
    6.choose one of them say BC_MSIC.
    Now you have created a character format say C1 with the Barcode properties.
    Exmaple:
    If you want to print the price in barcode format which is in ITAB-Netwr, you have to give the syntax in the script editor like ....
    <C1>&ITAB-NETWR&</>
    then it will prints barcode in your output....

  • Printing labels (barcode, datamatrix code, ...) with LabView via Codesoft

    Hello together,
    could anyone post a sample vi which enables printing labels (barcodes, datamatrix code, ...) with LabView
    via the Teklynx Codesoft Runtime Software? There are no sample programs from Teklynx for LabView.
    Many Thanks for your help, Thomas.
    Message Edited by maximint on 01-04-2007 10:04 AM

    maximint wrote:
    Hi JLS,
    thanks for the answer. I agree with you that closing the references is the best und most stable solution. But it is really slow. I made an exe but this is also slow.
    But apart from this, the VI is running well, even with a handing over of variables. I guess this is one of the first VIs in the net which combines LV with
    Codesoft from Teklynx.
    Thanks, Thomas.
    PS: I made a wrong click on the rating of your last post. Sorry. I guess I rated it too bad.
    Well, this is easily solved with an intelligent global buffer VI or as they are also often called a LabVIEw 2 style global. I use them quite often for all kinds of reasons including to avoid globals in my programs almost 100% but this is one of the cases where they are also very handy.
    Basically you write a VI that has a while loop, and a case structure inside. The while loop normally only executes once. One or more uninitialized shift registers store different values that can be reused on each call to that VI. The case selector is wired to an enum (I make them always strict typedefed) on the front panel and that one is connected to the connector pane of the VI.
    Make the enum have init, print, close items and in the respective case frame do the opening of the refnum in the init case and anything else you need to do once at initialization time storing the refnum to the right shift register terminal. In the close case do everything to close done the software and then close the refnum coming from the right shift register terminal itself passing a Not A Refnum to the right shift register terminal. The print case uses the refnum from the right shift register terminal too, does all that is necessary to do printing and then stores the refnum back to the right shift register terminal. You now have an intelligent manager function for your interface to the printing software.
    The init case is called somewhere during initialization of your application while the close case is called somwehre when you close your application. A variant is to combine the init and print case but forst test for the refnum to be Not A Refnum (comparison palette) and in that case do the initialization first, otherwise just do the printing. The advantage with this is that the Codesoft interface is only initialized if you really need it.
    There is one caveat for this if you use dynamic top level VIs to implement for instance test steps or deamon like operation. LabVIEW remembers the top level VI under whom a refnum was opened and automatically closes refnums when that top level VI goes idle (stops running). So you would need to make sure that the initialization is done in the main hierarchy that is guaranteed to run for the entire time that your interface is required.
    I have included a small archive containing an API for Codesoft 7 that also supports variable query and substitution in templates. It is an older version of something I'm currently using and not very well tested as is, but the newer version is a lot more involved and complicated and not suited to be put here. I also included another archive showing a version of such an intelligent manager buffer function using that API.
    Rolf Kalbermatter

  • Label printing issues in Sapscript

    We are struggling with building a new label for a finished good.  On previous labels we used barcode BC_CD39.  This new label requires a mix of same barcode and 2D barcode.  One of the issues is BC_CD39 is it is too big at 13mm.  So we want to use CD39__00 which is 5mm.  We have gone into SPAD and SE73 and we think we have this set up to work on the two printers involved.  We have also followed instructions for 2D in 197177 for adding new small font.  We also have a logo for printing.  When I print the printout does not have the smaller barcode, any text in smaller font and the logo is missing.  I went into the spooler yesterday and these prints are getting an error (unknown print control     should be output) that is talked about in note 17559.   And when I look at the print preview I have a logo and different size fonts and smaller barcodes showing- basically all the stuff that is missing from the actual print.  Has anyone else run into this and how have you resolved this?  I am not sure what the spooler does not like. We are using a Printronix T5000e series printer.
    The spooler error reads: character converter active when first problem occurred
    Data was saved with character set 1100
    Data will be converted to character set 9010 (synt = 9010) 
    and then it gives the OTF error mentioned above.
    Our latest attempt is downloading tru fonts and getting them into the printer.  Still no success and now the labels are not even printing.
    Thanks for any help.
    Susan

    We continue with not being able to print this label correctly.  If I do a screen shot I can see I have varying fonts on the label.  But it completely ignores the various fonts on printing.
    Our pirnter is a Printronix label printer.
    My form is defined as landscape.
    I get a spool error when printing that character set 1100 is being converted to character set 9010, which is custom for Printronix.
    If we print on legal form vs the label form it prints fine.
    We have tried different print drivers but nothng seems to get these fonts out.
    We are using 5MM 3by9 barcodes.
    This product is about to 'go live' and we really want to print this from SAP vs an external label software program.  If we use an external label program separate from SAP it can print perfectly on same label printer.
    We welcome any suggestions.
    Susan

  • SAP Script : Control Commands for printing Label (barcode) by Zebra Printer

    Hello,
    I would like to know the control commands in sap script for Zebra Printer. The purpose of task is to print a field in barcode format in Right Bottom of the label.
    The sample code is placed below. Kindly have a look at it. The problem now i am facing is, the barcode for Customer PO is printing on the wrong place (Left Bottom, the text & barcode are overwriting). Can anyone suggest a possible way or can any one send the document for Barcode commands in SAP Script for Zebra Printer.
    Sample script code:
    Initialization and reset Barcode
    XAMCY^XZ
    Start
    ^XA
    Barcode setup
    ^BY3,2.7,2.2
    Set label home position
    ^LH
    ^FWN
    FO385,025A0R,40,50FDPN: &VBAP-MATNR&FS
    FO385,725A0R,40,50FD&VBAP-ARKTX&FS
    FO385,1710A0R,40,50FDRtns: &zsntsc-contr&FS
    FO345,025A0R,40,50FDService Order# &AUFK-AUFNR&FS
    FO345,725A0R,40,50FDSerial# &EQUI-SERNR&FS
    FO345,1710A0R,40,50FDRepair Order# &VBAP-VBELN&FS
    FO245,025B3R,N,90,N,NFD&AUFK-AUFNR&FS
    FO245,725B3R,N,90,N,NFD&EQUI-SERNR&FS
    FO245,1710B3R,N,90,N,NFD&VBAP-VBELN&FS
    FO138,1710A0R,40,35FDCustomer PO# &VBKD-BSTKD&FS
    FO98,025A0R,40,50FDWrnty: &W_WARRANTY&FS
    FO98,605A0R,40,50FDRoute: &W_ROUTE&FS
    FO58,025A0R,40,35FDShip-to-name: &W_NAME1&FS
    FO58,1325A0R,40,35FDMinor Group/Nr: &TVM5T-BEZEI&FS
    FO58,1325A0R,40,35FDMinor Group/Nr: &TVM5T-BEZEI&FS
    FO18,885A0R,40,35FDReported By: &QMEL-QMNAM&FS
    FO18,1710B3R,N,90,N,NFD&VBKD-BSTKD&FS
    ^XZ
    Thanks in Advance,
    Ramasamy

    HI
    GOOD
    GO THROUGH THIS
    A barcode solution consists of the following:
    - a barcode printer
    - a barcode reader
    - a mobile data collection application/program
    A barcode label is a special symbology to represent human readable information such as a material number or batch number
    in machine readable format.
    There are different symbologies for different applications and different industries. Luckily, you need not worry to much about that as the logistics supply chain has mostly standardized on 3 of 9 and 128 barcode symbologies - which all barcode readers support and which SAP support natively in it's printing protocols.
    You can print barcodes from SAP by modifying an existing output form.
    Behind every output form is a print program that collects all the data and then pass it to the form. The form contains the layout as well as the font, line and paragraph formats. These forms are designed using SAPScript (a very easy but frustratingly simplistic form format language) or SmartForms that is more of a graphical form design tool. 
    Barcodes are nothing more than a font definition and is part of the style sheet associated with a particular SAPScript form. The most important aspect is to place a parameter in the line of the form that points to the data element that you want to represent as barcode on the form, i.e. material number. Next you need to set the font for that parameter value to one of the supported barcode symbologies.
    The next part of the equation can be a bit tricky as you will need to get a printer to print that barcode font. Regular laser printers does not normally print barcode fonts, only specialized industrial printers that is specifically designed to support that protocol and that uses specialized label media and heat transfer (resin) ribbon to create the sharp image required for barcodes.
    Not to fear though, there are two ways to get around this:
    - You can have your IT department do some research - 
    most laser printers can accept a font cartridge/dimm chip (similar to computer memory), called a BarDIMM that will allow a laser printer to support the printing of barcodes.
    - Secondly, you can buy software that you can upload in your SAP print Server that will convert the barcode symbology as an image that will print on a regular laser printer. I found that this option results in less sharper barcodes. This option is really if you need to convert a large quantity of printers (>10) to support barcodes. 
    - Thirdly, you can buy a third party software like Barcode.dll and install on your frontend PC connected to the laser printer.
    Now you have a barcode printed - what next?
    Well there are two options, depending on your business requirements:
    - You can use an existing SAP transaction on a regular workstation and get a barcode wedge reader to hook up between the keyboard and the PC. These wedge readers comes in a wand or scanner format. There are even wireless wedge scanners available that allows you to roam a few yards from the workstation to scan a label. This approach is mostly used where you want to prevent human errors in typing in long material, batch or serial numbers in receiving or issuing of material. The problem is that it's just replacing the keyboard input and you are basically locked down in one location and have to bring all the material to that location to process.
    - Another solution is to use SAPConsole transactions
    or write your own ABAP Dialog programs that will fit onto a barcode enabled wireless handheld terminal and that will follow the business logic as executed on the shop floor. 
    These programs are highly complex exercises in industrial engineering and ergonomics because of the limited screen sizes and limited ability to accept keyboard input. The user is instructed step-by-step and only scan and push F-keys to interact with the SAP system. Scan, scan, beep, beep, enter - highly automated.
    GO THROUGH THESE LINKS
    http://www.sap-img.com/abap/details-information-about-sap-barcodes.htm
    http://help.sap.com/saphelp_nw04/helpdata/en/68/4a0d5b74110d44b1b88d9b6aa1315b/content.htm
    THANKS
    MRUTYUN

Maybe you are looking for

  • Query wizard and PLD

    Hi experts, I use query wizard making a query, and I can found it in query manager. then I created a report for that query. everything is ok but i don't know how to show the report and print it out. please help, thanks.

  • BUG IN SET PARAMETER ID

    Hi, i created one transaction "ZPNUM",it has one parameter in selection screen PERNR(personal Number) i want to set parameter from another program i am using this code,but it does not works.any body can help me DATA : PERNR TYPE PA0001-PERNR VALUE '1

  • Logical Standby 'CURRENT' log files

    I have an issue with a Logical Standby implementation where although everything in the Grid Control 'Data Guard' page is Normal, when I view Log File Details I have 62 files listed with a status of 'Committed Transactions Applied'. The oldest (2489)

  • C key

    What is the c key for mac

  • Will 3.5 inch DVD's play/burn in my iBook SuperDrive?

    I have been burning home video for friends and family onto regular DVD's, but most of these videos are no longer than a half hour. Will my iBook swallow a 3.5 inch DVD? Thanks