当前位置:网站首页>ABAP 面试题:如何使用 ABAP 编程语言的 System CALL 接口,直接执行 ABAP 服务器所在操作系统的 shell 命令?
ABAP 面试题:如何使用 ABAP 编程语言的 System CALL 接口,直接执行 ABAP 服务器所在操作系统的 shell 命令?
2022-08-09 11:55:00 【汪子熙】
假设我们想查看安装了 ABAP 应用服务器的 Linux 系统某个文件目录下的明细,如果直接登录 Linux Shell,使用 `ls -l` 命令即可。
比如:`ls -l //bas/CGC5/src/krn/abap/runt`
其实我们可以使用 ABAP 提供的 CALL 关键字,直接在 ABAP 应用层,发起对操作系统 shell 命令行的调用。后者的执行结果,返回给 ABAP 层,这样 ABAP 应用开发人员就能在此基础上进行一些处理,开发一些工具。
我写了一个简单的 ABAP 报表来包装这个 CALL 关键字的调用:
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 的含义。
结果为 /usr/sap/AG3/DVEBMGS54/work
执行 `ps -aux`, 即可在 ABAP 里, 打印当前操作系统的进程明细:
关于 CALL 的语法,可以查看 SAP 官方帮助[文档](CALL, System Function Call - ABAP Keyword Documentation)。
CALL 关键字一般用于 SAP 系统内部的实现,不能够将其用于 SAP ABAP 应用开发中去。CALL 会调用系统函数 cfunc,可以为 cfunc 指定包含函数名的数据对象,这个数据对象必须是一个 Flat 的 Character like 类型。
该函数必须在sapactab.h文件中输入。修改一个函数或创建一个新函数需要重新编译和链接ABAP内核。因此需要能够访问 C 源代码文件。
边栏推荐
- LeetCode #101. 对称二叉树
- WPF implements a MessageBox message prompt box with a mask
- LeetCode 1413.逐步求和得到正数的最小值
- 电解电容漏电流及均压
- 标准C语言学习总结14
- 基于STM32+铂电阻设计的测温仪
- Here comes the question: Can I successfully apply for 8G memory on a machine with 4GB physical memory?
- 香港服务器如何进行加密?
- 曲鸟全栈UI自动化教学(八):框架代码讲解和进一步优化
- LeetCode热题(11.合并两个有序链表)
猜你喜欢
随机推荐
Recommend a free 50-hour AI computing platform
Golang学习之路(五):Golang的函数
京东架构师呕心整理:jvm与性能调优有哪些核心技术知识点
redis库没法引入
索引index
发明时代,「幂集创新」事关你我
张朝阳对话俞敏洪:一边是手推物理公式,一边是古诗信手拈来
阿里云新增三大高性能计算解决方案,助力生命科学行业快速发展
Too much volume... Tencent was asked on the side that the memory was full, what would happen?
Double pointer - the role of char **, int **
获取url地址中问号后参数(即使是iframe也可以)
API调用,API传参,面向对接开发,你真的会写接口文档吗?
结构体变量的首地址获取注意事项
GRPC整体学习
Gumbel_Softmax 概要
用皮肤“听”音乐,网友戴上这款装备听音乐会:仿佛住在钢琴里
标准C语言学习总结14
MongoDB-查询中$all的用法介绍
西湖大学教授怎么看AI制药革命?|量子位智库圆桌实录
【概率论】正态分布的由来——从大一同学的视角出发