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 case

Browse Source
This commit is contained in:
masterrx 2017-10-25 21:49:13 +00:00
parent c305c44a0f
commit 17fa6ee03c
16 changed files with 86 additions and 86 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
src/zabapgit_exceptions.prog.abap
View File

@ -5,27 +5,27 @@
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* CLASS LCX_NOT_FOUND DEFINITION * CLASS LCX_NOT_FOUND DEFINITION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
CLASS ZCX_ABAPGIT_NOT_FOUND DEFINITION INHERITING FROM cx_static_check FINAL. CLASS zcx_abapgit_not_found DEFINITION INHERITING FROM cx_static_check FINAL.
ENDCLASS. "CX_LOCAL_EXCEPTION DEFINITION ENDCLASS. "CX_LOCAL_EXCEPTION DEFINITION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* CLASS LCX_NOT_FOUND IMPLEMENTATION * CLASS LCX_NOT_FOUND IMPLEMENTATION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
CLASS ZCX_ABAPGIT_NOT_FOUND IMPLEMENTATION. CLASS zcx_abapgit_not_found IMPLEMENTATION.
ENDCLASS. "ZCX_ABAPGIT_NOT_FOUND IMPLEMENTATION ENDCLASS. "zcx_abapgit_not_found IMPLEMENTATION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* CLASS LCX_CANCEL DEFINITION * CLASS LCX_CANCEL DEFINITION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
CLASS ZCX_ABAPGIT_CANCEL DEFINITION INHERITING FROM cx_static_check FINAL. CLASS zcx_abapgit_cancel DEFINITION INHERITING FROM cx_static_check FINAL.
ENDCLASS. "ZCX_ABAPGIT_CANCEL DEFINITION ENDCLASS. "zcx_abapgit_cancel DEFINITION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* CLASS LCX_CANCEL IMPLEMENTATION * CLASS LCX_CANCEL IMPLEMENTATION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
CLASS ZCX_ABAPGIT_CANCEL IMPLEMENTATION. CLASS zcx_abapgit_cancel IMPLEMENTATION.
ENDCLASS. "ZCX_ABAPGIT_CANCEL IMPLEMENTATION ENDCLASS. "zcx_abapgit_cancel IMPLEMENTATION

2
src/zabapgit_gui.prog.abap
View File

@ -136,7 +136,7 @@ CLASS lcl_gui IMPLEMENTATION.
CATCH zcx_abapgit_exception INTO lx_exception. CATCH zcx_abapgit_exception INTO lx_exception.
ROLLBACK WORK. ROLLBACK WORK.
MESSAGE lx_exception->text TYPE 'S' DISPLAY LIKE 'E'. MESSAGE lx_exception->text TYPE 'S' DISPLAY LIKE 'E'.
CATCH ZCX_ABAPGIT_CANCEL ##NO_HANDLER. CATCH zcx_abapgit_cancel ##NO_HANDLER.
" Do nothing = gc_event_state-no_more_act " Do nothing = gc_event_state-no_more_act
ENDTRY. ENDTRY.

6
src/zabapgit_gui_router.prog.abap
View File

@ -15,7 +15,7 @@ CLASS lcl_gui_router DEFINITION FINAL.
it_postdata TYPE cnht_post_data_tab OPTIONAL it_postdata TYPE cnht_post_data_tab OPTIONAL
EXPORTING ei_page TYPE REF TO lif_gui_page EXPORTING ei_page TYPE REF TO lif_gui_page
ev_state TYPE i ev_state TYPE i
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
PRIVATE SECTION. PRIVATE SECTION.
@ -53,7 +53,7 @@ CLASS lcl_gui_router DEFINITION FINAL.
METHODS get_page_playground METHODS get_page_playground
RETURNING VALUE(ri_page) TYPE REF TO lif_gui_page RETURNING VALUE(ri_page) TYPE REF TO lif_gui_page
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
ENDCLASS. ENDCLASS.
@ -371,7 +371,7 @@ CLASS lcl_gui_router IMPLEMENTATION.
lcl_popups=>run_page_class_popup( IMPORTING ev_name = lv_class_name lcl_popups=>run_page_class_popup( IMPORTING ev_name = lv_class_name
ev_cancel = lv_cancel ). ev_cancel = lv_cancel ).
IF lv_cancel = abap_true. IF lv_cancel = abap_true.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
TRY. TRY.

