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

fix #806

Browse Source
This commit is contained in:
larshp 2017-07-04 17:03:14 +00:00
parent 5e4e1c08e3
commit 72836670b9
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/zabapgit_tadir.prog.abap
View File

@ -126,9 +126,9 @@ CLASS lcl_tadir IMPLEMENTATION.
METHOD build. METHOD build.
DATA: lt_tadir TYPE lif_defs=>ty_tadir_tt, DATA: lt_tadir TYPE lif_defs=>ty_tadir_tt,
lt_tdevc TYPE STANDARD TABLE OF tdevc, lt_tdevc TYPE STANDARD TABLE OF tdevc,
lv_path TYPE string. lv_path TYPE string.
FIELD-SYMBOLS: <ls_tdevc> LIKE LINE OF lt_tdevc, FIELD-SYMBOLS: <ls_tdevc> LIKE LINE OF lt_tdevc,
<ls_tadir> LIKE LINE OF rt_tadir. <ls_tadir> LIKE LINE OF rt_tadir.
@ -137,6 +137,7 @@ CLASS lcl_tadir IMPLEMENTATION.
SELECT * FROM tadir SELECT * FROM tadir
INTO CORRESPONDING FIELDS OF TABLE rt_tadir INTO CORRESPONDING FIELDS OF TABLE rt_tadir
WHERE devclass = iv_package WHERE devclass = iv_package
AND pgmid = 'R3TR'
AND object <> 'DEVC' AND object <> 'DEVC'
AND object <> 'SOTR' AND object <> 'SOTR'
AND object <> 'SFB1' AND object <> 'SFB1'