我尝试使用 cl_ci_objectset 类来引用一组对象以在之后运行检查:
data: lr_ci_objectset type ref to cl_ci_objectset.
CALL METHOD cl_ci_objectset=>get_ref
EXPORTING
P_OBJSNAM = 'ZTEST'
RECEIVING
p_ref = lr_ci_objectset
EXCEPTIONS
... exception list ...
IF sy-subrc <> 0.
MESSAGE i005(zsci).
* Fehler beim Ermitteln der Objektmenge
RAISE cancel.
ENDIF.
* Prüfen, ob es überhaupt Objekte in der SCI Objektmenge gibt
IF lr_ci_objectset->iobjlst-objects[] IS INITIAL.
write 'Object Menge leer'.
* in diesem Fall kann auch nichts geprüft werden
RETURN.
ENDIF.
write 'Object Menge nicht leer'.
集合“ZTEST”作为公共对象集合存在于系统中。
经过更多测试,我找到了解决方案。
IF lr_ci_objectset->iobjlst-objects[] IS INITIAL.
是 objset 的错误数组,因此被使用。
IF lr_ci_objectset->OBJECTSINF IS INITIAL.
是功能性的。