8
src/zabapgit_object_smim.prog.abap
View File

@ -30,7 +30,7 @@ CLASS lcl_object_smim DEFINITION INHERITING FROM lcl_objects_super FINAL.
METHODS get_url_for_io METHODS get_url_for_io
EXPORTING ev_url TYPE string EXPORTING ev_url TYPE string
ev_is_folder TYPE boole_d ev_is_folder TYPE boole_d
RAISING ZCX_ABAPGIT_NOT_FOUND RAISING zcx_abapgit_not_found
zcx_abapgit_exception. zcx_abapgit_exception.
ENDCLASS. "lcl_object_smim DEFINITION ENDCLASS. "lcl_object_smim DEFINITION
@ -94,7 +94,7 @@ CLASS lcl_object_smim IMPLEMENTATION.
SELECT SINGLE * FROM smimloio INTO ls_smimloio SELECT SINGLE * FROM smimloio INTO ls_smimloio
WHERE loio_id = lv_loio. "#EC CI_GENBUFF WHERE loio_id = lv_loio. "#EC CI_GENBUFF
IF sy-subrc <> 0. IF sy-subrc <> 0.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_NOT_FOUND. RAISE EXCEPTION TYPE zcx_abapgit_not_found.
ENDIF. ENDIF.
IF ls_smimloio-lo_class = wbmr_c_skwf_folder_class. IF ls_smimloio-lo_class = wbmr_c_skwf_folder_class.
@ -180,7 +180,7 @@ CLASS lcl_object_smim IMPLEMENTATION.
IMPORTING IMPORTING
ev_url = lv_url ev_url = lv_url
ev_is_folder = lv_folder ). ev_is_folder = lv_folder ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
RETURN. RETURN.
ENDTRY. ENDTRY.
@ -308,7 +308,7 @@ CLASS lcl_object_smim IMPLEMENTATION.
get_url_for_io( get_url_for_io(
IMPORTING IMPORTING
ev_url = lv_url ). ev_url = lv_url ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
RETURN. RETURN.
ENDTRY. ENDTRY.

8
src/zabapgit_object_type.prog.abap
View File

@ -20,7 +20,7 @@ CLASS lcl_object_type DEFINITION INHERITING FROM lcl_objects_super FINAL.
EXPORTING ev_ddtext TYPE ddtypet-ddtext EXPORTING ev_ddtext TYPE ddtypet-ddtext
et_source TYPE abaptxt255_tab et_source TYPE abaptxt255_tab
RAISING zcx_abapgit_exception RAISING zcx_abapgit_exception
ZCX_ABAPGIT_NOT_FOUND. zcx_abapgit_not_found.
METHODS create METHODS create
IMPORTING iv_ddtext TYPE ddtypet-ddtext IMPORTING iv_ddtext TYPE ddtypet-ddtext
@ -54,7 +54,7 @@ CLASS lcl_object_type IMPLEMENTATION.
TRY. TRY.
read( ). read( ).
rv_bool = abap_true. rv_bool = abap_true.
CATCH ZCX_ABAPGIT_NOT_FOUND zcx_abapgit_exception. CATCH zcx_abapgit_not_found zcx_abapgit_exception.
rv_bool = abap_false. rv_bool = abap_false.
ENDTRY. ENDTRY.
@ -73,7 +73,7 @@ CLASS lcl_object_type IMPLEMENTATION.
WHERE typegroup = ms_item-obj_name WHERE typegroup = ms_item-obj_name
AND ddlanguage = mv_language. AND ddlanguage = mv_language.
IF sy-subrc <> 0. IF sy-subrc <> 0.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_NOT_FOUND. RAISE EXCEPTION TYPE zcx_abapgit_not_found.
ENDIF. ENDIF.
lv_typdname = ms_item-obj_name. lv_typdname = ms_item-obj_name.
@ -105,7 +105,7 @@ CLASS lcl_object_type IMPLEMENTATION.
read( IMPORTING read( IMPORTING
ev_ddtext = lv_ddtext ev_ddtext = lv_ddtext
et_source = lt_source ). et_source = lt_source ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
RETURN. RETURN.
ENDTRY. ENDTRY.

2
src/zabapgit_page.prog.abap
View File

@ -14,7 +14,7 @@ INTERFACE lif_gui_page.
it_postdata TYPE cnht_post_data_tab OPTIONAL it_postdata TYPE cnht_post_data_tab OPTIONAL
EXPORTING ei_page TYPE REF TO lif_gui_page EXPORTING ei_page TYPE REF TO lif_gui_page
ev_state TYPE i ev_state TYPE i
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
METHODS render METHODS render
RETURNING VALUE(ro_html) TYPE REF TO lcl_html RETURNING VALUE(ro_html) TYPE REF TO lcl_html

4
src/zabapgit_page_db.prog.abap
View File

@ -49,7 +49,7 @@ CLASS lcl_gui_page_db_dis IMPLEMENTATION.
lv_data = lcl_app=>db( )->read( lv_data = lcl_app=>db( )->read(
iv_type = ms_key-type iv_type = ms_key-type
iv_value = ms_key-value ). iv_value = ms_key-value ).
CATCH ZCX_ABAPGIT_NOT_FOUND ##NO_HANDLER. CATCH zcx_abapgit_not_found ##NO_HANDLER.
ENDTRY. ENDTRY.
" Create syntax highlighter " Create syntax highlighter
@ -110,7 +110,7 @@ CLASS lcl_gui_page_db_edit IMPLEMENTATION.
lv_data = lcl_app=>db( )->read( lv_data = lcl_app=>db( )->read(
iv_type = ms_key-type iv_type = ms_key-type
iv_value = ms_key-value ). iv_value = ms_key-value ).
CATCH ZCX_ABAPGIT_NOT_FOUND ##NO_HANDLER. CATCH zcx_abapgit_not_found ##NO_HANDLER.
ENDTRY. ENDTRY.
lcl_app=>db( )->lock( lcl_app=>db( )->lock(

46
src/zabapgit_persistence.prog.abap
View File

@ -75,7 +75,7 @@ CLASS lcl_persistence_db DEFINITION FINAL CREATE PRIVATE FRIENDS lcl_app.
IMPORTING iv_type TYPE ty_type IMPORTING iv_type TYPE ty_type
iv_value TYPE ty_content-value iv_value TYPE ty_content-value
RETURNING VALUE(rv_data) TYPE ty_content-data_str RETURNING VALUE(rv_data) TYPE ty_content-data_str
RAISING ZCX_ABAPGIT_NOT_FOUND, RAISING zcx_abapgit_not_found,
lock lock
IMPORTING iv_mode TYPE enqmode DEFAULT 'E' IMPORTING iv_mode TYPE enqmode DEFAULT 'E'
iv_type TYPE ty_type iv_type TYPE ty_type
@ -179,7 +179,7 @@ CLASS lcl_persistence_repo DEFINITION FINAL.
IMPORTING iv_key TYPE ty_repo-key IMPORTING iv_key TYPE ty_repo-key
RETURNING VALUE(rs_repo) TYPE ty_repo RETURNING VALUE(rs_repo) TYPE ty_repo
RAISING zcx_abapgit_exception RAISING zcx_abapgit_exception
ZCX_ABAPGIT_NOT_FOUND. zcx_abapgit_not_found.
METHODS lock METHODS lock
IMPORTING iv_mode TYPE enqmode IMPORTING iv_mode TYPE enqmode
@ -438,7 +438,7 @@ CLASS lcl_persist_background IMPLEMENTATION.
TRY. TRY.
mo_db->read( iv_type = c_type mo_db->read( iv_type = c_type
iv_value = iv_key ). iv_value = iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
RETURN. RETURN.
ENDTRY. ENDTRY.
@ -672,7 +672,7 @@ CLASS lcl_persistence_user IMPLEMENTATION.
lv_xml = lcl_app=>db( )->read( lv_xml = lcl_app=>db( )->read(
iv_type = c_type_user iv_type = c_type_user
iv_value = mv_user ). iv_value = mv_user ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
RETURN. RETURN.
ENDTRY. ENDTRY.
@ -1054,7 +1054,7 @@ CLASS lcl_persistence_db IMPLEMENTATION.
WHERE type = iv_type WHERE type = iv_type
AND value = iv_value. "#EC CI_SUBRC AND value = iv_value. "#EC CI_SUBRC
IF sy-subrc <> 0. IF sy-subrc <> 0.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_NOT_FOUND. RAISE EXCEPTION TYPE zcx_abapgit_not_found.
ENDIF. ENDIF.
ENDMETHOD. ENDMETHOD.
@ -1102,7 +1102,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
TRY. TRY.
ls_repo = read( iv_key ). ls_repo = read( iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'key not found' ). zcx_abapgit_exception=>raise( 'key not found' ).
ENDTRY. ENDTRY.
@ -1138,7 +1138,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
TRY. TRY.
ls_repo = read( iv_key ). ls_repo = read( iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'key not found' ). zcx_abapgit_exception=>raise( 'key not found' ).
ENDTRY. ENDTRY.
@ -1166,7 +1166,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
TRY. TRY.
ls_repo = read( iv_key ). ls_repo = read( iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'key not found' ). zcx_abapgit_exception=>raise( 'key not found' ).
ENDTRY. ENDTRY.
@ -1190,7 +1190,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
TRY. TRY.
ls_repo = read( iv_key ). ls_repo = read( iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'key not found' ). zcx_abapgit_exception=>raise( 'key not found' ).
ENDTRY. ENDTRY.
@ -1214,7 +1214,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
TRY. TRY.
ls_repo = read( iv_key ). ls_repo = read( iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'key not found' ). zcx_abapgit_exception=>raise( 'key not found' ).
ENDTRY. ENDTRY.
@ -1237,7 +1237,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
TRY. TRY.
ls_repo = read( iv_key ). ls_repo = read( iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'key not found' ). zcx_abapgit_exception=>raise( 'key not found' ).
ENDTRY. ENDTRY.
@ -1261,7 +1261,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
TRY. TRY.
ls_repo = read( iv_key ). ls_repo = read( iv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'key not found' ). zcx_abapgit_exception=>raise( 'key not found' ).
ENDTRY. ENDTRY.
@ -1282,7 +1282,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
READ TABLE lt_repo INTO rs_repo WITH KEY key = iv_key. READ TABLE lt_repo INTO rs_repo WITH KEY key = iv_key.
IF sy-subrc <> 0. IF sy-subrc <> 0.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_NOT_FOUND. RAISE EXCEPTION TYPE zcx_abapgit_not_found.
ENDIF. ENDIF.
ENDMETHOD. ENDMETHOD.
@ -1403,7 +1403,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
iv_type = 'SETTINGS' iv_type = 'SETTINGS'
iv_value = '' ). iv_value = '' ).
rv_exists = abap_true. rv_exists = abap_true.
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
rv_exists = abap_false. rv_exists = abap_false.
ENDTRY. ENDTRY.
ENDMETHOD. ENDMETHOD.
@ -1432,7 +1432,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
lcl_app=>db( )->read( lcl_app=>db( )->read(
iv_type = 'SETTINGS' iv_type = 'SETTINGS'
iv_value = 'PROXY_URL' ) ). iv_value = 'PROXY_URL' ) ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
ENDTRY. ENDTRY.
TRY. TRY.
@ -1440,7 +1440,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
lcl_app=>db( )->read( lcl_app=>db( )->read(
iv_type = 'SETTINGS' iv_type = 'SETTINGS'
iv_value = 'PROXY_PORT' ) ). iv_value = 'PROXY_PORT' ) ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
ENDTRY. ENDTRY.
TRY. TRY.
@ -1448,7 +1448,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
iv_type = 'SETTINGS' iv_type = 'SETTINGS'
iv_value = 'PROXY_AUTH' ). iv_value = 'PROXY_AUTH' ).
lr_settings->set_proxy_authentication( lv_flag ). lr_settings->set_proxy_authentication( lv_flag ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
ENDTRY. ENDTRY.
TRY. TRY.
@ -1457,7 +1457,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
iv_value = 'CRIT_TESTS' ). iv_value = 'CRIT_TESTS' ).
lv_critical_tests_as_boolean = lv_critical_tests_as_string. lv_critical_tests_as_boolean = lv_critical_tests_as_string.
lr_settings->set_run_critical_tests( lv_critical_tests_as_boolean ). lr_settings->set_run_critical_tests( lv_critical_tests_as_boolean ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
ENDTRY. ENDTRY.
TRY. TRY.
@ -1466,7 +1466,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
iv_value = 'MAX_LINES' ). iv_value = 'MAX_LINES' ).
lv_max_lines_as_integer = lv_max_lines_as_string. lv_max_lines_as_integer = lv_max_lines_as_string.
lr_settings->set_max_lines( lv_max_lines_as_integer ). lr_settings->set_max_lines( lv_max_lines_as_integer ).
CATCH ZCX_ABAPGIT_NOT_FOUND cx_sy_conversion_no_number. CATCH zcx_abapgit_not_found cx_sy_conversion_no_number.
ENDTRY. ENDTRY.
TRY. TRY.
@ -1475,7 +1475,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
iv_value = 'ADT_JUMP' ). iv_value = 'ADT_JUMP' ).
lv_adt_jump_enabled_as_boolean = lv_adt_jump_enabled_as_string. lv_adt_jump_enabled_as_boolean = lv_adt_jump_enabled_as_string.
lr_settings->set_adt_jump_enanbled( lv_adt_jump_enabled_as_boolean ). lr_settings->set_adt_jump_enanbled( lv_adt_jump_enabled_as_boolean ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
ENDTRY. ENDTRY.
TRY. TRY.
@ -1484,7 +1484,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
iv_value = 'COMMENT_LEN' ). iv_value = 'COMMENT_LEN' ).
lv_i_param_value = lv_s_param_value. lv_i_param_value = lv_s_param_value.
lr_settings->set_commitmsg_comment_length( lv_i_param_value ). lr_settings->set_commitmsg_comment_length( lv_i_param_value ).
CATCH ZCX_ABAPGIT_NOT_FOUND cx_sy_conversion_no_number. CATCH zcx_abapgit_not_found cx_sy_conversion_no_number.
ENDTRY. ENDTRY.
TRY. TRY.
@ -1493,7 +1493,7 @@ CLASS lcl_persist_migrate IMPLEMENTATION.
iv_value = 'BODY_SIZE' ). iv_value = 'BODY_SIZE' ).
lv_i_param_value = lv_s_param_value. lv_i_param_value = lv_s_param_value.
lr_settings->set_commitmsg_body_size( lv_i_param_value ). lr_settings->set_commitmsg_body_size( lv_i_param_value ).
CATCH ZCX_ABAPGIT_NOT_FOUND cx_sy_conversion_no_number. CATCH zcx_abapgit_not_found cx_sy_conversion_no_number.
ENDTRY. ENDTRY.
lr_persist_settings->modify( io_settings = lr_settings ). lr_persist_settings->modify( io_settings = lr_settings ).
@ -1896,7 +1896,7 @@ CLASS lcl_persist_settings IMPLEMENTATION.
lcl_app=>db( )->read( iv_type = lcl_settings=>c_dbtype_settings lcl_app=>db( )->read( iv_type = lcl_settings=>c_dbtype_settings
iv_value = '' ) ). iv_value = '' ) ).
CATCH ZCX_ABAPGIT_NOT_FOUND zcx_abapgit_exception. CATCH zcx_abapgit_not_found zcx_abapgit_exception.
ro_settings->set_defaults( ). ro_settings->set_defaults( ).

