Upload from Exel File

form compute_flat_file_filename
  using    p_infopackage  type rslogdpid
           p_datasource   type rsoltpsourcer
           p_logsys       type rsslogsys
  changing p_filename     type RSFILENM
           p_subrc        like sy-subrc.
*$*$ begin of routine - insert your code only below this line        *-*
* This routine will be called by the adapter,
* when the infopackage is executed.
  DATA: ls_pc_exec TYPE /bic/pz_pc_exec,
        po_appfile TYPE rsfilenm
        .

  DATA: lv_chavl    TYPE rschavl
        .

  lv_chavl = 'STOCK_TARGET_DAY'.
  CALL FUNCTION 'RSAU_READ_MASTER_DATA'
    EXPORTING
      i_iobjnm                = 'Z_PC_EXEC'
      i_chavl                 = lv_chavl
    IMPORTING
      e_structure             = ls_pc_exec
    EXCEPTIONS
      read_error              = 1
      no_such_attribute       = 2
      wrong_import_parameters = 3
      chavl_not_found         = 4
      OTHERS                  = 5.
  IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  ENDIF.

  CONCATENATE ls_pc_exec-/bic/z_pcpath ls_pc_exec-tctprcschn INTO
  po_appfile.

  p_filename = po_appfile.
*....
  p_subrc = 0.
*$*$ end of routine - insert your code only before this line         *-*
endform.