Program title

hi abappers,
can any body tell me how i can get the title of a program which is entered in the selection screen.
Naren

Along with READ REPORT zyy, also do a READ TEXTPOOL zyy INTO itab_texts as follows.
DATA: program(8) VALUE 'ZYY',
itab_texts LIKE textpool OCCURS 50 WITH HEADER LINE.
READ TEXTPOOL program INTO itab_texts LANGUAGE sy-langu.
READ TABLE itab_texts WITH KEY id = 'R'. "<-- This will give you the title
The IDs are explained as below
R - Program titles
T - List headers
H - Column headers
S - Selection texts
I - Text symbols

Similar Messages

Program title in SE38 got deleted while activation

Hi,
I am facing a strange issue. I have maintained program title in the attributes section of the executable report in SE38. This title some times got deleted by itself while activation. This happens only some times not all the time I activated the program.
Please let me know the reason and solution for it.
Thanks in advance.
SHoban

Hi Shoban,
I believe you may have the symptom described in the following SAP Note/Link;
https://service.sap.com/sap/support/notes/1412197
I hope this helps you!
Best of luck,
Derrick Hurley
ABAP Development Workbench
SAP

Dynamic program Title

Hi all,
i am have to make a dynamic attribute for a report, can anyone please help me? actually i made 6 pushbutton on selection screen and after click of every pushbutton i want to call same Z program with different program title.
can anyone please help me?
regards

hello all,
thanx for reply...actually i made Text element for all the title and now on user selection i m transferring it in SY-TITLE under event AT SELECTION-SCREEN OUTPUT, but still it is not changing. i putted the program title &1&2 while creating program but now it is not overwriting.
can anyone plz help me?
code:
AT SELECTION-SCREEN OUTPUT.
IMPORT GC_FLG1 FROM MEMORY ID 'GV_FLG'.
if GC_FLG1 ne lc_blk.
lv_flg = GC_FLG1.
sy-title = text-008.
endif.
IMPORT GC_FLG2 FROM MEMORY ID 'GV_FLG'.
if GC_FLG2 ne lc_blk.
lv_flg = GC_FLG2.
sy-title = text-009.
endif.
IMPORT GC_FLG3 FROM MEMORY ID 'GV_FLG'.
if GC_FLG3 ne lc_blk.
lv_flg = GC_FLG3.
sy-title = text-010.
endif.
IMPORT GC_FLG4 FROM MEMORY ID 'GV_FLG'.
if GC_FLG4 ne lc_blk.
lv_flg = GC_FLG4.
sy-title = text-011.
endif.
IMPORT GC_FLG5 FROM MEMORY ID 'GV_FLG'.
if GC_FLG5 ne lc_blk.
lv_flg = GC_FLG5.
sy-title = text-012.
endif.
IMPORT GC_FLG6 FROM MEMORY ID 'GV_FLG'.
if GC_FLG6 ne lc_blk.
lv_flg = GC_FLG6.
sy-title = text-013.
endif.
IMPORT GC_FLG7 FROM MEMORY ID 'GV_FLG'.
if GC_FLG7 ne lc_blk.
lv_flg = GC_FLG7.
sy-title = text-014.
endif.
regards.

Table details to get the program title in 3.1h version

Hi All,
I would like to get the tilte for the program in 3.1h version of SAP.
Can any one tell me the table name where the program text is going to store (which table)?
In later versions it is TRDIRT.. But would like to know in 3.1H VERSION.
Regards
Ramesh.

Hands up, who has access to or remembers the details of a 3.1H installation?
I guess you're the only one, so why can you not find out yourself, maybe F1 on the field, debug, study some code...
Thomas

To Change the Program Title when i click second radio button

Hi All,
I have two radio buttons in my report.
1) party wise report ( if R1 = X this will display report )
2) sales wise report ( if R2 = X this will display report )
i declared in report attributes as party wise report .
When i clik sales wise report.
it is coming party wise report,
i want it to be as sales wise report.
Please let me know how to do it.
Thanks in advance
Ramesh

Hi,
Hope below code can give you some idea.
parameters: r1 radiobutton group rad1 default 'X',
            r2 radiobutton group rad1.
start-of-selection.
   if not r1 is initial.
      sy-title = 'Party'.
      Write:/ 'First'.
   else.
      sy-title = 'Sales'.
      write:/ 'Second'.
   endif.
Kind Regards
Eswar

Function module to display the programe name , title, linesize..etc

hi Guru's,
My requirement is to create a fuction module for displaying the classical report header and footer.
in header i need Program Name,Program Title ,page no, date , time , user..
Can any one provide me with function module.
cheers,
kumar.

hi,
you can make this type of FM or take help from this...
CALL FUNCTION 'Z_Z00_STD_HEADER'
 EXPORTING
 line_size = sy-linsz
 listtitle = sy-title
 EXCEPTIONS
 mandt_not_found = 1
 line_size_too_small = 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.
ENDFORM.
FUNCTION Z_Z00_STD_HEADER.
""Local interface:
*" IMPORTING
*" REFERENCE(LINE_SIZE) DEFAULT 80
*" REFERENCE(LISTTITLE) DEFAULT SPACE
*" REFERENCE(PARAM1) OPTIONAL
*" REFERENCE(PARAM2) OPTIONAL
*" EXCEPTIONS
*" MANDT_NOT_FOUND
*" LINE_SIZE_TOO_SMALL
data : pos_center1(3) type n,
 pos_center2(3) type n,
 pos_right1(3) type n,
 pos_right2(3) type n,
 tit_len type i.