4
src/zabapgit_popups.prog.abap
View File

@ -74,7 +74,7 @@ CLASS lcl_popups DEFINITION FINAL.
IMPORTING it_transport_headers TYPE trwbo_request_headers IMPORTING it_transport_headers TYPE trwbo_request_headers
RETURNING VALUE(rs_transport_branch) TYPE zif_abapgit_definitions=>ty_transport_to_branch RETURNING VALUE(rs_transport_branch) TYPE zif_abapgit_definitions=>ty_transport_to_branch
RAISING zcx_abapgit_exception RAISING zcx_abapgit_exception
ZCX_ABAPGIT_CANCEL, zcx_abapgit_cancel,
popup_to_select_transports popup_to_select_transports
RETURNING VALUE(rt_trkorr) TYPE trwbo_request_headers, RETURNING VALUE(rt_trkorr) TYPE trwbo_request_headers,
popup_to_select_from_list popup_to_select_from_list
@ -720,7 +720,7 @@ CLASS lcl_popups IMPLEMENTATION.
ENDIF. ENDIF.
IF lv_returncode = 'A'. IF lv_returncode = 'A'.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
READ TABLE lt_fields INDEX 1 ASSIGNING <ls_field>. READ TABLE lt_fields INDEX 1 ASSIGNING <ls_field>.

