假設我們想檢視安裝了 ABAP 應用伺服器的 Linux 系統某個檔案目錄下的明細，如果直接登入 Linux Shell，使用 `ls -l` 命令即可。

比如：`ls -l //bas/CGC5/src/krn/abap/runt`

其實我們可以使用 ABAP 提供的 CALL 關鍵字，直接在 ABAP 應用層，發起對作業系統 shell 命令列的呼叫。後者的執行結果，返回給 ABAP 層，這樣 ABAP 應用開發人員就能在此基礎上進行一些處理，開發一些工具。

我寫了一個簡單的 ABAP 報表來包裝這個 CALL 關鍵字的呼叫：

```sql
REPORT zlinux.
PARAMETERS: command TYPE string LOWER CASE DEFAULT 'ls -l //bas/CGC5/src/krn/abap/runt'.
DATA: commtext(120) ,
      itab(255)     OCCURS 10 WITH HEADER LINE,
      lv_folder     TYPE string.

START-OF-SELECTION.

PERFORM init.
  CALL 'SYSTEM' ID 'COMMAND' FIELD commtext ID 'TAB' FIELD itab[].
  LOOP AT itab ASSIGNING FIELD-SYMBOL(<line>).

FIND REGEX '^.*\.c|^.*\.cpp|^.*\.h' IN <line>.
    IF sy-subrc = 0.
      WRITE: / <line> COLOR COL_NEGATIVE.
      DATA(lv_line) = CONV char255( <line> ).
      HIDE lv_line.
    ELSE.
      WRITE: / <line>.
    ENDIF.
  ENDLOOP.

AT LINE-SELECTION.
   PERFORM display_source.

FORM display_source.
  SPLIT lv_line AT space INTO TABLE DATA(lt_file).
  DATA(index) = lines( lt_file ).
  DATA(lv_file_name) = lv_folder && '/' && lt_file[ index ].
  DATA(lv_op) = |cat { lv_file_name } |.
  SUBMIT zlinux WITH command EQ lv_op.
ENDFORM.

FORM init.
  commtext = command.
  SPLIT commtext AT space INTO TABLE DATA(lt_table).
  CHECK lines( lt_table ) = 3.
  lv_folder = lt_table[ 3 ].
ENDFORM.
```

執行之後，可以指定待執行的 Linux 命令，比如 pwd，這是 Linux 裡列印當前工作路徑的命令列，即 Print Working Directory 的含義。

![](https://img-blog.csdnimg.cn/img_convert/a475713c30d0414fa173782091db1564.png)

結果為 /usr/sap/AG3/DVEBMGS54/work

執行 `ps -aux`, 即可在 ABAP 裡, 列印當前作業系統的程式明細:

![](https://img-blog.csdnimg.cn/img_convert/b4997ffba2f22a0acc029a9bd43ccc44.png)

關於 CALL 的語法,可以檢視 SAP 官方幫助[文件](https://help.sap.com/doc/abapdocu_latest_index_htm/latest/en-US/abapcall-.htm)。

CALL 關鍵字一般用於 SAP 系統內部的實現，不能夠將其用於 SAP ABAP 應用開發中去。CALL 會呼叫系統函式 cfunc，可以為 cfunc 指定包含函式名的資料物件，這個資料物件必須是一個 Flat 的 Character like 型別。

該函式必須在sapactab.h 檔案中輸入。修改一個函式或建立一個新函式需要重新編譯和連結ABAP核心。因此需要能夠訪問 C 原始碼檔案。</line></line></line></line></line>

使用 ABAP 程式語言直接執行 ABAP 伺服器所在作業系統的 shell 命令

相關文章