Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

Selection-screen options

Former Member
0 Kudos

hai all ! i want 2 create a selection-screen with a parameter 2 browse the file name to download/upload the XK01 bdc data.. plz give the sample code 2 fullfill this functionality..

4 REPLIES 4

raymond_giuseppi
Active Contributor
0 Kudos

In the AT SELECTION-SCREEN ON VALUE-REQUEST block make a call to methods

CL_GUI_FRONTEND_SERVICES=>FILE_OPEN_DIALOG
CL_GUI_FRONTEND_SERVICES=>FILE_SAVE_DIALOG

[search sdn for samples using these methods |https://www.sdn.sap.com/irj/sdn/advancedsearch?cat=sdn_all&query=cl_gui_frontend_services%3d%3eFILE_OPEN_DIALOGCL_GUI_FRONTEND_SERVICES%3D%3EFILE_SAVE_DIALOG.&adv=false&sortby=cm_rnd_rankvalue#]

Regards

Former Member
0 Kudos

hi ,

try the following code

SELECTION-SCREEN : BEGIN OF BLOCK B.

PARAMETERS : FILE TYPE RLGRAP-FILENAME.

SELECTION-SCREEN : END OF BLOCK B.

AT SELECTION-SCREEN ON VALUE-REQUEST FOR FILE.

CALL FUNCTION 'KD_GET_FILENAME_ON_F4'

EXPORTING

PROGRAM_NAME = SYST-REPID

DYNPRO_NUMBER = SYST-DYNNR

FIELD_NAME = 'FILE'

  • STATIC = ' '

  • MASK = ' '

CHANGING

FILE_NAME = FILE

  • EXCEPTIONS

  • MASK_TOO_LONG = 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.

FILENAME = FILE.

Reward Points if useful

Regards,

Ani

Former Member
0 Kudos

Hi,

Just check this code or copy paste into ur program.

****************************************************************

*Selection Screen

****************************************************************

SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME .

parameters: p_file LIKE RLGRAP-FILENAME obligatory.

SELECTION-SCREEN END OF BLOCK b1 .

----


  • A T S E L E C T I O N S C R E E N *

----


AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.

PERFORM get_local_file_name USING p_file.

&----


*& Form get_local_file_name

&----


  • text

----


form get_local_file_name using p_file.

CALL FUNCTION 'KD_GET_FILENAME_ON_F4'

CHANGING

file_name = p_file.

endform. " get_local_file_name

Regards,

KK

Former Member
0 Kudos

hi,

use the FM given below and the filetype should be

IBIPPARMS-PATH in FM 'F4_FILENAME'

but in 'GUI_DOWNLOAD' change it to string type.


    lw_file  type string,              " File Path
    lw_file1 type IBIPPARMS-PATH.      " File Path

CALL FUNCTION 'F4_FILENAME'
   IMPORTING
     FILE_NAME            = lw_file1.

  lw_file = lw_file1.

  CALL FUNCTION 'GUI_DOWNLOAD'
    EXPORTING
*     BIN_FILESIZE                  =
      FILENAME                      = lw_file
      FILETYPE                      = 'ASC'
*     APPEND                        = ' '
      WRITE_FIELD_SEPARATOR         = 'X'
*     HEADER                        = '00'

    TABLES
      DATA_TAB                      = itab
   EXCEPTIONS

with luck,

pritam.