mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
Add exposure to workflow class attributes (#5603)
* Add exposure to workflow class attributes * Add constant seoc_state_implemented to abaplint * Also add seoc_state_implemented to ci/abaplint Co-authored-by: Marc Bernard <59966492+mbtools@users.noreply.github.com> Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
parent
c04f7b8d7f
commit
799334dfe2
|
@ -28,6 +28,7 @@
|
||||||
"seoc_exposure_private",
|
"seoc_exposure_private",
|
||||||
"seoc_exposure_protected",
|
"seoc_exposure_protected",
|
||||||
"seoc_exposure_public",
|
"seoc_exposure_public",
|
||||||
|
"seoc_state_implemented",
|
||||||
"seoc_version_active",
|
"seoc_version_active",
|
||||||
"seoc_version_inactive",
|
"seoc_version_inactive",
|
||||||
"seok_access_free",
|
"seok_access_free",
|
||||||
|
|
|
@ -41,6 +41,7 @@
|
||||||
"seoc_exposure_private",
|
"seoc_exposure_private",
|
||||||
"seoc_exposure_protected",
|
"seoc_exposure_protected",
|
||||||
"seoc_exposure_public",
|
"seoc_exposure_public",
|
||||||
|
"seoc_state_implemented",
|
||||||
"seoc_version_active",
|
"seoc_version_active",
|
||||||
"seoc_version_inactive",
|
"seoc_version_inactive",
|
||||||
"seok_access_free",
|
"seok_access_free",
|
||||||
|
|
|
@ -32,6 +32,8 @@ CLASS ZCL_ABAPGIT_OO_BASE IMPLEMENTATION.
|
||||||
INSERT INITIAL LINE INTO TABLE rt_vseoattrib ASSIGNING <ls_vseoattrib>.
|
INSERT INITIAL LINE INTO TABLE rt_vseoattrib ASSIGNING <ls_vseoattrib>.
|
||||||
MOVE-CORRESPONDING <ls_attribute> TO <ls_vseoattrib>.
|
MOVE-CORRESPONDING <ls_attribute> TO <ls_vseoattrib>.
|
||||||
<ls_vseoattrib>-clsname = iv_clsname.
|
<ls_vseoattrib>-clsname = iv_clsname.
|
||||||
|
<ls_vseoattrib>-state = seoc_state_implemented.
|
||||||
|
<ls_vseoattrib>-exposure = <ls_attribute>-exposure.
|
||||||
UNASSIGN <ls_vseoattrib>.
|
UNASSIGN <ls_vseoattrib>.
|
||||||
ENDLOOP.
|
ENDLOOP.
|
||||||
UNASSIGN <ls_attribute>.
|
UNASSIGN <ls_attribute>.
|
||||||
|
@ -134,7 +136,7 @@ CLASS ZCL_ABAPGIT_OO_BASE IMPLEMENTATION.
|
||||||
|
|
||||||
|
|
||||||
METHOD zif_abapgit_oo_object_fnc~read_attributes.
|
METHOD zif_abapgit_oo_object_fnc~read_attributes.
|
||||||
SELECT cmpname attbusobj attkeyfld
|
SELECT cmpname attbusobj attkeyfld exposure
|
||||||
FROM seocompodf
|
FROM seocompodf
|
||||||
INTO CORRESPONDING FIELDS OF TABLE rt_attributes
|
INTO CORRESPONDING FIELDS OF TABLE rt_attributes
|
||||||
WHERE clsname = iv_object_name
|
WHERE clsname = iv_object_name
|
||||||
|
|
|
@ -234,6 +234,7 @@ INTERFACE zif_abapgit_definitions
|
||||||
cmpname TYPE seocmpname,
|
cmpname TYPE seocmpname,
|
||||||
attkeyfld TYPE seokeyfld,
|
attkeyfld TYPE seokeyfld,
|
||||||
attbusobj TYPE seobusobj,
|
attbusobj TYPE seobusobj,
|
||||||
|
exposure TYPE seoexpose,
|
||||||
END OF ty_obj_attribute .
|
END OF ty_obj_attribute .
|
||||||
TYPES:
|
TYPES:
|
||||||
ty_obj_attribute_tt TYPE STANDARD TABLE OF ty_obj_attribute WITH DEFAULT KEY
|
ty_obj_attribute_tt TYPE STANDARD TABLE OF ty_obj_attribute WITH DEFAULT KEY
|
||||||
|
|
Loading…
Reference in New Issue
Block a user