ABAP实现的在Linux里操作shell的报表
发布日期:2021-06-30 14:05:55
浏览次数:3
分类:技术文章
本文共 1823 字,大约阅读时间需要 6 分钟。
*&---------------------------------------------------------------------**& Report ZFUN*&*&---------------------------------------------------------------------**&*&*&---------------------------------------------------------------------*REPORT ZFUN.PARAMETERS: command TYPE string LOWER CASE.DATA: commtext(120) , itab(255) OCCURS 10 WITH HEADER LINE.commtext = command.CALL 'SYSTEM' ID 'COMMAND' FIELD commtext ID 'TAB' FIELD itab[].LOOP AT itab. WRITE itab.ENDLOOP.* enhanced 2017-12-7*&---------------------------------------------------------------------**& Report ZLINUX*&---------------------------------------------------------------------**&*&---------------------------------------------------------------------*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(). FIND REGEX '^.*\.c|^.*\.cpp|^.*\.h' IN . IF sy-subrc = 0. WRITE: / COLOR COL_NEGATIVE. DATA(lv_line) = CONV char255( ). HIDE lv_line. ELSE. WRITE: / . 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.
要获取更多Jerry的原创文章,请关注公众号"汪子熙":
转载地址:https://jerry.blog.csdn.net/article/details/103967085 如侵犯您的版权,请留言回复原文章的地址,我们会给您删除此文章,给您带来不便请您谅解!
发表评论
最新留言
路过,博主的博客真漂亮。。
[***.116.15.85]2024年04月14日 00时22分38秒
关于作者
喝酒易醉,品茶养心,人生如梦,品茶悟道,何以解忧?唯有杜康!
-- 愿君每日到此一游!
推荐文章
Maven引入oracle驱动问题
2019-05-01
windows无法找到发送到桌面快捷方式
2019-05-01
redhat-vim文本编辑
2019-05-01
linux-文件挂载
2019-05-01
scala与java之间的集合类型转换
2019-05-01
Vue 3中令人激动的新功能:Fragment+Suspense+多v-model
2019-05-01
浅析Vuex及相关面试题答案
2019-05-01
Vue 3.0 中令人激动的新功能:Portals+新的自定义指令API
2019-05-01
requestAnimationFrame详解以及无线页面优化
2019-05-01
python2.6.x/python3发送邮件,并在正文中显示附件中的图片
2019-05-01
Dubbo服务治理向SpringCloud服务治理兼容,过渡
2019-05-01
JAVA使用HBase的Rowkey精确批量处理
2019-05-01
Collections排序sort排序list,单个及多条件排序
2019-05-01
Mysql中where 条件中加 if 判断-纯jdbc
2019-05-01
分布式数据中间件TDDL、Amoeba、Cobar、MyCAT架构比较
2019-05-01
Sharding-JDBC的SQL引擎(Druid)处理的支持情况总结
2019-05-01
Apache Kafka:优化部署的 10 种最佳实践
2019-05-01
HBase 中加盐之后的表如何读取:Spark 篇
2019-05-01