need popup before calling table maintenance generator through tcode

[Former Member]

Hi Experts,

I have a requirement to call a popup before data is displayed through TMG Program( through SM30 or Tcode ). Data should displyed based on the criteria entered in the popup select-option fields.

Reg,

Rajesh.

[kesavadas_thekkillath]

Instead of TMG ,you can go for alv display.

[Former Member]

But I need the functionalities of TMG.

[kesavadas_thekkillath]

Try modifications in table maintenance main program.

[Former Member]

Hello,

If I understood correctly, you want a popup by which you can filter data as per input.

You cn achieve this by doinga simple change in view DDIC. Goto change mode in view dictionary from SE11, in 'View flds' tab you need to mark 'S' (View field is used to mark subsets) in coloumn P. You can assign 'S' to what ever fields to want to use as select option.

After activating you need to regenerate the view.

Best Regards,

Varun.

[Former Member]

Hi, I think you need to use TMG events. You can reach that through ;

Environment->Modification->Events.

After doing this you will be able to see set of numbers that let you to choose when you would gonna make changes.

[Former Member]

Hi Rajesh,

Create a program and write the following code in it and Assign transaction Code to the program it will solve your problem.

DATA : it_sellist TYPE TABLE OF vimsellist with header line,

it_cua_funct TYPE TABLE OF vimexclfun.

it_sellist-VIEWFIELD = 'VKORG'. u201Dfield in table maintenance to be checked

it_sellist-OPERATOR = 'EQ'.

it_sellist-value = pr_vkorg. u201Cinput from selection-screen.

it_sellist-AND_OR = 'AND'. u201Ccheck u2018ANDu2019 u2018ORu2019 conditions in select Query

append it_sellist.

it_sellist-VIEWFIELD = 'WERBEAKT'. u201Dfield in table maintenance to be checked

it_sellist-OPERATOR = 'EQ'.

it_sellist-value = PR_WERB. input from selection-screen.

append it_sellist.

PLEASE REFER THE FOLLOWING POST FOR CONTINUATION

[Former Member]

CALL FUNCTION 'VIEW_MAINTENANCE_CALL' u201Dextended table maintenance view with restrictions.

EXPORTING

action = 'U' u201D-- Update flag

• CORR_NUMBER = ' '

• GENERATE_MAINT_TOOL_IF_MISSING = ' '

show_selection_popup = ' '

view_name = '<table_name>'" View TABLE NAME

• NO_WARNING_FOR_CLIENTINDEP = ' '

• RFC_DESTINATION_FOR_UPGRADE = ' '

• CLIENT_FOR_UPGRADE = ' '

variant_for_selection = ' '

COMPLEX_SELCONDS_USED = 'X'

check_ddic_mainflag = 'X'

• SUPPRESS_WA_POPUP = ' '

TABLES

dba_sellist = it_sellist

excl_cua_funct = it_cua_funct

EXCEPTIONS

client_reference = 1

foreign_lock = 2

invalid_action = 3

no_clientindependent_auth = 4

no_database_function = 5

no_editor_function = 6

no_show_auth = 7

no_tvdir_entry = 8

no_upd_auth = 9

only_show_allowed = 10

system_failure = 11

unknown_field_in_dba_sellist = 12

view_not_found = 13

maintenance_prohibited = 14

OTHERS = 15

.

IF sy-subrc <> 0.

MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno

WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.

ENDIF.

ELSE.

MESSAGE text-002 TYPE 'E'.

ENDIF.

Hope it helps you,

Regards,

Abhijit G. Borkar