topic Re: On value request for file name in Application Development and Automation Discussions

On value request for file name

Former Member — Mon, 28 Apr 2008 08:40:42 GMT

Hi,

when i press f4 in the 'filename' field in selection screen, it must open up a window from where i can select a file from my desktop.

wat should i do for this using 'on value request'?

Re: On value request for file name

Former Member — Mon, 28 Apr 2008 08:44:19 GMT

hi,

do this way ...


at selection-screen on value request.
*****************CALLING FUNCTION MODULES**************************
CALL FUNCTION 'F4_FILENAME'  "PASS THE FILE NAME AS U NEED.
 EXPORTING
*   PROGRAM_NAME        = SYST-CPROG
*   DYNPRO_NUMBER       = SYST-DYNNR
   FIELD_NAME          = 'T_FILE'
 IMPORTING
   FILE_NAME           = T_FILE.

V_FILE = T_FILE.          "STRING CONVERSION

Check out the below link for reference

http://www.sap-img.com/abap/using-function-modules-f4-filename.htm

Re: On value request for file name

Former Member — Mon, 28 Apr 2008 08:49:34 GMT

Hi,

You could try the method CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG.

Regards,

Nick

Re: On value request for file name

Former Member — Mon, 28 Apr 2008 09:25:48 GMT

Hi,

Here is sample code to print the file-path of a selected file.

PARAMETERS :

p_cfile LIKE ibipparms-path.

DATA :

w_field_name LIKE dynpread-fieldname,

w_filepath TYPE string.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_cfile.

CALL FUNCTION 'F4_FILENAME'

EXPORTING

program_name = syst-repid

dynpro_number = syst-dynnr

field_name = w_field_name

IMPORTING

file_name = p_cfile.

START-OF-SELECTION.

WRITE : / 'File Path : ' , p_cfile.

Please reward if found helpful.

Re: On value request for file name

Former Member — Mon, 28 Apr 2008 09:35:41 GMT

Hi,

Here is sample code to print the file-path of a selected file.

PARAMETERS :

p_cfile LIKE ibipparms-path.

DATA :

w_field_name LIKE dynpread-fieldname,

w_filepath TYPE string.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_cfile.

CALL FUNCTION 'F4_FILENAME'

EXPORTING

program_name = syst-repid

dynpro_number = syst-dynnr

field_name = w_field_name

IMPORTING

file_name = p_cfile.

START-OF-SELECTION.

WRITE : / 'File Path : ' , p_cfile.

Please reward if found helpful.

Re: On value request for file name

Former Member — Mon, 28 Apr 2008 09:39:33 GMT

Hi,

use this code then you will get another window to select the path

AT SELECTION-SCREEN ON VALUE-REQUEST FOR P_FPATH.

CALL FUNCTION 'F4_FILENAME'

EXPORTING

PROGRAM_NAME = SYST-CPROG

DYNPRO_NUMBER = SYST-DYNNR

FIELD_NAME = ' '

IMPORTING

FILE_NAME = P_FPATH.

Re: On value request for file name

manubhutani — Tue, 29 Apr 2008 12:08:08 GMT

please find my code

on selection screen there are two radiobuttons 'P_PRES' and

'P_APPL'.

and one parameter where pop up will be displayed acc to the radiobutton selected.

please reward points

CLEAR wa_fieldvalues.

wa_fieldvalues-fieldname = 'P_PRES'.

APPEND wa_fieldvalues TO it_fieldvalues.

CLEAR wa_fieldvalues.

wa_fieldvalues-fieldname = 'P_APPL'.

APPEND wa_fieldvalues TO it_fieldvalues.

CLEAR wa_fieldvalues.

CALL FUNCTION 'DYNP_VALUES_READ'

EXPORTING

dyname = sy-repid

dynumb = sy-dynnr

TABLES

dynpfields = it_fieldvalues

EXCEPTIONS

invalid_abapworkarea = 1

invalid_dynprofield = 2

invalid_dynproname = 3

invalid_dynpronummer = 4

invalid_request = 5

no_fielddescription = 6

invalid_parameter = 7

undefind_error = 8

double_conversion = 9

stepl_not_found = 10

OTHERS = 11.

READ TABLE it_fieldvalues INTO wa_fieldvalues WITH KEY fieldname = 'P_APPL'.

IF wa_fieldvalues-fieldvalue = 'X'.

CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'

EXPORTING

i_location_flag = 'A'

IMPORTING

o_location_flag = server_type

o_path = p_outfil

EXCEPTIONS

rfc_error = 1

error_with_gui = 2

OTHERS = 3.

IF syst-subrc <> 0.

MESSAGE i006.

ENDIF.

ELSE.

CALL FUNCTION 'F4_DXFILENAME_TOPRECURSION'

EXPORTING

i_location_flag = 'P'

IMPORTING

o_location_flag = server_type

o_path = p_outfil

EXCEPTIONS

rfc_error = 1

error_with_gui = 2

OTHERS = 3.

IF syst-subrc <> 0.

MESSAGE i006.

ENDIF.

please reward points