Sap scripts se71 symbols

Hi Guys,
I would like to ask how the Program Symbols work.
E.g. I have a symbol 'XADR-FAX_number' but no table or structure 'XADR' exist in the system. How can I find out from where the script takes the value for this symbol?
Many thanks,
Jan

Standard symbols are stores in the table TTDTG (SAPscript: Standard Symbols for Word Processing)
Chk this help for more details.
http://help.sap.com/saphelp_40b/helpdata/pt/d1/8033c3454211d189710000e8322d00/content.htm

Similar Messages

Sap script - se71 - change in form

Hi I tried to change as below but it giving me error as below. please provide me the solution.
change Code in script:
/: DEFINE V_QMATA.
/: PERFORM GET_QMATA IN PROGRAM ZRVADEK01 USING &VBLKP-MATNR&
/: USING &VBLKP-WERKS&
/: CHANGING &V_QMATA&.
/: ENDPERFORM.
/: IF &V_QMATA& EQ 'Z0001'.
/E
/: ENDIF.
Error when i syntex check for sap script:
( Check by Go to text -> check)
Symbol expected
Too many parameters
Code in Calling program ( This program is my printing program)
form get_qmata TABLES fp_it_intab STRUCTURE itcsy
fp_it_intabb structure itcsy
fp_it_outtab STRUCTURE itcsy.
data : v_matnr like marc-matnr,
v_werks like marc-werks,
v_qmata like marc-qmata.
READ TABLE fp_it_intab INDEX 1.
CHECK sy-subrc EQ 0.
MOVE fp_it_intab-value TO v_matnr.
READ TABLE fp_it_intabb INDEX 1.
CHECK sy-subrc EQ 0.
MOVE fp_it_intabb-value TO v_werks.
select single qmata from marc into v_qmata where matnr = v_matnr
and werks = v_werks. .
READ TABLE fp_it_outtab INDEX 1.
CHECK sy-subrc EQ 0.
READ TABLE fp_it_outtab INTO wa_outtab WITH KEY name = 'I_QMATA'
BINARY SEARCH.
IF sy-subrc EQ 0.
wa_outtab-value = v_qmata.
move v_qmata to fp_it_outtab-value.
MODIFY fp_it_outtab INDEX sy-tabix transporting value.
ENDIF.
endif.
endform.

hi
chk this
/: DEFINE V_QMATA.
/: PERFORM GET_QMATA IN PROGRAM ZRVADEK01
/: USING &VBLKP-MATNR&
/: USING &VBLKP-WERKS&
/: CHANGING &V_QMATA&.
/: ENDPERFORM.
/: IF &V_QMATA& EQ 'Z0001'.
/E
/: ENDIF.
FORM GET_QMATA TABLES input STRUCTURE itcsy
output STRUCTURE itcsy.
endform.
regard
nawa

Step by step procedure to design a form using SAP Scripts (SE71)

Hello Experts, I am new to SAP Scripts ...I am interested to learn SAP Scripts,
Please help me out to learn SAP Scripts by giving some example codes.
Thanks and Regards,
Shaik.

check the following link for the same.
SAP Script, Change form , SE71
Regards,
Gauravjit
Reward points if the link is helpful

Help in Sap script(se71)

Hi
i Wan to know if i have Z-layout how i can know from which standard program it copy
Thanks
Have a nice day

Hi,
After creating a Z from a standard user can modify everything including description of the script / program. So there is not such direct way to determine that.
For scipts maybe u can try to look into T-code NACE and see related scripts.
Also, TNAPR table can be used.
Regards,
Vivek

SCRIPT SE71

Sir,
MY client want to convert SAP-SCRIPT ( SE71 ) out put directly in PDF format. He don't want to use standard program
RSTXPDFT4 for PDF. AND through that he want to send E-Mail in PDF format.
Thanks & Regards,
Manoj Pise.

Hello,
Once it is converted to OTF (as per the previous attachment), you can call the function module u2013 u2018SO_DOCUMENT_SEND_API1u2019 to send the OTF as pdf attachment via mail.
Refer the below WIKI to get more idea on the function module if you are not much comfortable:
http://wiki.sdn.sap.com/wiki/display/ABAP/SendingMails-HomePage
Regards,
Selva K.

System symbol for total number of pages in SAP Script

