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

SUSH - raise error if not supported (#4521)

Browse Source
This commit is contained in:
Christian Günter 2021-02-17 06:37:31 +01:00 committed by GitHub
parent f7de72c2aa
commit 5d1aaa4eba
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 25 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

26
src/objects/zcl_abapgit_object_sush.clas.abap
View File

@ -10,6 +10,13 @@ CLASS zcl_abapgit_object_sush DEFINITION
ALIASES mo_files
FOR zif_abapgit_object~mo_files .
METHODS constructor
IMPORTING
is_item TYPE zif_abapgit_definitions=>ty_item
iv_language TYPE spras
RAISING
zcx_abapgit_exception.
PROTECTED SECTION.
PRIVATE SECTION.
@ -17,7 +24,24 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_OBJECT_SUSH IMPLEMENTATION.
CLASS zcl_abapgit_object_sush IMPLEMENTATION.
METHOD constructor.
DATA: lr_data_head TYPE REF TO data.
super->constructor(
is_item = is_item
iv_language = iv_language ).
TRY.
CREATE DATA lr_data_head TYPE ('IF_SU22_ADT_OBJECT=>TS_SU2X_HEAD').
CATCH cx_sy_create_data_error.
zcx_abapgit_exception=>raise( |SUSH is not supported in your release| ).
ENDTRY.
ENDMETHOD.
METHOD zif_abapgit_object~changed_by.