topic Re: obsolete fm in Application Development and Automation Discussions

obsolete fm

former_member81915 — Mon, 31 Mar 2008 09:39:21 GMT

please suggest replacement for obsolete fm popup_to_confirm_step

Re: obsolete fm

dhruv_shah3 — Mon, 31 Mar 2008 09:44:04 GMT

Hi,

POPUP_TO_CONFIRM is replacement for popup_to_confirm_step,

popup_to_confirm_with_value.

So use the FM POPUP_TO_CONFIRM.

HTH

Regards,

Dhruv Shah

Re: obsolete fm

Former Member — Mon, 31 Mar 2008 09:44:06 GMT

Hi,

You can use POPUP_TO_CONFIRM for this activity.

Regards

Re: obsolete fm

Former Member — Mon, 31 Mar 2008 09:44:53 GMT

Use the Function POPUP_TO_CONFIRM.

Re: obsolete fm

Former Member — Mon, 31 Mar 2008 09:46:04 GMT

use 'POPUP_TO_CONFIRM'

The following call example matches the function of POPUP_TO_CONFIRM_STEP:

call function 'POPUP_TO_CONFIRM'

exporting

text_question = 'Do you want to carry out this

fantastic test?'(A02)

importing

answer = answer

exception

TEXT_NOT_FOUND = 1

others = 2.

regards

Shiva

Re: obsolete fm

Former Member — Mon, 31 Mar 2008 09:58:12 GMT

here is sample code...

CALL FUNCTION 'POPUP_TO_CONFIRM_STEP'

EXPORTING

defaultoption = 'N'

textline1 = 'Soll das Include überschrieben werden?'(034)

textline2 = i_inc-include

titel = 'Include existiert bereits!'(039)

START_COLUMN = 25

START_ROW = 6

CANCEL_DISPLAY = 'X'

IMPORTING

answer = answer

EXCEPTIONS

OTHERS = 1.

Replacement Method :

DATA : l_question type string.

Concatenate 'Soll das Include überschrieben werden?'(034)

i_inc-include

into l_question.

CALL FUNCTION 'POPUP_TO_CONFIRM'

EXPORTING

TITLEBAR = 'Prepack deletion'(019)

DIAGNOSE_OBJECT = ' '

TEXT_QUESTION = l_question

TEXT_BUTTON_1 = 'Yes'(020)

*ICON_BUTTON_1 = ' '

TEXT_BUTTON_2 = 'No'(021)

*ICON_BUTTON_2 = ' '

*DEFAULT_BUTTON = '2'

DISPLAY_CANCEL_BUTTON = 'X'

*USERDEFINED_F1_HELP = ' '

*START_COLUMN = 25

*START_ROW = 6

*POPUP_TYPE =

*IV_QUICKINFO_BUTTON_1 = ' '

*IV_QUICKINFO_BUTTON_2 = ' '

IMPORTING

ANSWER = answer

TABLES

*PARAMETER =

EXCEPTIONS

TEXT_NOT_FOUND = 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.

reward if useful