PO sapscript output language

Hi,
how to change the output language for sapscript, in transaction ME23N ( purchase order ), using print preview or sending output to spool, please ? The sapscript code differs from language to language, but by default the English version is taken ?
thanks,
kind regards,
Rolf

Hi,
You can change the Message output language and can get the particular printout.
If not you can give print out in debug mode and change the ekko-spars parameter value your required language in call function OPEN_FORM .
Language value should be 1 char in this.
Ex: EN -> E, DE-> D.
Pls try .
Thanks.
Rajesh

Similar Messages

- Sapscript output convert to XML -

Hi Gurus,
I need to convert sapscript output with values - not template - to an XML File or txt.
i tried RSTXSCRP program and FB_CONVERT_FORM_TO_XML function module but doesn't help me.
Please help me with the solution.
Regards
Emre.
Edited by: emre karakurum on May 21, 2010 11:38 AM

In my opinion, SAPScript form is something quite unstructured - the layout of it can be very complicated and as well containing graphic and so on. XML is, on the other side, something pretty structured. I don't think that you can find something standard for simple conversion SAPScript to XML. SAPScript is simply not like IDOC - it's human readable layout rather than strucutre of data. You will have to write your own print-program which will create your own XML file instead of printing SAPScript form. The logic how to structure the XML file (which tags will be there and which values) will be coded in this print-program.

Download Sapscript output to PDF format

Hi,
how to download sapscript output to PDF format

Hi,
Please check below link.
http://www.scribd.com/doc/454814/SAPSCRIPT-to-PDF
Regards,
Anil

Generating same SApScript output to different output methods

Hi All,
Can someone tell me whether it's possible to generate different out methods using the same SAPScript output. if so how to do it ??
i.e : e-mail & printer or fax & printer.
thanks in advance
Dhanushka.

Hi,
Is there a BAPI to send the spool request as an e-mail or fax.
About the sequence of events:
Generating of the spool request is done using the open_form right. Once the form is closed get the spool id and send it by e-mail or fax ???.
is this correct
thanks & regards
Dhanushka.

Re: Dowloading SAPScript Output into excel

Hello Experts,
Could anyone let me know how to download the SAPScript output to Excel?
Rgds,
Pavan

Hi,
Please folow the link it will ful you
Download Smartform or Sapscript layout into Excel
Regards,
Bhupal.

Spool read data (sapscript output value)

Hi Gurus,
I need to read spool data. I tried following program ;
DATA : mem_tab LIKE abaplist OCCURS 0 WITH HEADER LINE.
DATA : BEGIN OF itab OCCURS 0,
data(2000),
END OF itab.
SUBMIT rspolst2 EXPORTING LIST TO MEMORY AND RETURN
WITH rqident = '158593'
WITH first = '1'.
CALL FUNCTION 'LIST_FROM_MEMORY'
TABLES
    listobject = mem_tab."( TABLE LIKE TABLE OF abaplist ).
break xkbahar.
IF NOT mem_tab[] IS INITIAL.
CALL FUNCTION 'LIST_TO_ASCI'
    EXPORTING
      list_index = -1
    TABLES
      listasci   = itab
      listobject = mem_tab." (LIKE TABLE OF abaplist)
