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

bugfix, new pull page: decide package warnings (#6932)

Browse Source
This commit is contained in:
Lars Hvam 2024-05-21 17:46:36 +02:00 committed by GitHub
parent 01544d86c6
commit 667ac8966a
No known key found for this signature in database
GPG Key ID: B5690EEEBB952194
1 changed files with 42 additions and 25 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

67
src/ui/pages/zcl_abapgit_gui_page_pull.clas.abap
View File

@ -43,22 +43,22 @@ CLASS zcl_abapgit_gui_page_pull DEFINITION
PRIVATE SECTION.
DATA mo_repo TYPE REF TO zcl_abapgit_repo.
DATA mi_obj_filter TYPE REF TO zif_abapgit_object_filter.
DATA mo_form_data TYPE REF TO zcl_abapgit_string_map.
DATA ms_checks TYPE zif_abapgit_definitions=>ty_deserialize_checks.
DATA mo_repo TYPE REF TO zcl_abapgit_repo .
DATA mi_obj_filter TYPE REF TO zif_abapgit_object_filter .
DATA mo_form_data TYPE REF TO zcl_abapgit_string_map .
DATA ms_checks TYPE zif_abapgit_definitions=>ty_deserialize_checks .
METHODS pull
RAISING
zcx_abapgit_exception .
METHODS form
RETURNING
VALUE(ro_form) TYPE REF TO zcl_abapgit_html_form
RAISING
zcx_abapgit_exception.
zcx_abapgit_exception .
METHODS choose_transport_request
RAISING
zcx_abapgit_exception .
ENDCLASS.
@ -163,11 +163,43 @@ CLASS ZCL_ABAPGIT_GUI_PAGE_PULL IMPLEMENTATION.
ENDMETHOD.
METHOD zif_abapgit_gui_event_handler~on_event.
METHOD pull.
DATA lv_value TYPE string.
FIELD-SYMBOLS <ls_overwrite> LIKE LINE OF ms_checks-overwrite.
FIELD-SYMBOLS <ls_warning> LIKE LINE OF ms_checks-warning_package.
ms_checks-transport-transport = mo_form_data->get( c_id-transport_request ).
LOOP AT ms_checks-overwrite ASSIGNING <ls_overwrite>.
lv_value = mo_form_data->get( |{ <ls_overwrite>-obj_type }-{ <ls_overwrite>-obj_name }| ).
IF lv_value = 'on'.
<ls_overwrite>-decision = zif_abapgit_definitions=>c_yes.
ELSE.
<ls_overwrite>-decision = zif_abapgit_definitions=>c_no.
ENDIF.
ENDLOOP.
LOOP AT ms_checks-warning_package ASSIGNING <ls_warning>.
lv_value = mo_form_data->get( |{ <ls_warning>-obj_type }-{ <ls_warning>-obj_name }| ).
IF lv_value = 'on'.
<ls_warning>-decision = zif_abapgit_definitions=>c_yes.
ELSE.
<ls_warning>-decision = zif_abapgit_definitions=>c_no.
ENDIF.
ENDLOOP.
* todo, show log?
zcl_abapgit_services_repo=>real_deserialize(
is_checks = ms_checks
io_repo = mo_repo ).
ENDMETHOD.
METHOD zif_abapgit_gui_event_handler~on_event.
mo_form_data->merge( ii_event->form_data( ) ).
@ -179,22 +211,7 @@ CLASS ZCL_ABAPGIT_GUI_PAGE_PULL IMPLEMENTATION.
choose_transport_request( ).
rs_handled-state = zcl_abapgit_gui=>c_event_state-re_render.
WHEN c_action-pull.
ms_checks-transport-transport = mo_form_data->get( c_id-transport_request ).
LOOP AT ms_checks-overwrite ASSIGNING <ls_overwrite>.
lv_value = mo_form_data->get( |{ <ls_overwrite>-obj_type }-{ <ls_overwrite>-obj_name }| ).
IF lv_value = 'on'.
<ls_overwrite>-decision = zif_abapgit_definitions=>c_yes.
ELSE.
<ls_overwrite>-decision = zif_abapgit_definitions=>c_no.
ENDIF.
ENDLOOP.
* todo, show log?
zcl_abapgit_services_repo=>real_deserialize(
is_checks = ms_checks
io_repo = mo_repo ).
pull( ).
rs_handled-state = zcl_abapgit_gui=>c_event_state-go_back.
ENDCASE.