2009 Mar 02 5:58 AM
Hi,
I need to create F4 help for payment methods i.e Customer payments, eAgent Payments.
In table TFK042Z field ZLSCH (eg A....Z) all the payment methods are available.
Now I need to filter some of the payment methods into customer payments(Lets suppose its A,B,C) and eAgent Payments(D,E,F).Thse values should as part of F4 help and not all the values.
Appreciate if any one can tell me how to filter the payment methods.
2009 Mar 02 6:13 AM
Select values u want to display from table TFK042Z into an internal table itab1 & pass it to the FM
Also delete or add table entries before passing to FM
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'BELCD' "Field name for which F4 is required
window_title = 'BellCode Document Search'
value_org = 'S'
TABLES
value_tab = itab1 " Internal table containing values for F4
field_tab = it_field
return_tab = it_itab1
EXCEPTIONS
parameter_error = 1
no_values_found = 2
OTHERS = 3 .
IF sy-subrc = 0.
retfield = it_itab1-fieldval.
ENDIF.
2009 Mar 02 6:04 AM
Hi Kunal,
Hi,
I need to create F4 help for payment methods i.e Customer payments, eAgent Payments.
In table TFK042Z field ZLSCH (eg A....Z) all the payment methods are available.
Now I need to filter some of the payment methods into customer payments(Lets suppose its A,B,C) and eAgent Payments(D,E,F).Thse values should as part of F4 help and not all the values.
Appreciate if any one can tell me how to filter the payment methods.
Hope the below code will help you.
retreieve all the data from the table TFK042Z and pass it to another table, delete the unwanted entries based on your payment methods and pass it to the VALUE_TAB table for the required field and repeat the steps for the other payment types also.
DATA: HELPVAL1 LIKE HELP_VALUE OCCURS 0 WITH HEADER LINE .
DATA: VALUE_TAB LIKE PDTASK-OTEXT OCCURS 2 WITH HEADER LINE.
DATA: VALUE LIKE FEBMKA-BANKN,
GIVEN_VALUE LIKE HELP_INFO-FLDVALUE.
DATA: IT_T005T LIKE T005T OCCURS 0 WITH HEADER LINE,
IT_T002T LIKE T002T OCCURS 0 WITH HEADER LINE.
SELECTION-SCREEN: BEGIN OF BLOCK BLK1 WITH FRAME TITLE ABC.
PARAMETERS: P_SPRAS LIKE T002T-SPRAS,
P_LAND1 LIKE T005T-LAND1.
SELECTION-SCREEN: END OF BLOCK BLK1.
INITIALIZATION.
ABC = 'Selection Criteria:'.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_LAND1.
PERFORM VALUE_REQUEST_LAND1.
*&----
*& Form VALUE_REQUEST_land1
*&----
FORM VALUE_REQUEST_LAND1.
SELECT * FROM T005T
INTO TABLE IT_T005T.
REFRESH: HELPVAL1, VALUE_TAB.
CLEAR: HELPVAL1, VALUE_TAB, GIVEN_VALUE, VALUE.
*Append field name for the columns in the help popup
HELPVAL1-TABNAME = 'T005T' .
HELPVAL1-FIELDNAME = 'LAND1' .
HELPVAL1-SELECTFLAG = 'X' . " will return the value on the screen
APPEND HELPVAL1 .
CLEAR HELPVAL1 .
HELPVAL1-TABNAME = 'T005T' .
HELPVAL1-FIELDNAME = 'LANDX' .
HELPVAL1-SELECTFLAG = ' ' .
APPEND HELPVAL1 .
CLEAR HELPVAL1 .
LOOP AT IT_T005T.
VALUE_TAB = IT_T005T-LAND1.
APPEND VALUE_TAB.
VALUE_TAB = IT_T005T-LANDX.
APPEND VALUE_TAB.
ENDLOOP.
GIVEN_VALUE = P_LAND1.
CALL FUNCTION 'HELP_VALUES_GET_WITH_VALUE'
EXPORTING
DISPLAY = SPACE
GIVEN_VALUE = GIVEN_VALUE
IMPORTING
SELECT_VALUE = VALUE
SELECT_INDEX = lv_tabix
TABLES
FIELDS = HELPVAL1
VALUETAB = VALUE_TAB.
IF NOT VALUE IS INITIAL.
P_LAND1 = VALUE. " Assing value to the parameter
ENDIF.
ENDFORM. " VALUE_REQUEST_land1
Hope this will help you.
Regards,
Phani.
2009 Mar 02 6:06 AM
2009 Mar 02 6:09 AM
Hi Kunnal,
Let me know that you would be using the customized F4 help in report/programs....
If so, you can be use FM "F4IF_INT_TABLE_VALUE_REQUEST" and update the internal table based on the logic.
From
Reddy
2009 Mar 02 6:13 AM
Select values u want to display from table TFK042Z into an internal table itab1 & pass it to the FM
Also delete or add table entries before passing to FM
CALL FUNCTION 'F4IF_INT_TABLE_VALUE_REQUEST'
EXPORTING
retfield = 'BELCD' "Field name for which F4 is required
window_title = 'BellCode Document Search'
value_org = 'S'
TABLES
value_tab = itab1 " Internal table containing values for F4
field_tab = it_field
return_tab = it_itab1
EXCEPTIONS
parameter_error = 1
no_values_found = 2
OTHERS = 3 .
IF sy-subrc = 0.
retfield = it_itab1-fieldval.
ENDIF.
2009 Mar 02 6:23 AM
Hi,
check with below link
https://forums.sdn.sap.com/click.jspa?searchID=21231537&messageID=6507037
Regards,
Madhu
2009 Mar 02 6:25 AM
Hi Kunaal,
If you need to customise a standard help then you can use the following link
Hope it helps
Regards,
Manish
2009 Mar 02 6:31 AM
2009 Mar 25 9:29 AM
| User | Count |
|---|---|
| 4 | |
| 2 | |
| 2 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 | |
| 1 |