Uploading the contents of file into custom table

Question

Hi ,
I have a req where in i want to put the contents of the file into the Z table . I have taken a file upload UI element and in that i have taken 4 attributes as file name f, file type ,file size and file contents and binded this file contents to the data property of the UI element. Now with out explicitly defining the fields i want to put all this content of file into the Z table created  for any file created or if i could put the whole text file into that table so that any one could see that file even though its not saved in the desktop for that user.
Can any one help me out?

Answer 1

Yes i am converting it inot the lstring using the same FM which you have given. I have to store the total file but the only doubt is like if its a input field how could i save a file form. Can you please check the code i want to save the total file into the table.
DATA lo_nd_upload TYPE REF TO if_wd_context_node.
    DATA lo_el_upload TYPE REF TO if_wd_context_element.
    data  i_data TYPE STANDARD TABLE OF string.
    DATA ls_upload TYPE wd_this->Element_upload.
    data lv_field type string.
    data lt_file type TABLE OF ZFILE_UPLOAD.
    data ls_file LIKE LINE OF lt_file.
    data l_xstring type xstring.
   data  fields TYPE string_table.
data l_String type string.
  navigate from <CONTEXT> to <UPLOAD> via lead selection
    lo_nd_upload = wd_context->get_child_node( name = wd_this->wdctx_upload ).
  @TODO handle non existant child
  IF lo_nd_upload IS INITIAL.
  ENDIF.
  get element via lead selection
    lo_el_upload = lo_nd_upload->get_element( ).
  @TODO handle not set lead selection
    IF lo_el_upload IS INITIAL.
    ENDIF.
  get all declared attributes
    lo_el_upload->get_static_attributes(
      IMPORTING
        static_attributes = ls_upload ).
   DATA lv_file_contents TYPE wd_this->Element_upload-file_contents.
navigate from <CONTEXT> to <UPLOAD> via lead selection
@TODO handle non existant child
IF lo_nd_upload IS INITIAL.
ENDIF.
get element via lead selection
   lo_el_upload = lo_nd_upload->get_element( ).
alternative access  via index
lo_el_upload = lo_nd_upload->get_element( index = 1 ).
@TODO handle not set lead selection
   IF lo_el_upload IS INITIAL.
   ENDIF.
get single attribute
   lo_el_upload->get_attribute(
     EXPORTING
       name =  'FILE_CONTENTS'
     IMPORTING
       value = l_xstring ).
for text file conversion we have to FM
CALL FUNCTION 'HR_KR_XSTRING_TO_STRING'
  EXPORTING
  FROM_CODEPAGE       = '8500'
    IN_XSTRING          = l_xstring
  OUT_LEN             =
IMPORTING
   OUT_STRING          = l_string.
SPLIT l_string  AT cl_abap_char_utilities=>newline INTO TABLE i_data.
  LOOP AT i_data INTO l_string.
    SPLIT l_string AT cl_abap_char_utilities=>horizontal_tab INTO TABLE fields.
    read TABLE fields into lv_field index 1.
endloop.
ls_upload will contain all the file details
ls_file-file_size = xstrlen( ls_upload-file_contents ) * lv_float  .
ls_file-file_name = ls_upload-file_name.
ls_file-file_type = ls_upload-file_type.
ls_file-file_contents = ls_upload-file_contents.
insert ZFILE_UPLOAD FROM ls_file.
thanks