Hello All,
I need to display the total number of pages in a SAP Script. Say there are 4 pages and I want to display "Page 1 of 4" at the footer of first page.
Is there any system symbol to get the total number of pages in SAP Script?
Many thanks in advance for your help.
Regards
Indrajit Chakraborti

Hi,
In the Footer window, use this fields
&Page& of &SAPSCRIPT-FORMPAGES&
&PAGE& --> Current page No
&SAPSCRIPT-FORMPAGES& --> Total No of pages Regards
Regards
Sudheer
Message was edited by:
Sudheer Junnuthula

Not able to edit my Sap script form using se71 ?

I have been working on SAP Script say ZKI_FORM using se71 in polish language.
Today When I try to make changes as usual, it is not allowing me to go into change mode . It is giving Error in object Editing like below.
" Changes to Repository or cross-client Customizing are not permitted
Choose 'Display object' or 'Cancel'. "
My functional consultant doesn't know why it is happened like that ? Even my team lead doesn't know this.
COULD ANY BODY PLEASE SUGGEST HOE TO GO TO CHANGE MODE OF THE SCRIPT FORM AND MAKE MY CHANGES ?
THANKS IN ADVANCE .

hi
Give the form name ..
menuiten--> utilities --> convert original language
Step by step for copying form.
give the standard form name in SE71 and language as DE
click create.
popup come... check radibutton copy from original..
given the zformname and green check.
save it and back.
give the zformname again and language DE and click change..
go to menuitem Utilities --> Convert original language
give new language to EN.. green check..
SAve and BACK.
give zformname and language as EN and change..
there u can do all modifications..
Or use SE76 give formname and source language and target language...
then change and press SAVE.
Regards
SAB

How to use Symbols or icons in SAP script

Hai ,
I am facing one problem in sap script , I want to display one of my field as icon (or )symbol ( tick mark ) in sap script . how to do . Particular transfer order ( check LTAP table ) having 10 line items . In 8 line items are confirmed ( pquit = 'X') others not confirmed . if LTAP-pquit = 'X' then instead of 'X' i need tick mark symbol .

Icons and symbols in SAPscript texts
To print these, use output devices whose device type uses one of the following printer drivers:
·        HPL2 (PCL-5 printers, such as HPLJ4, HPLJ5, HPLJ5SI, or HPLJ4000)
·        POST (PostScript printers, such as POSTSCPT, or POST2)
·        PRES (PRESCRIBE printers, such as KYOFS150, or KYOFS170)
·        SWIN (device types SAPWIN/SWIN and country-specific versions)
Icons and symbols in ABAP lists
If you also want to print these characters in lists, you must define an output device with one of the following device types:
·        HPLJ4000/HPLJ5000/HPLJ1100: Device types for PCL-5-printers
·        KYOFS170: Device type for Prescribe II printers
·        POST2: Device type for PostScript Level 2 printers
·        SAPWIN/SWIN and the country-specific versions: generic, that is, device-independent device type for printing using Microsoft Windows

Fixing Program symbols in SAP Scripts

Dear All
I am new to SAP Scripts, Can any one tell me how to set or fix the position of program symbols in an SAP Script at particular coloumn. For example, i have to print 6 program symbols, prog symb "Documnet Num" has to be printer on 20 coloumn of the paper, how can we do this?
Thank you

Hi,
Create new paragraph and in secion 'tabs', define columns and their positions. In your window you can use that new paragraph in the following way:
XX &var1&,,&var2&,,&var3&,,
XX stands for paragraph name
,, stands for a tab defined in paragraph XX

Reg : trade mark symbol(TM) in SAP Script output

Hi gurus,
i am using SAP Script to print a material description , when i tried to run the sript in debugging mode it is showing as trandemark symbol as(TM) but in output ( i.e in printing ) i am getting this value as # . for example if i material description is xxx(TM) , then in debugging it is showing as xxx(TM) , but while printing it is showing the value as xxx(#).how to overcome this . please help me on this.
Thanks and regards,
Rajeshwar.

