SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 12:20:51 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

change table recursion to method recursion #959

Browse Source
This commit is contained in:
larshp 2017-10-08 06:56:40 +00:00
parent bcb5a52abb
commit 35dcb801e7
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/zcl_abapgit_syntax_check.clas.abap
View File

@ -71,8 +71,7 @@ CLASS ZCL_ABAPGIT_SYNTAX_CHECK IMPLEMENTATION.
METHOD create_objectset. METHOD create_objectset.
DATA: lt_objs TYPE scit_objs, DATA: lt_objs TYPE scit_objs,
lt_packages TYPE ty_tdevc_tt, lt_packages TYPE ty_tdevc_tt.
ls_obj LIKE LINE OF lt_objs.
lt_packages = find_all_subpackages( iv_package ). lt_packages = find_all_subpackages( iv_package ).
@ -129,16 +128,21 @@ CLASS ZCL_ABAPGIT_SYNTAX_CHECK IMPLEMENTATION.
* TODO, in the future, move this method to the ABAPGIT global package class * TODO, in the future, move this method to the ABAPGIT global package class
DATA: ls_package LIKE LINE OF rt_packages. DATA: ls_package LIKE LINE OF rt_packages,
lt_found LIKE rt_packages,
lt_sub LIKE rt_packages.
SELECT SINGLE * FROM tdevc INTO ls_package WHERE devclass = iv_package. SELECT SINGLE * FROM tdevc INTO ls_package WHERE devclass = iv_package.
ASSERT sy-subrc = 0. ASSERT sy-subrc = 0.
APPEND ls_package TO rt_packages. APPEND ls_package TO rt_packages.
LOOP AT rt_packages INTO ls_package. SELECT * FROM tdevc APPENDING TABLE lt_sub
SELECT * FROM tdevc APPENDING TABLE rt_packages WHERE parentcl = ls_package-devclass.
WHERE parentcl = ls_package-devclass.
LOOP AT lt_sub INTO ls_package.
lt_found = find_all_subpackages( ls_package-devclass ).
APPEND LINES OF lt_found TO rt_packages.
ENDLOOP. ENDLOOP.
ENDMETHOD. ENDMETHOD.