Working with binary files

Question

I want to save in the MIME Repository an image, I already did it using this code:
DATA: lr_mime_rep TYPE REF TO if_mr_api.
DATA: lv_filename TYPE string.
DATA: lv_path TYPE string.
DATA: lv_fullpath TYPE string.
DATA: lv_content TYPE xstring.
DATA: lv_length TYPE i.
DATA: lv_rc TYPE sy-subrc.
DATA: lt_file TYPE filetable.
DATA: ls_file LIKE LINE OF lt_file.
DATA: lt_data TYPE STANDARD TABLE OF x255.
PARAMETERS: p_path TYPE string
DEFAULT 'SAP/PUBLIC/Test.jpg'. "<<-- Mime path, save to path
cl_gui_frontend_services=>file_open_dialog(
CHANGING
file_table = lt_file " Table Holding Selected Files
rc = lv_rc ). " Return Code, Number of Files or -1 If Error Occurred
READ TABLE lt_file INTO ls_file INDEX 1.
IF sy-subrc = 0.
lv_filename = ls_file-filename.
ENDIF.
cl_gui_frontend_services=>gui_upload(
EXPORTING
filename = lv_filename " Name of file
filetype = 'BIN'
IMPORTING
filelength = lv_length " File length
CHANGING
data_tab = lt_data " Transfer table for file contents
EXCEPTIONS
OTHERS = 19 ).
CALL FUNCTION 'SCMS_BINARY_TO_XSTRING'
EXPORTING
input_length = lv_length
* first_line = 0
* last_line = 0
IMPORTING
buffer = lv_content
TABLES
binary_tab = lt_data
EXCEPTIONS
failed = 1
OTHERS = 2.
lr_mime_rep = cl_mime_repository_api=>if_mr_api~get_api( ).
lr_mime_rep->put(
EXPORTING
i_url = p_path
i_content = lv_content
EXCEPTIONS
parameter_missing = 1
error_occured = 2
cancelled = 3
permission_failure = 4
data_inconsistency = 5
new_loio_already_exists = 6
is_folder = 7
OTHERS = 8 ).
But I want to directly fill the  lt_data with a string that holds the binary code of the image, I mean
I don't have the image, only the binary code, I try to do it uploading the .bin file also in .txt format, and
I don't get it :S ,   how can I achieve this?
Thanks in advance!

Answer 1

I´m not sure if Im understanding what you´re saying... If you dont describe the path, then the file will be created in the project folder, right?
check this program out
it doesnt specifies a path but if you try run it the file will be created in the project folder. ¨
import java.io.*;
import java.util.*;
/**  Write a primitive type data array to a binary file.**/
public class BinOutputFileApp
  public static void main (String arg[]) {
    Random ran = new Random ();
    // Create an integer array and a double array.
    int    [] i_data = new int[15];
    double [] d_data = new double[15];
    // and fill them
    for  (int i=0; i < i_data.length; i++) {
      i_data[i] = i;
      d_data[i] = ran.nextDouble () * 10.0;
    File file = null;
    // Get the output file name from the argument line.
    if (arg.length > 0) file = new File (arg[0]);
    // or use a default file name
    if (file == null) {
        System.out.println ("Default: numerical.dat");
        file = new File ("numerical.dat");
    // Now write the data array to the file.
    try {
      // Create an output stream to the file.
      FileOutputStream file_output = new FileOutputStream (file);
      // Wrap the FileOutputStream with a DataOutputStream
      DataOutputStream data_out = new DataOutputStream (file_output);
      // Write the data to the file in an integer/double pair
      for (int i=0; i < i_data.length; i++) {
          data_out.writeInt (i_data);
data_out.writeDouble (d_data[i]);
// Close file when finished with it..
file_output.close ();
catch (IOException e) {
System.out.println ("IO exception = " + e );
} // main
} // class BinOutputFileApp