mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 04:08:27 +08:00
fix sorting on HANA dbs
This commit is contained in:
parent
809acd5dbd
commit
350bd6dc35
|
@ -3,7 +3,7 @@ REPORT zabapgit.
|
||||||
* See https://github.com/larshp/abapGit/
|
* See https://github.com/larshp/abapGit/
|
||||||
|
|
||||||
CONSTANTS: gc_xml_version TYPE string VALUE 'v0.2-alpha', "#EC NOTEXT
|
CONSTANTS: gc_xml_version TYPE string VALUE 'v0.2-alpha', "#EC NOTEXT
|
||||||
gc_abap_version TYPE string VALUE 'v0.44'. "#EC NOTEXT
|
gc_abap_version TYPE string VALUE 'v0.45'. "#EC NOTEXT
|
||||||
|
|
||||||
********************************************************************************
|
********************************************************************************
|
||||||
* The MIT License (MIT)
|
* The MIT License (MIT)
|
||||||
|
@ -193,7 +193,8 @@ CLASS lcl_tadir IMPLEMENTATION.
|
||||||
|
|
||||||
SELECT * FROM tadir INTO TABLE rt_tadir
|
SELECT * FROM tadir INTO TABLE rt_tadir
|
||||||
WHERE devclass = iv_package
|
WHERE devclass = iv_package
|
||||||
AND object <> 'DEVC'. "#EC CI_GENBUFF "#EC CI_SUBRC
|
AND object <> 'DEVC'
|
||||||
|
ORDER BY PRIMARY KEY. "#EC CI_GENBUFF "#EC CI_SUBRC
|
||||||
|
|
||||||
LOOP AT rt_tadir ASSIGNING <ls_tadir> WHERE object = 'SICF'.
|
LOOP AT rt_tadir ASSIGNING <ls_tadir> WHERE object = 'SICF'.
|
||||||
<ls_tadir>-obj_name = <ls_tadir>-obj_name(15).
|
<ls_tadir>-obj_name = <ls_tadir>-obj_name(15).
|
||||||
|
|
Loading…
Reference in New Issue
Block a user