Table to store the client name
DATA iT000 type T000.
Clear Internal Table
CLEAR it000.
Get client name from the T000 table
SELECT SINGLE MANDT MTEXT INTO iT000 FROM T000
 WHERE MANDT = SY-MANDT.
IF SY-SUBRC NE 0.
 RAISE MANDT_NOT_FOUND.
ENDIF.
if line_size < 75.
 raise line_size_too_small.
endif.
Initialize values of the position counters
pos_center1 = ( LINE_SIZE / 2 ) - 5.
pos_right1 = LINE_SIZE - 19.
pos_right2 = LINE_SIZE - 12.
tit_len = strlen( listtitle ).
pos_center2 = ( LINE_SIZE / 2 ) - ( tit_len / 2 ) - 1.
Write the standard header
First Line
uline at (line_size).
Second Line
WRITE: /3 text-010, "Report Text
 12 sy-cprog. "PERIASAS on 19/04/2004
WRITE AT pos_center1 iT000-Mtext.
WRITE AT pos_right1 text-006 RIGHT-JUSTIFIED. "Date Text
WRITE AT pos_right2 sy-datum RIGHT-JUSTIFIED.
Third Line
WRITE: /3 text-009, "Report Owner
 10 sy-uname.
WRITE AT /3 param1. "PERIASAS on 19/04/2004
WRITE AT pos_center2 listtitle.
WRITE AT pos_right1 text-007 RIGHT-JUSTIFIED. "Time Text
WRITE AT pos_right2 sy-uzeit RIGHT-JUSTIFIED.
Fourth Line
WRITE AT /3 param2. "PERIASAS on 19/04/2004
WRITE AT pos_right1 text-008 RIGHT-JUSTIFIED. "Page Text
WRITE AT pos_right2 sy-pagno RIGHT-JUSTIFIED.
Fifth Line.
uline at (line_size).
ENDFUNCTION.
with regards
Lokesh
Edited by: Lokesh Tripathi on Oct 16, 2008 12:32 PM

Program using class "cl_salv_table"

Hi Experts,
I am new to this class (cl_salv_table). I wrote a program with general ABAP code. But, according to my standard I should use standard ALV factory class i.e., 'CL_SALV_TABLE'. I wouls appreciate if anybody could send me the code using this class. Here is the code which I have written.
REPORT zrgae_acctquery
 NO STANDARD PAGE HEADING
 LINE-SIZE 190
 LINE-COUNT 65
 MESSAGE-ID zrga.
Program Title : SAP Account Coding Block Transaction Query Program*
Description : This program loads the legacy General Ledger *
 account monthly net activity into the SAP-FI *
 system using LSMW. This conversion pertains to *
 companyu2019s GL account balances beginning with *
 FY07 YE, posting monthly net changes in the *
 accounts for FY2008 and FY2009 through go-live. *
Run Frequency: The Z-transaction must be available at any time *
 an end user requires the conversion information. *
 T A B L E D E C L A R A T I O N
TABLES: ztt_rga_xreft.
 D A T A D E C L A R A T I O N
DATA: group_id(3) TYPE c,
 l_line TYPE i.
 I N T E R N A L T A B L E S
TYPES: BEGIN OF lty_ztt_rga_xreft,
 ctacct TYPE ztt_rga_xreft-ctacct,
 ctrc01 TYPE ztt_rga_xreft-ctrc01,
 ctrc02 TYPE ztt_rga_xreft-ctrc02,
 ctrc03 TYPE ztt_rga_xreft-ctrc03,
 ctrc04 TYPE ztt_rga_xreft-ctrc04,
 ctrc05 TYPE ztt_rga_xreft-ctrc05,
 ctrc06 TYPE ztt_rga_xreft-ctrc06,
 ctrc07 TYPE ztt_rga_xreft-ctrc07,
 ctrc08 TYPE ztt_rga_xreft-ctrc08,
 bukrs TYPE ztt_rga_xreft-bukrs,
 prctr TYPE ztt_rga_xreft-prctr,
 kostl TYPE ztt_rga_xreft-kostl,
 saknr TYPE ztt_rga_xreft-saknr,
 aufnr TYPE ztt_rga_xreft-aufnr,
 sap_offset TYPE ztt_rga_xreft-sap_offset,
 END OF lty_ztt_rga_xreft.
DATA: lt_data TYPE STANDARD TABLE OF lty_ztt_rga_xreft, lwa_data TYPE lty_ztt_rga_xreft.
 S E L E C T I O N S C R E E N D E F I N I T I O N S *
SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-001.
PARAMETERS: p_lgsap RADIOBUTTON GROUP b1 USER-COMMAND rad DEFAULT 'X',
 p_saplg RADIOBUTTON GROUP b1.
SELECTION-SCREEN END OF BLOCK a1.
SKIP.
SELECTION-SCREEN BEGIN OF BLOCK a2 WITH FRAME TITLE text-002. "ACC
SELECT-OPTIONS: s_lccode FOR ztt_rga_xreft-ctrc01 MODIF ID acc,
 s_ldiv FOR ztt_rga_xreft-ctrc02 MODIF ID acc,
 s_lreg FOR ztt_rga_xreft-ctrc03 MODIF ID acc,
 s_lloc FOR ztt_rga_xreft-ctrc04 MODIF ID acc,
 s_lcctr FOR ztt_rga_xreft-ctrc05 MODIF ID acc,
 s_lacct FOR ztt_rga_xreft-ctrc06 MODIF ID acc,
 s_lsacct FOR ztt_rga_xreft-ctrc07 MODIF ID acc.
