topic Re: Program Variant: Popup by User in Application Development and Automation Discussions

Program Variant: Popup by User

peter_atkin — Sun, 12 Mar 2006 16:35:13 GMT

Guys,

I have copied some standard code to automatically assign a variant via the Initialisation section (see RIAUFK20).

However, the client wants a popup to display all variants for the user so that they can choose the appropriate variant before the selection-screen is displayed.

Is there a suitable function module for this?

Re: Program Variant: Popup by User

ferry_lianto — Sun, 12 Mar 2006 16:43:39 GMT

Hi Peter,

You can use this FM <b>RS_VARIANT_CONTENTS</b> to retrieve all variants fo a program.

Hope this will help.

Regards,

Ferry Lianto

Re: Program Variant: Popup by User

Former Member — Sun, 12 Mar 2006 20:11:01 GMT

Do you mean:


PARAMETERS   p_var LIKE disvariant-variant
                   DEFAULT '/STANDARD'.
DATA: g_variant          LIKE disvariant.
DATA: gx_variant         LIKE disvariant.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_var.
  PERFORM variant_inputhelp_f14 USING p_var.

*---------------------------------------------------------------------*
*       FORM VARIANT_INPUTHELP_F14                                    *
*---------------------------------------------------------------------*
FORM variant_inputhelp_f14 USING p_variant LIKE g_variant-variant.

  DATA h_exit.

  CLEAR gx_variant.

  CALL FUNCTION 'REUSE_ALV_VARIANT_F4'
       EXPORTING
            is_variant          = g_variant
*           I_TABNAME_HEADER    =
*           I_TABNAME_ITEM      =
*           IT_DEFAULT_FIELDCAT =
            i_save              = g_variant_save
       IMPORTING
            e_exit              = h_exit
            es_variant          = gx_variant
        EXCEPTIONS
            not_found           = 1
            program_error       = 2
            OTHERS              = 3.

  IF sy-subrc IS INITIAL AND h_exit IS INITIAL.
    g_variant-variant = gx_variant-variant.
    p_variant         = gx_variant-variant.
  ELSE.
    MESSAGE ID sy-msgid TYPE 'S'
                 NUMBER sy-msgno
                 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.

ENDFORM.

Rob

Re: Program Variant: Popup by User

Former Member — Sun, 12 Mar 2006 21:37:09 GMT

Hi,

If you want to get the variant for ALV display then use the above solution. If you want to use the ABAP program variant then use function module

CALL FUNCTION 'RS_VARIANT_CATALOG'

EXPORTING

REPORT = Report Name

DYNNR = Blank

INTERNAL_CALL = 'X'

variant = If you want to pass a

pattern

POP_UP = 'X' is you want popup

for selecting variant

IMPORTING

SEL_VARIANT = variant name passed back

TABLES

BELONGING_DYNNR = BELONGING_DYNNR

EXCEPTIONS

NO_REPORT = 01

REPORT_NOT_EXISTENT = 02

REPORT_NOT_SUPPLIED = 03.

You can try calling it at Initialization Event. Good luck

thanks

Re: Program Variant: Popup by User

athavanraja — Mon, 13 Mar 2006 05:40:57 GMT

you can also use

RS_PROGRAM_POPUP_VARIANT

Regards

Raja

Re: Program Variant: Popup by User

vinod_gunaware2 — Mon, 13 Mar 2006 06:28:17 GMT

Use following Function module

RS_F4_INFO_VARIANT

RS_PROGRAM_POPUP_VARIANT

RS_ALL_VARIANTS_4_1_REPORT

RS_GET_SCREENS_4_1_VARIANT

RS_VARIANT_DISPLAY

regards

vinod

Re: Program Variant: Popup by User

peter_atkin — Mon, 13 Mar 2006 09:37:12 GMT

Guys,

I'd already checked most of these...

I was trying to get a list of those variants <b>ONLY</b> for the user who is currently logged-on.

I've seen this function somewhere before - but I can't remember where!!!

Message was edited by: Peter Atkin

Re: Program Variant: Popup by User

Former Member — Mon, 13 Mar 2006 09:41:51 GMT

RS_HDSYS_CLIENT_COPY_VARIANT

Re: Program Variant: Popup by User

Former Member — Mon, 13 Mar 2006 14:31:19 GMT

Peter - check the documentation for the FM I mentioned (REUSE_ALV_VARIANT_F4). It has a parameter (IS_VARIANT) that allows you to enter the user name.

Rob

Re: Program Variant: Popup by User

Former Member — Mon, 13 Mar 2006 15:32:04 GMT

Hi,

I think this is what is needed by you. Use function module "RS_VARIANT_FETCH",

Importing

FUNCTION - 'GET'

REPORT - 'PROGRAM NAME'

RKEY - This is a structure please fill in the

program name

SUBMODE - Blank

DYNNR - Normally this is 1000 but if you are

calling this for ur own defined selection

screen then use that number

INTERNAL_CALL - Blank

The output for the selected variant will be in P_VARI table.

Hope this was helpful.

thanks