Hi
[Double Byte Characters in SAP |https://www.sdn.sap.com/irj/sdn/go/portal/prtroot/docs/library/uuid/00adf4da-76f1-2910-43aa-81ad2a67332c]
Regards,
Sravanthi

Sap Script printing issue

Hi Gurus,
I am working on a SAP script... when I am printing the SAP script the last few lines of my text is missing... I got to know that there might be a problem in the page setting... i.e. the page may be set as a A4 and i am printing on letter... so can you please tell me how can I check what the page setting that my sap script is using.
Thanks,
Rajaeev Gupta

Hi,
Issue of 'part of the Text missing' is happening during Print Preview or when taking a print out?
I guess, the problem is due to height of the window, the height of the window where u printing this text is not able to accomodate the entire text. just increase the height of the window & try.
To know the page format that ur script is using, just follow the below steps:
Txn SE71--> give the Script form name > click on change/Display button> click on Header button (red hat symbol) in app tool bar or press F5 button --> now click on Basic Settings button. Here u see the Page Format in 'Set up Page' block...
Hope it helps!!
Rgds,
Pavan

DEMO PROGARM FOR SAP SCRIPT

HAI,
 WHICH IS THE DEMO OR EXAMPLE PROGRAM FOR SAP SCRIPT IN SAP
THANK YOU

Hi
See the sample code for Script driver Program to display the PO details
You have to design the Script layout in SE71 and see the output
*& Report ZTEST12121
*& SAPScripts Example 1
REPORT ztest12121.
*DATABASE TABLES
TABLES: ekko,ekpo,lfa1.
*INTERNAL TABLES AND STRUCTURES
DATA i_ekko LIKE ekko.
DATA i_ekpo LIKE ekpo OCCURS 0 WITH HEADER LINE.
DATA i_lfa1 LIKE lfa1.
*PARAMETERS
PARAMETERS: p_ebeln LIKE ekko-ebeln.
*VARIABLES
DATA MAT TYPE STRING VALUE 'MAT NO'.
DATA iTe TYPE STRING VALUE 'ITEM NO'.
DATA QTY TYPE STRING VALUE 'QTY'.
DATA UOM TYPE STRING VALUE 'UOM'.
DATA NET TYPE STRING VALUE 'NET PRICE'.
Data var type integer value 0.
*DATABASE SELECTS
*Header data
SELECT SINGLE * FROM ekko INTO i_ekko WHERE ekko~ebeln = p_ebeln.
IF sy-subrc = 0.
*Item Data
SELECT * FROM ekpo INTO TABLE i_ekpo WHERE ekpo~ebeln = p_ebeln.
IF sy-subrc NE 0.
 WRITE 'PURCHASE DOCUMENT ITEM DATA ERROR'.
ELSE.
*Vendor Details
 SELECT SINGLE * FROM lfa1 INTO i_lfa1 WHERE lfa1~lifnr = i_ekko-lifnr.
 IF sy-subrc NE 0.
 WRITE 'VENDOR DOCUMENT ITEM DATA ERROR'.
 ENDIF.
ENDIF.
ELSE.
WRITE 'THIS PURCHASE DOCUMENT NUMBER DOESNOT EXISTS'.
ENDIF.
CALL FUNCTION 'OPEN_FORM'
EXPORTING
APPLICATION = 'TX'
ARCHIVE_INDEX =
ARCHIVE_PARAMS =
DEVICE = 'PRINTER'
DIALOG = 'X'
 form = 'ZSCRIPT_1'
 language = sy-langu
OPTIONS =
MAIL_SENDER =
MAIL_RECIPIENT =
MAIL_APPL_OBJECT =
RAW_DATA_INTERFACE = '*'
SPONUMIV =
IMPORTING
LANGUAGE =
NEW_ARCHIVE_PARAMS =
RESULT =
EXCEPTIONS
CANCELED = 1
DEVICE = 2
FORM = 3
OPTIONS = 4
UNCLOSED = 5
MAIL_OPTIONS = 6
ARCHIVE_ERROR = 7
INVALID_FAX_NUMBER = 8
MORE_PARAMS_NEEDED_IN_BATCH = 9
SPOOL_ERROR = 10
CODEPAGE = 11
OTHERS = 12
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
 ELEMENT = 'OFFICEAD'
 FUNCTION = 'SET'
 TYPE = 'BODY'
 WINDOW = 'OFFICEAD'
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
 ELEMENT = 'PODET'
 FUNCTION = 'SET'
 TYPE = 'BODY'
 WINDOW = 'PODET'
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
 ELEMENT = 'TOP'
 FUNCTION = 'SET'
 TYPE = 'TOP'
 WINDOW = 'MAIN'
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
LOOP AT I_EKPO.
var = i_ekpo-netpr * i_ekpo-menge.
CALL FUNCTION 'WRITE_FORM'
EXPORTING
 ELEMENT = 'BODY'
 FUNCTION = 'SET'
 TYPE = 'BODY'
 WINDOW = 'MAIN'
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDLOOP.
CALL FUNCTION 'CLOSE_FORM'
IMPORTING
RESULT =
RDI_RESULT =
TABLES
OTFDATA =
EXCEPTIONS
UNOPENED = 1
BAD_PAGEFORMAT_FOR_PRINT = 2
SEND_ERROR = 3
SPOOL_ERROR = 4
CODEPAGE = 5
OTHERS = 6
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
SAPScripts
http://esnips.com/doc/1ff9f8e8-0a4c-42a7-8819-6e3ff9e7ab44/sapscripts.pdf
http://esnips.com/doc/1e487f0c-8009-4ae1-9f9c-c07bd953dbfa/script-command.pdf
http://esnips.com/doc/64d4eccb-e09b-48e1-9be9-e2818d73f074/faqss.pdf
http://esnips.com/doc/cb7e39b4-3161-437f-bfc6-21e6a50e1b39/sscript.pdf
http://esnips.com/doc/fced4d36-ba52-4df9-ab35-b3d194830bbf/symbols-in-scripts.pdf
http://esnips.com/doc/b57e8989-ccf0-40d0-8992-8183be831030/sapscript-how-to-calculate-totals-and-subtotals.htm
SAP SCRIPT FIELDS
http://help.sap.com/saphelp_erp2005vp/helpdata/en/d1/8033ea454211d189710000e8322d00/content.htm
scripts easy material
http://www.allsaplinks.com/sap_script_made_easy.html
Reward points if useful
Regards
Anji

Sap scripts(from scratch)

Hi all
Can you tell me how to write sapscripts and how to execute it as iam new to it....
say it from scartch as you tel as even layman can understand .....
Rewards for all useful answers......

Hi
I'm having a good material on scripts If u want i'll provide that material to you

scripts
Link for SAP Scripts (step by step procedure)
http://smoschid.tripod.com/How_to_do_things_in_SAP/How_To_Create_A_SAPSCRIPT_Form/How_to_Create_SAPSCRIPT.html
SAPScripts
http://esnips.com/doc/1ff9f8e8-0a4c-42a7-8819-6e3ff9e7ab44/sapscripts.pdf
http://esnips.com/doc/1e487f0c-8009-4ae1-9f9c-c07bd953dbfa/script-command.pdf
http://esnips.com/doc/64d4eccb-e09b-48e1-9be9-e2818d73f074/faqss.pdf
http://esnips.com/doc/cb7e39b4-3161-437f-bfc6-21e6a50e1b39/sscript.pdf
http://esnips.com/doc/fced4d36-ba52-4df9-ab35-b3d194830bbf/symbols-in-scripts.pdf
http://esnips.com/doc/b57e8989-ccf0-40d0-8992-8183be831030/sapscript-how-to-calculate-totals-and-subtotals.htm
SAP SCRIPT FIELDS
http://help.sap.com/saphelp_erp2005vp/helpdata/en/d1/8033ea454211d189710000e8322d00/content.htm
scripts easy material
http://www.allsaplinks.com/sap_script_made_easy.html
http://www.sappoint.com/abap/ssintro.pdf
http://www.sappoint.com/abap/sscript.pdf
http://www.sappoint.com/abap/sscript.pdf
http://www.sappoint.com/abap/lsetssap.pdf
http://www.sappoint.com/abap/sscrtpex1.pdf
http://www.sap-img.com/sapscripts.htm
http://www.thespot4sap.com/Articles/SAPscript_Introduction.asp
http://www.sapbrain.com/TUTORIALS/TECHNICAL/SAPSCRIPTS_tutorial.html
http://help.sap.com/printdocu/core/Print46c/en/data/pdf/BCSRVSCRPROG/BCSRVSCRPROG.pdf
http://help.sap.com/printdocu/core/Print46c/en/data/pdf/BCSRVSCRRDI/BCSRVSCRRDI.pdf
http://help.sap.com/printdocu/core/Print46c/en/data/pdf/BCSRVSCREDIT/BCSRVSCREDIT.pdf
http://www.sappoint.com/abap/sscrtpex1.pdf
http://www.sap-img.com/sapscripts.htm
http://www.esnips.com/doc/1ff9f8e8-0a4c-42a7-8819-6e3ff9e7ab44/sapscripts.pdf
Other Links
http://www.virtuosollc.com/PDF/Get_Reporter.pdf
http://help.sap.com/saphelp_47x200/helpdata/en/da/6ada3889432f48e10000000a114084/frameset.htm
http://help.sap.com/saphelp_erp2005/helpdata/en/66/bc7d2543c211d182b30000e829fbfe/frameset.htm
http://help.sap.com/saphelp_erp2005/helpdata/en/5b/d22cee43c611d182b30000e829fbfe/frameset.htm
http://www.virtuosollc.com/PDF/Get_Reporter.pdf
http://help.sap.com/saphelp_47x200/helpdata/en/da/6ada3889432f48e10000000a114084/frameset.htm
http://help.sap.com/saphelp_erp2005/helpdata/en/66/bc7d2543c211d182b30000e829fbfe/frameset.htm
http://help.sap.com/saphelp_erp2005/helpdata/en/5b/d22cee43c611d182b30000e829fbfe/frameset.htm
http://www.thespot4sap.com/Articles/Code_CostCentreReport.asp
http://www.allsaplinks.com/dialog_programming.html
http://help.sap.com/saphelp_webas630/helpdata/en/9f/db9cdc35c111d1829f0000e829fbfe/frameset.htm
http://www.allsaplinks.com/files/using_table_in_screen.pdf
http://www.geocities.com/ZSAPcHAT
DIFF BETWEEN SCRIPTS N SMARTFORMS
SAPscript technology is based on a mainframe product from the 1980s, while Smart Forms have only been around since (roughly) 2001. With that sort of time gap, there are bound to be significant differences between the two tools. Client dependence is a fundamental one. Although SAPscript has had some incremental improvements over time, its forms have always been -- under the hood -- relatively ...
1. script is client dependent one while smartform is client independent.
2. In scripts we have to write print program while in smart forms it is not necessary.
3. In scripts we can print background logo while in smartforms we cant print background logo
4. In scripts we have 99 main windows while in smartforms we have only 1 main window.
5. In scripts we should write paragraph format otherwise we cant execute program while in smartforms no need to create paragraph formats .
6. In scripts we can print the text in only two character formats.
while in smartforms we can do with more.
7. In scripts we dont have line types while in smartforms we have linetypes.
also refer
difference between smartforms and scripts
Diff betwen Scripts & smartforms
advantages of smartforms over scripts
the main diffarences between smart form and script form are:
1) smart forms are clinent independent where as scripts are client dependent.
2) smart form require half the time to create and maintain forms compare with
script.
3) smart forms provide multiple page formats where as in script not possible
4) smart forms exisist without main window also where as in script not possible.
5) smart form is entairely graphical user interface comapre with script.
6) labeling is not possible in smart form where as it is possible in script.
7) smart form genarate function module whenver it activate where as script
doesn't genarate.
8) smart form can easily web publishing using the genarated XML output compare
with script.
9) using smart forms we can design web forms but bot possible with script.
10) we can maintain background graphics in smartform wher as in script not
possible.
11) in smart form we use transaction codes SMARTFORM for designing FORM
and SMARTSTYLES to create differnt styles of text, where as in script we
use SE71 for form painter and SE72 for different styles of text and font.
12) we can migrate script to smart form vice-versa is not possible.
Reward all helpfull answers
Regards
Pavan