SELECTION-SCREEN END OF BLOCK a2.
SKIP.
SELECTION-SCREEN BEGIN OF BLOCK a3 WITH FRAME TITLE text-003. "ALL
SELECT-OPTIONS: s_bukrs FOR ztt_rga_xreft-bukrs MODIF ID all,
 s_prctr FOR ztt_rga_xreft-prctr MODIF ID all,
 s_kostl FOR ztt_rga_xreft-kostl MODIF ID all,
 s_saknr FOR ztt_rga_xreft-saknr MODIF ID all,
 s_aufnr FOR ztt_rga_xreft-aufnr MODIF ID all.
SELECTION-SCREEN END OF BLOCK a3.
A T S E L E C T I O N S C R E E N
AT SELECTION-SCREEN OUTPUT.
CASE 'X'.
 WHEN p_saplg.
 group_id = 'ACC'.
 SET CURSOR FIELD 'S_BUKRS-LOW'.
 WHEN p_lgsap.
 group_id = 'ALL'.
 SET CURSOR FIELD 'S_LCCTR-LOW'.
ENDCASE.
LOOP AT SCREEN.
 IF screen-group1 = group_id.
 screen-input = 0.
 MODIFY SCREEN.
 ENDIF.
ENDLOOP.
 S T A R T O F S E L E C T I O N
START-OF-SELECTION.
CLEAR l_line.
IF p_lgsap = 'X'. " If legacy input filled
 INFINIUM CASE-I VALIDATIONS & OUTPUT *
 PASSING INFINIUM 'COST CENTER','ACCOUNT',& 'SUB ACCT' *
 IF s_lcctr-low NE ' ' AND s_lacct-low NE ' ' AND s_lsacct-low NE ' '.
 SELECT ctrc01
 ctrc02
 ctrc03
 ctrc04
 ctrc05
 ctrc06
 ctrc07
 ctrc08
 bukrs
 prctr
 kostl
 saknr
 aufnr
 sap_offset
 FROM ztt_rga_xreft INTO TABLE lt_data
 WHERE ctrc05 IN s_lcctr
 AND ctrc06 IN s_lacct
 AND ctrc07 IN s_lsacct.
 DESCRIBE TABLE lt_data LINES l_line.
 IF l_line < 0.
 MESSAGE e001(zrga) with 'Cost Ctr,Acct,SubAcct are not valid.pl check'.
 ENDIF.
 INFINIUM CASE-II VALIDATIONS & OUTPUT *
 PASSING INFINIUM 'COST CENTER'&'ACCOUNT' *
 ELSEIF s_lcctr-low NE ' ' AND s_lacct-low NE ' '
 AND s_lsacct-low EQ ' '.
 SELECT ctrc01
 ctrc02
 ctrc03
 ctrc04
 ctrc05
 ctrc06
 ctrc07
 ctrc08
 bukrs
 prctr
 kostl
 saknr
 aufnr
 sap_offset
 FROM ztt_rga_xreft INTO TABLE lt_data WHERE ctrc05 IN s_lcctr
 AND ctrc06 IN s_lacct.
 DESCRIBE TABLE lt_data LINES l_line.
 IF l_line < 0.
 MESSAGE e002(zrga) with 'Cost Center,Account are not valid...pl check'.
 ENDIF.
 ENDIF.
 INFINIUM CASE-III VALIDATIONS & OUTPUT *
 PASSING INFINIUM 'COMPANY CODE'&'ACCOUNT' *
ELSEIF s_lccode-low NE ' ' AND s_lacct-low NE ' '.
 SELECT ctrc01
 ctrc02
 ctrc03
 ctrc04
 ctrc05
 ctrc06
 ctrc07
 ctrc08
 bukrs
 prctr
 kostl
 saknr
 aufnr
 sap_offset
 FROM ztt_rga_xreft INTO TABLE lt_data WHERE ctrc01 IN s_lccode
 AND ctrc06 IN s_lacct.
 DESCRIBE TABLE lt_data LINES l_line.
 IF l_line < 0.
 MESSAGE e003(zrga) with 'Company code,Acct are not valid.pl check'.
 ENDIF.
ELSE. " If SAP input filled
 SAP CASE-I VALIDATIONS & OUTPUT *
 PASSING SAP 'COST CENTER','ACCOUNT'&'INTERNAL ORDER' *
 IF s_kostl-low NE ' ' AND s_saknr-low NE ' ' AND s_aufnr-low NE ' '.
 SELECT ctrc01
 ctrc02
 ctrc03
 ctrc04
 ctrc05
 ctrc06
 ctrc07
 ctrc08
 bukrs
 prctr
 kostl
 saknr
 aufnr
 sap_offset
 FROM ztt_rga_xreft INTO TABLE lt_data WHERE kostl IN s_kostl
 AND saknr IN s_saknr
 AND aufnr IN s_aufnr.
 DESCRIBE TABLE lt_data LINES l_line.
 IF l_line < 0.
 MESSAGE e004(zrga) with 'Cost Ctr,Acct,Int order are not valid...pl check'.
 ENDIF.
 SAP CASE-II VALIDATIONS & OUTPUT *
 PASSING SAP 'COST CENTER'&'ACCOUNT' *