4
src/zabapgit_repo_impl.prog.abap
View File

@ -879,7 +879,7 @@ CLASS lcl_repo_srv IMPLEMENTATION.
is_dot_abapgit = lcl_dot_abapgit=>build_default( )->get_data( ) ). is_dot_abapgit = lcl_dot_abapgit=>build_default( )->get_data( ) ).
TRY. TRY.
ls_repo = mo_persistence->read( lv_key ). ls_repo = mo_persistence->read( lv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'new_online not found' ). zcx_abapgit_exception=>raise( 'new_online not found' ).
ENDTRY. ENDTRY.
@ -908,7 +908,7 @@ CLASS lcl_repo_srv IMPLEMENTATION.
TRY. TRY.
ls_repo = mo_persistence->read( lv_key ). ls_repo = mo_persistence->read( lv_key ).
CATCH ZCX_ABAPGIT_NOT_FOUND. CATCH zcx_abapgit_not_found.
zcx_abapgit_exception=>raise( 'new_offline not found' ). zcx_abapgit_exception=>raise( 'new_offline not found' ).
ENDTRY. ENDTRY.

4
src/zabapgit_services_abapgit.prog.abap
View File

@ -25,10 +25,10 @@ CLASS lcl_services_abapgit DEFINITION FINAL.
RAISING zcx_abapgit_exception. RAISING zcx_abapgit_exception.
CLASS-METHODS install_abapgit CLASS-METHODS install_abapgit
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS install_abapgit_pi CLASS-METHODS install_abapgit_pi
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS is_installed CLASS-METHODS is_installed
RETURNING VALUE(rv_installed) TYPE abap_bool. RETURNING VALUE(rv_installed) TYPE abap_bool.

