Application Development and Automation Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 
Read only

reports

Former Member
0 Likes
814

Hi all,

MY req is to show a pop up window showing 3 fields (on the pop up window).ANd whn the user selects a particular record in popup window ,some action need to be performed..Pls help with a smple code.....

1 ACCEPTED SOLUTION
Read only

Former Member
0 Likes
785

Have a look at below link.

http://www.sap-img.com/abap/abap-pop-up-window.htm

I hope it helps.

Best Regards,

Vibha

*Please mark all the helpful answers

7 REPLIES 7
Read only

Former Member
0 Likes
786

Have a look at below link.

http://www.sap-img.com/abap/abap-pop-up-window.htm

I hope it helps.

Best Regards,

Vibha

*Please mark all the helpful answers

Read only

Former Member
0 Likes
785

hi

good

USE THIS fm POPUP_TO_DECIDE_INFO .

Parameters required for this FM is the Text you require to display on the popup window.

Two buttons automatically comes on this window a Tick and a x sign if you click tick the output varaible ANSWER is J else it is A .

or

See the below Example:

AT SELECTION-SCREEN ON VALUE-REQUEST FOR SEL_NBA-LOW.

PERFORM ZNEW_VALUE_HELP_NBA.

FORM ZNEW_VALUE_HELP_NBA.

SELECT DISTINCT ZBAREA FROM ZDIVNBABU INTO TABLE ITAB_NBA.

CALL FUNCTION 'POPUP_WITH_TABLE_DISPLAY'

EXPORTING

ENDPOS_COL = 30

ENDPOS_ROW = 40

STARTPOS_COL = 20

STARTPOS_ROW = 30

TITLETEXT = 'Please Choose Your Entry'

IMPORTING

CHOISE = COUNTS

TABLES

VALUETAB = ITAB_NBA

EXCEPTIONS

BREAK_OFF = 1

OTHERS = 2.

IF COUNTS NE 0.

READ TABLE ITAB_NBA INDEX COUNTS.

SEL_NBA-LOW = ITAB_NBA-ZBAREA.

ENDIF.

CLEAR :ITAB_NBA,COUNTS.REFRESH:ITAB_NBA.

ENDFORM. " ZNEW_VALUE_HELP_NBA

THANKS

MRUTYUN^

Read only

Former Member
0 Likes
785

HI,

you can use a modal dialog box and put an ALV in the container in it..

then use the method <b>get_selected_rows</b> to get the selected line.

then handle with necessary actions.

for more details refrer to program

BCALV_GRID_AND_POPUP

regards

Sandeep.

Read only

Former Member
0 Likes
785

while using reuse_alv_grid...fm we will have a option in it i_screen_start_column = 15

i_screen_start_line = 40

i_screen_end_column = 80

i_screen_end_line = 60

in gendral we can use command WINDOW STARTING AT 10 15 ENDING AT 100 30.

Read only

dani_mn
Active Contributor
0 Likes
785

HI,

check the following program for pop up display of fields and then getting the selected field.

report z_test2 line-size 100 line-count 50.

TABLES: MCSLISEH,MCSLISEHT.

DATA: F4_TAB LIKE MCS01 OCCURS 0 WITH HEADER LINE.
DATA: XF4_TAB LIKE MCS01 OCCURS 0 WITH HEADER LINE.
DATA: VR_FLG_MARKED.


F4_TAB-TABNAME = 'BKPF'.
F4_TAB-FIELDNAME = 'BUKRS'.
F4_TAB-SCRTEXT_L = 'Company Code'.
APPEND F4_TAB.

F4_TAB-TABNAME = 'BKPF'.
F4_TAB-FIELDNAME = 'GJAHR'.
F4_TAB-SCRTEXT_L = 'Fiscal Year'.
APPEND F4_TAB.

F4_TAB-TABNAME = 'BKPF'.
F4_TAB-FIELDNAME = 'BELNR'.
F4_TAB-SCRTEXT_L = 'Document number'.
APPEND F4_TAB.


CALL FUNCTION 'MC_POPUP_TO_MARK_FIELDS'
     EXPORTING
          I_FIELD_NUMBER_MAX     = 1
          I_FIELD_NUMBER_MIN     = 1
          I_OBJECT_NAME_PLURAL   = SPACE
          I_OBJECT_NAME_SINGULAR = SPACE
          I_POPUP_TITLE          = TEXT-202
          I_TEXT_LENGTH          = 40
     IMPORTING
          E_MARKED               = VR_FLG_MARKED
     TABLES
          T_FIELDS               = F4_TAB
          T_MARKED_FIELDS        = XF4_TAB
     EXCEPTIONS
          OTHERS                 = 1.


READ TABLE XF4_TAB INDEX 1.

WRITE:/ 'Selected field ', XF4_TAB-FIELDNAME.

Read only

Former Member
0 Likes
785

wat u can do is , create a selection screen for those fields .

after dat u can process any events on the SELECTION screen in the-

AT SELECTION-SCREEN event .

i hope this helps u ...

if yes then plz award points

Read only

Former Member
0 Likes
785

hi,

i guess this code will be useful

REPORT demo_list_window NO STANDARD PAGE HEADING.

START-OF-SELECTION.

SET PF-STATUS 'BASIC'.

WRITE 'Select line for a demonstration of windows'.

AT USER-COMMAND.

CASE sy-ucomm.

WHEN 'SELE'.

IF sy-lsind = 1.

SET PF-STATUS 'DIALOG'.

SET TITLEBAR 'WI1'.

WINDOW STARTING AT 5 3 ENDING AT 40 10.

WRITE 'Select line for a second window'.

ELSEIF sy-lsind = 2.

SET PF-STATUS 'DIALOG' EXCLUDING 'SELE'.

SET TITLEBAR 'WI2'.

WINDOW STARTING AT 45 10 ENDING AT 60 12.

WRITE 'Last window'.

ENDIF.

ENDCASE.

award points if solved

Thanks

Shankar S