Выгрузка рисунков JPEG на сервер приложений

PROaBAB

Подскажите <я не знать русский языка> метод , каким образом лучше выгружать картинки на сервер приложений.
Сейчас пробую из BDS выгрузить, но этот способ выгружает на локальную машину с помощью фронтенд - не подходит.
Может кто уже делал что либо подобное, мне нужно передавать картинки либо в формате JPEG, либо ввиде бинарных данных, подскажите <я не знать русский языка>.

Snegurenok

транзакция SMW0

vga

DATA it_lines type table of TLINE.

CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
BIN_FILESIZE = l_size
FILENAME = l_fname
FILETYPE = 'BIN'
TABLES
DATA_TAB = it_lines
EXCEPTIONS
CONVERSION_ERROR = 1
FILE_OPEN_ERROR = 2
FILE_READ_ERROR = 3
INVALID_TABLE_WIDTH = 4
INVALID_TYPE = 5
NO_BATCH = 6
UNKNOWN_ERROR = 7
GUI_REFUSE_FILETRANSFER = 8
OTHERS = 9
.

"For 'BIN', the table is completely filled line by line. The last line is not necessarily filled completely with file contents. For the reason, the parameter FILELENGTH must also be evaluated."

ArmAnn

2vga, а теперь давайте-ка в поиск и читайте почему ФМ 'WS_DOWNLOAD' нельзя использовать для выгрузки на сервер приложений

vga

согласен, прости ArmAnn :-)

, не тот кусок из сырцов вставил. Предыдущий для копирования на локальную машину.

* write file on aplication server
open dataset fname for output in binary mode message msg.
if sy-subrc = 0.
loop at it into line.
transfer line to fname.
if sy-subrc ne 0.
concatenate 'Error in transfer ' fname
into msg separated by ' '.
exit.
endif.
endloop.
close dataset fname.
endif.

ArmAnn

теперь одобряю

PROaBAB

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

транзакция SMW0

у мну на локальную машину пишет...

2VGA ...спасибо, буду пробовать ...

PROaBAB

Я уточню вопрос.
Мне нужно из BDS выгрузить документы в виде файла в каталог на сервере приложений. Я знаю КЛАСС, ТИП объекта и ключ объекта - нужно получить файлы на сервере приложений. Подскажите простой или универсальный метод <я не знать русский языка>.

sibrin

Сначала

Code:

  data mime TYPE TABLE OF w3mime WITH HEADER LINE.
  CALL FUNCTION 'WWWDATA_IMPORT'
    EXPORTING
      key               = key
    TABLES
      mime              = mime.

а потом, как уже писали,

Code:

data dsn(64) value '/usr/tmp/1.jpg'.
OPEN DATASET dsn FOR OUTPUT IN BINARY MODE.
LOOP AT mime.
  TRANSFER mime TO dsn.
endloop.
CLOSE DATASET dsn. 

PROaBAB

Решил проблему так
по типу и классу нахожу данные с помощью
CALL FUNCTION 'BDS_BUSINESSDOCUMENT_GET_INFO'
.....

а потом отсылаю их на сервер приложений с помощью
call function 'SCMS_R3DB_GET'
....

получилось очень 'корасиво' и всего две функции....

Crasher

разве на сервер приложений?
помоему на сервер БД в архивлинк качается

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

Выгрузка рисунков JPEG на сервер приложений

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