当前位置:网站首页>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 源代码文件。
边栏推荐
- 太卷了... 腾讯一面被问到内存满了,会发生什么?
- TIC2000系列处理器在线升级
- Senior told me that the giant MySQL is through SSH connection
- WeChat Mini Program Payment and Refund Overall Process
- redis库没法引入
- Web console control edit box
- 字节秋招二面把我干懵了,问我SYN报文什么情况下会被丢弃?
- Nature:猪死亡1小时后,器官再次运转
- 基于STM32+铂电阻设计的测温仪
- Information system project managers must memorize the core test sites (63) The main process of project portfolio management & DIPP analysis
猜你喜欢
字节秋招二面把我干懵了,问我SYN报文什么情况下会被丢弃?
web课程设计
国产抗新冠口服药每瓶不超300元/ 我国IPv6网络全面建成/ 谷歌入局折叠屏手机...今日更多新鲜事在此...
proto3-2语法
MongoDB-查询中$all的用法介绍
matlab simulink的scope 示波器光标如何移动记录
腾讯欲成育碧最大股东/ 米哈游招NLP内容生成研究员/ AI发现四千余物种濒临灭绝...今日更多新鲜事在此...
The grep command Shell regular expressions, the three musketeers
HAproxy:负载均衡
【小程序】低代码+小游戏=小游戏可视化开发
随机推荐
Reading and writing after separation, performance were up 100%
罗振宇折戟创业板/ B站回应HR称用户是Loser/ 腾讯罗技年内合推云游戏掌机...今日更多新鲜事在此...
buck型三相PFC
WPF implements a MessageBox message prompt box with a mask
曲鸟全栈UI自动化教学(八):框架代码讲解和进一步优化
智驾科技完成C1轮融资,此前2轮已融4.5亿元
[Interview high-frequency questions] Linked list high-frequency questions that can be gradually optimized
[Essence] Analysis of the special case of C language structure: structure pointer / basic data type pointer, pointing to other structures
The grep command Shell regular expressions, the three musketeers
标准C语言学习总结14
Visual Studio 2017 ASP.NET Framework MVC 项目 MySQL 配置连接
二重指针-char **、int **的作用
Win10调整磁盘存储空间详解
Apexsqlrecover无法连接数据库
【Data augmentation in NLP】——1
在北极都可以穿短袖了,温度飙升至32.5℃
阿里云新增三大高性能计算解决方案,助力生命科学行业快速发展
问题来了:4GB物理内存的机器上申请8G内存能成功吗?
【VQA survey】视觉问答中的语言学问题
LeetCode #101. 对称二叉树