Not getting function module to display a popup screen with a input text field(PERNR)

[Former Member]

Hi Experts,

I need to put a check on untagg button for employee ID. When user will press this , it should throw the popup with text field.

[PeterJonker]

And what did you try already to achieve this ? Where did your efforts fail ? Can you share the code ?

[raymond_giuseppi]

DId you look with SE37 with wildcard using POPUP and VALUE : you could find FM like POPUP_TO_GET_VALUE (ddic ref) or POPUP_TO_GET_ONE_VALUE (char, length)

Regards,

Raymond

[former_member184569]

message  'Error' type 'E'.

[srivijay_dinnimath]

Hi Arun,

You can use statment MESSAGE 'MSG TEXT' TYPE 'E' DISPLAY LIKE 'I'. or function modules POPUP_TO_GET_VALUE or POPUP_FOR_INTERACTION to populate pop-up message with custom text.

Ex:

CALL FUNCTION 'POPUP_FOR_INTERACTION'

                 EXPORTING

                   headline             = 'Information'

                   text1                   = 'msg text 1'

                   text2                   = 'msg text 2'

                   button_1             = 'Continue'

                   BUTTON_2        = 'Cancel'

                 IMPORTING

                    BUTTON_PRESSED       = lv_ans.

          CASE lv_ans.

               WHEN '1'.

                    STAT1.

               WHEN '2'.

                    STAT2.

          ENDCASE.

Regards,

Srivijay

[Former Member]

Following code is working fine.By appending the fields we can pass more than one field to popup.Thanks Raymond .Thanks to all of you .

tables : pa0001.

*START-OF-SELECTION.

*— Prepare Parameters for FM ————-*

t_fields-tabname = 'PA0001'.

t_fields-fieldname = 'PERNR'.

APPEND t_fields.

*—- Function Module Call —————–*

CALL FUNCTION 'POPUP_GET_VALUES'

   EXPORTING

*   NO_VALUE_CHECK        = ' '

     POPUP_TITLE           = 'Test Popup'

*   START_COLUMN          = '5'

*   START_ROW             = '5'

* IMPORTING

*   RETURNCODE            =

   TABLES

     FIELDS                =  t_fields

* EXCEPTIONS

*   ERROR_IN_FIELDS       = 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.