Приведение шестнадцатиричного типа к символьному.

A_l_e_x

Заранее извиняюсь за детский вопрос, но сижу за книжкой по абапу уже третий день:)
Нужно вывести в файл на локальной машине шестнадцатиричную строку. Я insert-ом вношу её во внутреннюю таблицу, которая тоже состоит из шестнадцатиричных строк и потом при вызове функции 'WS_DOWNLOAD' происходит ошибка при обращиении из неё к strlen, которая не принимает строки тип hex.
Теперь я сделал внутреннюю таблицу со строками типа с, я не знаю как преобразовать шестнадцатиричную исходную строку к символьной строке.

sibrin

http://sapboard.ru/forum/viewtopic.php?t=1841

http://sapboard.ru/forum/viewtopic.php?t=9992

http://sapboard.ru/forum/viewtopic.php?t=4433

http://sapboard.ru/forum/viewtopic.php?t=1977

A_l_e_x

Что-то я там не нашёл что мне нужно. Я хочу прочесть файл внешний с локального компа в шестнадцатиричном коде, так как он виден через FAR.При считывании его с помощью функции WS_DOUNLOAD в строку типа х, результаты не совпадают(например, вместо D3 получаю BF).А хотелось бы получать всё же D3. И потом корректно записать в другой файл шестнадцатеричное значение, чтобы оно не преобразовывалось.

Он

Читаете в двоичном режиме?

A_l_e_x

Читаю вот так:
CALL FUNCTION 'WS_UPLOAD'
EXPORTING FILENAME = in_file
TABLES
DATA_TAB = buff_table
EXCEPTIONS
file_open_error = 1 others = 2.
CASE sy-subrc.
WHEN 1.
WRITE: 'Error when file opened'.
EXIT.
WHEN 2.
WRITE: 'Error during data transfer'.
EXIT.
ENDCASE.
в buff_table строки типа х
Я новичок в абап, поэтому как читать тут в двоичном виде не знаю

Он

Есть там поле FILETYPE, ему надо передать BIN
Тип вот этого:

Code:

*Download file to presentation server
CALL FUNCTION 'GUI_DOWNLOAD'
       EXPORTING
            bin_filesize            = lf_length
            filetype                = 'BIN'
            filename                = lf_file
       TABLES
            data_tab                = lt_input
       EXCEPTIONS
            FILE_WRITE_ERROR        = 1
            NO_BATCH                = 2
            GUI_REFUSE_FILETRANSFER = 3
            INVALID_TYPE            = 4
            NO_AUTHORITY            = 5
            UNKNOWN_ERROR           = 6
            HEADER_NOT_ALLOWED      = 7
            SEPARATOR_NOT_ALLOWED   = 8
            FILESIZE_NOT_ALLOWED    = 9
            HEADER_TOO_LONG         = 10
            DP_ERROR_CREATE         = 11
            DP_ERROR_SEND           = 12
            DP_ERROR_WRITE          = 13
            UNKNOWN_DP_ERROR        = 14
            ACCESS_DENIED           = 15
            DP_OUT_OF_MEMORY        = 16
            DISK_FULL               = 17
            DP_TIMEOUT              = 18
            FILE_NOT_FOUND          = 19
            DATAPROVIDER_EXCEPTION  = 20
            CONTROL_FLUSH_ERROR     = 21.
IF SY-subrc <> 0.
  RAISE CAN_NOT_SAVE_PC_FILE.
ENDIF.

A_l_e_x

lf_lenght чему равняться должно
и, если есть возможность, то аналогичную распечатку GUI_UPLOAD хотелось бы увидеть:)

Он

это длина сохраняемого файла, без нее не выйдет. GUI_UPLOAD посмотрете в se37, она вам к стати и вернет длину считанного файла. В ней все аналогично!

A_l_e_x

Спасибо:)Наконец-то разобрался:)

A_l_e_x

Теперь возникла проблема при обращении к функции WS_UPLOAD при передаче имени файла в функцию WS_UPLOAD из параметра.
ДинамОшибка CALL_FUNCTION_CONFLICT_TYPE
ОсобСит. CX_SY_DYN_CALL_ILLEGAL_TYPE

А вот кусок кода, где она происходит.