4
src/zabapgit_services_db.prog.abap
View File

@ -7,7 +7,7 @@ CLASS lcl_services_db DEFINITION FINAL.
CLASS-METHODS delete CLASS-METHODS delete
IMPORTING is_key TYPE lcl_persistence_db=>ty_content IMPORTING is_key TYPE lcl_persistence_db=>ty_content
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS update CLASS-METHODS update
IMPORTING is_content TYPE lcl_persistence_db=>ty_content IMPORTING is_content TYPE lcl_persistence_db=>ty_content
@ -35,7 +35,7 @@ CLASS lcl_services_db IMPLEMENTATION.
display_cancel_button = abap_false ). "#EC NOTEXT display_cancel_button = abap_false ). "#EC NOTEXT
IF lv_answer = '2'. IF lv_answer = '2'.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lcl_app=>db( )->delete( lcl_app=>db( )->delete(

20
src/zabapgit_services_git.prog.abap
View File

@ -17,29 +17,29 @@ CLASS lcl_services_git DEFINITION FINAL.
CLASS-METHODS pull CLASS-METHODS pull
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS reset CLASS-METHODS reset
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS create_branch CLASS-METHODS create_branch
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS switch_branch CLASS-METHODS switch_branch
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS delete_branch CLASS-METHODS delete_branch
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS commit CLASS-METHODS commit
IMPORTING io_repo TYPE REF TO lcl_repo_online IMPORTING io_repo TYPE REF TO lcl_repo_online
is_commit TYPE ty_commit_fields is_commit TYPE ty_commit_fields
io_stage TYPE REF TO lcl_stage io_stage TYPE REF TO lcl_stage
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
ENDCLASS. " lcl_services_git ENDCLASS. " lcl_services_git
@ -70,7 +70,7 @@ CLASS lcl_services_git IMPLEMENTATION.
display_cancel_button = abap_false ). "#EC NOTEXT display_cancel_button = abap_false ). "#EC NOTEXT
IF lv_answer = '2'. IF lv_answer = '2'.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lt_unnecessary_local_objs = lo_repo->get_unnecessary_local_objs( ). lt_unnecessary_local_objs = lo_repo->get_unnecessary_local_objs( ).
@ -115,7 +115,7 @@ CLASS lcl_services_git IMPLEMENTATION.
ev_name = lv_name ev_name = lv_name
ev_cancel = lv_cancel ). ev_cancel = lv_cancel ).
IF lv_cancel = abap_true. IF lv_cancel = abap_true.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
ASSERT lv_name CP 'refs/heads/+*'. ASSERT lv_name CP 'refs/heads/+*'.
@ -162,7 +162,7 @@ CLASS lcl_services_git IMPLEMENTATION.
iv_default_branch = lo_repo->get_branch_name( ) iv_default_branch = lo_repo->get_branch_name( )
iv_show_new_option = abap_true ). iv_show_new_option = abap_true ).
IF ls_branch IS INITIAL. IF ls_branch IS INITIAL.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
IF ls_branch-name = lcl_popups=>c_new_branch_label. IF ls_branch-name = lcl_popups=>c_new_branch_label.
@ -188,7 +188,7 @@ CLASS lcl_services_git IMPLEMENTATION.
ls_branch = lcl_popups=>branch_list_popup( lo_repo->get_url( ) ). ls_branch = lcl_popups=>branch_list_popup( lo_repo->get_url( ) ).
IF ls_branch IS INITIAL. IF ls_branch IS INITIAL.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
IF ls_branch-name = 'HEAD'. IF ls_branch-name = 'HEAD'.