Name of sap script form

hi ,
If I am calling a subroutine from a SAP SCRIPT ....and I want the name of the sap script which is calling it ... means there is a subroutine which more that one script calls ...if I want to find out which one is calling it how can we find that out.for example like sy-cprog or sy-repid..is there anything????? pls advise

Hi,
I hereby attach the source code of a pgm which may be used to do a 'search' operation in source code of the SAP Script.Please note that this is not my pgm, I had downloaded from one of the sites. Unfortunately I neither remember the name of teh site nor the name of the author. However I have been using it without any problems.
REPORT ZSEARCH_ITEMS_IN_SAPSCRIPT
 NO STANDARD PAGE HEADING LINE-SIZE 208.
*=======================================================================
* Omschrijving : Searching different items (e.g. strings, field, text,
* program-names etc..) in sapscript forms
* Auteur : Angelo Hoppenbrouwer
* Datum : 07-11-2001
*======================================================================*
TABLES: STXL,
 TLINE.
DATA BEGIN OF BDCDATA OCCURS 100.
 INCLUDE STRUCTURE BDCDATA.
DATA END OF BDCDATA.
DATA BEGIN OF LINES OCCURS 100.
 INCLUDE STRUCTURE TLINE.
DATA END OF LINES.
DATA: BEGIN OF STXL_ID,
 TDOBJECT LIKE STXL-TDOBJECT,
 TDNAME LIKE STXL-TDNAME,
 TDID LIKE STXL-TDID,
 TDSPRAS LIKE STXL-TDSPRAS,
 END OF STXL_ID.