ELSEIF s_kostl-low NE ' ' AND s_saknr-low NE ' ' AND s_aufnr-low EQ ' '.
 SELECT ctrc01
 ctrc02
 ctrc03
 ctrc04
 ctrc05
 ctrc06
 ctrc07
 ctrc08
 bukrs
 prctr
 kostl
 saknr
 aufnr
 sap_offset
 FROM ztt_rga_xreft INTO TABLE lt_data WHERE kostl IN s_kostl
 AND saknr IN s_saknr.
 DESCRIBE TABLE lt_data LINES l_line.
 IF l_line < 0.
 MESSAGE e005(zrga) with 'Cost Ctr,Acct are not valid...pl check'.
 ENDIF.
 ENDIF.
ENDIF.
 O U T P U T
IF p_lgsap = 'X'. " If legacy input filled
 WRITE:/2 'Infinium Company', 40 s_lccode-low,
 /2 'Infinium Division', 40 s_ldiv-low,
 /2 'Infinium Region', 40 s_lreg-low,
 /2 'Infinium Location', 40 s_lloc-low,
 /2 'Infinium Cost center', 40 s_lcctr-low,
 /2 'Infinium Account', 40 s_lacct-low,
 /2 'Infinium Sub-account', 40 s_lsacct-low.
ELSE. "If SAP input filled
 WRITE:/2 'SAP Company', 40 s_bukrs-low,
 /2 'SAP Cost center', 40 s_kostl-low,
 /2 'SAP Profit center', 40 s_prctr-low,
 /2 'SAP Account', 40 s_saknr-low,
 /2 'SAP order', 40 s_aufnr-low.
ENDIF.
WRITE:/ sy-uline(190).
FORMAT COLOR COL_HEADING ON.
WRITE:/1 sy-vline,
 2 'Infinium Company',
 17 sy-vline,
 18 'Infinium Division',
 37 sy-vline,
 38 'Infinium Region',
 57 sy-vline,
 58 'Infinium Location',
 77 sy-vline,
 78 'Infinium Cost Center',
 97 sy-vline,
 98 'Infinium Account',
 114 sy-vline,
 115 'Infinium Sub Account',
 134 sy-vline.
FORMAT COLOR COL_HEADING OFF.
FORMAT COLOR COL_POSITIVE ON.
WRITE: 135 'SAP Company',
 144 sy-vline,
 145 'SAP Profit Center',
 154 sy-vline,
 155 'SAP Cost Center',
 164 sy-vline,
 165 'SAP Account',
 174 sy-vline,
 175 'SAP Order',
 190 sy-vline.
FORMAT COLOR COL_POSITIVE OFF.
WRITE:/1 sy-vline.
WRITE:/ sy-uline(190).
WRITE:/ sy-uline(190).
LOOP AT lt_data into lwa_data.
 FORMAT COLOR COL_HEADING ON.
 WRITE:/1 sy-vline,
 2 lwa_data-ctrc01,
 17 sy-vline,
 18 lwa_data-ctrc02,
 37 sy-vline,
 38 lwa_data-ctrc03,
 57 sy-vline,
 58 lwa_data-ctrc04,
 77 sy-vline,
 78 lwa_data-ctrc05,
 97 sy-vline,
 98 lwa_data-ctrc06,
 114 sy-vline,
 115 lwa_data-ctrc07,
 134 sy-vline.
 FORMAT COLOR COL_HEADING OFF.
 FORMAT COLOR COL_POSITIVE ON.
 WRITE: 135 lwa_data-bukrs,
 144 sy-vline,
 145 lwa_data-prctr,
 154 sy-vline,
 155 lwa_data-kostl,
 164 sy-vline,
 165 lwa_data-saknr,
 174 sy-vline,
 175 lwa_data-aufnr,
 190 sy-vline.
 FORMAT COLOR COL_POSITIVE OFF.
 WRITE:/ sy-uline(190).
 append lwa_data to lt_data.
 clear lwa_data.
ENDLOOP.

