Give some functionlity of standard text
hi guru
please tell me functionlity of standard text,where exactly it use.
thanks
subhasis
we use standard text for scripts and smartforms.......
You can insert standard texts, texts of the online documentation, and hypertext modules into your document. You can insert texts directly and include them by reference.
When inserting text directly, the text is inserted in the editor in formatted form. You can then edit it further.
Inserting Standard Text
Choose Insert ® Text ® Standard.
The dialog window for inserting text appears.
Enter the text name, the text ID, and the language. To insert the text directly, select Expand immediately.
Choose Continue.
There are two ways to format texts with forms:
In the standard SAPscript text processing (Tools ® Word processing ® Standard text), you can select a form for a document. You can then type text into the main window of the form and output the document in the format defined in the form.
For example, you can select a form for a letter. You can then type the body text of the letter in the main window. When you print the letter, the default text elements in the other windows of the form (heading, footer, and so on) are printed with the body text.
To include the contents of another text into the current text, use the INCLUDE control command. SAPscript still treats the text to be included as a separate text. The text is copied over only at the point at which the output is formatted.
Thus the use of the INCLUDE command always ensures that the most current version of a text is included into the output, since the text is not read and inserted until the output is formatted.
Syntax:
/: INCLUDE name
You must specify the name of the text to be inserted. It can be up to 70 characters long. If the name of the text contains spaces, then you must enclose it in quotes as a literal value. You can, alternatively, specify the name via a symbol. All remaining parameters in the INCLUDE command are optional. If an optional parameter is not specified, then SAPscript uses default values as applicable for the calling environment.
/: INCLUDE MYTEXT
The text MYTEXT is included in the language of the calling text.
/: INCLUDE MYTEXT LANGUAGE 'E' PARAGRAPH 'A1'
The text with the name MYTEXT and the language E is included, regardless of the language of the calling text. The paragraph format A1 will be used as the standard paragraph type for this call.
Optional parameters:
LANGUAGE
If this parameter is not specified, then the language of the calling text or the form language are used for the text to be included. If the language is specified, then the text will be fetched in this language, regardless of the language of the calling text.
PARAGRAPH
The text to be included is formatted using the style allocated. The PARAGRAPH parameter can be used to redefine the standard paragraph for this style for the current call. All *-paragraphs in the included text will then be formatted using the paragraph specified here.
NEW-PARAGRAPH
The first line of the text to be included will be given this format indicator, as long as it is not a comment or command line. If the optional PARAGRAPH parameter (see above) is not specified, then all *-paragraphs of the included text will also be formatted using the paragraph specified in the NEW-PARAGRAPH command.
OBJECT
In order to completely specify a text, information about the text object is also required. There are a number of restrictions and other rules that depend on the object type of the calling text:
Any kind of text can be included in a form. If no object is specified, then TEXT will be used (standard texts).
In the case of a document text (DOKU object), you can include only document texts. This object type is also assumed if no object is specified in this environment.
Only hypertexts and document texts can be included in a hypertext (DSYS object). If the OBJECT parameter is missing, then DSYS is used as the default value.
In the other kinds of text you can include only standard texts (TEXT object), document texts or hypertexts. If there is no specification, then the default object is TEXT.
ID
The text ID is a part of the text key, which permits further text objects within a given object. If no ID is specified, then the default include ID is used from the TTXID table for the calling text. If there is no entry in this table, then the text ID of the calling text is used.
The following consistency check is applied both to the ID and the object:
All text IDs are allowed in a form.
In document texts, only document texts may be included that have text IDs TX (general texts) or UO (authorization objects) and also other document texts with the same text ID as the calling document text.
In DSYS texts, all DSYS texts can be included, whatever ID they have. Document texts to be included must have one of the IDs TX or UO.
Into the other texts, standard texts with any allowable text ID, DSYS texts with all IDs, and document texts with the IDs TX and UO can be included.
The INCLUDE command returns a status code in the SAPSCRIPT-SUBRC symbol:
0: the text include was successful.
1: the command could not be executed because it contained syntax errors.
2: the rules governing the text to be included were not followed (see above).
This value cannot occur if the command is used in a SAPscript form.
4: the specified text could not be found.
reward points if helpful
Similar Messages
-
Hi All,
I did some changes in Standard Text in the development system. Can anybody tell me how to transport the the standard text?
Any pointer / document link will be highly appreciated.
Thanks,
RKM.Hi Ravi
You can transport the standard text changes with a new transport request using SE01.
In the new transport request provide the details as follows.
PgmID as R3TR
Obj as TEXT
Object nam as TEXT,Standard text name,Text id,Language. Example: TEXT,ZSTTEXT,ST,E
After providing these details Save the CTS and release to transport.
Regards
Hareesh -
Hello,
I dont know what is wrong with my muse. One more problem, whenever i try to pin or try to give some effect on text or shapes it automatically got invisible !!! even do in master page or in home page it got invisbile. Please help me out and why this is happening to me. I am sick and tired of all trouble now.............A friend of mine called me today with the same issue. No idea how to resolve this, never heard of it before. She has a message that she used to forward before now permamently stuck. Even when she selects some other message to forward, that old text appears instead, thus making FW-ing unusable.
Really weird. -
How do I Hide the text printed from a standard Text Element in SAP Script?
Hi,
I have created one SAP Script which gets printed from IW33 using a standard print program.
In config the standrad SAP script is replaced by the zsap script.
Since the Zscript is printed from a Standard print program, I had to keep all the text elements used by the original(standard) SAP script.
I only kept the text elemets and commented out the printing part.
But still some values are printing. How do I hide these text element values?
I want to delete whatever its printing from these text element. Icant delete the standard text elemetns , otherwise the standard print program will give error.Hi,
I am not printing any text under these text element in my zscript.
I had to include these standard text elemets as they are called from the standard print program using which my zscript is getting printed.
for example:
/E OPERATION
Under operation i didnot print anything. Still some values which are passed in text element Operation by the print program is being printed in the form. i want to hide/delete these values.
how do I do that? -
How to use standard text?
hi experts,
i have created a standard text in so01. now i want to use it in my smartform. can anyone help me, plz give the procedure to use that standard text in my form.
thanks in advance for ur responce.Hi
You cannot use two type to the same text .
Either you have to use TYPE as INCLUDE TEXT for standard text
or TEXT ELEMENT for normal text
One thing you can do if u want to print HI WELCOME together
Then you write both things in different text and print it .
Hope this make some sense to u.
Reward if helpful
Thanks
Krushna -
hi to all abap Gurus
what is standard text in script ?how to use it > where do we use it ? we know that the use is reusability . how it is reusable . and it is used to support for multiple languages . pls tell in detail . pls dont give any link . points will bre rewarded defintilely for good answers . pls urgent. pls give som esample coding on this .Standard Text is nothing but Global Text.
Suppose you have to display footer/header info. whenever you create a s cript for ur org.your caompany details,logo etx. instead of writing them everytime, if you careta a global text u can include them wherevr u want.
Mainly we are using standard texts to avoid hardcoding in scripts or smartforms.
If you need to include the name of your company and address in the form you
just include a standard text in your form by include statement(script) and by
include text dropdown in forms. If in later part of time your company address
change you need to change the standard text not to touch the form. This is the
way standard text helps us.
in Tcode SO10, u create a text and give a name activate it.
Here is the sample code to send script through E mail..
*& Report ZRICHA_OTF_PDF
report zricha_otf_pdf
message-id zz.
CONSTANTS *
constants : c_x(1) type c value 'X', " For constant value
c_otf(3) type c value 'OTF', " For format
c_u(1) type c value 'U'. " Mail Option
VARIABLES *
data : v_rqident type tsp01-rqident, " For Spool Number
v_rqclient type tsp01-rqclient, " For Client
v_rqo1name type tsp01-rqo1name, " For Object name
v_spool type tsp01-rqident, " For Spool Number
v_spool1 type tsp01-rqident. " For Spool Number
FLAGS *
data : f_spool type c.
INTERNAL TABLES *
Internal table for sending mails
data: it_pdf like tline occurs 10 with header line,
it_xi_pdf like tline occurs 0 with header line,
it_html like solisti1 occurs 0 with header line,
it_xi_temp like bapiqcmime occurs 0 with header line,
it_xi_mime(255) type c occurs 0 with header line.
For sending mail
data: it_objpack like sopcklsti1 occurs 2 with header line.
Internal table for Single List with Column Length 255
data : it_objbin like solisti1 occurs 10 with header line.
Internal table for Single List with Column Length 255
data : it_objtxt like solisti1 occurs 10 with header line.
Internal table for Structure of the API Recipient List
data : it_reclist like somlreci1 occurs 5 with header line.
Structure of the API Recipient List
data: x_doc_chng like sodocchgi1.
Internal table for storing the variants
data : begin of it_variant1 occurs 0,
variant like varid-variant,
end of it_variant1.
Internal table to store variants for the programs
data: it_variant2 like it_variant1 occurs 0 with header line.
Internal table for storing the selected values
data it_return type ddshretval occurs 0 with header line.
Internal table for storing the mail-ids
data : begin of it_mailid occurs 0,
kokrs like csks-kokrs,
kostl like csks-kostl,
datbi like csks-datbi,
telx1 like csks-telx1,
end of it_mailid.
Internal table for storing the mail-ids
data : it_mailid1 like it_mailid occurs 0 with header line.
SELECTION SCREEN *
data : v_char type char50.
selection-screen begin of block b1 with frame title text-001.
select-options: s_email for v_char no intervals
lower case
no-display.
select-options: s_email1 for v_char no intervals
lower case
no-display.
selection-screen end of block b1.
selection-screen begin of block a1 with frame title text-028.
selection-screen begin of line.
parameters : p_c1 as checkbox.
selection-screen comment 3(66) text-026 for field p_c1.
selection-screen end of line.
parameters : p_set like tsp1d-papart matchcode object zh_tsp1d.
selection-screen skip 1.
parameters : p_vara1 type rs38m-selset.
selection-screen end of block a1.
selection-screen begin of block a2 with frame title text-029.
selection-screen begin of line.
parameters : p_c2 as checkbox.
selection-screen comment 3(56) text-027 for field p_c1.
selection-screen end of line.
parameters : p_set1 like tsp1d-papart matchcode object zh_tsp1d.
selection-screen skip 1.
parameters : p_vara2 type rs38m-selset.
selection-screen end of block a2.
AT SELECTION SCREEN ON VALUE REQUEST
at selection-screen on value-request for p_vara1.
For fetching the variants available for the program
perform fetch_variants.
at selection-screen on value-request for p_vara2.
For fetching the variants available for the program
perform fetch_variants1.
AT SELECTION SCREEN
at selection-screen.
For Validation
perform validation.
START OF SELECTION *
start-of-selection.
To get the output data and mail
perform fetch_data.
END OF SELECTION *
end-of-selection.
if f_spool = c_x.
message e000 with 'Spool Not Generated'(060).
endif.
*& Form fetch_data
To get the output data and mail
form fetch_data .
To send the output to spool
perform generate_spool.
endform. " fetch_data
*& Form generate_spool
To send the output to spool
form generate_spool .
data: l_params like pri_params,
l_days(1) type n value 2,
l_count(3) type n value 1,
l_valid type c,
l_valid1 type c,
l_params1 like pri_params.
data: l_device type usr01-spld.
*Get the printer name for the user
select single spld into l_device from usr01 where bname = sy-uname.
if l_device is initial.
l_device = 'LOCL'.
endif.
For report-1
if p_c1 = 'X'.
Setting the print parameters
call function 'GET_PRINT_PARAMETERS'
exporting
destination = l_device
copies = l_count
list_name = sy-uname
list_text = 'SUBMIT ... TO SAP-SPOOL'(008)
release = c_x
new_list_id = c_x
expiration = l_days
LINE_SIZE = 255
LINE_COUNT = 65
layout = p_set
sap_cover_page = space
cover_page = space
receiver = 'SAP*'(010)
department = 'System'(011)
no_dialog = c_x
importing
out_parameters = l_params
valid = l_valid.
if l_valid <> space.
clear v_spool.
Fetch the spool number b4 submit
perform fetch_recent_spool using v_spool.
Submitting the program to spool
submit rkaep000 to sap-spool
using selection-set p_vara1
spool parameters l_params
without spool dynpro
and return.
clear v_spool1.
Fetch the spool number after submit
perform fetch_recent_spool using v_spool1.
if v_spool = v_spool1.
f_spool = c_x.
if p_c2 is initial.
stop.
endif.
else.
Checking the format ( ABAP/OTF)
perform format_check tables s_email.
endif.
else.
message e000 with 'Problem in print settings'(003).
stop.
endif.
endif.
For Report-2
if p_c2 = 'X'.
Setting the print parameters
call function 'GET_PRINT_PARAMETERS'
exporting
destination = l_device
copies = l_count
list_name = sy-uname
list_text = 'SUBMIT ... TO SAP-SPOOL'(008)
release = c_x
new_list_id = c_x
expiration = l_days
LINE_SIZE = 200
LINE_COUNT = 65
layout = p_set1
sap_cover_page = space
cover_page = space
receiver = 'SAP*'(010)
department = 'System'(011)
no_dialog = c_x
importing
out_parameters = l_params1
valid = l_valid1.
if l_valid1 <> space.
clear v_spool.
Fetch the spool number b4 submit
perform fetch_recent_spool using v_spool.
Submitting the program to spool
submit gp3diehxy88snfj0391v7kf9ek7050 to sap-spool
using selection-set p_vara2
spool parameters l_params1
without spool dynpro
and return.
clear v_spool1.
Fetch the spool number after submit
perform fetch_recent_spool using v_spool1.
if v_spool = v_spool1.
message e000 with 'Spool Not Generated'(060).
stop.
endif.
Checking the format ( ABAP/OTF)
perform format_check tables s_email1.
else.
message e000 with 'Problem in print settings'(003).
stop.
endif.
endif.
endform. " generate_spool
*& Form fetch_recent_spool
Fetch the recent spool number generated
form fetch_recent_spool using p_v_spool type tsp01-rqident .
data: l_user like tsp01-rq2name.
clear : v_rqident,
v_rqclient,
v_rqo1name.
l_user = sy-uname.
Get latest Spool No
select single rqident
rqclient
rqo1name
into (v_rqident , v_rqclient , v_rqo1name)
from tsp01
where rqcretime = ( select max( rqcretime )
from tsp01
where rq2name eq l_user
and rqfinal eq '.' ).
if sy-subrc = 0 .
p_v_spool = v_rqident.
endif.
endform. " fetch_recent_spool
*& Form format_check
Checking the format ( ABAP/OTF)
form format_check tables p_s_email structure s_email.
data : l_objtype like rststype-type.
call function 'RSTS_GET_ATTRIBUTES'
exporting
authority = 'SP01'(019)
client = v_rqclient
name = v_rqo1name
part = 1
importing
objtype = l_objtype
exceptions
fb_error = 1
fb_rsts_other = 2
no_object = 3
no_permission = 4.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
if l_objtype(3) = c_otf.
Convert OTF Spool to PDF
perform convert_otf2pdf tables p_s_email.
else.
Convert ABAP Spool to PDF
perform convert_abap2pdf tables p_s_email.
endif.
endform. " format_check
*& Form convert_otf2pdf
Convert OTF Spool to PDF
form convert_otf2pdf tables p_p_s_email structure s_email .
clear it_pdf.
refresh it_pdf.
data : l_bytecount type i.
Fn. to get the PDF format
call function 'CONVERT_OTFSPOOLJOB_2_PDF'
exporting
src_spoolid = v_rqident
no_dialog = 'X'
importing
pdf_bytecount = l_bytecount
tables
pdf = it_pdf
exceptions
err_no_otf_spooljob = 1
err_no_spooljob = 2
err_no_permission = 3
err_conv_not_possible = 4
err_bad_dstdevice = 5
user_cancelled = 6
err_spoolerror = 7
err_temseerror = 8
err_btcjob_open_failed = 9
err_btcjob_submit_failed = 10
err_btcjob_close_failed = 11.
if sy-subrc = 0.
For page format
perform page_format tables p_p_s_email.
else.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
endform. " convert_otf2pdf
*& Form convert_abap2pdf
Convert ABAP Spool to PDF
form convert_abap2pdf tables p_p_s_email structure s_email.
clear it_pdf.
refresh it_pdf.
data : l_bytecount type i.
Fn. to convert to PDF format
call function 'CONVERT_ABAPSPOOLJOB_2_PDF'
exporting
src_spoolid = v_rqident
no_dialog = 'X'
importing
pdf_bytecount = l_bytecount
tables
pdf = it_pdf
exceptions
err_no_abap_spooljob = 1
err_no_spooljob = 2
err_no_permission = 3
err_conv_not_possible = 4
err_bad_destdevice = 5
user_cancelled = 6
err_spoolerror = 7
err_temseerror = 8
err_btcjob_open_failed = 9
err_btcjob_submit_failed = 10
err_btcjob_close_failed = 11.
if sy-subrc = 0.
For page formatting
perform page_format tables p_p_s_email.
else.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
endform. " convert_abap2pdf
*& Form send_mail
For sending mail
form send_mail tables mail structure s_email .
Structures and internal tables for the send data
data: objpack like sopcklsti1 occurs 2 with header line,
objhead like solisti1 occurs 1 with header line,
objbin like solisti1 occurs 0 with header line,
objtxt like solisti1 occurs 10 with header line,
reclist like somlreci1 occurs 5 with header line.
data: doc_chng like sodocchgi1,
tab_lines like sy-tabix.
Data for the status output after sending
data: sent_to_all like sonv-flag.
clear: it_reclist, it_reclist[],
it_objtxt , it_objtxt[],
it_objpack, it_objpack[],
it_objbin , it_objbin[],x_doc_chng.
loop at it_html.
objbin-line = it_html-line.
append objbin.
clear objbin.
endloop.
Create the document which is to be sent
doc_chng-obj_name = 'List'(012).
doc_chng-obj_descr = 'Mail'(013).
Heading
objtxt-line = 'Mail with pdf attachment'(014).
append objtxt.
clear objtxt.
Size
describe table objtxt lines tab_lines.
read table objtxt index tab_lines.
doc_chng-doc_size = ( tab_lines - 1 ) * 255 + strlen( objtxt ).
Fill the fields of the packing_list for the main document:
clear objpack-transf_bin.
The document needs no header (head_num = 0)
objpack-head_start = 1.
objpack-head_num = 0.
Body
objpack-body_start = 1.
objpack-body_num = tab_lines.
objpack-doc_type = 'RAW'(015).
append objpack.
Create the attachment (the list itself)
describe table objbin lines tab_lines.
Fill the fields of the packing_list for the attachment:
objpack-transf_bin = 'X'.
Header
objpack-head_start = 1.
objpack-head_num = 0.
Body
objpack-body_start = 1.
objpack-body_num = tab_lines.
objpack-doc_type = 'PDF'(016).
objpack-obj_name = 'Attachment'(017).
objpack-obj_descr = 'Mail with pdf Attachment'(018).
objpack-doc_size = tab_lines * 255.
append objpack.
*-Fill the mail recipient list
loop at mail.
reclist-receiver = mail-low.
reclist-rec_type = c_u.
append reclist.
clear: reclist,
mail.
endloop.
*-Send the document by calling the SAPoffice API1 module for sending
*-documents with attachments
call function 'SO_NEW_DOCUMENT_ATT_SEND_API1'
exporting
document_data = doc_chng
put_in_outbox = c_x
commit_work = c_x
importing
sent_to_all = sent_to_all
tables
packing_list = objpack
object_header = objhead
contents_bin = objbin
contents_txt = objtxt
receivers = reclist
exceptions
too_many_receivers = 1
document_not_sent = 2
operation_no_authorization = 4
others = 99.
case sy-subrc .
when 0.
message i000 with 'Mail has been sent successfully'(006).
when others.
message e000 with 'Problem in sending the mail'(023).
endcase.
endform. " send_mail
*& Form page_format
For page foramtting
form page_format tables email structure s_email .
data : l_lines type i,
l_temp(500) type c,
l_offset type p,
l_lineslen(2) type p,
l_mimelen(2) type p,
l_tabix like sy-tabix.
clear : it_xi_pdf,
it_xi_temp.
refresh : it_xi_pdf,
it_xi_temp.
it_xi_pdf[] = it_pdf[].
Reformat the line to 255 characters wide (code from SAP)
clear: l_temp, l_offset, it_xi_temp.
describe table it_xi_pdf lines l_lines.
describe field it_xi_pdf length l_lineslen in character mode.
describe field it_xi_temp length l_mimelen in character mode.
loop at it_xi_pdf.
l_tabix = sy-tabix.
move it_xi_pdf to l_temp+l_offset.
if l_tabix = l_lines.
l_lineslen = strlen( it_xi_pdf ).
endif.
l_offset = l_offset + l_lineslen.
if l_offset ge l_mimelen.
clear it_xi_temp.
it_xi_temp = l_temp(l_mimelen).
append it_xi_temp.
shift l_temp by l_mimelen places.
l_offset = l_offset - l_mimelen.
endif.
if l_tabix = l_lines.
if l_offset gt 0.
clear it_xi_temp.
it_xi_temp = l_temp(l_offset).
append it_xi_temp.
endif.
endif.
endloop.
clear : it_xi_mime,
it_xi_mime[].
loop at it_xi_temp.
it_xi_mime(255) = it_xi_temp-line.
append it_xi_mime.
clear it_xi_mime.
endloop.
Final Data
clear : it_html,
it_html[].
it_html[] = it_xi_mime[].
For sending mail
perform send_mail tables email.
endform. " page_format
*& Form fetch_variants
For fetching the variants available for the program
form fetch_variants .
data : l_program like rs38m-programm value 'RKAEP000',
l_vara1 type dfies-fieldname value 'P_VARA1'.
clear : it_variant1,
it_variant1[].
Get variants
perform get_variants tables it_variant1
using l_program.
F4 Help
if not it_variant1[] is initial.
perform get_f4_help tables it_variant1
using l_vara1
changing p_vara1.
else.
message e000 with 'No variants available for report1'(054).
endif.
endform. " fetch_variants
*& Form validation
For Validation
form validation .
data : l_pro1 like rs38m-programm value 'RKAEP000',
l_pro2 like rs38m-programm value 'GP3DIEHXY88SNFJ0391V7KF9EK7050',
l_c1,
l_c2.
If both check-box are unchecked
if p_c1 is initial
and p_c2 is initial.
message e000 with 'Check any one check-box'(049).
endif.
If checked without varaint
if not p_c1 is initial and p_vara1 is initial.
message e000 with 'Please give any one of the variant for report1'(055).
endif.
If checked without varaint
if not p_c2 is initial and p_vara2 is initial.
message e000 with 'Please give any one of the variant for report2'(061).
endif.
Reading the variant and fetching the mail-ids
if p_c1 = c_x.
l_c1 = '1'.
clear : s_email,
s_email[].
perform read_variants tables it_mailid
s_email
using p_vara1
l_pro1
l_c1.
if s_email[] is initial.
message e000 with 'No Id available for given Cost report1'(066).
else.
sort s_email by low.
delete adjacent duplicates from s_email comparing low.
endif.
endif.
Reading the variant and fetching the mail-ids
if p_c2 = c_x.
clear : s_email1,
s_email1[].
l_c2 = '2'.
perform read_variants tables it_mailid1
s_email1
using p_vara2
l_pro2
l_c2.
if s_email1[] is initial.
message e000 with 'No Id available for given Cost report2'(067).
else.
sort s_email1 by low.
delete adjacent duplicates from s_email1 comparing low.
endif.
endif.
endform. " validation
*& Form GET_VARIANTS
Fetching Variants
form get_variants tables p_it_variant structure it_variant1
using p_v_program type rs38m-programm.
select variant
from varid
into table p_it_variant
where report = p_v_program.
endform. " GET_VARIANTS
*& Form GET_F4_HELP
text
form get_f4_help tables p_it_variant1 structure it_variant1
using p_l_vara1 like dfies-fieldname
changing p_p_vara like p_vara1.
Fn. for Pop-Up
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
exporting
retfield = p_l_vara1
value_org = 'S'
display = ' '
tables
value_tab = p_it_variant1
return_tab = it_return
exceptions
parameter_error = 1
no_values_found = 2
others = 3.
if sy-subrc = 0.
p_p_vara = it_return-fieldval.
else.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
endform. " GET_F4_HELP
*& Form FETCH_VARIANTS1
text
form fetch_variants1 .
data : v_program1 like rs38m-programm value 'GP3DIEHXY88SNFJ0391V7KF9EK7050',
l_vara2 type dfies-fieldname value 'P_VARA2'.
clear : it_variant2,
it_variant2[].
Get Variants
perform get_variants tables it_variant2
using v_program1.
F4 Help
if not it_variant2[] is initial.
perform get_f4_help tables it_variant2
using l_vara2
changing p_vara2.
else.
message e000 with 'No variants available for report2'(050).
endif.
endform. " FETCH_VARIANTS1
*& Form read_variants
Reading the variant and fetching the mail-ids
form read_variants tables p_it_mailid structure it_mailid
p_s_email structure s_email
using p_p_vara1 like p_vara1
p_l_pro1 like rs38m-programm
p_l_c1 type c.
data : l_temp(44),
it_valutab like rsparams occurs 0 with header line.
ranges : r_cocen for csks-kostl.
Function Module to get the variant contents
call function 'RS_VARIANT_CONTENTS'
exporting
report = p_l_pro1
variant = p_p_vara1
tables
valutab = it_valutab
exceptions
variant_non_existent = 1
variant_obsolete = 2
others = 3.
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
clear : r_cocen,
r_cocen[].
loop at it_valutab where selname = 'KOSTL'
or selname = '_C-CCTR'.
Getting the range of cost centers
if it_valutab-option = 'BT'.
r_cocen-low = it_valutab-low.
For Conversion Routine
perform conversion using r_cocen-low.
r_cocen-high = it_valutab-high.
For Conversion Routine
perform conversion using r_cocen-high.
r_cocen-option = 'BT'.
r_cocen-sign = 'I'.
append r_cocen.
clear r_cocen.
endif.
Getting the single cost centers
if it_valutab-option = 'EQ'.
r_cocen-low = it_valutab-low.
For Conversion Routine
perform conversion using r_cocen-low.
r_cocen-option = 'EQ'.
r_cocen-sign = 'I'.
append r_cocen.
clear r_cocen.
endif.
endloop.
If no cost centers
if not r_cocen[] is initial.
select kokrs
kostl
datbi
telx1
from csks
into table p_it_mailid
where kostl in r_cocen.
if p_it_mailid[] is initial.
if p_l_c1 = '1'.
message e000 with 'No IDs available for report1'(059).
elseif p_l_c1 = '2'.
message e000 with 'No IDs available for report2'(062).
endif.
endif.
Deleting the blank entries
delete p_it_mailid where telx1 = space.
clear l_temp.
read table p_it_mailid index 1.
l_temp = p_it_mailid-telx1.
data : l_check.
loop at p_it_mailid where telx1 <> l_temp.
l_check = c_x.
endloop.
For checking the unique ids
if l_check = c_x.
if p_l_c1 = '1'.
message e000 with 'No unique mail-ids for report1'(058).
elseif p_l_c1 = '2'.
message e000 with 'No unique mail-ids for report2'(065).
endif.
endif.
Populating the IDs for the cost centers
loop at p_it_mailid.
set locale language sy-langu.
translate p_it_mailid-telx1 to lower case.
set locale language space .
concatenate p_it_mailid-telx1 '@allergan.com' into l_temp.
p_s_email-low = l_temp.
p_s_email-sign = 'I'.
p_s_email-option = 'EQ'.
append p_s_email.
clear p_s_email.
endloop.
else.
if p_l_c1 = '1'.
message e000 with 'No Cost Center Available for report1'(057).
elseif p_l_c1 = '2'.
message e000 with 'No Cost Center Available for report2'(063).
endif.
endif.
endform. " read_variants
*& Form CONVERSION
For Conversion Routine
form conversion using p_it_valutab_low type c.
call function 'CONVERSION_EXIT_ALPHA_INPUT'
exporting
input = p_it_valutab_low
importing
output = p_it_valutab_low.
endform. " CONVERSION
chk this one to send script to pdf
http://www.sapdevelopment.co.uk/reporting/rep_spooltopdf.htm
plzz refer to this link..it will solve ur problem
Re: Sending a PDF document as an attachment
sending the mail with PDF attachment
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/docs/library/uuid/62ae7fcd-0b01-0010-3e9d-a54f26944450
Regards
Sree -
Standard text from SO10 - smartform
Hi Folks,
I need to print a document with some standard text and the vendor address.
1.For this I had created the standard text in S010,how to call this standard text in the text editor of the main window?
This standard text will be the same for all the vendors.
2.I need to fetch the address of the vendor.So I had created a select option.I have to print this document with the standard text for each vendor.Text will remain the same but the vendor address differs.I had created a structure having all the fields for the address and declared in the form interface.Internal table is getting populated but it is not printing in the smartform.
How to get the document in one shot for all the vendors given in the range.
Thanks,
K.Kiran.u can call the standrd text from the smartform directly :
got the smarform u created/ developed.
create text.
in the general attributes tab give the type <Include Text>
assign the standard text that u want ot inclue.
smartform will call that directly
address cn be created direclty from the smartform
in creation u will the get the option to create the address.
just give th varible and populate the varible from the program.
Thanks -
Hi expert,
I am trying to upload Standard Text Key (CA10) for task list. I don't know how to do it, because it contain long text. Can anyone give me a suggestion?
Thanks,
SecundesI tried CA10 LSMW with fields
VLSH (C 007), TXT (C 040), TXLINE_02 (C 072), TXLINE_03 (C 072), TXLINE_04 (C 072)
The last 3 fields are mutiline content, which are generated through the recording. If you attempt 4 lines during the recording another field TXLINE_05. The answer to your question How many characters? is given in the brackets above.
I did not find a problem here. The problem I faced was some other and was a minor for me.
That is :
While processing (Foreground processing only), It was not filling the VLSH field. So what I did was- Enter this field manually & press F5 (create). The rest of the process went smooth by just keep pressing the Enter button.
So for every record I repeated this initial entry+F5, rest went smooth.
That was my experience. It is possible you might not face this problem even and everything may go smooth for you.
(I used Tab delimited Text file for uploading)
About the BDC programming, I do not have knowledge in this area, so I suggested so.
Regards.... -
Extract final content of Standard text (function?)
Hallo
I'm dealing with such a problem I need to have in table
standard text I mean the final version of it:
I have to textes e.g.:
TEXT01
Test 1
Test 1
TEXT02
Test 2
:/ INCLUDE TEXT01 OBJECT TEXT ID ST LANGUAGE 'DE'
:/ DEFINE &TEST& := 'Define Text'
&TEST&
Is there any function that provide the FINAL version of Text02
Because READ TEXT for TEXT02
results as table:
Test 2
:/ INCLUDE TEXT01 OBJECT TEXT ID ST LANGUAGE 'DE'
Instead of:
Test 2
Test 1
Test 1
Define text
Anybody has an idea?
thank you very muc in advance
BogumilaYes, here is how we handle it. In our case, if there is any INCLUDE text, it will be on the first line of the text. Here you can see that we are looking for the INCLUDE on the first line, and then processing accordingly. This will give you some idea, but of course you will need to modify a bit.
clear xtext. refresh xtext.
* Retrieve the text
call function 'READ_TEXT'
exporting
client = sy-mandt
id = id
language = sy-langu
name = name
object = object
tables
lines = xtext
exceptions
id = 1
language = 2
name = 3
not_found = 4
object = 5
reference_check = 6
wrong_access_to_archive = 7
others = 8.
delete xtext where tdline = space.
* Check the text for an include of standard text,
* if present, explode the include.
data: iincl type table of string with header line.
data: iid type thead-tdid.
data: iname type thead-tdname.
* Read the first line of the text
read table xtext index 1.
* Split the line into a table.
clear iincl. refresh iincl.
split xtext-tdline at space into table iincl.
* Check that the first word is INCLUDE
read table iincl index 1.
check iincl = 'INCLUDE'.
* Get the name of the include
read table iincl index 2.
iname = iincl.
* Get the id of the standard text(ST)
read table iincl index 6.
iid = iincl.
clear xtext. refresh xtext.
<b> call function 'READ_STDTEXT'
exporting
id = iid
language = sy-langu
name = iname
tables
lines = xtext
exceptions
id = 1
language = 2
name = 3
not_found = 4
reference_check = 5
others = 6.</b>
Regards,
Rich Heilman -
ISR ADOBE - Unable to display standard text
Hi,
I have a scenario to display standard text in ISR(Internal Service Request) Adobe through webdynpro abap(Manual Correspondence PSCD - TRM application). When I tested the Adobe form in SFP txn directly, I could see the standard text, but when I test through webdynpro abap, it is not displaying standard text.
Has anybody got some idea if this is the problem with ISR or something to be done?
PS: I tried to display today's date through global variable defined in adobe interface, it gets displayed in SFP, but not in webdynpro(i.e.using ISR).
Thanks.
VR
Edited by: AMARA555 on Apr 24, 2010 2:36 PMHi Amara,
Please recheck whether you have done the "Compare Form fields".
Also, if you have made some changes to the form, then you should regenerate the form and again do "Compare Form fields".
Dont do "Compare Form fields" while saving and activating the Form even when prompted as it may give inconsistencies.
Also, as a cross-check try to create an independant Webdynpro application and call this Form(or only that particular standard text) in that application instead of calling in ISR. This way you can validate if the problem is with ISR.
Hope this helps. -
hi frendz,
i want to move Tr for Standard text from dev to Prod System ? can anyone give some clear cut steps to move ?
Regards
Srini KumarEXECUTE THE program
RSTXTRAN
refer the links
Re: How To Transport STANDARD TEXTS??
How to attach a standard text to a Transport request? -
Hi,
I have created some standard text in one system.
I have to move these standard texts to another system.How can i do the same.
Let me know.
Its urgent.
ThanksHi,
Steps..
Create a work bench CR in the transaction SE09..
Modify the task to Development correction / Repair..
Go to the program RSTXTRAN..
In the name of correction give the task number (Not the CR number)
Give the Text Key..Your standard text name..
Press F8...
Press select all..
Then Press enter..
Then press the button "Trsfr texts to corr".
Now the standard texts will be moved to a CR..
Then release the CR and move it to QA..
Thanks,
Naren -
How to read some lines from a text file using java.
hi,
i m new to java and i want to read some lines from a text file based on some string occurrence in the file. This file to be read in steps.
we only want to read the file upto the first Occurrence of "TEXT" string.
How to do it ,,,
Kinldy give the code
Regards,
Sagar
this is the text file
dfgjdjj
sfjhjkd
ghjkdg
hjkdgh TEXT
ikeyt
ujt
jk
tyk TEXT
rukl
rHendawy wrote:
Since the word "TEXT" is formed of 4 letters, you would read the text file 4 bytes by four bytes. Wrong on two counts. First, the file may not be encoded 1 byte per character. It could be utf-16 in which case it would be two byte per character. Second, even if it were 1 byte per character, the string "Text" may not start on a 4 byte boundary.
Consider a FileInputStream object "fis" that points to your text file. use fis.read(byte[] array, int offset, int len) to read every four bytes. Convert the "TEXT" String into a byte array "TEXT".getBytes(), and yous the Arrays class to compare the equality of the read bytes with your "TEXT".getBytes()Wrong since it relies on my second point and will fail when fis.read(byte[] array, int offset, int len) does not read 4 bytes (as is no guaranteed to). Check the Javadoc. Also, the file may not be encoded with the default character encoding.
The problem is easily solved by reading a line at a time using a BufferedReader wrapping an InputStreamReader wrapping a FileInputStream and specifying the correct character encoding.
Edited by: sabre150 on Apr 29, 2009 2:13 PM -
Adding standard Text as long text in QC01 of General data Section
Hi ,
I want to Append standard text in Certificate Profile Creation(QC01)of General data section. Can you suggest any Exit.
Standard Texts created by SO10 Transaction.
Thanks in advanceDear Raynard,
Raynard Coscolluela wrote:
As far as I can remember the Travel Request was conceptualize to be a simple ESS Form that's why most of the labels here are hard coded and didn't use OTR.
I have to disagree. None of the labels, except this one are hard-coded via Personalization-Means and most Texts come indeed from the OTR, the Label T_ACTYPE_LABEL also has an entry in OTR (see my posts above) but is only non-changable by enhancements because the component configuration was "abused" to overload the OTR and coding in runtime. I still can't really believe this one is intentional....
Raynard Coscolluela wrote:
We don't recommend changing the label text in Web Portal as it can lead into inconsistency incase a new update will be > deliver by SAP into this fields. So yes this is a consider a modification.
This will be an issue since the word "Spesen" which is a specific German one for "Expenses" is juridically wrong if used within a specific MOREI of the Public Sector. But this is another issue and I don't want to elaborate on this one here.
Raynard Coscolluela wrote:
My colleague who participate in this thread is still on vacation and she ask me to assist here.
I see, and I'm glad you did assist here. Give Sally my regards.
This one is answered then, if not really "solved". I'll close the OSS message now.
thanks a lot and best regards,
Lukas -
Adobe Acrobat 9 Standard Text Box Enter Space is Removed -- Help
Got a new computer at work with Adobe Acrobat 9 Standard and it is taking some getting use to (came from Acrobat 7 Professional).
I need some help with the text box tool. When I create a text box and use the enter key and click out of the text box the space is removed where I hit enter. I googled around and if I use cntrl and then hit enter the space will stay there. How do I get around this so I do not have to hold cntrl everytime. Plus if I go back into that text box and add another space it removes the space from before so I would have to add the spaces in again. I hope this is a setting I have messed up. It is quite annoying and hopefully someone can help me out.
I am on Windows 7 Professional if it matters.I've reported this as a bug a number of times since Acrobat 9 was released and so far they have refused to fix it in Acrobat 9/10/11. I had never heard of the Ctrl+Enter workaround, so thanks for that.
Maybe you are looking for
-
No Subscription Found - but order is in My Account
I have recently purchased a price-gouging subscription to Adobe Captivate 6. http://www.adobe.com/products/activation states "activation can be completed [...] at installation", but the error message received is "No Subscription Found." I have an act
-
I have a client request for a photo of a person to print with a white silhouette behind the person. This image is to be part of a bigger layout. I can make the image work with a white alpha channel in Photoshop but that same image in Illustrator does
-
Cleaning Lint/Dust/Dirt From the Docking Port, Headphone Jack, Mic & Spkr
Does anyone know if you spray canned air (Dust Off) into the docking port, headphone jack, mic & speaker ports, if the air will blow the lint/dust/dirt deep into the phone or possibly under the screen where you can't get it back out?
-
Will Apple support facetime and imessage in Ipod though 5.1.1 ?
Will Apple support facetime and imessage in Ipod though 5.1.1 ?
-
How to export user defined properties in seperate file
Hello, i want to export user definied properties in a seperate file using OMB+ commands. The documentation of this topic doesn't work. The OMB Code I use is the following: OMBEXPORT TO MDL_FILE '${Pfad}/006_${Project}.mdl' \ FROM PROJECT '${Project}'