34
src/zabapgit_services_repo.prog.abap
View File

@ -6,7 +6,7 @@ CLASS lcl_services_repo DEFINITION FINAL.
PUBLIC SECTION. PUBLIC SECTION.
CLASS-METHODS clone CLASS-METHODS clone
IMPORTING iv_url TYPE string IMPORTING iv_url TYPE string
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS refresh CLASS-METHODS refresh
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
@ -14,30 +14,30 @@ CLASS lcl_services_repo DEFINITION FINAL.
CLASS-METHODS remove CLASS-METHODS remove
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS purge CLASS-METHODS purge
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS new_offline CLASS-METHODS new_offline
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS remote_attach CLASS-METHODS remote_attach
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS remote_detach CLASS-METHODS remote_detach
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS remote_change CLASS-METHODS remote_change
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS refresh_local_checksums CLASS-METHODS refresh_local_checksums
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS toggle_favorite CLASS-METHODS toggle_favorite
IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key IMPORTING iv_key TYPE lcl_persistence_repo=>ty_repo-key
@ -49,7 +49,7 @@ CLASS lcl_services_repo DEFINITION FINAL.
CLASS-METHODS transport_to_branch CLASS-METHODS transport_to_branch
IMPORTING iv_repository_key TYPE lcl_persistence_db=>ty_value IMPORTING iv_repository_key TYPE lcl_persistence_db=>ty_value
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
ENDCLASS. "lcl_services_repo ENDCLASS. "lcl_services_repo
@ -63,7 +63,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
ls_popup = lcl_popups=>repo_popup( iv_url ). ls_popup = lcl_popups=>repo_popup( iv_url ).
IF ls_popup-cancel = abap_true. IF ls_popup-cancel = abap_true.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lo_repo = lcl_app=>repo_srv( )->new_online( lo_repo = lcl_app=>repo_srv( )->new_online(
@ -114,7 +114,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
display_cancel_button = abap_false ). "#EC NOTEXT display_cancel_button = abap_false ). "#EC NOTEXT
IF lv_answer = '2'. IF lv_answer = '2'.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lcl_app=>repo_srv( )->delete( lo_repo ). lcl_app=>repo_srv( )->delete( lo_repo ).
@ -157,7 +157,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
display_cancel_button = abap_false ). "#EC NOTEXT display_cancel_button = abap_false ). "#EC NOTEXT
IF lv_answer = '2'. IF lv_answer = '2'.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lcl_objects=>delete( lt_tadir ). lcl_objects=>delete( lt_tadir ).
@ -177,7 +177,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
ls_popup = lcl_popups=>repo_new_offline( ). ls_popup = lcl_popups=>repo_new_offline( ).
IF ls_popup-cancel = abap_true. IF ls_popup-cancel = abap_true.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lo_repo = lcl_app=>repo_srv( )->new_offline( lo_repo = lcl_app=>repo_srv( )->new_offline(
@ -206,7 +206,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
display_cancel_button = abap_false ). "#EC NOTEXT display_cancel_button = abap_false ). "#EC NOTEXT
IF lv_answer = '2'. IF lv_answer = '2'.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lcl_app=>repo_srv( )->switch_repo_type( iv_key = iv_key iv_offline = abap_true ). lcl_app=>repo_srv( )->switch_repo_type( iv_key = iv_key iv_offline = abap_true ).
@ -227,7 +227,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
iv_package = lcl_app=>repo_srv( )->get( iv_key )->get_package( ) iv_package = lcl_app=>repo_srv( )->get( iv_key )->get_package( )
iv_freeze_package = abap_true ). iv_freeze_package = abap_true ).
IF ls_popup-cancel = abap_true. IF ls_popup-cancel = abap_true.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lcl_app=>repo_srv( )->switch_repo_type( iv_key = iv_key iv_offline = abap_false ). lcl_app=>repo_srv( )->switch_repo_type( iv_key = iv_key iv_offline = abap_false ).
@ -253,7 +253,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
iv_package = lo_repo->get_package( ) iv_package = lo_repo->get_package( )
iv_freeze_package = abap_true ). iv_freeze_package = abap_true ).
IF ls_popup-cancel = abap_true. IF ls_popup-cancel = abap_true.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lo_repo ?= lcl_app=>repo_srv( )->get( iv_key ). lo_repo ?= lcl_app=>repo_srv( )->get( iv_key ).
@ -295,7 +295,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
display_cancel_button = abap_false ). "#EC NOTEXT display_cancel_button = abap_false ). "#EC NOTEXT
IF lv_answer = '2'. IF lv_answer = '2'.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
lo_repo->rebuild_local_checksums( ). lo_repo->rebuild_local_checksums( ).