HI nani,
welcome
This is a sample program to illustrate several techniques:
use of dynamic selections
persistent data stored into cluster INDX
data definition at runtime
display internal table using SALV class
Just copy the code into a new program, create include for events, then copy status STANDARD from program SAPLSALV.
u have to add the SAVE function code to the disk button. It allow you to save modifications to the database.
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
*& Report zkarthik_update
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
report zkarthik_update.
Data definition
type-pools: rsds.
data: is_x030l type x030l,
it_x031l type table of x031l,
is_x031l type x031l.
data: w_selid type rsdynsel-selid,
it_tables type table of rsdstabs,
is_tables type rsdstabs,
it_fields type table of rsdsfields,
it_expr type rsds_texpr,
it_ranges type rsds_trange,
it_where type rsds_twhere,
is_where type rsds_where,
w_active type i.
data: w_repid type sy-repid,
w_dynnr type sy-dynnr,
wt_dynp type table of dynpread,
ws_dynp type dynpread.
data: it_content type ref to data,
is_content type ref to data.
data: w_okcode type sy-ucomm.
data: w_fdkey type x value u201801u2032.
data: w_akey type indx-srtfd,
w_rkey type indx-srtfd,
w_fkey type indx-srtfd.
Include to handle events on ALV display screen
include zbc_query_events.
field-symbols: <itab> type standard table,
<irec> type any.
Macros
define table_error.
message e398(00) with u2018Tableu2019 p_table &1.
end-of-definition.
define fixed_val.
assign component is_x031l-fieldname of structure <irec> to <fld>.
if sy-subrc = 0.
<fld> = &1.
endif.
end-of-definition.
Selection screen
selection-screen: begin of block b01 with frame.
parameters: p_table type tabname obligatory u201Ctable
memory id dtb
matchcode object dd_dbtb_16.
selection-screen: begin of line,
pushbutton 33(20) selopt user-command sel,
comment 55(15) selcnt,
end of line.
selection-screen: skip.
parameters: p_field type fieldname, u201Cfield
p_value type text132. u201Cvalue
selection-screen: end of block b01,
skip,
begin of block b02 with frame.
parameters: p_displ type c as checkbox default u2018Xu2019, u201Cdisplay
p_systm type c as checkbox. u201Csystem
selection-screen: end of block b02.
Initialization
initialization.
move u2018@4G@ Filter recordsu2019 to selopt.
ws_dynp-fieldname = u2018P_TABLEu2019.
append ws_dynp to wt_dynp.
Get dynamic selection from cluster
w_akey(1) = u2018Au2019.
w_akey+1(12) = sy-uname.
import w_active from database indx(xy) id w_akey.
w_rkey(1) = u2018Ru2019.
w_rkey+1(12) = sy-uname.
import it_expr from database indx(xy) id w_rkey.
w_rkey(1) = u2018Fu2019.
w_rkey+1(12) = sy-uname.
import it_fields from database indx(xy) id w_fkey.
PBO
at selection-screen output.
if w_active is initial.
clear: selcnt.
else.
write w_active to selcnt left-justified.
endif.
PAI
at selection-screen.
if p_table ne is_x030l-tabname.
perform f_init_table.
endif.
if sy-ucomm = u2018SELu2019.
if w_selid is initial.
perform f_init_selections.
endif.
Display free selection dialog
call function u2018FREE_SELECTIONS_DIALOGu2019
exporting
selection_id = w_selid
title = u2018Selectionu2019
status = 1
as_window = u2018Xu2019
importing
expressions = it_expr
field_ranges = it_ranges
number_of_active_fields = w_active
tables
fields_tab = it_fields
exceptions
others = 1.
Write dynamic selection to cluster
w_akey(1) = u2018Au2019.
w_akey+1(12) = sy-uname.
export w_active to database indx(xy) id w_akey.
w_rkey(1) = u2018Ru2019.
w_rkey+1(12) = sy-uname.
export it_expr to database indx(xy) id w_rkey.
w_rkey(1) = u2018Fu2019.
w_rkey+1(12) = sy-uname.
export it_fields to database indx(xy) id w_fkey.
endif.
if p_field is not initial.
read table it_x031l into is_x031l
with key fieldname = p_field.
if sy-subrc = 0.
if is_x031l-flag1 o w_fdkey.
message e129(53) with p_field p_table.
endif.
else.
message e804(5g) with p_field p_table.
endif.
endif.
at selection-screen on value-request for p_field.
w_repid = sy-repid.
w_dynnr = sy-dynnr.
call function u2018DYNP_VALUES_READu2019
exporting
dyname = w_repid
dynumb = w_dynnr
tables
dynpfields = wt_dynp
exceptions
others = 1.
if sy-subrc = 0.
read table wt_dynp into ws_dynp index 1.
p_table = ws_dynp-fieldvalue.
call function u2018F4_DD_TABLE_FIELDSu2019
exporting
table = p_table
importing
result = p_field.
endif.
Start of processing
start-of-selection.
perform f_create_table using p_table.
perform f_select_table.
perform f_modify_table.
perform f_display_table using <itab>.
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
*& Form f_init_table
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form f_init_table.
Prepare free selection on table
perform f_table_def using p_table.
refresh it_tables.
is_tables-prim_tab = p_table.
append is_tables to it_tables.
clear: w_selid.
endform. u201Cf_init_table
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
*& Form f_init_selections
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form f_init_selections.
Init free selection dialog
call function u2018FREE_SELECTIONS_INITu2019
exporting
expressions = it_expr
importing
selection_id = w_selid
expressions = it_expr
tables
tables_tab = it_tables
fields_tab = it_fields
exceptions
others = 1.
endform. u201Cf_init_selections
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
 FORM f_table_def *
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form f_table_def using in_tabname.
call function u2018DDIF_NAMETAB_GETu2019
exporting
tabname = p_table
importing
x030l_wa = is_x030l
tables
x031l_tab = it_x031l
exceptions
others = 1.
if is_x030l is initial.
table_error u2018does not exist or is not activeu2019.
elseif is_x030l-tabtype ne u2018Tu2019.
table_error u2018is not selectableu2019.
endif.
endform. u201Cf_table_def
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
 FORM f_create_table *
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form f_create_table using in_tabname.
create data it_content type table of (in_tabname).
if sy-subrc = 0.
assign it_content->* to <itab>.
else.
write: u2018Error creating internal tableu2019.
stop.
endif.
endform. u201Cf_create_table
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
 FORM f_select_table *
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form f_select_table.
if w_active = 0.
select * from (p_table)
into corresponding fields of table <itab>.
else.
Selection with parameters
call function u2018FREE_SELECTIONS_EX_2_WHEREu2019
exporting
expressions = it_expr
importing
where_clauses = it_where
exceptions
expression_not_supported = 1
others = 2.
read table it_where into is_where with key tablename = p_table.
select * from (p_table)
into corresponding fields of table <itab>
where (is_where-where_tab).
endif.
if sy-dbcnt = 0.
write: u2018No record selectedu2019.
stop.
endif.
endform. u201Cf_select_table
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
 FORM f_modify_table *
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form f_modify_table.
field-symbols: <fld> type any.
loop at <itab> assigning <irec>.
if p_field is not initial.
assign component p_field of structure <irec> to <fld>.
if sy-subrc = 0.
call function u2018GENERIC_CONVERSION_EXIT_INPUTu2019
exporting
i_tabname = p_table
i_fieldname = p_field
input_text = p_value
importing
output_text = <fld>
exceptions
invalid_ddic_parameters = 1
invalid_input = 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.
endif.
endif.
if p_systm is not initial.
 Default values for system fields
