‎2008 Jun 19 12:31 PM
hi gurus ,
i have used f4 help for application server using this fm
DATA: c_fnh_mask TYPE dxfields-filemask VALUE '.',
search_dir TYPE dxfields-longpath VALUE '/sapglobal/users',
file_path LIKE dxfields-longpath.
CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'
EXPORTING
i_location_flag = 'A'
i_server = ' '
i_path = search_dir
filemask = c_fnh_mask
fileoperation = 'R'
IMPORTING
o_path = file_path
EXCEPTIONS
rfc_error = 1
OTHERS = 2.
IF sy-subrc EQ 0.
p_file = file_path.
ENDIF.
but i am getting a short dump for that can anybody please help
Edited by: Ambarish annapureddy on Jun 19, 2008 1:31 PM
‎2008 Jun 19 12:39 PM
hi
check this it working fine
DATA: C_FNH_MASK TYPE DXFIELDS-FILEMASK VALUE '.',
SEARCH_DIR TYPE DXFIELDS-LONGPATH VALUE '/SAPGLOBAL/USERS',
FILE_PATH LIKE DXFIELDS-LONGPATH.
FORM GET_FILE USING FILE_PATH LIKE DXFIELDS-LONGPATH.
CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'
EXPORTING
I_LOCATION_FLAG = 'A'
I_SERVER = ' '
I_PATH = SEARCH_DIR
FILEMASK = C_FNH_MASK
FILEOPERATION = 'R'
IMPORTING
O_PATH = FILE_PATH
EXCEPTIONS
RFC_ERROR = 1
OTHERS = 2.
IF SY-SUBRC EQ 0.
FILE_NAME = FILE_PATH.
ENDIF.
ENDFORM. " GET_FILE
thanks
sitaram
‎2008 Jun 19 12:35 PM
this for presentation server
CALL METHOD cl_gui_frontend_services=>file_open_dialog
EXPORTING
window_title = w_title
CHANGING
file_table = i_filetable
rc = w_return
EXCEPTIONS
file_open_dialog_failed = 1
cntl_error = 2
error_no_gui = 3
OTHERS = 5.
this is for application server.
CALL FUNCTION '/SAPDMC/LSM_F4_SERVER_FILE'
IMPORTING
serverfile = p0100_path
EXCEPTIONS
canceled_by_user = 1
OTHERS = 2.
Edited by: S.r.v.r.Kumar on Jun 19, 2008 5:05 PM
Edited by: S.r.v.r.Kumar on Jun 19, 2008 5:08 PM
‎2008 Jun 19 12:36 PM
Hi ,
What is the dump message you are getting , becuase when i execute your code in the system it works fine.
I have just commented the code
p_file = file_path.
Regards
Arun
‎2008 Jun 19 12:39 PM
hi
check this it working fine
DATA: C_FNH_MASK TYPE DXFIELDS-FILEMASK VALUE '.',
SEARCH_DIR TYPE DXFIELDS-LONGPATH VALUE '/SAPGLOBAL/USERS',
FILE_PATH LIKE DXFIELDS-LONGPATH.
FORM GET_FILE USING FILE_PATH LIKE DXFIELDS-LONGPATH.
CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'
EXPORTING
I_LOCATION_FLAG = 'A'
I_SERVER = ' '
I_PATH = SEARCH_DIR
FILEMASK = C_FNH_MASK
FILEOPERATION = 'R'
IMPORTING
O_PATH = FILE_PATH
EXCEPTIONS
RFC_ERROR = 1
OTHERS = 2.
IF SY-SUBRC EQ 0.
FILE_NAME = FILE_PATH.
ENDIF.
ENDFORM. " GET_FILE
thanks
sitaram
‎2008 Jun 19 12:48 PM
Hi,
If you are going to put the logical path name then in selection screen you can put a parameter of type FILENAME-FILEINTERN it has a standard F4 help .
Other wise you can use the function module F4_DXFILENAME_TOPRECURSION.
Help children of U.N World Food Program by rewarding them and encourage others to answer your queries
‎2008 Jun 19 12:51 PM
Hi,
report zrich_0005.
data: begin of isys_tabl occurs 0.
include structure msxxlist.
data: end of isys_tabl.
parameters: p_serv type msxxlist-host .
at selection-screen on value-request for p_serv.
call function 'TH_SERVER_LIST'
tables
list = isys_tabl
exceptions
others = 99.
call function 'F4IF_INT_TABLE_VALUE_REQUEST'
exporting
retfield = 'HOST'
dynprofield = 'P_SERV'
dynpprog = sy-cprog
dynpnr = sy-dynnr
value_org = 'S'
tables
value_tab = isys_tabl.Thanks
Vikranth