ENDIF.
and   [converting spool contents into internal table;
but doesn't help me. Because i want to read sapscript output value in spool.
anybody have idea ? how do i read my sapscript output data in spool? Any function any program?
Please help me with the solution.
Regards
Emre.

Hi,
By selecting print icon of your form output ur able to generate spool of the document.
Ex: va03->provide orden no ->frm menu -> Sales Document -> issue output to-> select output type-> click on print icon(ctrl+p).
Spool of the form will be creatted for u, Check the same in SPO1 transaction.
For further details you can debug the same after selecting print icon.
If you need further details, Provide me the exact business requirement.
Regards,
Bysani.

Issue in viewing 'Print Preview' of SAPScript output in different languages

Hi All,
I have developed a SAP Script.
It is working correctly in English in all aspects.
I have created few standard texts for headers in SO10 and maintained in different languages.
In Print program also while retrieving these text i have used Order's language.
In debug mode also it is showing texts in different language (Chinese, Japanese, Thai etc...).
But in print preview it is showing as # every where we suppose to print headers from standard texts.
How can i view these texts in their original language (Order)!
Can anybody provide the solution for the same!
Thanks in advance.
Thanks,
Deep.

Hi,
I have selected 'Supplemental language support' boxes.
But still it is not working.
Can anybody solve above posted issue!
In PO it is showing in Japanese/Chinese etc.. characters.
In SO10 it is showing texts in respective languiages.
In debug mode of Print program & Layout set text is shown in respective language of text based on country of PO.
But in print preview it is showing as # everywhere there must text in different language.
Only in English i am able to view print preview correctly.
Can anybody provide inputs for resolving this issue!
Thanks in advance.
Thanks,
Deep.

SAPscript Output Problem - Very Urgent - Please help

Hi,
I am having the following problem with SAPscript.
In the Main Window, I have instructions to the printer in the ZPL2 language (For Zebra Printer).
There are also several variables, which are highlighted in Gray and enclosed in the&.
There are also several elements all of them empty except for the one where this code is.
Now, I received this program to modify in terms of code and the output.
IF you have never done any work with Zebra Printing, the way it is done is that you create a label using the Zebra BarOne or Zebra Designer program, then output it to an itf file, upload it into a standard text as .itf and copy the uploaded contents to the main window. When printing to a Zebra printer, the Zebra printer will read the instructions and will print the output.
Here is the problem: The config for the output type is correct.
When doing a printing test from SAPscript, I get the right output and the Zebra printer is able to print it.
However, the real process for this task will go through MB02. There, if I create a spool request using the proper method (select output type and etc.), it will go the spool. However, if I print preview or output (doesnt work with the Zebra printer, so I have to output to the Laser printer), it will output the following (none of the following includes any of the ZPL2 code/instructions. Instead, it seams to print the variables contents with the field name next to it This isnt whats its the Main window!!!)
http://img244.imageshack.us/img244/6915/66052475zk2.jpg
Please help. I have debugged but dont know what to do and cant find anything wrong.
This is very urgent. Any help will be useful.
Thanks,
John

Ok, maybe I have confused others in regards to the issue as well.
We expect this label to be output from a Zebra Printer.
When output through Sapscripts printing test, the preview from the spool shows the ZPL2 code in small font (non readible if a created a screenshot) and if sent to the Zebra Printer, it prints the label correctly.
When output through MB02, the preview from the spool shows the code that I have attached to the 1st post in this thread. If I try to output to the Zebra Printer, nothing happens because the ZPL2 instructions are not even in the preview and therefore, the Zebra printer recieves no instructions. I should not have mentioned the laser printer, because it has nothing to do with this issue.
I hope that this makes the issue a little more clear and understandable. Please help.
Here is the ZPL2 coding before uploading to standard text (only difference is that once uploaded, the '/' characters are removed.) However, I believe that the problem may lie in the print program and how it compiles but I debugged and haven't really seen where it comes from:
/:NEW-PAGE
/ ^XA
/ DFNEW-RE-1FS
/ ^PRC
/ LH0,0FS
/ ^LL1830
/ ^MD0
/ ^MNY
/ LH0,0FS
/ FO244,854A0N,55,46CI13FRFB154,1,0,LFN999^FS
/ FO819,698A0N,55,46CI13FRFN998FS
/ FO245,477A0N,55,46CI13FRFB755,1,0,RFN997^FS
/ FO389,926A0N,55,46CI13FRFB654,1,0,RFN996^FS
/ BY3,3.0FO42,1072B3N,N,152,N,YFRFN995FS
/ FO276,1258A0N,55,46CI13FRFN995FS
/ FO484,774A0N,55,46CI13FRFN994FS
/ FO817,774A0N,55,46CI13FRFN993FS
/ FO611,556A0N,55,46CI13FRFN992FS
/ FO245,556A0N,55,46CI13FRFN991FS
/ FO397,117A0N,55,46CI13FRFN990FS
/ FO245,405A0N,55,46CI13FRFB880,1,0,RFN989^FS
/ FO244,698A0N,55,46CI13FRFN988FS
/ FO629,998A0N,55,46CI13FRFN987FS
/ FO244,623A0N,52,42CI13FRFN986FS
/ FO397,261A0N,55,46CI13FRFB404,1,0,RFN985^FS
/ FO819,854A0N,55,46CI13FRFN984FS
/ FO725,554A0N,55,46CI13FRFN983FS
/ FO397,189A0N,55,42CI13FRFB695,1,0,RFN982^FS
/ FO397,333A0N,55,42CI13FRFN981FS
/ FO638,333A0N,55,42CI13FRFN980FS
/ FO391,21A0N,63,63CI13FRFB433,1,0,CFN979^FS
/ FO36,698A0N,55,46CI13FR
/ FDWBS:FS
/ FO37,405A0N,55,46CI13FR
/ FDMATL:FS
/ FO37,478A0N,62,44CI13FR
/ FDDESC:FS
/ FO554,698A0N,55,46CI13FR
/ FDSUPPLIER:FS
/ FO32,625A0N,55,46CI13FR
/ FDTEXT:FS
/ FO35,1258A0N,55,46CI13FR
/ FDBATCH NO:FS
/ FO770,775A0N,63,51CI13FR
/ FD/FS
/ FO32,854A0N,55,46CI13FR
/ FDESHM:FS
/ FO37,556A0N,55,46CI13FR
/ FDQTY:FS
/ FO32,998A0N,55,46CI13FR
/ FDSAP MATERIAL DOC NO:FS
/ FO525,333A0N,55,46CI13FR
/ FDofFS
/ FO556,854A0N,55,46CI13FR
/ FDINSPECT:FS
/ FO32,926A0N,55,46CI13FR
/ FDUNLOADING:FS
/ FO37,117A0N,55,46CI13FR
/ FDSTOCK TYPE:FS
/ FO32,774A0N,55,46CI13FR
/ FDPURCHASE ORDER:FS
/ FO37,188A0N,55,46CI13FR
/ FDDELIVER TO:FS
/ FO37,260A0N,55,46CI13FR
/ FDSTORAGE LOC:FS
/ FO37,332A0N,55,46CI13FR
/ FDCONTAINERS:FS
/ FO1,1359GB1217,0,6^FS
/ FO594,1359GB0,474,6^FS
/ ^XZ
/:NEW-PAGE
/ ^XA
/ ^XFNEW-RE-1.ZPL
/ FN999FD&ATWRT_HAZAMAT(6)&^FS
/ FN998FD&EKKO-LIFNR&^FS
/ FN997FD&MABDR-MAKTX&^FS
/ FN996FD&MSEG-ABLAD&^FS
/ FN995FD&MSEG-CHARG&^FS
/ FN994FD&MSEG-EBELN&^FS
/ FN993FD&MSEG-EBELP&^FS
/ FN992FD&MSEG-ERFME&^FS
/ FN991FD&MSEG-ERFMG&^FS
/ FN990FD&MSEG-INSMK(1)&^FS
/ FN989FD&MSEG-MATNR&^FS
/ FN988FD&MSEG-MAT_PSPNR&^FS
/ FN987FD&MSEG-MBLNR&^FS
/ FN986FD&MSEG-SGTXT(40)&^FS
/ FN985FD&MSEG-UMLGO&^FS
/ FN984FD&QALS-PRUEFLOS&^FS
/ FN983FD&V_BACKORDER&^FS
/ FN982FD&V_NAME3&^FS
/ FN981FD&WS_CNTR&^FS
/ FN980FD&WS_CON&^FS
/ FN979FD&WS_HEADER& &^FS
/ ^PQ1,0,1,N
/ ^XZ
/ ^FX End of job

SAPscript - output of delivery item text field

Hello,
I would like to show an item text field of a delivery (VL02n) on one of the output script forms.
I've used the function read_text in my print program for the output type:
DATA: BEGIN OF TEXT_CARTONQUAN OCCURS 20.
 INCLUDE STRUCTURE TLINE.
DATA: END OF TEXT_CARTONQUAN.
CALL FUNCTION 'READ_TEXT'
 EXPORTING
 ID = 'Z005'
 LANGUAGE = SY-LANGU
 NAME = VBDPL-TDNAME
 OBJECT = 'VBBP'
 IMPORTING
 HEADER = THEAD
 TABLES
 LINES = TEXT_CARTONQUAN
 EXCEPTIONS
 NOT_FOUND = 1.
 READ TABLE TEXT_CARTONQUAN INDEX 1.
 MOVE TEXT_CARTONQUAN-TDLINE TO VBDPL-USR01_VBLB.
Now I put this code into my sapscript:
IL &VBDPL-USR01_VBLB&
For some reasons, it does not come up on the form, but I know it should have a value.
Am I missing something?
Thanks,
Anne
<MOVED BY MODERATOR TO THE CORRECT FORUM>
Edited by: Alvaro Tejada Galindo on Jan 7, 2009 11:25 AM

Hello,
thanks for the answers!
@Ramiro Escamilla
I've tried that already, but for some reasons, the break point doesn't work, it is not stopping during the print out. I've tested if it is using that print program and uncommented the entry subroutine and I got an error message then, so it's the correct print program. Any suggestions why break point is not working?
@Pawan Kesari
I did that and this is working. But the problem is, I need this value within an IF statement, because I only want to give this and some text out, if INCLUDE &VBDPL-TDNAME& OBJECT 'VBBP' ID 'Z005' has a value. Unfortunately I cannot use the Include statement within an IF statement.
Thanks
Anne

SAPScript output

Hi,
This is my example.
In Sapscript the name of the form is Z_TESTSCRIPT.
Text elements for following windows:
HEADER
Element HEADER
/: POSITION XORIGIN 2 CM YORIGIN '-0.5 CM'
/: BOX XPOS 1 CM YPOS 1 CM WIDTH 18 CM HEIGHT 1 CM FRAME 10 TW INTENSITY 10
P2 ,,TEST PURCHASE ORDER</>
MAIN
Element MAIN
P1 Customer/Supplier:</>,,&KNA1-NAME1&
P1 PO No:</>,,&EKPO-EBELN&
P1 Part No:</>,,&MAKT-MATNR&
P1 Description:</>,,&MAKT-MAKTX&
P1 Quantity:,,</>&EKPO-MENGE&
P1 Sign:</>&uline(81)&
P1 Date:</>&EKKO-AEDAT&
FOOTER
Element FOOTER
/: POSITION XORIGIN 2 CM YORIGIN '-0.5 CM'
/: BOX XPOS 1 CM YPOS 1 CM WIDTH 18 CM HEIGHT 1 CM FRAME 10 TW INTENSITY 10
P2 ,,PLEASE SIGN THE PO BEFORE DISPATCH</>
And the ABAP Program name is ZPSAPSCRIPT.
And the code is like this.
REPORT ZPSAPSCRIPT.
TABLES : EKKO,
EKPO,
KNA1,
USR01,
MARA,
MAKT.
DATA : BEGIN OF ZOPTION.
INCLUDE STRUCTURE ITCPO.
DATA : END OF ZOPTION.
PARAMETERS: P_EBELN LIKE EKKO-EBELN,
P_EBELP LIKE EKPO-EBELP.
CLEAR EKPO.
SELECT SINGLE * FROM EKPO
WHERE EBELN = P_EBELN AND
EBELP = P_EBELP.
CLEAR KNA1.
SELECT SINGLE NAME1 FROM KNA1
INTO KNA1-NAME1
WHERE KUNNR = EKPO-KUNNR.
CLEAR MAKT.
SELECT SINGLE MAKTX FROM MAKT
INTO MAKT-MAKTX
WHERE MATNR = EKPO-MATNR AND
SPRAS = SY-LANGU.
CLEAR USR01.
SELECT SINGLE * FROM USR01 WHERE BNAME = SY-UNAME.
ZOPTION-TDDEST = USR01-SPLD. "Output device (printer)
ZOPTION-TDIMMED = 'X'. "Print immediately
ZOPTION-TDDELETE = 'X'. "Delete after printing
ZOPTION-TDPROGRAM = 'ZPQRPRNT'. "Program Name
CALL FUNCTION 'OPEN_FORM'
EXPORTING
APPLICATION = 'TX'
ARCHIVE_INDEX = ' '
ARCHIVE_PARAMS = ' '
DEVICE = 'PRINTER'
DIALOG = ' '
FORM = 'Z_TESTSCRIPT'
LANGUAGE = SY-LANGU
OPTIONS = ZOPTION
IMPORTING
LANGUAGE = SY-LANGU
EXCEPTIONS
OTHERS = 1.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
ELEMENT = 'HEADER'
FUNCTION = 'SET'
TYPE = 'BODY'
WINDOW = 'HEADER'
EXCEPTIONS
ELEMENT = 1.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
ELEMENT = 'MAIN'
FUNCTION = 'SET'
TYPE = 'BODY'
WINDOW = 'MAIN'
EXCEPTIONS
ELEMENT = 1.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
ELEMENT = 'FOOTER'
FUNCTION = 'SET'
TYPE = 'BODY'
WINDOW = 'FOOTER'
EXCEPTIONS
ELEMENT = 1.
CALL FUNCTION 'CLOSE_FORM'
EXCEPTIONS
UNOPENED = 1
OTHERS = 2.
But the output, if i click on print preview button then the output is like below, but i could not see the purchase order which i have selected in the selection screen.
Element HEADER
/: POSITION XORIGIN 2 CM YORIGIN '-0.5 CM'
/: BOX XPOS 1 CM YPOS 1 CM WIDTH 18 CM HEIGHT 1 CM FRAME 10 TW INTENSITY 10
P2 ,,TEST PURCHASE ORDER</>
Element MAIN
P1 Customer/Supplier:</>,,&KNA1-NAME1&
P1 PO No:</>,,&EKPO-EBELN&
P1 Part No:</>,,&MAKT-MATNR&
P1 Description:</>,,&MAKT-MAKTX&
P1 Quantity:,,</>&EKPO-MENGE&
P1 Sign:</>&uline(81)&
P1 Date:</>&EKKO-AEDAT&
Element FOOTER
/: POSITION XORIGIN 2 CM YORIGIN '-0.5 CM'
/: BOX XPOS 1 CM YPOS 1 CM WIDTH 18 CM HEIGHT 1 CM FRAME 10 TW INTENSITY 10
P2 ,,PLEASE SIGN THE PO BEFORE DISPATCH</>
Same as the coding done for the text element for the main, header and Footer.
Message was edited by: sriram Ponna
Message was edited by: sriram Ponna
Message was edited by: sriram Ponna

Hi,
These is how i define the paragraphs.
Paragraphs Attributes
P1 Default Paragraph
 Standard attributes
 Line spacing 1.00 LN
 Left margin 1.00 CM
 Alignment Left-aligned
 Font attributes
 Font family TIMES
 Font size 12.0 Point
P2 Header Paragraph
 Standard attributes
 Line spacing 1.00 LN
 Left margin 4.50 CM
 Alignment Left-aligned
 Font attributes
 Font family TIMES
 Font size 18.0 Point
 Bold Yes
P3 Undelined paragraph
 Standard attributes
 Line spacing 1.00 LN
 Alignment Left-aligned
 Font attributes
 Font family TIMES
 Font size 12.0 Point
 Underlined Yes
Thanks,
Sriram.

Weird Sapscript output

Hi everyone!
My problem goes like this: I recently revised a sapscript driver program for the payment advice form, which is working fine in another version. The problem is, when I copied the subroutine to another version of the driver program, what it does is it includes in the final output the "test version" of the form, like what you normally see when you test the sapscript from se71, plus the pages with the actual data in them. I am really not sure what is wrong with the driver program, since it's working fine with the other version. The subroutine was originally copied off the include RFFORI06. For everyone's reference, The code is below, and the one marked PBA01 are my additional code. Nothing was added or changed to the sapscript.
FORM AVIS *
Druck Avis *
Gerufen von END-OF-SELECTION (RFFOxxxz) *
keine USING-Parameter *
FORM avis.
DATA:
 l_form LIKE itcta-tdform,
 l_pages LIKE itctg OCCURS 0 WITH HEADER LINE.
Abarbeiten der extrahierten Daten *
IF flg_sort NE 2.
 SORT BY avis.
 flg_sort = 2.
ENDIF.
LOOP.
*-- Neuer zahlender Buchungskreis -
 AT NEW reguh-zbukr.
 PERFORM buchungskreis_daten_lesen.
 ENDAT.
*-- Neuer Zahlweg -
 AT NEW reguh-rzawe.
 flg_probedruck = 0. "für diesen Zahlweg wurde noch
 "kein Probedruck durchgeführt
 IF reguh-rzawe NE space.
 PERFORM zahlweg_daten_lesen.
 ENDIF.
 Zahlungsformular nur zum Lesen öffnen
 CALL FUNCTION 'OPEN_FORM'
 EXPORTING
 form = t042e-zforn
 dialog = space
 device = 'SCREEN'
 language = t001-spras
 EXCEPTIONS
 form = 1.
 IF sy-subrc EQ 0. "Formular existiert
 Formular auf Segmenttext (Global ®UP-SGTXT) untersuchen
Start Fix SL 20.01.99.
Next 3 lines added to allow the production of both EDI Idocs and
paper remittance advices due to implementation of BoA.
 IF par_avis NE space AND par_xdta NE space. " PE001
 par_xdta = space. " PE001
 ENDIF. " PE001
 IF par_xdta EQ space.
 IF t042e-xavis NE space AND t042e-anzpo NE 99.
 flg_sgtxt = 0.
 CALL FUNCTION 'READ_FORM_LINES'
 EXPORTING
 element = hlp_ep_element
 TABLES
 lines = tab_element
 EXCEPTIONS
 element = 1.
 IF sy-subrc EQ 0.
 LOOP AT tab_element.
 IF tab_element-tdline CS 'REGUP-SGTXT'
 AND tab_element-tdformat NE '/*'.
 flg_sgtxt = 1. "Global für Segmenttext existiert
 EXIT.
 ENDIF.
 ENDLOOP.
 ENDIF.
 ENDIF.
 ENDIF.
 CALL FUNCTION 'CLOSE_FORM'.
 ENDIF.
 Überschrift für den Formularabschluß modifizieren
 t042z-text1 = text_001.
 Dataset zur Ausgabe des Avises angeben
 PERFORM fill_itcpo USING par_pria
 'LIST5S'
 par_sofa
 hlp_auth.
 IF par_pria EQ space.
 flg_dialog = 'X'.
 ELSE.
 flg_dialog = space.
 ENDIF.
 Formular öffnen
***********************BEGIN OF PBA01*********************************
 IF p_mail NE space.
 SELECT SINGLE * INTO wa_lfa1 FROM lfa1
 WHERE lifnr = reguh-lifnr.
 CHECK sy-subrc = 0.
 SELECT SINGLE * INTO wa_adrt FROM adrt
 WHERE addrnumber = wa_lfa1-adrnr
 AND remark = 'ZFFOEDI1'.
 IF sy-subrc = 0.
 SELECT SINGLE smtp_addr INTO g_emailadd
 FROM adr6
 WHERE addrnumber = wa_lfa1-adrnr
 AND consnumber = wa_adrt-consnumber.
 ELSE.
 CLEAR wa_adr6.
 ENDIF.
 IF g_emailadd NE SPACE.
 itcpo-tdimmed = SPACE.
 ENDIF.
 ENDIF.
************************END OF PBA01**********************************
 CALL FUNCTION 'OPEN_FORM'
 EXPORTING
 form = t042b-aforn
 device = 'PRINTER'
 language = t001-spras
 OPTIONS = itcpo
 dialog = flg_dialog
 EXCEPTIONS
 form = 1.
 IF sy-subrc EQ 1. "Abbruch:
 IF sy-batch EQ space. "Formular ist nicht aktiv!
 MESSAGE a069 WITH t042b-aforn.
 ELSE.
 MESSAGE s069 WITH t042b-aforn.
 MESSAGE s094.
 STOP.
 ENDIF.
 ENDIF.
*------ end original code
 ENDIF.
End Add Dune01 **********************
 ENDAT.
*-- Neue Hausbank -
 AT NEW reguh-ubnkl.
 PERFORM hausbank_daten_lesen.
 Felder für Formularabschluß initialisieren
 cnt_avise = 0.
 cnt_avedi = 0.
 sum_abschluss = 0.
 sum_abschl_edi = 0.
 REFRESH tab_edi_avis.
 Avisformular starten
 CALL FUNCTION 'START_FORM'
 EXPORTING
 language = t001-spras
 EXCEPTIONS
 form = 1
 unended = 2.
 IF sy-subrc EQ 1. "Abbruch:
 IF sy-batch EQ space. "Formular ist nicht aktiv!
 MESSAGE a069 WITH t042b-aforn.
 ELSE.
 MESSAGE s069 WITH t042b-aforn.
 MESSAGE s094.
 STOP.
 ENDIF.
 ENDIF.
 ENDAT.
*-- Neue Empfängerbank -
 AT NEW reguh-zbnkl.
 PERFORM empfbank_daten_lesen.
 ENDAT.
*-- Neue Zahlungsbelegnummer -
 AT NEW reguh-vblnr.
 Prüfe, ob Avis auf Papier erzwungen wird
 Check if advice on paper is forced
 IF flg_papieravis EQ 1.
 reguh-ediav = space.
 ENDIF.
 Prüfe, ob HR-Formular zu verwenden ist
 Check if HR-form is to be used
 hrxblnr = regup-xblnr.
 IF ( hlp_laufk EQ 'P' OR
 hrxblnr-txtsl EQ 'HR' AND hrxblnr-txerg EQ 'GRN' )
 AND hrxblnr-xhrfo NE space.
 hlp_xhrfo = 'X'.
 ELSE.
 hlp_xhrfo = space.
 ENDIF.
 HR-Formular besorgen
 read HR form
 IF hlp_xhrfo EQ 'X'.
 PERFORM hr_formular_lesen.
 ENDIF.
 Prüfung, ob Avis erforderlich
 cnt_zeilen = 0.
 IF hlp_xhrfo EQ space.
 IF flg_sgtxt EQ 1.
 cnt_zeilen = reguh-rpost + reguh-rtext.
 ELSE.
 cnt_zeilen = reguh-rpost.
 ENDIF.
 ELSE.
 DESCRIBE TABLE pform LINES cnt_zeilen.
 ENDIF.
 flg_kein_druck = 0.
 IF reguh-ediav EQ 'V'.
 Avis bereits versendet
 flg_kein_druck = 1. "kein Druck erforderlich
 ELSEIF reguh-rzawe NE space.
 Avis zu Formular
 IF hlp_zeilen EQ 0 AND par_xdta EQ space.
 IF t042e-xavis EQ space OR cnt_zeilen LE t042e-anzpo.
 flg_kein_druck = 1. "kein Druck erforderlich
 ENDIF.
 Avis zum DTA
 ELSE.
 CLEAR tab_kein_avis.
 MOVE-CORRESPONDING reguh TO tab_kein_avis.
 READ TABLE tab_kein_avis.
 IF sy-subrc EQ 0.
 flg_kein_druck = 1. "kein Druck erforderlich
 ENDIF.
 ENDIF.
 ENDIF.
 PERFORM zahlungs_daten_lesen.
 IF reguh-ediav NA ' V' AND hlp_xhrfo EQ space.
 PERFORM summenfelder_initialisieren.
 ENDIF.
 Schecknummer bei vornumerierten Schecks
 CLEAR regud-chect.
 READ TABLE tab_schecks WITH KEY
 zbukr = reguh-zbukr
 vblnr = reguh-vblnr.
 IF sy-subrc EQ 0.
 regud-chect = tab_schecks-chect.
 ELSEIF flg_schecknum EQ 1.
 IF zw_xvorl EQ space.
 IF hlp_laufk NE 'P'. "FI-Beleg vorhanden?
 SELECT * FROM payr
 WHERE zbukr EQ reguh-zbukr
 AND vblnr EQ reguh-vblnr
 AND gjahr EQ regud-gjahr
 AND voidr EQ 0.
 ENDSELECT.
 sy-msgv1 = reguh-zbukr.
 sy-msgv2 = regud-gjahr.
 sy-msgv3 = reguh-vblnr.
 ELSE. "HR-Abrechnung vorhanden?
 SELECT * FROM payr
 WHERE pernr EQ reguh-pernr
 AND seqnr EQ reguh-seqnr
 AND btznr EQ reguh-btznr
 AND voidr EQ 0.
 ENDSELECT.
 sy-msgv1 = reguh-pernr.
 sy-msgv2 = reguh-seqnr.
 sy-msgv3 = reguh-btznr.
 ENDIF.
 IF sy-subrc EQ 0.
 regud-chect = payr-chect.
 ELSE.
 IF sy-batch EQ space. "check does not exist
 MESSAGE a564(fs) WITH sy-msgv1 sy-msgv2 sy-msgv3.
 ELSE.
 MESSAGE s564(fs) WITH sy-msgv1 sy-msgv2 sy-msgv3.
 MESSAGE s549(fs).
 STOP.
 ENDIF.
 ENDIF.
 ELSE.
 regud-chect = 'TEST'.
 ENDIF.
 ENDIF.
 Berechnung Anzahl benötigter Wechsel
 IF reguh-weamx EQ 0.
 regud-wecan = 1.
 ELSE.
 regud-wecan = reguh-weamx.
 IF reguh-wehrs NE 0.
 ADD 1 TO regud-wecan.
 ENDIF.
 ENDIF.
 ENDAT.
*-- Verarbeitung der Einzelposten-Informationen -
 AT daten.
 PERFORM einzelpostenfelder_fuellen.
 IF flg_papieravis EQ 1.
 reguh-ediav = space.
 ENDIF.
 IF reguh-ediav NA ' V' AND hlp_xhrfo EQ space.
 PERFORM summenfelder_fuellen.
 ENDIF.
 ENDAT.
*-- Ende der Zahlungsbelegnummer -
 AT END OF reguh-vblnr.
 Zahlungsbelegnummer bei Saldo-Null-Mitteilungen und
 Zahlungsanforderungen nicht ausgeben
 IF ( reguh-rzawe EQ space AND reguh-xvorl EQ space )
 OR t042z-xzanf NE space.
 reguh-vblnr = space.
 ENDIF.
 Stets Ausgabe via EDI, falls möglich
 IF flg_papieravis EQ 1.
 reguh-ediav = space.
 ENDIF.
 CLEAR regud-avedn.
 IF reguh-ediav NA ' V' AND hlp_xhrfo EQ space.
 CALL FUNCTION 'FI_EDI_REMADV_PEXR2001_OUT'
 EXPORTING
 reguh_in = reguh
 regud_in = regud
 xeinz_in = regud-xeinz
 IMPORTING
 docnum_out = regud-avedn
 TABLES
 tab_regup = tab_regup
 EXCEPTIONS
 not_possible = 4.
 IF sy-subrc EQ 0.
 ADD 1 TO cnt_avedi.
 ADD reguh-rbetr TO sum_abschl_edi.
 WRITE:
 cnt_avise TO regud-avise,
 cnt_avedi TO regud-avedi,
 sum_abschluss TO regud-summe CURRENCY t001-waers,
 sum_abschl_edi TO regud-suedi CURRENCY t001-waers.
 TRANSLATE:
 regud-avise USING ' *',
 regud-avedi USING ' *',
 regud-summe USING ' *',
 regud-suedi USING ' *'.
 tab_edi_avis-reguh = reguh.
 tab_edi_avis-regud = regud.
 APPEND tab_edi_avis.
 flg_kein_druck = 1.
 ENDIF.
 ENDIF.
 Ausgabe auf Papier (nur falls notwendig)
 IF flg_kein_druck EQ 0.
 Name des Elements mit dem Anschreiben zusammensetzen
 IF reguh-rzawe NE space.
 hlp_element = '610-'.
 hlp_element+4 = reguh-rzawe.
 hlp_eletext = text_610.
 REPLACE '&ZAHLWEG' WITH reguh-rzawe INTO hlp_eletext.
 ELSE.
 hlp_element = '611-'.
 hlp_element+4 = reguh-avisg.
 hlp_eletext = text_611.
 ENDIF.
 Probedruck
 IF flg_probedruck EQ 0. "Probedruck noch nicht erledigt
 PERFORM daten_sichern.
 DO par_anzp TIMES.
 Probedruck-Formular starten
 CALL FUNCTION 'START_FORM'
 EXPORTING
 language = hlp_sprache.
 Fenster mit Probedruck schreiben
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'INFO'
 element = '605'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = hlp_element
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc NE 0.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '610'
 EXCEPTIONS
 window = 1
 element = 2.
 ENDIF.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '614'
 EXCEPTIONS
 window = 1
 element = 2.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '615'
 EXCEPTIONS
 window = 1
 element = 2.
 DO 5 TIMES.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '625'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 ENDDO.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '630'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'TOTAL'
 element = '630'
 EXCEPTIONS
 window = 1
 element = 2.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'INFO'
 element = '605'
 function = 'DELETE'
 EXCEPTIONS
 window = 1
 element = 2.
 Probedruck-Formular beenden
 CALL FUNCTION 'END_FORM'.
 ENDDO.
 PERFORM daten_zurueck.
 flg_probedruck = 1. "Probedruck erledigt
 ENDIF.
 PERFORM zahlungs_daten_lesen_hlp.
 PERFORM summenfelder_initialisieren.
 Formular starten
 CALL FUNCTION 'START_FORM'
 EXPORTING
 language = hlp_sprache.
 IF hlp_xhrfo EQ space.
 Fenster Info, Element Unsere Nummer (falls diese gefüllt ist)
 IF reguh-eikto NE space.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'INFO'
 element = '605'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'INFO'.
 err_element-elemt = '605'.
 err_element-text = text_605.
 COLLECT err_element.
 ENDIF.
 ENDIF.
 Fenster Carry Forward, Element Übertrag (außer letzte Seite)
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'CARRYFWD'
 element = '635'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'CARRYFWD'.
 err_element-elemt = '635'.
 err_element-text = text_635.
 COLLECT err_element.
 ENDIF.
 Hauptfenster, Element Anschreiben-x (nur auf der ersten Seite)
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = hlp_element
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '610'
 EXCEPTIONS
 window = 1
 element = 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = hlp_element.
 err_element-text = hlp_eletext.
 COLLECT err_element.
 ENDIF.
 Hauptfenster, Element Abweichender Zahlungsemfänger
 IF regud-xabwz EQ 'X'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '612'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '612'.
 err_element-text = text_612.
 COLLECT err_element.
 ENDIF.
 ENDIF.
 Hauptfenster, Element Zahlung erfolgt im Auftrag von
 IF reguh-absbu NE reguh-zbukr.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '613'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '613'.
 err_element-text = text_613.
 COLLECT err_element.
 ENDIF.
 ENDIF.
 Hauptfenster, Element Unterschrift
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '614'
 EXCEPTIONS
 window = 1
 element = 2.
 Hauptfenster, Element Überschrift (nur auf der ersten Seite)
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '615'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '615'.
 err_element-text = text_615.
 COLLECT err_element.
 ENDIF.
 Hauptfenster, Element Überschrift (ab der zweiten Seite oben)
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '615'
 type = 'TOP'
 EXCEPTIONS
 window = 1
 element = 2. "Fehler bereits oben gemerkt
 Hauptfenster, Element Übertrag (ab der zweiten Seite oben)
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '620'
 type = 'TOP'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '620'.
 err_element-text = text_620.
 COLLECT err_element.
 ENDIF.
 ELSE.
 HR-Formular ausgeben
 write HR form
 LOOP AT pform.
 CHECK sy-tabix GT t042e-anzpo.
 regud-txthr = pform-linda.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '625-HR'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '625-HR'.
 err_element-text = text_625.
 COLLECT err_element.
 ENDIF.
 ENDLOOP.
 ENDIF.
 Ausgabe der Einzelposten
 flg_diff_bukrs = 0.
 LOOP AT tab_regup.
 AT NEW bukrs.
 regup-bukrs = tab_regup-bukrs.
 IF ( regup-bukrs NE reguh-zbukr OR flg_diff_bukrs EQ 1 )
 AND ( reguh-absbu EQ space OR reguh-absbu EQ reguh-zbukr ).
 flg_diff_bukrs = 1.
 SELECT SINGLE * FROM t001 INTO *t001
 WHERE bukrs EQ regup-bukrs.
 regud-abstx = *t001-butxt.
 regud-absor = *t001-ort01.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '613'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '613'.
 err_element-text = text_613.
 COLLECT err_element.
 ENDIF.
 ENDIF.
 ENDAT.
 regup = tab_regup.
 PERFORM einzelpostenfelder_fuellen.
 IF hlp_xhrfo EQ space.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '625'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '625'.
 err_element-text = text_625.
 COLLECT err_element.
 ENDIF.
 ENDIF.
 PERFORM summenfelder_fuellen.
 IF hlp_xhrfo EQ space.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '625-TX'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 ENDIF.
 ENDLOOP.
 PERFORM ziffern_in_worten.
 Summenfelder hochzählen und aufbereiten
 ADD 1 TO cnt_avise.
 ADD reguh-rbetr TO sum_abschluss.
 WRITE:
 cnt_avise TO regud-avise,
 cnt_avedi TO regud-avedi,
 sum_abschluss TO regud-summe CURRENCY t001-waers,
 sum_abschl_edi TO regud-suedi CURRENCY t001-waers.
 TRANSLATE:
 regud-avise USING ' *',
 regud-avedi USING ' *',
 regud-summe USING ' *',
 regud-suedi USING ' *'.
 IF hlp_xhrfo EQ space.
 Hauptfenster, Element Gesamtsumme (nur auf der letzten Seite)
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '630'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '630'.
 err_element-text = text_630.
 COLLECT err_element.
 ENDIF.
 Hauptfenster, Element Bankgebühr (Japan)
 IF reguh-paygr+18(2) EQ '$J'.
 WHILE reguh-paygr(1) EQ 0.
 SHIFT reguh-paygr(10) LEFT.
 IF sy-index > 10. EXIT. ENDIF.
 ENDWHILE.
 SUBTRACT reguh-rspe1 FROM: regud-swnet, sum_abschluss.
 WRITE:
 regud-swnet TO regud-swnes CURRENCY reguh-waers,
 sum_abschluss TO regud-summe CURRENCY t001-waers.
 TRANSLATE:
 regud-swnes USING ' *',
 regud-summe USING ' *'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '634'
 EXCEPTIONS
 window = 1
 element = 2.
 IF sy-subrc EQ 2.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'MAIN'.
 err_element-elemt = '634'.
 err_element-text = text_634.
 COLLECT err_element.
 ENDIF.
 ENDIF.
 Fenster Carry Forward, Element Übertrag löschen
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'CARRYFWD'
 element = '635'
 function = 'DELETE'
 EXCEPTIONS
 window = 1
 element = 2. "Fehler bereits oben gemerkt
 Hauptfenster, Element Überschrift löschen
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '615'
 type = 'TOP'
 function = 'DELETE'
 EXCEPTIONS
 window = 1
 element = 2. "Fehler bereits oben gemerkt
 Hauptfenster, Element Übertrag löschen
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '620'
 type = 'TOP'
 function = 'DELETE'
 EXCEPTIONS
 window = 1
 element = 2. "Fehler bereits oben gemerkt
 Hauptfenster, Element Abschlußtext
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '631'
 function = 'APPEND'
 EXCEPTIONS
 window = 1
 element = 2. "Ausgabe ist freigestellt
 Fenster Total, Element Gesamtsumme
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'TOTAL'
 element = '630'
 EXCEPTIONS
 window = 1
 element = 2. "Ausgabe ist freigestellt
 ENDIF.
 Formular beenden
 CALL FUNCTION 'END_FORM'.
 ENDIF.
 ENDAT.
*-- Ende der Hausbank -
 AT END OF reguh-ubnkl.
 IF ( cnt_avise NE 0 "Formularabschluß erforderlich
 OR cnt_avedi NE 0 ) AND hlp_laufk NE '*'.
 SET COUNTRY space.
 Liste aller Avis-Zwischenbelege ausgeben
 IF cnt_avedi NE 0.
 REFRESH tab_elements.
 CALL FUNCTION 'READ_FORM_ELEMENTS'
 TABLES
 elements = tab_elements
 EXCEPTIONS
 OTHERS = 3.
 READ TABLE tab_elements WITH KEY
 window = 'MAIN'
 element = '676'.
 IF sy-subrc EQ 0.
 CALL FUNCTION 'START_FORM'
 EXPORTING
 language = t001-spras
 startpage = 'EDI'.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '675'
 type = 'TOP'
 EXCEPTIONS
 OTHERS = 4.
 sic_reguh = reguh.
 sic_regud = regud.
 LOOP AT tab_edi_avis.
 reguh = tab_edi_avis-reguh.
 regud = tab_edi_avis-regud.
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 element = '676'
 EXCEPTIONS
 OTHERS = 4.
 ENDLOOP.
 CALL FUNCTION 'END_FORM'.
 reguh = sic_reguh.
 regud = sic_regud.
 ENDIF.
 ENDIF.
 Formular für den Abschluß starten
 CALL FUNCTION 'START_FORM'
 EXPORTING
 language = t001-spras
 startpage = 'LAST'.
 Ausgabe des Formularabschlusses
 CALL FUNCTION 'WRITE_FORM'
 EXPORTING
 window = 'SUMMARY'
 EXCEPTIONS
 window = 1.
 IF sy-subrc EQ 1.
 err_element-fname = t042b-aforn.
 err_element-fenst = 'SUMMARY'.
 err_element-elemt = space.
 err_element-text = space.
 COLLECT err_element.
 ENDIF.
 Formular beenden
 CALL FUNCTION 'END_FORM'.
 ENDIF.
 ENDAT.
*-- Ende des Zahlwegs -
 AT END OF reguh-rzawe.
 Abschluß des Formulars
 CALL FUNCTION 'CLOSE_FORM'
 IMPORTING
 RESULT = itcpp.
**************************BEGIN OF PBA01******************************
If a vendor email address exists, will call function *
ZFI_EMAILREMITFROMSPOOL to send remittance advice, else will include *
the spool number in the list for printing. *
 IF g_emailadd NE SPACE.
 v_spoolid = itcpp-tdspoolid.
 CALL FUNCTION 'ZFI_EMAILREMITFROMSPOOL'
 EXPORTING
 I_SPOOLID = v_spoolid
 I_RECIPIENT = g_emailadd
 I_REGUH = reguh
 EXCEPTIONS
 FAILED_TO_CONVERT_TO_PDF = 1
 OTHERS = 2.
*--- Delete Spool from list to distinguish from RA's for printing
 CLEAR wa_spoolreq.
 wa_spoolreq-rqident = v_spoolid.
 CALL FUNCTION 'RSPO_IDELETE_SPOOLREQ'
 EXPORTING
 SPOOLREQ = wa_spoolreq
 EXCEPTIONS
 ERROR = 1
 OTHERS = 2.
 ELSE.
 IF itcpp-tdspoolid NE 0.
 CLEAR tab_ausgabe.
 tab_ausgabe-name = t042z-text1.
 tab_ausgabe-dataset = itcpp-tddataset.
 tab_ausgabe-spoolnr = itcpp-tdspoolid.
 COLLECT tab_ausgabe.
Next line added. " PE001
 SET PARAMETER ID 'ZSP' FIELD tab_ausgabe-spoolnr. " PE001
 ENDIF.
 ENDIF.
***************************END OF PBA01*******************************
 ENDAT.
ENDLOOP.
ENDFORM. "Avis[/code]

Hi,
if i understood well, you created a copy of a standard program. Have you also copied the variants ?
I'm thinking of parameter "Number of sample printouts" (RFPDO-FORDANZP in RFFOUS_C for example) which define a number of test pages :
F1 on parameter displays the following tool tip :
Number of Sample Printouts
Use
 Before payment transfer mediums and payment advices are printed, the
 system outputs for each payment the number of sample printings (0-9)
 requested by the user.
i'd advise to set to 0 if it's not already done.
peter.

F4IF_INT_TABLE_VALUE_REQUEST output language change

Hi experts,
I am buidling an internal table data in english language but when I click F4 on the specified field at run time , I am getting output pop-up data in different language seems like korean.
Even the return code from 'F4IF_INT_TABLE_VALUE_REQUEST' is zero i.e success.
What could be the possible error or is it related to any Unicode check?
Thank you
Depesh Kumar

Hi deepesh,
Just check the table from which your fetching data into internal table is having any language key fields, if there the pass sy-langu and fetch the required data only.
There is noting like language in the function module, it all depends upon the data what you are fetching.
Just give the screen field and the table name so that we can look and comment
regards
Kumar M

Sapscript output(Spool) to PDF problem when viewed

We have a number of documents which are output in Russian using the Cyrillic courier font within our Uincode SAP system. They look fine on the spool when viewed, print okay, and all look fine when converted to a PDF file (using RSTXPDFT4) and viewed via Adobe PDF viewer (vers 9.1.20), except one form, the invoice, which will not display properly in Adobe, showing square blocks with crosses through them when viewed. The strange thing is that when this same PDF is viewed via Sumatra (Open source PDF viewer) it looks perfect, but will not display via the Adobe PDF viewer, even though all the other delivery/dispatch docuemnts (all Sapscript) print and view fine via the Adobe PDF viewer.
I guess I could suggest that we just use Sumatra from now on, but that is not really the answer when you have a multinational company which has Adobe already installed on all hardware as default.
Has anyone come across this problem before. I was wondering if there could be anything in Sapscript that might have caused this as this is a copy of SAP standard Russian Invoice Sapscript (J_3RVINVOICE)?
I'm going to check OSS to see if there's a fault with the PDF convertion program (RSTXPDFT4) but I would like to hear from anyone that may have encountered the same problem.
Regards
Gary

Hi Gary
How the issue is resolved, please let me know. Since i am also facing same issue.
Thanks
M G Shankar

Sapscript - Output Window twice on one Page

Hi All
I am working on a cheque output on pre-formatted paper.
the page is split and perforated into 3 pieces
1. Summary
2. Actual Cheque
3. Summary (identical to Part 1)
Part 1 and 2 are sent to vendor, and part 3 is kept for our records.
I need part 1 and part 3 to appear identically on one page.
The print program is RFFTOUS_C.
Can anyone help me with this issue
Thanks

Hi Anya
Thank you for replying.
I don't think this will work.
The summary parts of sapscript need to output invoice line items, what i really need is two main windows on the one page, one on the top and one on the bottom.
I have tried creating two main windows, but I only get the output in the top window
Any ideas ?

SAPScript output differently depending on who is running it

We are running a SAP standard SAPScript. When I run it, certain information is missing (box numbers which are 'hardcoded' in SE71) but when SAP log into our system and run exactly the same thing, they do see the data. The problem exists for both printing the SAPScript and viewing it online.
Any ideas?
Thanks very much.
Alison

It may be because of the following.
1) may be the user does not have autorizations to see the logo etc
2) may be both might be testing in different client, note: SAPscript is client specific.
3) Mostly output option, i.e. printers you are using is different. make sure, both try to view setting the same output device.
Close the thread once question is answered.
Regards,
SaiRam

PO sapscript output language

Similar Messages

Maybe you are looking for