refactor select TDEVCT

This commit is contained in:
Lars Hvam 2025-04-07 16:32:44 +02:00
parent 51d115a1c1
commit 13341e308e

View File

@ -390,10 +390,23 @@ CLASS zcl_abapgit_sap_package IMPLEMENTATION.
METHOD zif_abapgit_sap_package~read_description.
DATA li_package TYPE REF TO if_package.
SELECT SINGLE ctext FROM tdevct INTO rv_description
WHERE devclass = mv_package AND spras = sy-langu ##SUBRC_OK.
cl_package_factory=>load_package(
EXPORTING
i_package_name = mv_package
i_force_reload = abap_true
IMPORTING
e_package = li_package
EXCEPTIONS
object_not_existing = 1
unexpected_error = 2
intern_err = 3
no_access = 4
object_locked_and_modified = 5
OTHERS = 6 ).
rv_description = li_package->short_text.
ENDMETHOD.