2007 May 17 6:59 AM
I want parameter for program name entering with f4 help pls send code
Points if helpful
2007 May 17 7:03 AM
Hi,
U can use in select as
<b>Parameter : p_report like D010SINF-PROG OR
p_report like varid-report.</b>
-
PAtil
2007 May 17 7:03 AM
Hi,
U can use in select as
<b>Parameter : p_report like D010SINF-PROG OR
p_report like varid-report.</b>
-
PAtil
2007 May 17 7:06 AM
hi patil thank you for valuable info but i need with value-request
2007 May 17 7:05 AM
Hi,
U can use in selection screen like
<b>Parameter : p_report like D010SINF-PROG OR
p_report like varid-report.</b>
-
PAtil
2007 May 17 7:07 AM
Hi,
Use :
parameter: p_program like RS38M-PROGRAMM.
and codes will be like.
F4 help using field example:
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_program.
CALL FUNCTION 'F4IF_FIELD_VALUE_REQUEST'
EXPORTING
tabname = RS38M
fieldname = programm
* SEARCHHELP = ' '
* SHLPPARAM = ' '
* DYNPPROG = ' '
* DYNPNR = ' '
* DYNPROFIELD = ' '
* STEPL = 0
* VALUE = ' '
* MULTIPLE_CHOICE = ' '
* DISPLAY = ' '
* SUPPRESS_RECORDLIST = ' '
* CALLBACK_PROGRAM = ' '
* CALLBACK_FORM = ' '
* SELECTION_SCREEN = ' '
* IMPORTING
* USER_RESET =
* TABLES
* RETURN_TAB =
* EXCEPTIONS
* FIELD_NOT_FOUND = 1
* NO_HELP_FOR_FIELD = 2
* INCONSISTENT_HELP = 3
* NO_VALUES_FOUND = 4
* OTHERS = 5
.
Jogdand M B
2007 May 17 7:26 AM
Hi jagrut,
try htis....
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_report
use this FM
<b>REPOSITORY_INFO_SYSTEM_F4</b>
in the Parameter
OBJECT_TYPE -
pass PROG
OBJECT_NAME -
pass p_report value
---Patil
2007 May 17 7:52 AM
2007 May 17 9:09 AM
Hi,
PROG is a string which indicates the type of the object --- program
u can call the FM as follows
CALL FUNCTION 'REPOSITORY_INFO_SYSTEM_F4'
EXPORTING
<b> object_type = 'PROG'
OBJECT_NAME = p_report</b>
ENCLOSING_OBJECT =
SUPPRESS_SELECTION = 'X'
VARIANT = ' '
LIST_VARIANT = ' '
DISPLAY_FIELD =
MULTIPLE_SELECTION =
SELECT_ALL_FIELDS = ' '
WITHOUT_PERSONAL_LIST = ' '
IMPORTING
OBJECT_NAME_SELECTED =
ENCLOSING_OBJECT_SELECTED =
STRUCINF =
TABLES
OBJECTS_SELECTED =
RECORD_TAB =
EXCEPTIONS
CANCEL = 1
WRONG_TYPE = 2
OTHERS = 3
.
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
-
Patil
2007 May 22 5:06 AM