04-28-2009 1:31 PM
Hi Guru's
Please Help me on this issue..
I having the content like "Sales Order 1050003521 with delivery group 001 cannot be fully delivered, Item 000021 is not selected." this content reflectes based on internal table.
I want to show this content in popup window or our program has to open new session and show this content..
thanks & Regards
P.Senthil Kumar
04-28-2009 1:46 PM
Hi,
Try with this. This shows msg in popup.
TYPES:BEGIN OF ty_error,
msg_error TYPE string,
END OF ty_error.
data:w_msg type string,
wa_error TYPE ty_error,
it_error TYPE STANDARD TABLE OF ty_error.
DATA:it_data TYPE slis_t_fieldcat_alv,
wa_data TYPE slis_fieldcat_alv,
concatenate 'Sales Order 1050003521 with delivery group 001 cannot be fully delivered, Item 000021 is not selected'into w_msg.
CLEAR wa_data.
wa_data-fieldname = 'MSG_ERROR'.
wa_data-seltext_l = 'Error Message'.
wa_data-col_pos = '1'.
wa_data-tabname = 'IT_ERROR'.
wa_data-datatype = 'STRG'.
wa_data-outputlen = '300'.
APPEND wa_data TO it_data.
IF it_error IS NOT INITIAL.
to diplay error message **************
CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
EXPORTING
i_title = 'Error'
i_selection = ''
I_ALLOW_NO_SELECTION =
I_ZEBRA = ' '
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
I_CHECKBOX_FIELDNAME =
I_LINEMARK_FIELDNAME =
I_SCROLL_TO_SEL_LINE = 'X'
i_tabname = 'IT_ERROR'
I_STRUCTURE_NAME =
it_fieldcat = it_data
IT_EXCLUDING =
I_CALLBACK_PROGRAM =
I_CALLBACK_USER_COMMAND =
IS_PRIVATE =
IMPORTING
ES_SELFIELD = ' '
E_EXIT = ' '
TABLES
t_outtab = it_error
EXCEPTIONS
program_error = 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.
Thanks & Regards,
Anagha Deshmukh
04-28-2009 1:36 PM
hi create a text element in message class
sales order &itab-vbeln& with delivery group & & cannot be fully delivered, item & is not selected
message E(XXX)(mess class) with text-0XX.
hope it helps
cheers
s.janagar
Edited by: Janagar Sundaramoorthy Nadar on Apr 28, 2009 2:47 PM
04-28-2009 1:46 PM
Hi,
Try with this. This shows msg in popup.
TYPES:BEGIN OF ty_error,
msg_error TYPE string,
END OF ty_error.
data:w_msg type string,
wa_error TYPE ty_error,
it_error TYPE STANDARD TABLE OF ty_error.
DATA:it_data TYPE slis_t_fieldcat_alv,
wa_data TYPE slis_fieldcat_alv,
concatenate 'Sales Order 1050003521 with delivery group 001 cannot be fully delivered, Item 000021 is not selected'into w_msg.
CLEAR wa_data.
wa_data-fieldname = 'MSG_ERROR'.
wa_data-seltext_l = 'Error Message'.
wa_data-col_pos = '1'.
wa_data-tabname = 'IT_ERROR'.
wa_data-datatype = 'STRG'.
wa_data-outputlen = '300'.
APPEND wa_data TO it_data.
IF it_error IS NOT INITIAL.
to diplay error message **************
CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
EXPORTING
i_title = 'Error'
i_selection = ''
I_ALLOW_NO_SELECTION =
I_ZEBRA = ' '
I_SCREEN_START_COLUMN = 0
I_SCREEN_START_LINE = 0
I_SCREEN_END_COLUMN = 0
I_SCREEN_END_LINE = 0
I_CHECKBOX_FIELDNAME =
I_LINEMARK_FIELDNAME =
I_SCROLL_TO_SEL_LINE = 'X'
i_tabname = 'IT_ERROR'
I_STRUCTURE_NAME =
it_fieldcat = it_data
IT_EXCLUDING =
I_CALLBACK_PROGRAM =
I_CALLBACK_USER_COMMAND =
IS_PRIVATE =
IMPORTING
ES_SELFIELD = ' '
E_EXIT = ' '
TABLES
t_outtab = it_error
EXCEPTIONS
program_error = 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.
Thanks & Regards,
Anagha Deshmukh
04-28-2009 1:53 PM
Hi
Just use the message type 'I'.
Message e349(message num) display like 'I'.
This will be an error message, but a popup.
For more options pls use F1 on MESSAGE
Cheers
Ravish