DATA: BEGIN OF KOP,
 TXT(208),
 END OF KOP.
DATA: I_STXL LIKE STXL OCCURS 10 WITH HEADER LINE,
 I_TAB(40) OCCURS 10 WITH HEADER LINE,
 CLIENT LIKE SY-MANDT,
 H_FIELD(40),
 H_VALUE(40),
 H_LINE LIKE SY-LINNO,
 H_OFFSET TYPE I,
 H_REGEL(70) TYPE C,
 H_TEL TYPE I,
 H_TOT TYPE I,
 H_POS TYPE I,
 H_POS1 TYPE I,
 H_POS2 TYPE I,
 H_LEN TYPE I,
 VORIGE_TDSPRAS_TDNAME(71) TYPE C,
 HUIDIGE_TDSPRAS_TDNAME(71) TYPE C,
 P_NAAM LIKE RSEUX-CP_VALUE,
 H_TXT1(40),
 H_TXT2(40),
 H_WINDOW(132),
 H_STRING(40),
 H_STRING1(40),
 H_STRING2 LIKE H_STRING1,
 H_LINE1 LIKE LINES-TDLINE,
 H_LINE2 LIKE H_LINE1.
SELECTION-SCREEN BEGIN OF BLOCK ZOEK_ITEM
 WITH FRAME TITLE TEXT-001.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: PA_ITEM1 RADIOBUTTON GROUP ITEM DEFAULT 'X'.
