06-29-2007 6:05 PM
DATA:
L_TITLE(10) TYPE C, " Title of pop-up
L_TXT_QUESTION(52) TYPE C, " Text displayed in pop-up
L_DISP_CANCEL TYPE C, " Display 'Cancel' button?
L_BTN1 TYPE ICON-NAME, " Icon on button 1
L_BTN2 TYPE ICON-NAME. " Icon on button 2
L_TITLE = NUMBER.
L_TXT_QUESTION = 'DELIVERY NO ALREADY EXITS U WANT TO REPLACE AGAIN?'
.
L_BTN1 = C_ICON_CONTINUE.
L_BTN2 = C_ICON_CANCEL.
**-Display pop-up asking user for confirmation
CALL FUNCTION 'POPUP_TO_CONFIRM'
EXPORTING
TITLEBAR = L_TITLE
TEXT_QUESTION = L_TXT_QUESTION
TEXT_BUTTON_1 = 'Yes'
ICON_BUTTON_1 = L_BTN1
TEXT_BUTTON_2 = 'No'
ICON_BUTTON_2 = L_BTN2
DEFAULT_BUTTON = '2'
*DISPLAY_CANCEL_BUTTON = 'X'
IMPORTING
ANSWER = P_ANSWER
EXCEPTIONS
TEXT_NOT_FOUND = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
*MESSAGE E000 WITH 'Error executing function module:'(019)
*'POPUP_TO_CONFIRM'.
ENDIF.
ia m using this function module in this L_TXT_QUESTION = 'DELIVERY NO ALREADY EXITS U WANT TO REPLACE AGAIN?'
.
i used but i want to use this one and i want to show filed value
L_TXT_QUESTION(52) TYPE C, " Text displayed in pop-up
i want to print this like this 'DELIVERY NO ALREADY EXITS U WANT TO REPLACE AGAIN?' vbeln no.
.
06-29-2007 6:27 PM
Hi
I'm not sure to understand your requirement, anyway try this:
DATA: L_TITLE(10) TYPE C, " Title of pop-up
L_TXT_QUESTION(100) TYPE C, " Text displayed in pop-up
L_BTN1 TYPE ICON-NAME, " Icon on button 1
L_BTN2 TYPE ICON-NAME. " Icon on button 2
L_TITLE = NUMBER.
DATA: V_NUMBER(13) TYPE C,
LEN TYPE I.
L_TXT_QUESTION =
'DELIVERY NO ALREADY EXITS U WANT TO REPLACE AGAIN? &'.
WRITE NUMBER TO V_NUMBER.
LEN = STRLEN( V_NUMBER ) + 1.
WRITE 'no' TO V_NUMBER+LEN.
REPLACE '&' WITH V_NUMBER INTO L_TXT_QUESTION.
L_BTN1 = C_ICON_CONTINUE.
L_BTN2 = C_ICON_CANCEL.
**-Display pop-up asking user for confirmation
CALL FUNCTION 'POPUP_TO_CONFIRM'
EXPORTING
TITLEBAR = L_TITLE
TEXT_QUESTION = L_TXT_QUESTION
TEXT_BUTTON_1 = 'Yes'
ICON_BUTTON_1 = L_BTN1
TEXT_BUTTON_2 = 'No'
ICON_BUTTON_2 = L_BTN2
DEFAULT_BUTTON = '2'
IMPORTING
ANSWER = P_ANSWER
EXCEPTIONS
TEXT_NOT_FOUND = 1
OTHERS = 2.
IF SY-SUBRC <> 0.
*MESSAGE E000 WITH 'Error executing function module:'(019)
*'POPUP_TO_CONFIRM'.
ENDIF.
Max
06-29-2007 6:41 PM
07-02-2007 8:34 AM
07-02-2007 8:41 AM
hi,
if used that ur code i am getting only DELIVERY NO ALREADY EXITS U WANT TO REPLACE AGAIN? 0
only zero iam getting
i want full vbeln no like 0080000008
07-02-2007 9:11 AM