mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00

* Added empty settings page Also added it in the Advanced meun * Added Settings HTML structure * Provide settings persistence I put the unit tests in the persistence include rather than the unit test include * Triggering settings save on UI event * Plug-in the proxy settings into CL_HTTP_CLIENT Also, removed a break point... * abaplint fixes * abaplint fixes #2
45 lines
1.6 KiB
ABAP
45 lines
1.6 KiB
ABAP
*&---------------------------------------------------------------------*
|
|
*& Include ZABAPGIT_APP
|
|
*&---------------------------------------------------------------------*
|
|
|
|
CLASS lcl_gui DEFINITION DEFERRED.
|
|
CLASS lcl_persistence_user DEFINITION DEFERRED.
|
|
CLASS lcl_repo_srv DEFINITION DEFERRED.
|
|
CLASS lcl_persistence_db DEFINITION DEFERRED.
|
|
CLASS lcl_persistence_settings DEFINITION DEFERRED.
|
|
|
|
*----------------------------------------------------------------------*
|
|
* CLASS lcl_app DEFINITION
|
|
*----------------------------------------------------------------------*
|
|
CLASS lcl_app DEFINITION FINAL.
|
|
PUBLIC SECTION.
|
|
|
|
CLASS-METHODS run
|
|
RAISING lcx_exception.
|
|
|
|
CLASS-METHODS gui
|
|
RETURNING VALUE(ro_gui) TYPE REF TO lcl_gui
|
|
RAISING lcx_exception.
|
|
|
|
CLASS-METHODS user
|
|
IMPORTING iv_user TYPE xubname DEFAULT sy-uname
|
|
RETURNING VALUE(ro_user) TYPE REF TO lcl_persistence_user
|
|
RAISING lcx_exception.
|
|
|
|
CLASS-METHODS repo_srv
|
|
RETURNING VALUE(ro_repo_srv) TYPE REF TO lcl_repo_srv.
|
|
|
|
CLASS-METHODS db
|
|
RETURNING VALUE(ro_db) TYPE REF TO lcl_persistence_db.
|
|
|
|
CLASS-METHODS settings
|
|
RETURNING VALUE(ro_settings) TYPE REF TO lcl_persistence_settings.
|
|
|
|
PRIVATE SECTION.
|
|
CLASS-DATA: go_gui TYPE REF TO lcl_gui,
|
|
go_current_user TYPE REF TO lcl_persistence_user,
|
|
go_db TYPE REF TO lcl_persistence_db,
|
|
go_repo_srv TYPE REF TO lcl_repo_srv,
|
|
go_settings TYPE REF TO lcl_persistence_settings.
|
|
|
|
ENDCLASS. "lcl_app |