SELECTION-SCREEN COMMENT 4(16) TEXT-011.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: PA_ITEM2 RADIOBUTTON GROUP ITEM.
SELECTION-SCREEN COMMENT 4(16) TEXT-012.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: PA_ITEM3 RADIOBUTTON GROUP ITEM.
SELECTION-SCREEN COMMENT 4(16) TEXT-013.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: PA_ITEM4 RADIOBUTTON GROUP ITEM.
SELECTION-SCREEN COMMENT 4(16) TEXT-014.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN BEGIN OF LINE.
PARAMETERS: PA_ITEM5 RADIOBUTTON GROUP ITEM.
SELECTION-SCREEN COMMENT 4(16) TEXT-015.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK ZOEK_ITEM.
SELECTION-SCREEN BEGIN OF BLOCK ITEM_WAARDE
 WITH FRAME TITLE TEXT-002.
PARAMETERS: PA_STR(40) OBLIGATORY,
 PA_MANDT LIKE SY-MANDT DEFAULT SY-MANDT.
SELECTION-SCREEN END OF BLOCK ITEM_WAARDE.
SELECTION-SCREEN BEGIN OF BLOCK FORM
 WITH FRAME TITLE TEXT-003.
SELECT-OPTIONS: SO_NAME FOR STXL-TDNAME NO INTERVALS
 DEFAULT 'Z*'
 OPTION CP,
 SO_SPRAS FOR STXL-TDSPRAS NO INTERVALS
 DEFAULT 'NL'.
SELECTION-SCREEN END OF BLOCK FORM.
START-OF-SELECTION.
CLIENT = SY-MANDT.
CLEAR: H_STRING1, H_STRING2.
IF NOT PA_ITEM1 IS INITIAL. " Standaardtekst
 CONCATENATE 'include' PA_STR INTO H_STRING1 SEPARATED BY ' '.
 H_TXT1 = 'standard text'.
