mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
Merge remote-tracking branch 'refs/remotes/larshp/master'
This commit is contained in:
commit
0c162dd6c1
|
@ -603,8 +603,9 @@ CLASS lcl_oo_base IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD lif_oo_object_fnc~read_descriptions.
|
METHOD lif_oo_object_fnc~read_descriptions.
|
||||||
SELECT * FROM seocompotx INTO TABLE rt_descriptions
|
SELECT * FROM seocompotx INTO TABLE rt_descriptions
|
||||||
WHERE clsname = iv_obejct_name. "#EC CI_SUBRC
|
WHERE clsname = iv_obejct_name
|
||||||
DELETE rt_descriptions WHERE descript IS INITIAL.
|
AND descript <> ''
|
||||||
|
ORDER BY PRIMARY KEY. "#EC CI_SUBRC
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_oo_object_fnc~delete.
|
METHOD lif_oo_object_fnc~delete.
|
||||||
|
|
|
@ -235,6 +235,8 @@ CLASS lcl_gui_page_stage IMPLEMENTATION.
|
||||||
CREATE OBJECT ro_html.
|
CREATE OBJECT ro_html.
|
||||||
|
|
||||||
lv_filename = is_file-path && is_file-filename.
|
lv_filename = is_file-path && is_file-filename.
|
||||||
|
* make sure whitespace is preserved in the DOM
|
||||||
|
REPLACE ALL OCCURRENCES OF ` ` IN lv_filename WITH ' '.
|
||||||
|
|
||||||
ro_html->add( |<tr class="{ iv_context }">| ).
|
ro_html->add( |<tr class="{ iv_context }">| ).
|
||||||
|
|
||||||
|
|
|
@ -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'
|
||||||
|
|
Loading…
Reference in New Issue
Block a user