abap--全局类信息读取的过程分析

ABAP类信息读取详解

最新推荐文章于 2024-12-13 08:48:48 发布

最新推荐文章于 2024-12-13 08:48:48 发布 · 134 阅读

本文详细介绍了如何使用ABAP编程语言中的特定函数来读取类及其父类、实现接口的所有相关信息。包括读取属性、方法、事件等组件的过程，并展示了如何处理继承关系和实现细节。

一、读取该类的所有信息
call function 'SEO_CLASS_TYPEINFO_GET'
* - get attributes
call function 'SEO_ATTRIBUTE_READ_ALL'
* get all attribute originals from db(seocompo/seoo_cmptype_attribute)
* fetch attribute definitions(seocompodf)
* fetch texts(seocompotx)
* care of attributes without description in modification language
* if not found logon language,return DE language
*extract aliases from attributes
*-Get Method
call function 'SEO_METHOD_READ_ALL'
* get all method originals from db(seocompo/seoo_cmptype_method)
* fetch method definitions(seocompodf)
* fetch texts(seocompotx)
* care of method without description in modification language
* if not found logon language,return DE language
*extract aliases from methods
*- Get Events
call function 'SEO_EVENT_READ_ALL'
* get all attribute originals from db(seocompo/seoo_cmptype_event)
* fetch event definitions(seocompodf)
* fetch texts(seocompotx)
* care of event without description in modification language
* if not found logon language,return DE language
*extract aliases from event
*- Get Events
call function 'SEO_EVENT_READ_ALL'
* get all attribute originals from db(seocompo/seoo_cmptype_event)
* fetch event definitions(seocompodf)
* fetch texts(seocompotx)
* care of event without description in modification language
* if not found logon language,return DE language
*extract aliases from event
=================================================
*- Get event and method's subcomponents
=================================================
*- Get Types
call function 'SEO_TYPE_READ_ALL'
* get all type originals from db(seocompo/seoo_cmptype_type)
* fetch type definitions(seocompodf)
* fetch texts(seocompotx)
* care of event without description in modification language
* if not found logon language,return DE language
*- Get parent class
call function 'SEO_INHERITANC_READ'
* get inheritance(iseometarel/seor_reltype_inheritance)
* fetch redefinitions(seoredef)
*- Get interface implementations
call function 'SEO_IMPLEMENTG_READ_ALL'
* get implementings(iseometarel/seor_reltype_implementing)
* fetch implementing detail(seoredef)
*- Get typegroup usages
call function 'SEO_TYPEPUSAGE_READ_ALL'
* get typegroup usages(seotypepls/seot_tputype_typepusage 0)
*- Get class deferreds
call function 'SEO_CLSDEFERRD_READ_ALL'
* get implementings(seotypepls/seot_tputype_classdeferred 1)
*- Get interface deferreds
call function 'SEO_INTDEFERRD_READ_ALL'
* get implementings(seotypepls/seot_tputype_interfacedeferred 2)
=================================================
* explore inheritance if requested
'SEO_CLASS_TYPEINFO_GET'
* explore interfaces if requested
call function 'SEO_INTERFACE_TYPEINFO_GET'
=================================================

二、读取该类的所有父类(abap是单类继承)的信息，并添加到相关数据内表
call method explore_relations
*Get Superclass and all implement interfaces's attribute(attribute,Method,event,types,implement.alias....)
* inherited components
call function 'SEO_CLASS_RESOLVE_INHERITANCE'
call function 'SEO_CLASS_INHERITANCE_PATH_GET'
loop
×取父类的所有信息
call function 'SEO_CLASS_TYPEINFO_GET'
×删除私有不可见的属性
delete atts where exposure = seoc_exposure_private.
delete mets where exposure = seoc_exposure_private.
delete mets where cmpname = seok_mtdname_constructor.
delete mets where cmpname = seok_mtdname_class_constructor.
delete mets where cmpname = seok_mtdname_destructor.
delete eves where exposure = seoc_exposure_private.
delete typs where exposure = seoc_exposure_private.
delete alis where exposure = seoc_exposure_private.
×将可见的属性添加合并到类信息内表
insert lines of:
atts into attributes index 1,
mets into methods index 1,
eves into events index 1,
typs into types index 1,
imps into implementings index 1,
alis into aliases index 1.
endloop.

三、读取该类所有实现类的信息，并添加到相关数据内表
* implemented interfaces
call function 'SEO_CLASS_RESOLVE_IMPLEMENTGS'
×取所有的实现接口
call function 'SEO_CLASS_TYPEINFO_GET'
exporting
clskey = clskey
version = version
state = state
importing
implementings = implems.
×循环提取所有的实现接口的信息
loop implems.
call function 'SEO_INTERFACE_TYPEINFO_GET'
×将可见的属性添加合并到类信息内表
insert lines of:
atts into attributes index 1,
mets into methods index 1,
eves into events index 1,
alis into aliases index 1,
pars into parameters index 1,
excs into exceps index 1.
endloop.