loop at it_x031l into is_x031l.
if is_x031l-dtyp = u2018CLNTu2019.
fixed_val sy-mandt.
elseif is_x031l-rollname = u2018ERDATu2019
or is_x031l-rollname = u2018ERSDAu2019
or is_x031l-rollname = u2018AEDATu2019
or is_x031l-rollname = u2018LAEDAu2019.
fixed_val sy-datum.
elseif is_x031l-rollname = u2018ERTIMu2019
or is_x031l-rollname = u2018AETIMu2019.
fixed_val sy-uzeit.
elseif is_x031l-rollname = u2018ERNAMu2019
or is_x031l-rollname = u2018AENAMu2019.
fixed_val sy-uname.
endif.
endloop.
endif.
endloop.
endform. u201Cf_modify_table
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
 FORM f_display_table *
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form f_display_table using in_table.
data: ob_table type ref to cl_salv_table,
ob_event type ref to cl_salv_events_table,
cx_error type ref to cx_salv_msg.
try.
call method cl_salv_table=>factory
importing
r_salv_table = ob_table
changing
t_table = in_table.
catch cx_salv_msg into cx_error.
exit.
endtry.
if p_displ is initial and
p_field is not initial.
call method ob_table->set_screen_status
exporting
report = u2018ZBC_UPDATE_TABLEu2019
pfstatus = u2018STANDARDu2019
set_functions = ob_table->c_functions_all.
ob_event = ob_table->get_event( ).
create object ob_appl.
set handler ob_appl->on_user_command for ob_event.
else.
call method ob_table->set_screen_status
exporting
report = u2018SAPLSALVu2019
pfstatus = u2018STANDARDu2019
set_functions = ob_table->c_functions_all.
endif.
call method ob_table->display.
endform. u201Cf_display_table
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
*& Form user_command
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
form user_command using in_command type salv_de_function.
data: l_messg type string,
l_answer type c.
data: ls_expr type string.
check in_command = u2018SAVEu2019.
l_messg = u2018Overwrite field for all selected records ?u2019.
call function u2018POPUP_TO_CONFIRMu2019
exporting
titlebar = u2018Update tableu2019
text_question = l_messg
default_button = u20182u2032
display_cancel_button = u2018 u2018
popup_type = u2018@1A@u2019
importing
answer = l_answer
exceptions
text_not_found = 1
others = 2.
if l_answer = u20181u2032.
concatenate p_field u2018= u201Du2019 into ls_expr
separated by space.
concatenate ls_expr p_value u201Du201D into ls_expr.
try.
update (p_table) set (ls_expr)
where (is_where-where_tab).
catch cx_sy_dynamic_osql_error.
rollback work.
message u2018Error during update!u2019 type u2018Iu2019.
endtry.
if sy-subrc = 0.
commit work.
endif.
endif.
endform. u201Cuser_command
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
*& Include ZBC_QUERY_EVENTS
&u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014
class lcl_handle_events definition deferred.
data: ob_appl type ref to lcl_handle_events.
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014-
 CLASS lcl_handle_events DEFINITION
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014-
class lcl_handle_events definition.
public section.
methods:
on_user_command for event added_function of cl_salv_events
importing e_salv_function,
on_before_salv_function for event before_salv_function of cl_salv_events
importing e_salv_function,
on_after_salv_function for event after_salv_function of cl_salv_events
importing e_salv_function,
on_double_click for event double_click of cl_salv_events_table
importing row column,
on_link_click for event link_click of cl_salv_events_table
importing row column.
endclass. u201Clcl_handle_events DEFINITION
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014-
 CLASS lcl_handle_events IMPLEMENTATION
u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014u2014-
class lcl_handle_events implementation.
method on_user_command.
perform user_command in program (sy-repid) if found
using e_salv_function.
endmethod. u201Con_user_command
method on_before_salv_function.
perform before_function in program (sy-repid) if found
using e_salv_function.
endmethod. u201Con_before_salv_function
method on_after_salv_function.
perform after_function in program (sy-repid) if found
using e_salv_function.
endmethod. u201Con_after_salv_function
method on_double_click.
perform double_click in program (sy-repid) if found
using row column.
endmethod. u201Con_double_click
method on_link_click.
perform link_click in program (sy-repid) if found
using row column.
endmethod. u201Con_single_click
endclass. u201Clcl_handle_events IMPLEMENTATION
thanks
karthik

How to change the description of a program or report

Hi,
I had copy a report of and changed thereby the name.
But the description is still the same and I can't find
a way to change this.
The problem with the description is that it appears
as program-title in selection-screen-->select-options.
Thanks for help

Hi
change the attributes or
In the REPORT along with name
declare NO STANDARD PAGE HEADING
it will not display the report description in the output.
Reward points for useful Answers
Regards
Anji
Message was edited by:
Anji Reddy Vangala

Table containing Program Texts(Text Symbols, SelectionTexts, List Heading)

Hi All,
I would like to know which is the standard SAP std. table which stores the data regarding Text Symbols, SelectionTexts, and List Heading of every program we create. There should definitly be a table where it is stored (otherwise we will not be able to retrieve it each time).
I have found out a structure RS38M which has all the required fields. But since it is a structure, it doesnt contain data.
So please inform if any body knows any standard SAP table which stores Program Texts. A quick, correct reply would be highly appreciated.

