现在的位置: 首页 > 综合 > 正文

[转]Send a data stream from ABAP to UNIX named pipe

2012年12月23日 ⁄ 综合 ⁄ 共 627字 ⁄ 字号 评论关闭

Send a data stream from abap to a UNIX named pipe
On the UNIX side the fifo can be read with such
commnds like this:  cat /tmp/fifi

REPORT ZPIPE .

TABLES: USR02.
DATA: FIFO(30) VALUE '/tmp/fifi',
      MKFIFO(30) VALUE 'mkfifo -m 777 /tmp/fifi',
      RMFIFO(30) VALUE 'rm -f /tmp/fifi',
      OPCODE TYPE X VALUE 2,
      BEGIN OF TABL OCCURS 0,
          LINE(200),
      END OF TABL.
* Create the pipe
CALL 'SYSTEM' ID 'COMMAND' FIELD MKFIFO
              ID 'TAB'     FIELD TABL-*SYS*.
* Write the data to the pipe
OPEN DATASET FIFO FOR APPENDING IN TEXT MODE.
SELECT * FROM USR02.
  TRANSFER USR02-BNAME TO FIFO.
ENDSELECT.
CLOSE DATASET FIFO.
* Remove the pipe
CALL 'SYSTEM' ID 'COMMAND' FIELD RMFIFO
               ID 'TAB'    FIELD TABL-*SYS*.

抱歉!评论已关闭.