8
src/zabapgit_zip.prog.abap
View File

@ -20,10 +20,10 @@ CLASS lcl_zip DEFINITION FINAL.
RAISING zcx_abapgit_exception. RAISING zcx_abapgit_exception.
CLASS-METHODS export_package CLASS-METHODS export_package
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
CLASS-METHODS export_object CLASS-METHODS export_object
RAISING zcx_abapgit_exception ZCX_ABAPGIT_CANCEL. RAISING zcx_abapgit_exception zcx_abapgit_cancel.
PRIVATE SECTION. PRIVATE SECTION.
CLASS-METHODS file_upload CLASS-METHODS file_upload
@ -396,7 +396,7 @@ CLASS lcl_zip IMPLEMENTATION.
ev_package = ls_data-package ev_package = ls_data-package
ev_folder_logic = ls_data-dot_abapgit-folder_logic ). ev_folder_logic = ls_data-dot_abapgit-folder_logic ).
IF ls_data-package IS INITIAL. IF ls_data-package IS INITIAL.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
CREATE OBJECT lo_repo CREATE OBJECT lo_repo
@ -424,7 +424,7 @@ CLASS lcl_zip IMPLEMENTATION.
ls_tadir = lcl_popups=>popup_object( ). ls_tadir = lcl_popups=>popup_object( ).
IF ls_tadir IS INITIAL. IF ls_tadir IS INITIAL.
RAISE EXCEPTION TYPE ZCX_ABAPGIT_CANCEL. RAISE EXCEPTION TYPE zcx_abapgit_cancel.
ENDIF. ENDIF.
ls_item-obj_type = ls_tadir-object. ls_item-obj_type = ls_tadir-object.

4
src/zcx_abapgit_not_found.clas.abap
View File

@ -1,4 +1,4 @@
class ZCX_ABAPGIT_NOT_FOUND definition class zcx_abapgit_not_found definition
public public
inheriting from CX_STATIC_CHECK inheriting from CX_STATIC_CHECK
final final
@ -11,5 +11,5 @@ ENDCLASS.
CLASS ZCX_ABAPGIT_NOT_FOUND IMPLEMENTATION. CLASS zcx_abapgit_not_found IMPLEMENTATION.
ENDCLASS. ENDCLASS.