ENDIF.
IF NOT PA_ITEM2 IS INITIAL. " Tabel (+veld)
 CONCATENATE '&' PA_STR INTO H_STRING1.
 H_TXT1 = 'table (+field)'.
ENDIF.
IF NOT PA_ITEM3 IS INITIAL. " Hulpveld
 CONCATENATE '&' PA_STR '&' INTO H_STRING1.
 H_TXT1 = 'variable'.
ENDIF.
IF NOT PA_ITEM4 IS INITIAL. " Programma
 CONCATENATE 'in program' PA_STR INTO H_STRING1 SEPARATED BY ' '.
 H_TXT1 = 'program'.
ENDIF.
IF NOT PA_ITEM5 IS INITIAL. " String
 H_STRING1 = PA_STR.
 H_TXT1 = 'string'.
ENDIF.
CONCATENATE '"' PA_STR '"' INTO H_TXT2.
FORMAT COLOR COL_HEADING INTENSIFIED ON.
CONCATENATE 'Use of'
 H_TXT1
 H_TXT2
 'in forms'
 INTO KOP SEPARATED BY ' '.
WRITE: / KOP.
ULINE.
FORMAT COLOR COL_HEADING INTENSIFIED OFF.
WRITE: / 'Clt',
 005 'Form',
 036 'Lang',
 041(030) 'Window',
 072(002) 'Fm',
 077(132) 'Row'.
ULINE.
FORMAT COLOR COL_NORMAL INTENSIFIED ON.
STXL_ID-TDOBJECT = 'FORM'.
STXL_ID-TDID = 'TXT'.
SELECT * FROM STXL CLIENT SPECIFIED
 WHERE MANDT = PA_MANDT
 AND RELID EQ 'TX'
 AND TDOBJECT EQ 'FORM'
 AND TDID EQ 'TXT'
 AND TDNAME IN SO_NAME
 AND TDSPRAS IN SO_SPRAS.
 MOVE-CORRESPONDING STXL TO I_STXL.
 APPEND I_STXL.
ENDSELECT.
SORT I_STXL.
CLEAR HUIDIGE_TDSPRAS_TDNAME.
CLEAR VORIGE_TDSPRAS_TDNAME.
LOOP AT I_STXL.
 STXL_ID-TDNAME = I_STXL-TDNAME.
 STXL_ID-TDSPRAS = I_STXL-TDSPRAS.
 STXL_ID-TDID = I_STXL-TDID.
 CONCATENATE STXL_ID-TDSPRAS STXL_ID-TDNAME
 INTO HUIDIGE_TDSPRAS_TDNAME.
 IF HUIDIGE_TDSPRAS_TDNAME <> VORIGE_TDSPRAS_TDNAME.
 CONCATENATE STXL_ID-TDSPRAS STXL_ID-TDNAME
 INTO VORIGE_TDSPRAS_TDNAME.
 REFRESH LINES.
 CLEAR H_TEL.
 IMPORT TLINE TO LINES FROM DATABASE STXL(TX)
 CLIENT I_STXL-MANDT
 ID STXL_ID.
 LOOP AT LINES.
 IF LINES-TDFORMAT = '/W'.
 H_WINDOW = LINES-TDLINE.
 ENDIF.
 SEARCH LINES-TDLINE FOR H_STRING1.
 IF SY-SUBRC <> 0 AND H_STRING2 <> SPACE.
 SEARCH LINES-TDLINE FOR H_STRING2.
 ENDIF.
 IF SY-SUBRC EQ 0 AND LINES-TDFORMAT NE '/*'.
 H_POS = SY-FDPOS.
 IF NOT PA_ITEM1 IS INITIAL.
 ADD 8 TO H_POS.
 ENDIF.
 IF NOT PA_ITEM4 IS INITIAL.
 ADD 11 TO H_POS.
 ENDIF.
 H_LEN = STRLEN( PA_STR ).
 H_STRING = LINES-TDLINE+H_POS(H_LEN).
 IF H_TEL EQ 0.
 HIDE I_STXL-MANDT.
 HIDE STXL-TDNAME.
 HIDE I_STXL-TDSPRAS.
 WRITE: /001 I_STXL-MANDT,
 005 STXL-TDNAME HOTSPOT ON,
 036 I_STXL-TDSPRAS,
 041 H_WINDOW(30).
 CLEAR STXL-TDNAME.
 ELSE.
 WRITE: /041 H_WINDOW(30).
 ENDIF.
 WRITE: 072 LINES-TDFORMAT.
 H_POS1 = 77 + H_POS.
 H_POS2 = H_POS + STRLEN( H_STRING ).
 IF H_POS EQ 0.
 CLEAR H_LINE1.
 ELSE.
 H_LINE1 = LINES-TDLINE(H_POS).
 ENDIF.
 H_LINE2 = LINES-TDLINE+H_POS2.
 H_POS2 = H_POS2 + 77.
 WRITE: 077 H_LINE1,
 AT H_POS1 H_STRING COLOR COL_HEADING,
 AT H_POS2 H_LINE2.
 H_TEL = H_TEL + 1.
 H_TOT = H_TOT + 1.
 ENDIF.
 ENDLOOP.
 IF NOT H_TEL IS INITIAL.
 ULINE.
 ENDIF.
 ENDIF.