Hi
All these texts are stored in text pool not in any std. table.
To retrieve these info u have to use statement like:
READ TEXTPOOL <prog_name> INTO itab LANGUAGE <language> [STATE state].
This statement reads the text elements of the text pool of the language specified in lang and the program specified in prog from the Repository and places them into the internal table itab. The previous content of itab is deleted. If the text elements cannot be read, then the content of itab remains unchanged.
For prog, you must specify a flat character-like data object, which contains the name of the program of the text elements to be read; the name is case-independent. The internal table can have any table type and its row type must correspond to structure TEXTPOOL from the ABAP Dictionary.
For lang, you must specify a flat character-like data object, which contains a language key of up to one character, whose value must be contained in the SPRAS column of database table T002. If lang contains a blank, the behavior is undefined.
After a successful read, itab contains in the ENTRY column the texts of the text symbols, the selection texts, the list headers and the title from the program attributes. Every text element that exists for the specified language occupies one row of the internal table and is identified uniquely by the columns ID and KEY. The column LENGTH contains the length of the text element. The table below shows the possible values of the columns ID and KEY and their meaning:
ID KEY ENTRY
H 001 to 004 List header: Column headings
I Text symbol identifier Text symbol text
R - Program title
S Name of a parameter or selection criterion Selection text
T - List Title: Titlebar

How to add program to the lswm

Hi all,
We hv a requirement for ME31L , we tried with recording mode as there is no direct input prg for this thing. But while recording an extra screen is getting recorded, coz of this screen the following screen loosing its data.
Thus it is going for an error while executing through lsmw . ( There is no problem while recording ).
so i need to add program to the lsmw to handle this situation.
Plz reply it's urgent

Hi,
BI - Batch Input Program
DI - Direct Input Porgram
Goto SM30 and add entries in the 4 tables.
SXDA0--
PDXfer: Data Transfer Object
DX obj DX obj.short text DX type Object Ty
9304 Program Title D
D - Direct Input
B - Batch Input
SXDA1--
PDXfer: Data Transfer Objects and Sub-Category
DX oDXsuSubtyptext DX prog. DTest prg.
In this table create with entries with the same no as created in SXDA0
You need to create the Target Structures and assign them in SXDA2 and then in SXDA3 assign the attributes like Nodata, stype etc...
Its a little bit lengthy process. Once you create the entry in SXDA's you can then directly specify the entry no. in LSMW Maintain Object Attributes.
Object <-- Here put the entry no.
Method
Regards,
AS

Spreading the word: A subscription to CC allows access to CS6 programs

How? It took me an online chat and a phone call to figure out. (Read: two hours.)
The answer is through the adobe website.
Go to http://creative.adobe.com/products/
Select the program you want the CS6 version of
Once on that program's page, scroll down to the section titled 'In this version'
Directly below the title, there should be a dropdown box; click it and select '[Program Title] CS6'
The download button at the top of the page should now read 'Download [Program Title] CS6' instead of simply 'Download'
Please note that some programs listed have no CS6 version, as they were not a part of Adobe Creative Suite 6. Some examples are Edge Inspect CC, Adobe Gaming SDK, Ideas, and Photoshop Touch.
Why is this helpful? For one, I take a number of classes that operate Adobe CS6. This keeps me from having to pay attention to how I save my documents at home so they are able to be opened in class.
Also, there are some functions of some programs that have seemingly disappeared in Creative Cloud. In Adobe Flash Professional CC, several panels/functions have been removed, including the Bone Tool which made animating figures created of interacting shapes much simpler. I imagine that there are other programs with functions that have mysteriously disappeared, and this ability clears that issue up.
So- now you know. Happy you don't need to buy CS6 programs while subscribed?

Sign Out When Sign In http://forums.adobe.com/thread/1450581?tstart=0 may help
-and http://helpx.adobe.com/creative-cloud/kb/unable-login-creative-cloud-248.html

Where is Acrobat Pro if not in Program Files or Program Files 86?

Where is the Adobe Acrobat program loaded to?

Rave
your solution and instructions were very good, and for that I thank you. I
did go into Downloads but the program was not there either. A program
titled ADOBE DOWNLOADS is in the DOWNLOADS folder but it reorts that the
program already exists when I activate it.
My conclusion is that the program did not really download.onto the drive.
I am going to give up and take the computer to the GEEK Squatd at Best
Buy.
Thank you again for your clear explanation and suggestion, when I read it,
I thought for sure that it was the answer to my problem.
Dick

Program Search

Could you please add an option to program search for "recently searched programs" with (for example) a 7-day history? It's annoying to have to keep typing the same program titles week after week.

Hi,Welcome to Apple Discussions.
Applications are traditionally installed in the Applications Folder. I assume you have looked there!
Here are some things to try:
Open Safari, go to the Safari Menu > Preferences > "Save downloaded items to..." <- check here and see where you would have downloaded it to. <li>In the Finder go to the File Menu > Find > Enter the name of the application and hit search.
Or, go to the Apple Menu > About this Mac > "More Info", this opens Apple System Profiler, on the left hand side click "Applications" after a quick search you will be presented with a list of all the applications on your computer.
Any of these methods should find you your software programme.
regards
mrtotes

Cannot open new software program

I managed to successfully download a library cataloging program titled "Delicious Library 2," but when I go to open it, it refuses to open. I dragged the icon into the dock, but instead of the icon bouncing until the program opens, it only bounces once and stops. Any ideas?

