SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 04:08:27 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Always use active version for DOCU CL (#5201)

Browse Source 
* Always use active version for DOCU CL

* CLAS/INTF delete documentation on pull

Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Fabian Lupa 2021-12-14 06:36:00 +01:00 committed by GitHub
parent 5bcdbce3b8
commit dc51247e9b
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 46 additions and 16 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

42
src/objects/oo/zcl_abapgit_oo_base.clas.abap
View File

@ -14,8 +14,9 @@ CLASS zcl_abapgit_oo_base DEFINITION
RETURNING VALUE(rt_vseoattrib) TYPE seoo_attributes_r.
PRIVATE SECTION.
CONSTANTS c_docu_state_active TYPE dokstate VALUE 'A'. " See include SDOC_CONSTANTS
DATA mv_skip_test_classes TYPE abap_bool .
ENDCLASS.
@ -54,6 +55,7 @@ CLASS zcl_abapgit_oo_base IMPLEMENTATION.
langu = iv_language
object = iv_object_name
no_masterlang = iv_no_masterlang
state = c_docu_state_active
TABLES
line = it_lines
EXCEPTIONS
@ -64,6 +66,21 @@ CLASS zcl_abapgit_oo_base IMPLEMENTATION.
ENDIF.
ENDMETHOD.
METHOD zif_abapgit_oo_object_fnc~delete_documentation.
CALL FUNCTION 'DOCU_DEL'
EXPORTING
id = 'CL'
langu = iv_language
object = iv_object_name
typ = 'E'
EXCEPTIONS
ret_code = 1
OTHERS = 2.
IF sy-subrc <> 0.
zcx_abapgit_exception=>raise( 'Error from DOCU_DEL' ).
ENDIF.
ENDMETHOD.
METHOD zif_abapgit_oo_object_fnc~create_sotr.
ASSERT 0 = 1. "Subclass responsibility
@ -153,20 +170,21 @@ CLASS zcl_abapgit_oo_base IMPLEMENTATION.
CALL FUNCTION 'DOCU_GET'
EXPORTING
id = 'CL'
langu = iv_language
object = lv_object
id = 'CL'
langu = iv_language
object = lv_object
version_active_or_last = space " retrieve active version
IMPORTING
dokstate = lv_state
dokstate = lv_state
TABLES
line = lt_lines
line = lt_lines
EXCEPTIONS
no_docu_on_screen = 1
no_docu_self_def = 2
no_docu_temp = 3
ret_code = 4
OTHERS = 5.
IF sy-subrc = 0 AND lv_state = 'R'.
no_docu_on_screen = 1
no_docu_self_def = 2
no_docu_temp = 3
ret_code = 4
OTHERS = 5.
IF sy-subrc = 0 AND lv_state = c_docu_state_active.
rt_lines = lt_lines.
ELSE.
CLEAR rt_lines.

6
src/objects/oo/zif_abapgit_oo_object_fnc.intf.abap
View File

@ -74,6 +74,12 @@ INTERFACE zif_abapgit_oo_object_fnc PUBLIC.
iv_no_masterlang TYPE abap_bool OPTIONAL
RAISING
zcx_abapgit_exception,
delete_documentation
IMPORTING
iv_object_name TYPE dokhl-object
iv_language TYPE spras
RAISING
zcx_abapgit_exception,
get_includes
IMPORTING
iv_object_name TYPE sobj_name

7
src/objects/zcl_abapgit_object_clas.clas.abap
View File

@ -188,12 +188,15 @@ CLASS zcl_abapgit_object_clas IMPLEMENTATION.
ii_xml->read( EXPORTING iv_name = 'LINES'
CHANGING cg_data = lt_lines ).
lv_object = ms_item-obj_name.
IF lines( lt_lines ) = 0.
mi_object_oriented_object_fct->delete_documentation(
iv_object_name = lv_object
iv_language = mv_language ).
RETURN.
ENDIF.
lv_object = ms_item-obj_name.
mi_object_oriented_object_fct->create_documentation(
it_lines = lt_lines
iv_object_name = lv_object

7
src/objects/zcl_abapgit_object_intf.clas.abap
View File

@ -87,12 +87,15 @@ CLASS zcl_abapgit_object_intf IMPLEMENTATION.
ii_xml->read( EXPORTING iv_name = 'LINES'
CHANGING cg_data = lt_lines ).
lv_object = ms_item-obj_name.
IF lines( lt_lines ) = 0.
mi_object_oriented_object_fct->delete_documentation(
iv_object_name = lv_object
iv_language = mv_language ).
RETURN.
ENDIF.
lv_object = ms_item-obj_name.
mi_object_oriented_object_fct->create_documentation(
it_lines = lt_lines
iv_object_name = lv_object