用ABAP代码调用Netweaver里的where used list功能
2023-09-14 09:02:49 时间
REPORT Z_DEV_ENV_DEMO.
INCLUDE Z_DEV_CROSS_REF1.
PARAMETERS : p_pgmid TYPE e071-pgmid DEFAULT 'R3TR',
p_object TYPE e071-object DEFAULT 'PROG',
p_objnam TYPE e071-obj_name DEFAULT 'BCALV_EDIT_08',
p_regen AS CHECKBOX DEFAULT 'X'.
START-OF-SELECTION.
IF p_object = 'PROG' AND p_regen = 'X'.
SUBMIT saprseui
WITH repname = p_objnam
AND RETURN.
ENDIF.
DATA ls_object TYPE lcl_dev_cross_ref=>type_s_e071_objkey.
DATA lt_subobject TYPE lcl_dev_cross_ref=>type_t_e071_key.
FIELD-SYMBOLS <ls_subobject> TYPE lcl_dev_cross_ref=>type_s_e071_objkey.
DATA lt_e071_key TYPE lcl_dev_cross_ref=>type_t_e071_rel.
FIELD-SYMBOLS <ls_e071_key> TYPE lcl_dev_cross_ref=>type_s_e071_rel.
ls_object-pgmid = p_pgmid.
ls_object-object = p_object.
ls_object-obj_name = p_objnam.
* List of subobjects of the requested object
CALL METHOD lcl_dev_cross_ref=>get_subobj
EXPORTING
is_object = ls_object
IMPORTING
et_subobject = lt_subobject.
LOOP AT lt_subobject ASSIGNING <ls_subobject>.
WRITE : / <ls_subobject>-pgmid, <ls_subobject>-object, <ls_subobject>-obj_name.
ENDLOOP.
ULINE.
* List of objects used by the requested object
CALL METHOD lcl_dev_cross_ref=>get_reqobj
EXPORTING
is_e071_key = ls_object
IMPORTING
et_e071_key = lt_e071_key.
LOOP AT lt_e071_key ASSIGNING <ls_e071_key>.
WRITE : / <ls_e071_key>-subobject-pgmid, <ls_e071_key>-subobject-object,
<ls_e071_key>-subobject-obj_name.
ENDLOOP.
要获取更多Jerry的原创文章,请关注公众号"汪子熙":
相关文章
- Java list转为object_List集合转JSONObject
- 把list转为JSON字符串
- java list 转json 字符串_JSON的String字符串与Java的List列表对象的相互转换
- Python中list转成Json字符串
- java list 转json 字符串_Java之JSON字符串与List集合之间相互转换
- java分页计算公式_java将list分页
- List<类型1>转成List<类型2>的LIst类型转换工具类
- List集合
- 如何将 bapi_xbp_job_spoollist_read_20 的 TABLES 参数 SPOOL_LIST 本地导出成 Excel
- 【Flutter】ListView 列表 ( List 集合的 map 方法说明 | 垂直列表 | 水平列表 | 代码示例 )
- list的实现
- ORA-24101: stopped processing the argument list at: string ORACLE 报错 故障修复 远程处理
- ORA-32483: duplicate name found in sort specification list for SEARCH clause of WITH clause ORACLE 报错 故障修复 远程处理
- Python list列表详解
- 深入浅出 Redis List 查询(redislist查询)
- Redis实现List分页技术研究(redis的list分页)
- Redis 轻松存储列表数据:使用 Redis 保存 List 的方法(redis保存list)
- 中一部分元素用Redis快速获取List元素(redis获取list)
- 使用Redis在List中存储数据(redis存入list)
- Mysql实现List存储的技巧(mysql存储list)
- 利用Redis List对象提升系统性能(redis list对象)
- Oracle中使用List命令查看表结构(list命令oracle)
- 精选Oracle数据库的清单分析(list oracle)
- 简单快速修改Redis List技巧(修改redis的list)
- Redis中List与Set的应用(redis集合与list)
- 使用Redis轻松获取List元素(redis 返回list)
- Redis自带数据结构List(redis自带list)
- List转换成DataSet实现代码
- Json数据转换list对象实现思路及代码
- C#中实现任意List的全组合算法代码
- c#list部分操作实现代码
- 使用XmlSerializer序列化List对象成XML格式(list对象序列化)
- C#Datagridview绑定List方法代码