Creation of push buttons in report program
hi guys,
I have rquirement like in selection screen i need one paramenter like vbeln and i need two push buttons ? can we create pushbuttons in selection screen? if possible can anyone please help me on these?
thank you
If the pushbuttons are in the application bar, you may
- Change the pf-status. - Check FM [RS_SET_SELSCREEN_STATUS|http://www.sdn.sap.com/irj/scn/advancedsearch?query=rs_set_selscreen_status] (to be called in PBO - AT SELECTION-SCREEN OUTPUT)
- Add 1-4 function key with [SELECTION-SCREEN - FUNCTION KEY|http://help.sap.com/abapdocu_70/en/ABAPSELECTION-SCREEN_FUNCTIONKEY.htm]
Look at [samples provided by SAP|http://wiki.sdn.sap.com/wiki/display/ABAP/ExamplesanddemosbySAP]
Regards,
Raymond
Similar Messages
-
Using application toolbar push buttons in report
Hello folks,
I'm new to ABAP and so i'm facing some problems with my code.
I have copied a standard program to my Z program (ZXXXXX). I have added few push buttons to the application toolbar of the Z program (ZXXXXX) and now on click of the 1st button i need to call another standard program.
Where should I write the code for the action to be performed on click of the buttons? I am aware that it is generally written in the PAI module but I did not have this module, its a normal report program and not a module pool.
Need your help.
Thanks in advance.Welcome on SCN!
Please do not forget to read Welcome and Rules of Engagement
As for the question, you would need to clarify where this application toolbar option is placed:
- in selection screen?
- in list (output of program)?
If first applies, do as above suggested (using AT SELECTION-SCREEN event).
If second is what you need, use event AT USER-COMMAND .
In both cases variable sy-ucomm will hold function code of triggered function (i.e sy-ucomm = 'MY_BUTTON' ). If that condition is fulfilled simply use SUBMIT 'MY_PROGRAM' AND RETURN , or just SUBMIT 'MY_PROGRAM' if you don't want to get back to calling program.
Regards
Marcin -
How to add push button in report.
Hi,
how to add a push button in the standard list report and on clicking which the line-size of the screen should reduce from 300 to 100.
how to proceed.
Can anyone help me.
Regards
GuhapriyanHii Guhapriyam,
You can ceate PUSHBUTTON in selection-screen like Below
SELECTION-SCREEN PUSHBUTTON 2(10) text-004 USER-COMMAND CL1.
Create a variable to hold the processed PUSHBUTTON value like
DATA v_flag TYPE flag.
The PUSHBUTTON will be processed at the event AT SELECTION-SCREEN. So write your code like below
AT SELECTION-SCREEN.
IF sy-ucomm EQ 'CL1'.
v_flag = 1. "Buttob clicked
ENDIF.
START-OF-SELECTION.
IF v_flag EQ 1.
NEW-PAGE LINE-SIZE 100.
ENDIF.
OR
The best way of doing this by setting PF-STATUS like
START-OF-SELCTION.
SET PF-STATUS 'ZSTATUS'. "Double click on this and set the pushButton in standard toolbar option and in function key specify the BACK, EXIT and CANCEL button .
Then write your logic at the event AT USER-COMMAND.
AT USER-COMMAND.
CASE sy-ucomm.
WHEN 'RED'.
NEW-PAGE LINE-SIZE 100.
WHEN 'BACK' OR 'CANCEL' OR 'EXIT'.
LEAVE SCREEN.
WHEN OTHERS.
ENDCASE.
regards
Syed -
Error during creation of push button on selection screen
Hi,
I wanted to create push buttons on selection screen,
Code:
DATA DB1 TYPE VBAP-WERKS.
DATA DB2 TYPE MARA-MATNR.
SELECT-OPTIONS : SPLANT FOR DB1,
SCLASS FOR DB2.
SELECTION-SCREEN: FUNCTION KEY 1,
FUNCTION KEY 2,
FUNCTION KEY 3.
INITIALIZATION.
DATA FUNCTXT TYPE SMP_DYNTXT.
CLEAR FUNCTXT.
DATA: FUNCTXT_01 TYPE SSCRFIELDS-FUNCTXT_01.
FUNCTXT-TEXT = 'DEL'.
SSCRFIELDS-FUNCTXT_01 = FUNCTXT.
CLEAR FUNCTXT.
FUNCTXT-TEXT = 'EDIT'.
SSCRFIELDS-FUNCTXT_02 = FUNCTXT.
CLEAR FUNCTXT.
FUNCTXT-TEXT = 'CRE'.
SSCRFIELDS-FUNCTXT_03 = FUNCTXT.
But during activating, I'm getting the error as : Field "SSCRFIELDS-FUNCTXT_01" is unknown. It is neither in one of the specified tables nor defined by "DATA" statement.
Please suggest solutions to overcome this error.
Regards
Darshan MSHi,
trans. for examples of selection screen : BIBS
regards
Fred -
Sending Print through Push Button in report...
I'm running report with 'DISABLEPRINT=Yes' and 'DisableFile=Yes' parameters. Now can I send the print of currently displaying report to a printer without rerunning the report...I mean is there any print command in reports???
Dear Pusa
I'm using Reports 6i. My report layout style is Group Above. I've adopted this technique coz in this report I'm generating an important document which should be printed only once in normal conditions. So to avoid multiple printing of this report I've disabled File menu(to prohibit generation of PDF etc) and Print Button. Now the report will generate only thru a button I've placed into the report and it'll check there whether user is printing for the First time or more.....Ok??? is it enough??? -
Radio buttons in report programing
Hello Experts,
I have few requirement in my program
In radio button group by default the first radio button is selected , i want none of the radio buttons should be selected.
Please tell me any solution for that code snippet would be appreciated.
Thanks in advance.Hi,
For ur requirement I jus tried bthis below code n it works fine.
PARAMETERS: radbut1 RADIOBUTTON GROUP rad1 DEFAULT 'X',
radbut2 RADIOBUTTON GROUP rad1,
radbut3 RADIOBUTTON GROUP rad1,
radbut4 RADIOBUTTON GROUP rad1.
AT SELECTION-SCREEN OUTPUT.
IF radbut1 = 'X'.
LOOP AT SCREEN.
IF screen-name = 'RADBUT2'.
CLEAR radbut2.
screen-input = 0.
MODIFY SCREEN.
ELSEIF screen-name = 'RADBUT3'.
CLEAR radbut3.
screen-input = 0.
MODIFY SCREEN.
ELSEIF screen-name = 'RADBUT4'.
CLEAR radbut4.
screen-input = 0.
MODIFY SCREEN.
ENDIF.
ENDLOOP.
ENDIF.
Do execute this code n if u still ve doubts, u can always revert back.
Hope this helps u...
Regards,
Ramya -
Reg:dynamically enabling push button in module programs
hi guru's.
i have placed a pushbutton on a screen,and i have hide it.
on certain conditions i want to enable the pushbutton dynamically through coding,how to do that....
plzzz help......
with regards,
balaji.sDolike below
loop at screen.
if screen-group1 = 'G2'.
screen-active = 1.
screen-input = 1.
screen-output = 1.
screen-invisible = 0.
modify screen.
endif.
endloop.
here you need to assign your field to a group say 'G2'.
do rward if helpful -
Report Out put by Push Button ???
Hi SAP-ABAP Experts .
Boss Please suggest me that i have to create a Screen in which only one Push Buton ,
As user Click this Push Button , a report should run and give it's output , the point is how selection screen will get a
perticular input when user will click this Push Button .
How to do this Boss .?
For Ex : program's Selection Screen has two input parameters
A = 5
B = 4
output of the report : C = 10 .
Requirement is when user click Puch Button , it will get out put C = 10 .
My Best Regards : rajneesh .Hi,
Use Module pool program for this.
SAP ABAP Tutorial: Module Pool Programming. Part 2
Once the program 'ZSALESORDSCREEN' is created Saved and Activated, run Transaction SE51.
Enter screen number '9000'
Screen numbers can be up to 4 characters long, all of which must be digits. Screen numbers from 9000 are reserved for customer-specific screens.
In the Screen Painter enter a short Description and Activate the screen.
Once this is done you will be presented with a screen that will have three tabs, namely Attributes/Element List/Flow Logic
Click on Element List and type Ok_Code and Activate.
Now click on Flow Logic.
You should see the following code in the Flow Logic.
PROCESS BEFORE OUTPUT.
MODULE STATUS_9000.
PROCESS AFTER INPUT.
MODULE USER_COMMAND_9000.
Create MODULE STATUS_9000 by double clicking on it. The following code will be automatically created.
INCLUDE ZSALESORDERTOP . "
INCLUDE ZSALESORDERO01 . *
INCLUDE ZSALESORDERI01 . *
INCLUDE ZSALESORDERF01 . *
*& Module STATUS_9000 OUTPUT
text
MODULE STATUS_9000 OUTPUT.
SET PF-STATUS 'xxxxxxxx'.
SET TITLEBAR 'xxx'.
ENDMODULE. " STATUS_9000 OUTPUT
Uncomment the following code.
SET PF-STATUS 'ZSALES'. -
Menu Bar for the custom Sales Order Screen.
SET TITLEBAR 'ZSL'. -
Title.
Give appropriate names to PF-STATUS and TITLE BAR. Once the code is uncommented and the appropriate names are given. Double click on the name ZSALES. Once you see the prompt click on create object.
You will see the following three options in the resulting screen.
Menu bar Status for Sales Order Screen
Application toolbar Status for Sales Order Screen
Function keys Status for Sales Order Screen
Click on the Function Keys Drop Down Box. You will see the Standard Tool Bar with Icons that you normally see in the SAP Screen.
Enter the following values in the empty fields.
Standard Toolbar
Ente SAVE BACK EXIT CANCEL PRINT FIND FINDNEXT FIRSTPAGE PREVP NEXT LAST
Activate the PF-STATUS.
You will be prompted to enter the Function Text and Info Text for the button Enter.
Please enter the following values.
Function Text 'Ente'
Info Text 'Enter'
Execute Transaction SE80 and Activate the complete program by right clicking on it.
We will now create a transaction code for our program. To create a transaction code right click on the main program and from the pop-up menu select Create-----Transaction.
In the dialog box enter the following values.
Transaction Code 'ZSALESORD'
Short Description 'Create Sales Order'
And Click on Save.
You will now be asked to enter Program name and Screen Number. Enter the following values.
Program ZSALESORDSCREEN
Screen 9000
Save and Activate the Program
Now we need to enter code to create the Sales order. We also need to create the Screen Elements.
In transaction SE80 in the left pane click on Screens and then double click on 9000.
Now from the menu click on LAYOUT button.
We need to create Labels and Text Boxes for the following fields.
Filed (Label Display) Label Name TextBox Name Def Length
Order Type lblordtyp txtordtyp 2
Sales Org lblsalesorg txtsalesorg 4
Distribution Channel lbldistchnl txtdistchnl 2
Division lbldiv txtdiv 2
Sold-to Party lblsoldto txtsoldto 10
Ship-to Party lblshipto txtshipto 10
Purchase Ord lblpurchord txtpurchord 10
Material lblmat txtmat 18
Quantity lblqty txtqty 13
We also need to create a command button as follows
Label Name
Create Order lblcreateord
We will now look at the property box which is displayed after double clicking on each screen element.
Order Type (Label)
Name lblordtyp
Text Order_Type
Order Type (Text Box)
Name txtordtyp
Text
Def. Length 2
Similarly fill the Property box for other fileds
Important
Property Box for Command Button in this case the Function Code is important
Create Order
Name cmdord
Text Create Order
Fct Code ORDE -
Hi,
I am having a requirement in which, I need to display the report, in the output screen I should have a push button which when pressed the report output should be stored in the Application Layer.
Thanks and Regards,
V.K.HI Vikram,
You can create push button in the output list. You have to use SET PF-STATUS statement.
Just follow these stepts for creation of PUSH BUTTON.
1. write SET PF-STATUS 'TEST'.
2. double click on TEST.
3. It will ask you to create status object. click on YES.
4. give the short description and press enter.
5. next screen you will find three things like... MENU BAR, APPLICATION TOOL BAR and FUNCTION KEYS.
6. click on the down arrow that appears next to APPLICATION TOOL BAR.
7. in the items, in first box write your name and press down the text. one popup box will come. press enter.
8. give the function text and press enter.
9. assign key for your push button. and press enter.
10. press enter and activate.
and run your program. you will get push button on output list.
Adding event for the PUSHBUTTON
For the pushbutton use an sy-ucomm ie SAVE to appln toolbar
AT USER-COMMAND.
CASE sy-ucomm.
WHEN 'SAVE'.
write your code here to save in the appln server
Edited by: Raj on Jun 26, 2008 7:32 PM -
Execute in Back ground when push button clicked on alv output
Hi Friends,
I have a alv list display report with check boxes and a 'Detail' Push button in output
when i check the check boxes and click on the 'Detail' Push button detail report is
displayed using 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'. My requirement is if I click on 'Detail'
push button the code should also execute in back ground creating the spool. Request you
to help with sample code. I tried with below but not working.
WHEN 'DETAIL'.
call function 'START_OF_BACKGROUNDTASK'
exporting
startdate = sy-datum
starttime = sy-uzeit
exceptions
others = 1.
if sy-subrc = 1.
exit.
ELSE.
PERFORM determine_table_from_output CHANGING rs_selfield.
PERFORM call_alv_detail.
endif.
commit work.
Thanks,
Neetha.You could encapsulate the detail display in a separate report and call it in your 'DETAIL'-section like this:
DATA: lv_number TYPE tbtcjob-jobcount,
lv_name TYPE tbtcjob-jobname,
ls_rsparams TYPE rsparams,
lt_rsparams LIKE STANDARD TABLE OF ls_rsparams.
* Get free job number
CALL FUNCTION 'JOB_OPEN'
EXPORTING
jobname = lv_name
IMPORTING
jobcount = lv_number
EXCEPTIONS
cant_create_job = 1
invalid_job_data = 2
jobname_missing = 3
OTHERS = 4.
IF sy-subrc = 0.
SUBMIT 'ZDISPLAY_DETAIL'
VIA JOB lv_name NUMBER lv_number
WITH SELECTION-TABLE lt_rsparams
AND RETURN.
IF sy-subrc = 0.
* Submit
CALL FUNCTION 'JOB_CLOSE'
EXPORTING
jobcount = lv_number
jobname = lv_name
strtimmed = 'X'
EXCEPTIONS
cant_start_immediate = 1
invalid_startdate = 2
jobname_missing = 3
job_close_failed = 4
job_nosteps = 5
job_notex = 6
lock_failed = 7
OTHERS = 8.
ENDIF.
Regards,
Ulrich -
Can we develop cells or push buttons with increaseing number auotmatically
hi all
I am customizing a sinario which contains different number of flats in different appartments. Sianrio is to customize Flat nos. as a blocks.
So if we give no.of Flats in an Appartment, can we get blocks with numbering with increase order. Is it possible to develop Text areas or Push buttons in GUI programming.
if so please explain me.
For example : if we give number 10 then it should dispaly 10 blocks.
thankyou,
regards
HanumaNot sure if you can dynamically create buttons on a screen, however, you could use an ALV Grid and show a number of "flats" per line and react to each one as a hotspot.
i.e. Put up to 10 flats on a line. then read the line and determine the one pushed by Field Name.
you may be able to create a button in each cell of the grid, and perhaps name each one individually.
The crude way would be to put the max number of buttons on a screen and simply set unavailable "Flats" button to active.= 0.
Edited by: Paul Chapman on Dec 5, 2008 2:09 PM -
Function keys for Push buttons
Hi All,
I have one query in module-pool program,I need to assign Function keys to Push buttons in my programe,like for create(F7),dispaly(F6) and also I need to overwrite few standard function keys,
any one please guide me.
Thanks n regds,
Sree.Hi,
you want in more detail.....ok
(1)u've created a screen -
> added push buttons etc. -
> given name to screen elements i.e pushbuttons etc.and also declared them in program
(2) create its GUI status ,say STATUS_100---->here you have to assign Function codes ->like if in standard toolbar you want BACK,EXIT,CANC or whatever you want,for ex. for BACK u'll find its icon -> double click on it>give the Func code say F3,now u also wnt to enable Func Key F3 for this--> go to UTILITIES (menu bar)-> F Key consistency-> here u will find all the Func keys-> so to F3 give the same func code as u gave to BACK icon button.
similar approach u can use for pussbuttons:
double click on push button> in screen painter attributes-> give the Func code to it ,say for CREATE button u give Func code NEW->come back to GUI status->similarly go to UTILITIES (menu bar)-> F Key consistency-> here u will find all the Func keys---> so to F7 give the same func code (NEW) as u gave to CREATE push button.
(3) In PBO of this screen create a module to set its PF status:
In screen flow logic:
PROCESS BEFORE OUTPUT.
* To set pf-status and title
MODULE status_0100.
In Program:
MODULE status_0100 OUTPUT.
SET PF-STATUS 'STATUS_100'.
SET TITLEBAR 'TITLE_100'.
ENDMODULE.
Hope this much detail is quite clear!!!
Regards,
Neha
Edited by: Neha Shukla on Mar 5, 2009 10:35 AM -
Dynamically change icon name of push button
Hi,
I would like to ask how to dynamically change the icon name attribute of a push button in dialog programming. What is the syntax for assigning an icon name during runtime?
I am currently doing a multiple selection function for KNA1-KUNNR.
Initially, the icon name is ICON_ENTER_MORE. When the user picks up more than one customer, it should automatically change to ICON_DISPLAY_MORE. How can I do this?
here's the code i currently have:
DESCRIBE TABLE kunnr_ran LINES l_kunnr.
IF l_kunnr > 1.
g_add_multiple = 'X'.
BT_MULT_CUST-icon_name = 'ICON_DISPLAY_MORE'.
ELSEIF l_kunnr = 1.
CLEAR g_add_multiple.
BT_MULT_CUST-icon_name = 'ICON_ENTER_MORE'.
ENDIF.
The name of my pushbutton is BT_MULT_CUST.
The code in ** is not correct. I don't know the syntax in SAP. But that is how it is done in VB for example.
Thank you.
che =)If you have not found your answer already, please try the following:
1) In screen layout painter: for the pushbutton in question (i.e. pb_multi_select), mark the "Output field" on the program attributes tab in the attributes window for the pushbutton. Make sure that its visible length is at least 2 too. This will "gray out" the "Text" and other fields.
2) In the TOP INCLUDE of the module program: add a variable for the pushbutton that is of type "icons-text" and don't forget to include <icons>. Below is an example
INCLUDE <icon>
DATA: pb_multi_select TYPE icons-text.
3) In a module called in the PBO modules for the screen that needs its button changed, call the function "ICON_CREATE" and pass at minimum the name of the icon and the field that you specified in step 2. Below is an example using the icon "ICON_DISPLAY_MORE", "ICON_ENTER_MORE", and a flag variable "MULTI_SEL_INFO_EXISTS" that indicates if any multiple selection information has already been entered. It would be set by the program (not automatically, but by coding) prior to the "IF" statement:
IF multi_sel_info_exists = 'X'.
CALL FUNCTION 'ICON_CREATE'
EXPORTING
name = 'ICON_DISPLAY_MORE'
IMPORTING
result = pb_multi_select.
ELSE.
CALL FUNCTION 'ICON_CREATE'
EXPORTING
name = 'ICON_ENTER_MORE'
IMPORTING
result = pb_multi_select.
ENDIF.
You can change the button as you see fit with multiple different calls inside of "IF" or "CASE" statements. Please see documentation for "ICON_CREATE" for other parameters.
Hope this helps,
Brian -
Dear Experts,
How to add pushbutton in alv report.....
*& Report ZTT_TEST_ALV
REPORT ZTT_TEST_ALV.
*data declarations
type-pools : SLIS.
* data : BEGIN OF wa_kna1,
* kunnr type kunnr,
* name1 type name1,
* end of wa_kna1,
* it_kna1 like tABLE OF wa_kna1.
data : begin of wa_mara,
matnr type matnr,
end of wa_mara,
it_mara like table of wa_mara.
data : it_fcat type slis_t_fieldcat_alv,
wa_fcat like line of it_fcat.
*selection screen
SELECTION-SCREEN begin of block k with frame title text-001.
* select-OPTIONS : s_kunnr for wa_kna1-kunnr.
select-OPTIONS : s_matnr for wa_mara-matnr.
SELECTION-SCREEN end of block k.
*select auery
*SELECT kunnr name1 INTO table it_kna1 from kna1 where kunnr in s_kunnr.
select matnr into table it_mara from mara where matnr in s_matnr.
*for displaying fieldcatalog
PERFORM fcat using '1' 'MATNR' 'material Number' 'C410' '20'.
* PERFORM fcat using '2' 'NAME1' 'Customer Name' 'C410' '36'.
*for displaying output
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
* I_INTERFACE_CHECK = ' '
* I_BYPASSING_BUFFER = ' '
* I_BUFFER_ACTIVE = ' '
* I_CALLBACK_PROGRAM = ' '
I_CALLBACK_PF_STATUS_SET = 'SET_PF_STATUS'
* I_CALLBACK_USER_COMMAND = ' '
* I_CALLBACK_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_TOP_OF_PAGE = ' '
* I_CALLBACK_HTML_END_OF_LIST = ' '
* I_STRUCTURE_NAME =
* I_BACKGROUND_ID = ' '
I_GRID_TITLE = 'Report for Customer Details'
* I_GRID_SETTINGS =
* IS_LAYOUT =
IT_FIELDCAT = it_fcat[]
* IT_EXCLUDING =
* IT_SPECIAL_GROUPS =
* IT_SORT =
* IT_FILTER =
* IS_SEL_HIDE =
* I_DEFAULT = 'X'
* I_SAVE = ' '
* IS_VARIANT =
* IT_EVENTS =
* IT_EVENT_EXIT =
* IS_PRINT =
* IS_REPREP_ID =
* I_SCREEN_START_COLUMN = 0
* I_SCREEN_START_LINE = 0
* I_SCREEN_END_COLUMN = 0
* I_SCREEN_END_LINE = 0
* I_HTML_HEIGHT_TOP = 0
* I_HTML_HEIGHT_END = 0
* IT_ALV_GRAPHICS =
* IT_HYPERLINK =
* IT_ADD_FIELDCAT =
* IT_EXCEPT_QINFO =
* IR_SALV_FULLSCREEN_ADAPTER =
* IMPORTING
* E_EXIT_CAUSED_BY_CALLER =
* ES_EXIT_CAUSED_BY_USER =
TABLES
t_outtab = it_mara.
* EXCEPTIONS
* PROGRAM_ERROR = 1
* OTHERS = 2
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 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
* EXPORTING
**** I_INTERFACE_CHECK = ' '
**** I_CALLBACK_PROGRAM =
**** I_CALLBACK_PF_STATUS_SET = ' '
**** I_CALLBACK_USER_COMMAND = ' '
**** IS_LAYOUT =
* IT_FIELDCAT = it_fcat
**** IT_EXCLUDING =
**** IT_SPECIAL_GROUPS =
**** IT_SORT =
**** IT_FILTER =
**** IS_SEL_HIDE =
**** I_SCREEN_START_COLUMN = 0
**** I_SCREEN_START_LINE = 0
**** I_SCREEN_END_COLUMN = 0
**** I_SCREEN_END_LINE = 0
**** I_DEFAULT = 'X'
**** I_SAVE = ' '
**** IS_VARIANT =
**** IT_EVENTS =
**** IT_EVENT_EXIT =
*** i_tabname_header =
*** i_tabname_item =
**** I_STRUCTURE_NAME_HEADER =
**** I_STRUCTURE_NAME_ITEM =
*** is_keyinfo =
**** IS_PRINT =
**** IS_REPREP_ID =
**** I_BYPASSING_BUFFER =
**** I_BUFFER_ACTIVE =
**** IR_SALV_HIERSEQ_ADAPTER =
**** IT_EXCEPT_QINFO =
**** I_SUPPRESS_EMPTY_DATA = ABAP_FALSE
**** IMPORTING
**** E_EXIT_CAUSED_BY_CALLER =
**** ES_EXIT_CAUSED_BY_USER =
* tables
** t_outtab_header = it_
* t_outtab_item = it_kna1.
**** EXCEPTIONS
**** PROGRAM_ERROR = 1
**** OTHERS = 2
***IF sy-subrc <> 0.
**** MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
**** WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
***ENDIF.
*& Form FCAT
* text
* -->P_0052 text
* -->P_0053 text
* -->P_0054 text
form FCAT using fp_col_pos
fp_fieldname
fp_seltext_m
fp_emphasize
fp_outputlen..
wa_fcat-col_pos = fp_col_pos.
wa_fcat-fieldname = fp_fieldname.
wa_fcat-seltext_m = fp_seltext_m.
wa_fcat-emphasize = fp_emphasize.
wa_fcat-outputlen = fp_outputlen.
append wa_fcat to it_fcat.
clear : wa_fcat.
endform. " FCAT
FORM SET_PF_STATUS .
SET PF-STATUS 'ZNEWSTATUS' .
"Copy of 'STANDARD' pf_status from fgroup SALV
endform.
i need one push button in alv output display.
Thanks and Regards,
Thirukumaran. RHI THIRU TRY FOLLOWING CODES:
*& Report ZSAMPLE
REPORT ZSAMPLE.
TABLES:MARA.
TYPE-POOLS: SLIS.
TYPES:BEGIN OF TY_ITAB,
MATNR LIKE MARA-MATNR,
ERSDA LIKE MARA-ERSDA,
END OF TY_ITAB.
DATA:ITAB TYPE STANDARD TABLE OF TY_ITAB WITH HEADER LINE.
DATA:FCAT TYPE SLIS_T_FIELDCAT_ALV,
WA_FCAT TYPE SLIS_FIELDCAT_ALV,
LAYOUT TYPE SLIS_LAYOUT_ALV,
WA_LAYOUT TYPE SLIS_LAYOUT_ALV.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS:P_MATNR TYPE MARA-MATNR.
SELECTION-SCREEN END OF BLOCK B1.
START-OF-SELECTION.
PERFORM FIELDCAT.
LAYOUT-ZEBRA = 'X'.
PERFORM OUTPUT.
*& Form PF_STATUS
text
-->RT_EXTAB text
FORM PF_STATUS USING RT_EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'BUTT'.
ENDFORM. "PF_STATUS
*& Form PUSH_BUTT1
text
-->R_UCOMM text
-->RS_SELFIELD text
FORM GET USING R_UCOMM LIKE SY-UCOMM RS_SELFIELD TYPE SLIS_SELFIELD.
CASE R_UCOMM.
WHEN 'GET'.
IF SY-SUBRC EQ 0.
CALL TRANSACTION 'SE11'.
ELSE.
ENDIF.
WHEN 'EXIT' OR 'CANCEL' .
LEAVE PROGRAM.
ENDCASE.
ENDFORM. "PUSH_BUTT1
*& Form FIELDCAT
text
--> p1 text
<-- p2 text
FORM FIELDCAT .
WA_FCAT-SELTEXT_L = 'Select'.
WA_FCAT-COL_POS = '1'.
WA_FCAT-FIELDNAME = 'CHECK'.
WA_FCAT-CHECKBOX = 'X'.
WA_FCAT-TABNAME = 'ITAB'.
WA_FCAT-OUTPUTLEN = '4'.
WA_FCAT-INPUT(1) = 'X'.
WA_FCAT-EDIT_MASK(1) = 'X'.
WA_FCAT-EDIT(1) = 'X'.
APPEND WA_FCAT TO FCAT.
CLEAR WA_FCAT.
WA_FCAT-SELTEXT_L = 'Material Number'.
WA_FCAT-COL_POS = '2'.
WA_FCAT-FIELDNAME = 'MATNR'.
WA_FCAT-TABNAME = 'ITAB'.
WA_FCAT-OUTPUTLEN = '18'.
APPEND WA_FCAT TO FCAT.
CLEAR WA_FCAT.
WA_FCAT-SELTEXT_L = 'Date'.
WA_FCAT-COL_POS = '3'.
WA_FCAT-FIELDNAME = 'ERSDA'.
WA_FCAT-TABNAME = 'ITAB'.
WA_FCAT-OUTPUTLEN = '8'.
APPEND WA_FCAT TO FCAT.
CLEAR WA_FCAT.
ENDFORM. " FIELDCAT
*& Form OUTPUT
text
--> p1 text
<-- p2 text
FORM OUTPUT .
SELECT MATNR ERSDA FROM MARA
INTO TABLE ITAB
WHERE MATNR EQ P_MATNR.
IF SY-SUBRC EQ 0.
PERFORM GRID.
ELSE.
MESSAGE 'No Records Found' TYPE 'I'.
ENDIF.
ENDFORM. " OUTPUT
*& Form GRID
text
--> p1 text
<-- p2 text
FORM GRID .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_CALLBACK_PROGRAM = SY-REPID
I_CALLBACK_PF_STATUS_SET = 'PF_STATUS'
I_CALLBACK_USER_COMMAND = 'GET'
IS_LAYOUT = LAYOUT
IT_FIELDCAT = FCAT
I_DEFAULT = 'X'
TABLES
T_OUTTAB = ITAB.
ENDFORM. " GRID
REGARDS,
SAKTHIVEL.VT -
How to give push button in alv report output
hi,
my requirement is that , i have to give push button in alv report output(item level) not in application toolbar, i am using reuse_alv_grid_display FM, can any body provide me sample code
regards,
siva kumarhave a look at this thread, also has a sample report at the end from Uwe Schieferstein.
[button on alv list|How to add and program a pushbutton on ALV grid line;
seems not to work try this:
How to add and program a pushbutton on ALV grid line
Edited by: Micky Oestreich on May 15, 2008 10:20 PM
Maybe you are looking for
-
Error while calling class in report
Hi All. Iam calling a customizes class in the report program. I have declared data based on class type, even though getting error like The type of "V_OBJEK" cannot be converted to the type of "V_TPLNR". eg: I need to pass value from ausp-objek to v_
-
IPod not appearing on desktop or in iTunes Library
My iPod will not appear on my desktop or in my iTunes library after launching iTunes and connecting the iPod to the computer. It shows up in Profiler, but no where else. My iPod is charged, the "Hold" switch is not on, I have updated iTunes, have res
-
Oracle XA driver and isolation level
We have an Entity EJB that has isolation level specified in its deployment descriptor and everything works fine if we use the non-XA Oracle 9i driver. However when we use the Oracle 9i Release 2 XA driver we get the following exception: java.sql.SQLE
-
Is there a way to block the inappropriate content in the podcasts app?
Hello, I am a husband, father and pastor and do a lot of podcast listening throughout the week, but was recently very disappointed to find some very adult content in the podcasts app under "top stations," with seemingly no way to block or monitor pod
-
Clean up after post office deletion
I deleted a post office from a GW 8.02 server running mta, gwia, and one other post office. When it asked me if I wanted to delete file system for that po, I said yes. However when it attempted to delete the files it gave an error saying they would h