PARAMETERS in_file(128) DEFAULT 'C:\zinput.txt'.
PARAMETERS out_file(128) DEFAULT 'C:\zoutput0.txt' LOWER CASE.
PARAMETERS: r1 RADIOBUTTON GROUP rad1 DEFAULT 'X',
r2 RADIOBUTTON GROUP rad1.
DATA: i TYPE i VALUE 0, n TYPE i VALUE 0.
DATA: flength TYPE i.

CALL FUNCTION 'GUI_UPLOAD'
EXPORTING
filename = in_file
filetype = 'BIN'
IMPORTING
filelength = flength
TABLES
DATA_TAB = buff_table
EXCEPTIONS
file_open_error = 1 others = 2.
CASE sy-subrc.
WHEN 1.
WRITE: 'Error when file opened'.
EXIT.
WHEN 2.
WRITE: 'Error during data transfer'.
EXIT.
ENDCASE.

sy-uname

Версия Erp2004

A_l_e_x написал(а):

PARAMETERS in_file(128) DEFAULT 'C:\zinput.txt'.
PARAMETERS out_file(128) DEFAULT 'C:\zoutput0.txt' LOWER CASE.
PARAMETERS: r1 RADIOBUTTON GROUP rad1 DEFAULT 'X',
r2 RADIOBUTTON GROUP rad1.
DATA: i TYPE i VALUE 0, n TYPE i VALUE 0.
DATA: flength TYPE i.

CALL FUNCTION 'GUI_UPLOAD'
...
ENDCASE.

Code:

FUNCTION          GUI_UPLOAD.
*"----------------------------------------------------------------------
*"*"Lokale Schnittstelle:
*"  IMPORTING
*"     REFERENCE(FILENAME) TYPE  STRING
*"     REFERENCE(FILETYPE) TYPE  CHAR10 DEFAULT 'ASC'
*"     REFERENCE(HAS_FIELD_SEPARATOR) TYPE  CHAR01 DEFAULT SPACE
*"     REFERENCE(HEADER_LENGTH) TYPE  I DEFAULT 0
*"     REFERENCE(READ_BY_LINE) TYPE  CHAR01 DEFAULT 'X'
*"     REFERENCE(DAT_MODE) TYPE  CHAR01 DEFAULT SPACE
*"     REFERENCE(CODEPAGE) TYPE  ABAP_ENCODING DEFAULT SPACE
*"     REFERENCE(IGNORE_CERR) TYPE  ABAP_BOOL DEFAULT ABAP_TRUE
*"     REFERENCE(REPLACEMENT) TYPE  ABAP_REPL DEFAULT '#'
*"     REFERENCE(CHECK_BOM) TYPE  CHAR01 DEFAULT SPACE
*"     REFERENCE(VIRUS_SCAN_PROFILE) TYPE  VSCAN_PROFILE OPTIONAL
*"  EXPORTING
*"     VALUE(FILELENGTH) TYPE  I
*"     VALUE(HEADER) TYPE  XSTRING
*"  TABLES
*"      DATA_TAB
*"  EXCEPTIONS
*"      FILE_OPEN_ERROR
*"      FILE_READ_ERROR
*"      NO_BATCH
*"      GUI_REFUSE_FILETRANSFER
*"      INVALID_TYPE
*"      NO_AUTHORITY
*"      UNKNOWN_ERROR
*"      BAD_DATA_FORMAT
*"      HEADER_NOT_ALLOWED
*"      SEPARATOR_NOT_ALLOWED
*"      HEADER_TOO_LONG
*"      UNKNOWN_DP_ERROR
*"      ACCESS_DENIED
*"      DP_OUT_OF_MEMORY
*"      DISK_FULL
*"      DP_TIMEOUT
*"----------------------------------------------------------------------

Осталось найти десять отличий.

A_l_e_x

Спасибо. И одного оказалось достаточно:)))

A_l_e_x

Подскажите пожалуйста как получить доступ к элеметам полей типа string(xstring) или где об этом можно прочесть.

sy-uname

A_l_e_x написал(а):

Подскажите пожалуйста как получить доступ к элеметам полей типа string(xstring) или где об этом можно прочесть.

Эти типы не имеет элементов - это просто очень длинные строки символов(переменной длины). Читать - F1.

A_l_e_x

В F1 написано что это строка байтов.
И нет прямых способов получить значение n-го байта, не прибегая к копированию такой строки в строку типа с?

Правила форума

Приведение шестнадцатиричного типа к символьному.

Кто сейчас на конференции