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

changes_only at user profile #280

Browse Source
This commit is contained in:
sbcgua 2016-10-14 10:35:24 +02:00
parent 43da32bb1a
commit ee6eaad06f
2 changed files with 43 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
src/zabapgit_persistence.prog.abap
View File

@ -411,6 +411,14 @@ CLASS lcl_persistence_user DEFINITION FINAL CREATE PRIVATE FRIENDS lcl_app.
RETURNING VALUE(rv_hide) TYPE abap_bool RETURNING VALUE(rv_hide) TYPE abap_bool
RAISING lcx_exception. RAISING lcx_exception.
METHODS toggle_changes_only
RETURNING VALUE(rv_changes_only) TYPE abap_bool
RAISING lcx_exception.
METHODS get_changes_only
RETURNING VALUE(rv_changes_only) TYPE abap_bool
RAISING lcx_exception.
PRIVATE SECTION. PRIVATE SECTION.
CONSTANTS c_type_user TYPE lcl_persistence_db=>ty_type VALUE 'USER'. CONSTANTS c_type_user TYPE lcl_persistence_db=>ty_type VALUE 'USER'.
@ -434,6 +442,7 @@ CLASS lcl_persistence_user DEFINITION FINAL CREATE PRIVATE FRIENDS lcl_app.
repo_show TYPE lcl_persistence_repo=>ty_repo-key, repo_show TYPE lcl_persistence_repo=>ty_repo-key,
repo_config TYPE ty_repo_config_tt, repo_config TYPE ty_repo_config_tt,
hide_files TYPE abap_bool, hide_files TYPE abap_bool,
changes_only TYPE abap_bool,
END OF ty_user. END OF ty_user.
METHODS constructor METHODS constructor
@ -659,6 +668,25 @@ CLASS lcl_persistence_user IMPLEMENTATION.
ENDMETHOD. "get_hide_files ENDMETHOD. "get_hide_files
METHOD toggle_changes_only.
DATA ls_user TYPE ty_user.
ls_user = read( ).
ls_user-changes_only = boolc( ls_user-changes_only = abap_false ).
update( ls_user ).
rv_changes_only = ls_user-changes_only.
ENDMETHOD. "toggle_changes_only
METHOD get_changes_only.
rv_changes_only = read( )-changes_only.
ENDMETHOD. "get_changes_only
ENDCLASS. ENDCLASS.
CLASS lcl_persistence_db IMPLEMENTATION. CLASS lcl_persistence_db IMPLEMENTATION.

3
src/zabapgit_view_repo.prog.abap
View File

@ -283,6 +283,7 @@ CLASS lcl_gui_view_repo_content IMPLEMENTATION.
mo_repo ?= io_repo. mo_repo ?= io_repo.
mv_cur_dir = '/'. " Root mv_cur_dir = '/'. " Root
mv_hide_files = lcl_app=>user( )->get_hide_files( ). mv_hide_files = lcl_app=>user( )->get_hide_files( ).
mv_changes_only = lcl_app=>user( )->get_changes_only( ).
ENDMETHOD. "constructor ENDMETHOD. "constructor
@ -303,7 +304,7 @@ CLASS lcl_gui_view_repo_content IMPLEMENTATION.
mv_cur_dir = '/'. " Root mv_cur_dir = '/'. " Root
ev_state = gc_event_state-re_render. ev_state = gc_event_state-re_render.
WHEN c_actions-toggle_changes. " Toggle changes only view WHEN c_actions-toggle_changes. " Toggle changes only view
mv_changes_only = boolc( mv_changes_only <> abap_true ). mv_changes_only = lcl_app=>user( )->toggle_changes_only( ).
ev_state = gc_event_state-re_render. ev_state = gc_event_state-re_render.
ENDCASE. ENDCASE.