09-24-2008 7:56 AM
Hi Experts,
I am working on Costing For Purchase Order in ALV.
I want to make a popup Window to display the Pricing calculation to be display as popup window on click for the price column.
Please guide me to proceed with this work.
Thanks in Advance.
09-24-2008 8:00 AM
Hello,
You can use the Hotspot Option for the Values of your Column and when you Click on it, just use the FM
POPUP_FOR_INFORMATION for your Calculations display.
Thanks and Regards,
Venkat Phani Prasad Konduri
09-24-2008 8:00 AM
Hello,
You can use the Hotspot Option for the Values of your Column and when you Click on it, just use the FM
POPUP_FOR_INFORMATION for your Calculations display.
Thanks and Regards,
Venkat Phani Prasad Konduri
09-24-2008 8:01 AM
You can use POPUP_FOR_INTERACTION.
Put the Headline, Message u want to display in
Text1, give TICON an the button..
Hope that helps.
09-24-2008 8:01 AM
Hi Boopathy,
You can do it by triggering the user command event.
Inside the event just call the following FM:
REUSE_ALV_POPUP_TO_SELECT
Hope this will help.
Regards,
Nitin.
09-24-2008 9:50 AM
Hi,
Here you use REUSE_ALV_POPUP_TO_SELECT function module as said above.
Check out this sample code.
TYPE-POOLS:slis.
DATA:it_fieldcat TYPE slis_t_fieldcat_alv,
wa_field LIKE LINE OF it_fieldcat.
DATA:it_fieldcat1 TYPE slis_t_fieldcat_alv,
wa_field1 LIKE LINE OF it_fieldcat.
DATA: BEGIN OF it_likp OCCURS 0,
vbeln TYPE likp-vbeln,
END OF it_likp.
DATA: BEGIN OF it_likp1 OCCURS 0,
vbeln TYPE likp-vbeln,
ernam TYPE likp-ernam,
END OF it_likp1.
wa_field-fieldname = 'VBELN'.
wa_field-tabname = 'IT_LIKP'.
wa_field-hotspot = 'X'.
APPEND wa_field TO it_fieldcat.
SELECT vbeln FROM likp
UP TO 10 ROWS
INTO TABLE it_likp.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
i_callback_user_command = 'USER_COMMAND'
it_fieldcat = it_fieldcat
TABLES
t_outtab = it_likp
EXCEPTIONS
program_error = 1.
&----
*& Form user_Command
&----
text
----
-->UCOMM text
-->SELFIELD text
----
FORM user_command USING ucomm TYPE sy-ucomm
selfield TYPE slis_selfield.
CASE ucomm.
WHEN '&IC1'.
IF selfield-fieldname = 'VBELN'.
SELECT vbeln ernam FROM likp
UP TO 10 ROWS
INTO TABLE it_likp1.
wa_field1-fieldname = 'VBELN'.
wa_field1-tabname = 'IT_LIKP1'.
wa_field1-hotspot = 'X'.
APPEND wa_field1 TO it_fieldcat1.
wa_field1-fieldname = 'ERNAM'.
wa_field1-tabname = 'IT_LIKP1'.
wa_field1-hotspot = 'X'.
APPEND wa_field1 TO it_fieldcat1.
CALL FUNCTION 'REUSE_ALV_POPUP_TO_SELECT'
EXPORTING
i_title = 'Select Data'
i_selection = 'X'
I_ALLOW_NO_SELECTION = 'X'
i_zebra = 'X'
i_screen_start_column = 5
i_screen_start_line = 5
i_screen_end_column = 50
i_screen_end_line = 10
I_CHECKBOX_FIELDNAME =
I_LINEMARK_FIELDNAME =
I_SCROLL_TO_SEL_LINE = 'X'
i_tabname = 'IT_LIKP1'
I_STRUCTURE_NAME =
it_fieldcat = it_fieldcat1
IT_EXCLUDING =
i_callback_program = sy-repid
I_CALLBACK_USER_COMMAND =
IS_PRIVATE =
IMPORTING
ES_SELFIELD =
E_EXIT =
TABLES
t_outtab = it_likp1
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.
ENDIF.
ENDCASE.
ENDFORM. "user_Command
Hope this will be useful to you.
Thanks.