From b1e35d75b0ba2a2f073cc517a1159f9148d7ab1f Mon Sep 17 00:00:00 2001 From: larshp Date: Sat, 3 Dec 2016 10:32:58 +0000 Subject: [PATCH] WDYN: additional sorting --- src/zabapgit.prog.abap | 2 +- src/zabapgit_object_wdyn.prog.abap | 19 +++++++++++++++++-- 2 files changed, 18 insertions(+), 3 deletions(-) diff --git a/src/zabapgit.prog.abap b/src/zabapgit.prog.abap index 022c2e831..238ed1a05 100644 --- a/src/zabapgit.prog.abap +++ b/src/zabapgit.prog.abap @@ -3,7 +3,7 @@ REPORT zabapgit LINE-SIZE 100. * See http://www.abapgit.org CONSTANTS: gc_xml_version TYPE string VALUE 'v1.0.0', "#EC NOTEXT - gc_abap_version TYPE string VALUE 'v1.24.0'. "#EC NOTEXT + gc_abap_version TYPE string VALUE 'v1.24.1'. "#EC NOTEXT ******************************************************************************** * The MIT License (MIT) diff --git a/src/zabapgit_object_wdyn.prog.abap b/src/zabapgit_object_wdyn.prog.abap index 5f9763e4c..41e34d645 100644 --- a/src/zabapgit_object_wdyn.prog.abap +++ b/src/zabapgit_object_wdyn.prog.abap @@ -522,8 +522,8 @@ CLASS lcl_object_wdyn IMPLEMENTATION. ls_component_key TYPE wdy_md_component_key, ls_view_key TYPE wdy_md_view_key. - FIELD-SYMBOLS: LIKE LINE OF lt_objects. - + FIELD-SYMBOLS: LIKE LINE OF lt_objects, + LIKE LINE OF rs_component-ctlr_metadata. CLEAR mt_components. CLEAR mt_sources. @@ -550,6 +550,21 @@ CLASS lcl_object_wdyn IMPLEMENTATION. definition-component_name ASCENDING definition-controller_name ASCENDING. + LOOP AT rs_component-ctlr_metadata ASSIGNING . + SORT -descriptions. + SORT -controller_usages. + SORT -controller_components. + SORT -controller_component_texts. + SORT -controller_parameters. + SORT -controller_parameter_texts. + SORT -context_nodes. + SORT -context_attributes. + SORT -context_mappings. + SORT -fieldgroups. + SORT -controller_exceptions. + SORT -controller_exception_texts. + ENDLOOP. + SORT mt_components BY component_name ASCENDING controller_name ASCENDING