ENDLOOP.
FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
SKIP 1.
WRITE: / 'Number of hits:', H_TOT.
AT LINE-SELECTION.
CHECK STXL-TDNAME <> SPACE.
GET CURSOR FIELD H_FIELD
 VALUE H_VALUE
 LINE H_LINE
 OFFSET H_OFFSET.
CHECK H_FIELD = 'STXL-TDNAME'.
CHECK I_STXL-MANDT = SY-MANDT.
REFRESH BDCDATA.
PERFORM BDC_DYNPRO USING 'SAPMSSCF' '1102'.
PERFORM BDC_FIELD USING 'RSSCF-TDFORM' STXL-TDNAME.
PERFORM BDC_FIELD USING 'RSSCF-TDSPRAS' I_STXL-TDSPRAS.
CALL TRANSACTION 'SE71' USING BDCDATA.
CLEAR STXL-TDNAME.
*& Form BDC_DYNPRO
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
CLEAR BDCDATA.
BDCDATA-PROGRAM = PROGRAM.
BDCDATA-DYNPRO = DYNPRO.
BDCDATA-DYNBEGIN = 'X'.
APPEND BDCDATA.
ENDFORM. " BDC_DYNPRO
*& Form BDC_FIELD
FORM BDC_FIELD USING FNAM FVAL.
CLEAR BDCDATA.
BDCDATA-FNAM = FNAM.
BDCDATA-FVAL = FVAL.
APPEND BDCDATA.
ENDFORM. " BDC_FIELD
*Comment Angelo:
*Selection-texts:
*PA_ITEM1
*PA_ITEM2
*PA_ITEM3
*PA_ITEM4
*PA_ITEM5
*PA_MANDT Client
*PA_STR Search-item
*SO_NAME Form
*SO_SPRAS Language
*Text-symbols:
*001 Selection search-item
*002 Value
*003 Selection form(s)
*011 Standard text
*012 Table (+ field)
*013 Variable
*014 Program
*015 String
Once you copy the above mentioned program.Just run this pgm with the parameters:-
Selection search text: String
Search text: PERFORM name_of_the_subroutine
Selection Forms: Z*
Language: E
& it will display all the SAP Scripts from where this routine is being called.
I hope this helps,
Regards
Raju Chitale

Formatting issue related to SAP Scripts

Hi All,
I have a formatting issue related to SAP Scripts.
Issue is i have a variable declared as:
v_kbetr LIKE BSET-KBETR.
I will fetch some value into this v_kbetr in SE38.
Then in SE71[Layout set] i have put it as &v_kbetr&
Now i have written code in SE71 as below:
IF &v_kbetr& EQ ' 0.00'
0
ELSE
&v_kbetr&
ENDIF
like wise i am displaying 2 fields with same condition.
now if value for v_kbetr is 6.75 then it is getting displayed as right aligned.
Otherwise 0 will be displayed as left aligned
Now what i want is &v_kbetr& to be left aligned if value present. though i have declred as &v_kbetr(L)& it is not working.
Is there any solution for this.
Thanks,
Kumar.

Hi.
Symbol values other than numeric values are normally formatted left-justified.so define this variable other than Numeric.
If you write Field(L) this will only for output,

Sap scripts se71 symbols

Similar Messages

Maybe you are looking for