. Oh well. I guess I'll just have to upgrade? It says under the help section, though, that it is compatible with Tiger. http://www.delicious-monster.com/help.php?id=2#article
Unless the compatibility is only for the earlier version of D.L.?

What's the problem of this mail sending program

Hi,
I have Written following code. I have wriiten & run this code in Eclipse. Mail.jar & Activation.jar both jar file i kept in the webcontent/web-inf/lib
directory. & I also added this jar file using builpath->add External Library. But when run this code then it throws the following exception. What's the problem of code? IS there anybody can help me? Please help me.
My code is : UserMail.jsp
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS">
<title>Mail Sending Program</title>
<%@ page import="javax.mail.internet.*"%>
<%@ page import="javax.mail.*"%>
<%@ page import="java.util.*"%>
</head>
<body>
<%
String to = "[email protected]";
String from = "[email protected]";
String host = "192.168.1.1";
String txt = "I am from jsp of java";
String subject = "For testing";
 Properties props = System.getProperties();
 props.put("mail.smtp.host", host);
 Session session1 = Session.getDefaultInstance(props, null);
 MimeMessage msg = new MimeMessage(session1);
 try{
 InternetAddress to1 = new InternetAddress(to);
 msg.setFrom(new InternetAddress(from));
 msg.addRecipient(Message.RecipientType.TO,to1);
 msg.setSubject(subject);
msg.setText(txt);
 msg.setSentDate(new Date());
 Transport.send(msg);
 catch(Exception e){
 e.printStackTrace();
%>
</body>
</html>Exception is:
javax.mail.MessagingException: Could not connect to SMTP host: 192.168.1.1, port: 25;
nested exception is:
 java.net.SocketException: Software caused connection abort: connect
 at com.sun.mail.smtp.SMTPTransport.openServer(SMTPTransport.java:1282)
 at com.sun.mail.smtp.SMTPTransport.protocolConnect(SMTPTransport.java:370)
 at javax.mail.Service.connect(Service.java:275)
 at javax.mail.Service.connect(Service.java:156)
 at javax.mail.Service.connect(Service.java:105)
 at javax.mail.Transport.send0(Transport.java:168)
 at javax.mail.Transport.send(Transport.java:98)
 at org.apache.jsp.UserMail_jsp._jspService(UserMail_jsp.java:73)
 at org.apache.jasper.runtime.HttpJspBase.service(HttpJspBase.java:97)
 at javax.servlet.http.HttpServlet.service(HttpServlet.java:802)
 at org.apache.jasper.servlet.JspServletWrapper.service(JspServletWrapper.java:332)
 at org.apache.jasper.servlet.JspServlet.serviceJspFile(JspServlet.java:314)
 at org.apache.jasper.servlet.JspServlet.service(JspServlet.java:264)
 at javax.servlet.http.HttpServlet.service(HttpServlet.java:802)
 at org.apache.catalina.core.ApplicationFilterChain.internalDoFilter(ApplicationFilterChain.java:252)
 at org.apache.catalina.core.ApplicationFilterChain.doFilter(ApplicationFilterChain.java:173)
 at org.apache.catalina.core.StandardWrapperValve.invoke(StandardWrapperValve.java:213)
 at org.apache.catalina.core.StandardContextValve.invoke(StandardContextValve.java:178)
 at org.apache.catalina.core.StandardHostValve.invoke(StandardHostValve.java:126)
 at org.apache.catalina.valves.ErrorReportValve.invoke(ErrorReportValve.java:105)
 at org.apache.catalina.core.StandardEngineValve.invoke(StandardEngineValve.java:107)
 at org.apache.catalina.connector.CoyoteAdapter.service(CoyoteAdapter.java:148)
 at org.apache.coyote.http11.Http11Processor.process(Http11Processor.java:869)
 at org.apache.coyote.http11.Http11BaseProtocol$Http11ConnectionHandler.processConnection(Http11BaseProtocol.java:664)
 at org.apache.tomcat.util.net.PoolTcpEndpoint.processSocket(PoolTcpEndpoint.java:527)
 at org.apache.tomcat.util.net.LeaderFollowerWorkerThread.runIt(LeaderFollowerWorkerThread.java:80)
 at org.apache.tomcat.util.threads.ThreadPool$ControlRunnable.run(ThreadPool.java:684)
 at java.lang.Thread.run(Unknown Source)
Caused by: java.net.SocketException: Software caused connection abort: connect
 at java.net.PlainSocketImpl.socketConnect(Native Method)
 at java.net.PlainSocketImpl.doConnect(Unknown Source)
 at java.net.PlainSocketImpl.connectToAddress(Unknown Source)
 at java.net.PlainSocketImpl.connect(Unknown Source)
 at java.net.SocksSocketImpl.connect(Unknown Source)
 at java.net.Socket.connect(Unknown Source)
 at java.net.Socket.connect(Unknown Source)
 at com.sun.mail.util.SocketFetcher.createSocket(SocketFetcher.java:232)
 at com.sun.mail.util.SocketFetcher.getSocket(SocketFetcher.java:189)
 at com.sun.mail.smtp.SMTPTransport.openServer(SMTPTransport.java:1250)
 ... 27 moreWith regards
Bina

javax.mail.MessagingException: Could not connect to SMTP host: 192.168.1.1Is this host Ip correct. If Ip is correct then this host should be a mail exchange server. Hope u did not use Ip address of ur machine ;-)
By the way hope u recd the test mail during my testing....lol
Regards
Rohit

Program title

Similar Messages

Maybe you are looking for