mirror of
https://github.com/abapGit/abapGit.git
synced 2025-04-30 20:03:20 +08:00
fix for SICF objects, close #121
This commit is contained in:
parent
e77e163c4b
commit
9963d9000b
|
@ -3,7 +3,7 @@ REPORT zabapgit.
|
|||
* See https://github.com/larshp/abapGit/
|
||||
|
||||
CONSTANTS: gc_xml_version TYPE string VALUE 'v0.2-alpha', "#EC NOTEXT
|
||||
gc_abap_version TYPE string VALUE 'v0.78'. "#EC NOTEXT
|
||||
gc_abap_version TYPE string VALUE 'v0.79'. "#EC NOTEXT
|
||||
|
||||
********************************************************************************
|
||||
* The MIT License (MIT)
|
||||
|
@ -232,10 +232,16 @@ CLASS lcl_tadir IMPLEMENTATION.
|
|||
|
||||
METHOD read_single.
|
||||
|
||||
DATA: lv_obj_name TYPE tadir-obj_name.
|
||||
|
||||
|
||||
* fix for SICF services
|
||||
CONCATENATE iv_obj_name '%' INTO lv_obj_name.
|
||||
|
||||
SELECT SINGLE * FROM tadir INTO rs_tadir
|
||||
WHERE pgmid = iv_pgmid
|
||||
AND object = iv_object
|
||||
AND obj_name = iv_obj_name. "#EC CI_SUBRC
|
||||
AND obj_name LIKE lv_obj_name. "#EC CI_SUBRC
|
||||
|
||||
ENDMETHOD.
|
||||
|
||||
|
|
Loading…
Reference in New Issue
Block a user