mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
rename classes #733
This commit is contained in:
parent
3baef6ae41
commit
824195f63a
|
@ -50,13 +50,13 @@ CLASS lcx_2fa_auth_failed IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcx_2fa_token_gen_failed DEFINITION INHERITING FROM lcx_2fa_error FINAL.
|
CLASS lcx_2fa_gen_failed DEFINITION INHERITING FROM lcx_2fa_error FINAL.
|
||||||
PROTECTED SECTION.
|
PROTECTED SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
get_default_text REDEFINITION.
|
get_default_text REDEFINITION.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcx_2fa_token_gen_failed IMPLEMENTATION.
|
CLASS lcx_2fa_gen_failed IMPLEMENTATION.
|
||||||
METHOD get_default_text.
|
METHOD get_default_text.
|
||||||
rv_text = 'Two factor access token generation failed.' ##NO_TEXT.
|
rv_text = 'Two factor access token generation failed.' ##NO_TEXT.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
@ -74,25 +74,25 @@ CLASS lcx_2fa_unsupported IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcx_2fa_token_del_failed DEFINITION INHERITING FROM lcx_2fa_error FINAL.
|
CLASS lcx_2fa_del_failed DEFINITION INHERITING FROM lcx_2fa_error FINAL.
|
||||||
PROTECTED SECTION.
|
PROTECTED SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
get_default_text REDEFINITION.
|
get_default_text REDEFINITION.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcx_2fa_token_del_failed IMPLEMENTATION.
|
CLASS lcx_2fa_del_failed IMPLEMENTATION.
|
||||||
METHOD get_default_text.
|
METHOD get_default_text.
|
||||||
rv_text = 'Deleting previous access tokens failed.' ##NO_TEXT.
|
rv_text = 'Deleting previous access tokens failed.' ##NO_TEXT.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcx_2fa_communication_error DEFINITION INHERITING FROM lcx_2fa_error FINAL.
|
CLASS lcx_2fa_comm_error DEFINITION INHERITING FROM lcx_2fa_error FINAL.
|
||||||
PROTECTED SECTION.
|
PROTECTED SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
get_default_text REDEFINITION.
|
get_default_text REDEFINITION.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcx_2fa_communication_error IMPLEMENTATION.
|
CLASS lcx_2fa_comm_error IMPLEMENTATION.
|
||||||
METHOD get_default_text.
|
METHOD get_default_text.
|
||||||
rv_text = 'Communication error.' ##NO_TEXT.
|
rv_text = 'Communication error.' ##NO_TEXT.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
@ -143,8 +143,8 @@ INTERFACE lif_2fa_authenticator.
|
||||||
iv_2fa_token TYPE string
|
iv_2fa_token TYPE string
|
||||||
RETURNING VALUE(rv_access_token) TYPE string
|
RETURNING VALUE(rv_access_token) TYPE string
|
||||||
RAISING lcx_2fa_auth_failed
|
RAISING lcx_2fa_auth_failed
|
||||||
lcx_2fa_token_gen_failed
|
lcx_2fa_gen_failed
|
||||||
lcx_2fa_communication_error,
|
lcx_2fa_comm_error,
|
||||||
"! Check if this authenticator instance supports the give repository url
|
"! Check if this authenticator instance supports the give repository url
|
||||||
"! @parameter iv_url | Repository url
|
"! @parameter iv_url | Repository url
|
||||||
"! @parameter rv_supported | Is supported
|
"! @parameter rv_supported | Is supported
|
||||||
|
@ -166,7 +166,7 @@ INTERFACE lif_2fa_authenticator.
|
||||||
iv_username TYPE string
|
iv_username TYPE string
|
||||||
iv_password TYPE string
|
iv_password TYPE string
|
||||||
RETURNING VALUE(rv_required) TYPE abap_bool
|
RETURNING VALUE(rv_required) TYPE abap_bool
|
||||||
RAISING lcx_2fa_communication_error,
|
RAISING lcx_2fa_comm_error,
|
||||||
"! Delete all previously created access tokens for abapGit
|
"! Delete all previously created access tokens for abapGit
|
||||||
"! @parameter iv_url | Repository url
|
"! @parameter iv_url | Repository url
|
||||||
"! @parameter iv_username | Username
|
"! @parameter iv_username | Username
|
||||||
|
@ -178,8 +178,8 @@ INTERFACE lif_2fa_authenticator.
|
||||||
iv_username TYPE string
|
iv_username TYPE string
|
||||||
iv_password TYPE string
|
iv_password TYPE string
|
||||||
iv_2fa_token TYPE string
|
iv_2fa_token TYPE string
|
||||||
RAISING lcx_2fa_token_del_failed
|
RAISING lcx_2fa_del_failed
|
||||||
lcx_2fa_communication_error
|
lcx_2fa_comm_error
|
||||||
lcx_2fa_auth_failed,
|
lcx_2fa_auth_failed,
|
||||||
"! Begin an authenticator session that uses internal caching for authorizations
|
"! Begin an authenticator session that uses internal caching for authorizations
|
||||||
"! @raising lcx_2fa_illegal_state | Session already started
|
"! @raising lcx_2fa_illegal_state | Session already started
|
||||||
|
@ -190,7 +190,7 @@ INTERFACE lif_2fa_authenticator.
|
||||||
ENDINTERFACE.
|
ENDINTERFACE.
|
||||||
|
|
||||||
"! Default <em>LIF_2FA-AUTHENTICATOR</em> implememtation
|
"! Default <em>LIF_2FA-AUTHENTICATOR</em> implememtation
|
||||||
CLASS lcl_2fa_authenticator_base DEFINITION
|
CLASS lcl_2fa_auth_base DEFINITION
|
||||||
ABSTRACT
|
ABSTRACT
|
||||||
CREATE PUBLIC.
|
CREATE PUBLIC.
|
||||||
|
|
||||||
|
@ -216,7 +216,7 @@ CLASS lcl_2fa_authenticator_base DEFINITION
|
||||||
"! <p>
|
"! <p>
|
||||||
"! <em>sy-msg...</em> must be set right before calling!
|
"! <em>sy-msg...</em> must be set right before calling!
|
||||||
"! </p>
|
"! </p>
|
||||||
raise_comm_error_from_sy RAISING lcx_2fa_communication_error.
|
raise_comm_error_from_sy RAISING lcx_2fa_comm_error.
|
||||||
METHODS:
|
METHODS:
|
||||||
"! @parameter rv_running | Internal session is currently active
|
"! @parameter rv_running | Internal session is currently active
|
||||||
is_session_running RETURNING VALUE(rv_running) TYPE abap_bool.
|
is_session_running RETURNING VALUE(rv_running) TYPE abap_bool.
|
||||||
|
@ -226,7 +226,7 @@ CLASS lcl_2fa_authenticator_base DEFINITION
|
||||||
mv_session_running TYPE abap_bool.
|
mv_session_running TYPE abap_bool.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_2fa_authenticator_base IMPLEMENTATION.
|
CLASS lcl_2fa_auth_base IMPLEMENTATION.
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
CREATE OBJECT mo_url_regex
|
CREATE OBJECT mo_url_regex
|
||||||
EXPORTING
|
EXPORTING
|
||||||
|
@ -251,7 +251,7 @@ CLASS lcl_2fa_authenticator_base IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD delete_access_tokens.
|
METHOD delete_access_tokens.
|
||||||
RAISE EXCEPTION TYPE lcx_2fa_token_del_failed. " Needs to be overwritten in subclasses
|
RAISE EXCEPTION TYPE lcx_2fa_del_failed. " Needs to be overwritten in subclasses
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD raise_comm_error_from_sy.
|
METHOD raise_comm_error_from_sy.
|
||||||
|
@ -260,7 +260,7 @@ CLASS lcl_2fa_authenticator_base IMPLEMENTATION.
|
||||||
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
|
MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
|
||||||
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
|
WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4
|
||||||
INTO lv_error_msg.
|
INTO lv_error_msg.
|
||||||
RAISE EXCEPTION TYPE lcx_2fa_communication_error
|
RAISE EXCEPTION TYPE lcx_2fa_comm_error
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_error_text = |Communication error: { lv_error_msg }| ##NO_TEXT.
|
iv_error_text = |Communication error: { lv_error_msg }| ##NO_TEXT.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
@ -286,10 +286,8 @@ CLASS lcl_2fa_authenticator_base IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_2fa_github_authenticator DEFINITION
|
CLASS lcl_2fa_github_auth DEFINITION INHERITING FROM lcl_2fa_auth_base
|
||||||
INHERITING FROM lcl_2fa_authenticator_base
|
FINAL CREATE PUBLIC.
|
||||||
FINAL
|
|
||||||
CREATE PUBLIC.
|
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
|
@ -320,12 +318,12 @@ CLASS lcl_2fa_github_authenticator DEFINITION
|
||||||
iv_2fa_token TYPE string
|
iv_2fa_token TYPE string
|
||||||
RETURNING VALUE(ri_client) TYPE REF TO if_http_client
|
RETURNING VALUE(ri_client) TYPE REF TO if_http_client
|
||||||
RAISING lcx_2fa_auth_failed
|
RAISING lcx_2fa_auth_failed
|
||||||
lcx_2fa_communication_error.
|
lcx_2fa_comm_error.
|
||||||
DATA:
|
DATA:
|
||||||
mi_authenticated_session TYPE REF TO if_http_client.
|
mi_authenticated_session TYPE REF TO if_http_client.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_2fa_github_authenticator IMPLEMENTATION.
|
CLASS lcl_2fa_github_auth IMPLEMENTATION.
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
super->constructor( '^https?://(www\.)?github.com.*$' ).
|
super->constructor( '^https?://(www\.)?github.com.*$' ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
@ -360,14 +358,14 @@ CLASS lcl_2fa_github_authenticator IMPLEMENTATION.
|
||||||
code = lv_http_code
|
code = lv_http_code
|
||||||
reason = lv_http_code_description ).
|
reason = lv_http_code_description ).
|
||||||
IF lv_http_code <> 201.
|
IF lv_http_code <> 201.
|
||||||
RAISE EXCEPTION TYPE lcx_2fa_token_gen_failed
|
RAISE EXCEPTION TYPE lcx_2fa_gen_failed
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_error_text = |Token generation failed: { lv_http_code } { lv_http_code_description }|.
|
iv_error_text = |Token generation failed: { lv_http_code } { lv_http_code_description }|.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
rv_access_token = get_token_from_response( li_http_client->response ).
|
rv_access_token = get_token_from_response( li_http_client->response ).
|
||||||
IF rv_access_token IS INITIAL.
|
IF rv_access_token IS INITIAL.
|
||||||
RAISE EXCEPTION TYPE lcx_2fa_token_gen_failed
|
RAISE EXCEPTION TYPE lcx_2fa_gen_failed
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_error_text = 'Token generation failed: parser error' ##NO_TEXT.
|
iv_error_text = 'Token generation failed: parser error' ##NO_TEXT.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
@ -525,7 +523,7 @@ CLASS lcl_2fa_github_authenticator IMPLEMENTATION.
|
||||||
code = lv_http_code
|
code = lv_http_code
|
||||||
reason = lv_http_code_description ).
|
reason = lv_http_code_description ).
|
||||||
IF lv_http_code <> 200.
|
IF lv_http_code <> 200.
|
||||||
RAISE EXCEPTION TYPE lcx_2fa_token_del_failed
|
RAISE EXCEPTION TYPE lcx_2fa_del_failed
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_error_text = |Could not fetch current 2FA authorizations: | &&
|
iv_error_text = |Could not fetch current 2FA authorizations: | &&
|
||||||
|{ lv_http_code } { lv_http_code_description }|.
|
|{ lv_http_code } { lv_http_code_description }|.
|
||||||
|
@ -550,7 +548,7 @@ CLASS lcl_2fa_github_authenticator IMPLEMENTATION.
|
||||||
code = lv_http_code
|
code = lv_http_code
|
||||||
reason = lv_http_code_description ).
|
reason = lv_http_code_description ).
|
||||||
IF lv_http_code <> 204.
|
IF lv_http_code <> 204.
|
||||||
RAISE EXCEPTION TYPE lcx_2fa_token_del_failed
|
RAISE EXCEPTION TYPE lcx_2fa_del_failed
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_error_text = |Could not delete token '{ <lv_id> }': | &&
|
iv_error_text = |Could not delete token '{ <lv_id> }': | &&
|
||||||
|{ lv_http_code } { lv_http_code_description }|.
|
|{ lv_http_code } { lv_http_code_description }|.
|
||||||
|
@ -630,7 +628,7 @@ CLASS lcl_2fa_github_authenticator IMPLEMENTATION.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
"! Static registry class to find <em>LIF_2FA_AUTHENTICATOR</em> instances
|
"! Static registry class to find <em>LIF_2FA_AUTHENTICATOR</em> instances
|
||||||
CLASS lcl_2fa_authenticator_registry DEFINITION
|
CLASS lcl_2fa_auth_registry DEFINITION
|
||||||
FINAL
|
FINAL
|
||||||
CREATE PRIVATE.
|
CREATE PRIVATE.
|
||||||
|
|
||||||
|
@ -675,9 +673,9 @@ CLASS lcl_2fa_authenticator_registry DEFINITION
|
||||||
RAISING lcx_exception.
|
RAISING lcx_exception.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_2fa_authenticator_registry IMPLEMENTATION.
|
CLASS lcl_2fa_auth_registry IMPLEMENTATION.
|
||||||
METHOD class_constructor.
|
METHOD class_constructor.
|
||||||
DEFINE register.
|
DEFINE _register.
|
||||||
CREATE OBJECT li_authenticator TYPE &1.
|
CREATE OBJECT li_authenticator TYPE &1.
|
||||||
INSERT li_authenticator INTO TABLE gt_registered_authenticators.
|
INSERT li_authenticator INTO TABLE gt_registered_authenticators.
|
||||||
END-OF-DEFINITION.
|
END-OF-DEFINITION.
|
||||||
|
@ -687,7 +685,7 @@ CLASS lcl_2fa_authenticator_registry IMPLEMENTATION.
|
||||||
" If there are new authenticators these need to be added here manually.
|
" If there are new authenticators these need to be added here manually.
|
||||||
" I do not think there is an equivalent to SEO_INTERFACE_IMPLEM_GET_ALL for local classes
|
" I do not think there is an equivalent to SEO_INTERFACE_IMPLEM_GET_ALL for local classes
|
||||||
" without invoking the compiler directly.
|
" without invoking the compiler directly.
|
||||||
register: lcl_2fa_github_authenticator.
|
_register: lcl_2fa_github_auth.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD get_authenticator_for_url.
|
METHOD get_authenticator_for_url.
|
||||||
|
|
|
@ -6,7 +6,7 @@ CLASS lcl_gui DEFINITION DEFERRED.
|
||||||
CLASS lcl_persistence_user DEFINITION DEFERRED.
|
CLASS lcl_persistence_user DEFINITION DEFERRED.
|
||||||
CLASS lcl_repo_srv DEFINITION DEFERRED.
|
CLASS lcl_repo_srv DEFINITION DEFERRED.
|
||||||
CLASS lcl_persistence_db DEFINITION DEFERRED.
|
CLASS lcl_persistence_db DEFINITION DEFERRED.
|
||||||
CLASS lcl_persistence_settings DEFINITION DEFERRED.
|
CLASS lcl_persist_settings DEFINITION DEFERRED.
|
||||||
|
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
* CLASS lcl_app DEFINITION
|
* CLASS lcl_app DEFINITION
|
||||||
|
@ -33,13 +33,13 @@ CLASS lcl_app DEFINITION FINAL.
|
||||||
RETURNING VALUE(ro_db) TYPE REF TO lcl_persistence_db.
|
RETURNING VALUE(ro_db) TYPE REF TO lcl_persistence_db.
|
||||||
|
|
||||||
CLASS-METHODS settings
|
CLASS-METHODS settings
|
||||||
RETURNING VALUE(ro_settings) TYPE REF TO lcl_persistence_settings.
|
RETURNING VALUE(ro_settings) TYPE REF TO lcl_persist_settings.
|
||||||
|
|
||||||
PRIVATE SECTION.
|
PRIVATE SECTION.
|
||||||
CLASS-DATA: go_gui TYPE REF TO lcl_gui,
|
CLASS-DATA: go_gui TYPE REF TO lcl_gui,
|
||||||
go_current_user TYPE REF TO lcl_persistence_user,
|
go_current_user TYPE REF TO lcl_persistence_user,
|
||||||
go_db TYPE REF TO lcl_persistence_db,
|
go_db TYPE REF TO lcl_persistence_db,
|
||||||
go_repo_srv TYPE REF TO lcl_repo_srv,
|
go_repo_srv TYPE REF TO lcl_repo_srv,
|
||||||
go_settings TYPE REF TO lcl_persistence_settings.
|
go_settings TYPE REF TO lcl_persist_settings.
|
||||||
|
|
||||||
ENDCLASS. "lcl_app
|
ENDCLASS. "lcl_app
|
||||||
|
|
|
@ -16,11 +16,11 @@ CLASS lcl_background DEFINITION FINAL.
|
||||||
RETURNING VALUE(rv_comment) TYPE string,
|
RETURNING VALUE(rv_comment) TYPE string,
|
||||||
push
|
push
|
||||||
IMPORTING io_repo TYPE REF TO lcl_repo_online
|
IMPORTING io_repo TYPE REF TO lcl_repo_online
|
||||||
is_settings TYPE lcl_persistence_background=>ty_background
|
is_settings TYPE lcl_persist_background=>ty_background
|
||||||
RAISING lcx_exception,
|
RAISING lcx_exception,
|
||||||
push_fixed
|
push_fixed
|
||||||
IMPORTING io_repo TYPE REF TO lcl_repo_online
|
IMPORTING io_repo TYPE REF TO lcl_repo_online
|
||||||
is_settings TYPE lcl_persistence_background=>ty_background
|
is_settings TYPE lcl_persist_background=>ty_background
|
||||||
RAISING lcx_exception,
|
RAISING lcx_exception,
|
||||||
push_auto
|
push_auto
|
||||||
IMPORTING io_repo TYPE REF TO lcl_repo_online
|
IMPORTING io_repo TYPE REF TO lcl_repo_online
|
||||||
|
@ -38,10 +38,10 @@ CLASS lcl_background IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
CASE is_settings-amethod.
|
CASE is_settings-amethod.
|
||||||
WHEN lcl_persistence_background=>c_amethod-fixed.
|
WHEN lcl_persist_background=>c_amethod-fixed.
|
||||||
push_fixed( io_repo = io_repo
|
push_fixed( io_repo = io_repo
|
||||||
is_settings = is_settings ).
|
is_settings = is_settings ).
|
||||||
WHEN lcl_persistence_background=>c_amethod-auto.
|
WHEN lcl_persist_background=>c_amethod-auto.
|
||||||
push_auto( io_repo ).
|
push_auto( io_repo ).
|
||||||
WHEN OTHERS.
|
WHEN OTHERS.
|
||||||
lcx_exception=>raise( 'unknown push method' ).
|
lcx_exception=>raise( 'unknown push method' ).
|
||||||
|
@ -171,9 +171,9 @@ CLASS lcl_background IMPLEMENTATION.
|
||||||
|
|
||||||
CONSTANTS: c_enq_type TYPE c LENGTH 12 VALUE 'BACKGROUND'.
|
CONSTANTS: c_enq_type TYPE c LENGTH 12 VALUE 'BACKGROUND'.
|
||||||
|
|
||||||
DATA: lo_per TYPE REF TO lcl_persistence_background,
|
DATA: lo_per TYPE REF TO lcl_persist_background,
|
||||||
lo_repo TYPE REF TO lcl_repo_online,
|
lo_repo TYPE REF TO lcl_repo_online,
|
||||||
lt_list TYPE lcl_persistence_background=>tt_background,
|
lt_list TYPE lcl_persist_background=>tt_background,
|
||||||
lv_repo_name TYPE string.
|
lv_repo_name TYPE string.
|
||||||
|
|
||||||
FIELD-SYMBOLS: <ls_list> LIKE LINE OF lt_list.
|
FIELD-SYMBOLS: <ls_list> LIKE LINE OF lt_list.
|
||||||
|
@ -209,9 +209,9 @@ CLASS lcl_background IMPLEMENTATION.
|
||||||
iv_password = <ls_list>-password ).
|
iv_password = <ls_list>-password ).
|
||||||
|
|
||||||
CASE <ls_list>-method.
|
CASE <ls_list>-method.
|
||||||
WHEN lcl_persistence_background=>c_method-pull.
|
WHEN lcl_persist_background=>c_method-pull.
|
||||||
lo_repo->deserialize( ).
|
lo_repo->deserialize( ).
|
||||||
WHEN lcl_persistence_background=>c_method-push.
|
WHEN lcl_persist_background=>c_method-push.
|
||||||
push( io_repo = lo_repo
|
push( io_repo = lo_repo
|
||||||
is_settings = <ls_list> ).
|
is_settings = <ls_list> ).
|
||||||
WHEN OTHERS.
|
WHEN OTHERS.
|
||||||
|
|
|
@ -77,11 +77,13 @@ CLASS lcl_gui_router IMPLEMENTATION.
|
||||||
WHEN lif_defs=>gc_action-go_main " Go Main page
|
WHEN lif_defs=>gc_action-go_main " Go Main page
|
||||||
OR lif_defs=>gc_action-go_explore " Go Explore page
|
OR lif_defs=>gc_action-go_explore " Go Explore page
|
||||||
OR lif_defs=>gc_action-go_db " Go DB util page
|
OR lif_defs=>gc_action-go_db " Go DB util page
|
||||||
OR lif_defs=>gc_action-go_background_run " Go background run page
|
|
||||||
OR lif_defs=>gc_action-go_debuginfo " Go debug info page
|
OR lif_defs=>gc_action-go_debuginfo " Go debug info page
|
||||||
OR lif_defs=>gc_action-go_settings. " Go settings page
|
OR lif_defs=>gc_action-go_settings. " Go settings page
|
||||||
ei_page = get_page_by_name( iv_action ).
|
ei_page = get_page_by_name( iv_action ).
|
||||||
ev_state = lif_defs=>gc_event_state-new_page.
|
ev_state = lif_defs=>gc_event_state-new_page.
|
||||||
|
WHEN lif_defs=>gc_action-go_background_run. " Go background run page
|
||||||
|
CREATE OBJECT ei_page TYPE lcl_gui_page_bkg_run.
|
||||||
|
ev_state = lif_defs=>gc_event_state-new_page.
|
||||||
WHEN lif_defs=>gc_action-go_background. " Go Background page
|
WHEN lif_defs=>gc_action-go_background. " Go Background page
|
||||||
ei_page = get_page_background( lv_key ).
|
ei_page = get_page_background( lv_key ).
|
||||||
ev_state = lif_defs=>gc_event_state-new_page.
|
ev_state = lif_defs=>gc_event_state-new_page.
|
||||||
|
@ -175,7 +177,7 @@ CLASS lcl_gui_router IMPLEMENTATION.
|
||||||
lcl_services_repo=>transport_to_branch( iv_repository_key = lv_key ).
|
lcl_services_repo=>transport_to_branch( iv_repository_key = lv_key ).
|
||||||
ev_state = lif_defs=>gc_event_state-re_render.
|
ev_state = lif_defs=>gc_event_state-re_render.
|
||||||
WHEN lif_defs=>gc_action-repo_settings.
|
WHEN lif_defs=>gc_action-repo_settings.
|
||||||
CREATE OBJECT ei_page TYPE lcl_gui_page_repo_settings
|
CREATE OBJECT ei_page TYPE lcl_gui_page_repo_sett
|
||||||
EXPORTING
|
EXPORTING
|
||||||
io_repo = lcl_app=>repo_srv( )->get( lv_key ).
|
io_repo = lcl_app=>repo_srv( )->get( lv_key ).
|
||||||
ev_state = lif_defs=>gc_event_state-new_page.
|
ev_state = lif_defs=>gc_event_state-new_page.
|
||||||
|
@ -273,7 +275,7 @@ CLASS lcl_gui_router IMPLEMENTATION.
|
||||||
METHOD get_page_branch_overview.
|
METHOD get_page_branch_overview.
|
||||||
|
|
||||||
DATA: lo_repo TYPE REF TO lcl_repo_online,
|
DATA: lo_repo TYPE REF TO lcl_repo_online,
|
||||||
lo_page TYPE REF TO lcl_gui_page_branch_overview,
|
lo_page TYPE REF TO lcl_gui_page_boverview,
|
||||||
lv_key TYPE lcl_persistence_repo=>ty_repo-key.
|
lv_key TYPE lcl_persistence_repo=>ty_repo-key.
|
||||||
|
|
||||||
|
|
||||||
|
@ -346,7 +348,7 @@ CLASS lcl_gui_router IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD get_page_background.
|
METHOD get_page_background.
|
||||||
|
|
||||||
CREATE OBJECT ri_page TYPE lcl_gui_page_background
|
CREATE OBJECT ri_page TYPE lcl_gui_page_bkg
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_key = iv_key.
|
iv_key = iv_key.
|
||||||
|
|
||||||
|
|
|
@ -80,7 +80,7 @@ CLASS lcl_html_action_utils DEFINITION FINAL.
|
||||||
|
|
||||||
CLASS-METHODS decode_bg_update
|
CLASS-METHODS decode_bg_update
|
||||||
IMPORTING iv_getdata TYPE clike
|
IMPORTING iv_getdata TYPE clike
|
||||||
RETURNING VALUE(rs_fields) TYPE lcl_persistence_background=>ty_background.
|
RETURNING VALUE(rs_fields) TYPE lcl_persist_background=>ty_background.
|
||||||
|
|
||||||
CLASS-METHODS stage_decode
|
CLASS-METHODS stage_decode
|
||||||
IMPORTING iv_getdata TYPE clike
|
IMPORTING iv_getdata TYPE clike
|
||||||
|
|
|
@ -50,7 +50,7 @@ CLASS lcl_gui_chunk_lib IMPLEMENTATION.
|
||||||
METHOD render_repo_top.
|
METHOD render_repo_top.
|
||||||
|
|
||||||
DATA: lo_repo_online TYPE REF TO lcl_repo_online,
|
DATA: lo_repo_online TYPE REF TO lcl_repo_online,
|
||||||
lo_pback TYPE REF TO lcl_persistence_background,
|
lo_pback TYPE REF TO lcl_persist_background,
|
||||||
lv_hint TYPE string,
|
lv_hint TYPE string,
|
||||||
lv_icon TYPE string.
|
lv_icon TYPE string.
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include ZABAPGIT_HTTP
|
*& Include ZABAPGIT_HTTP
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_proxy_authentication DEFINITION FINAL.
|
CLASS lcl_proxy_auth DEFINITION FINAL.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
CLASS-METHODS:
|
CLASS-METHODS:
|
||||||
|
@ -18,7 +18,7 @@ CLASS lcl_proxy_authentication DEFINITION FINAL.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_proxy_authentication IMPLEMENTATION.
|
CLASS lcl_proxy_auth IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD run.
|
METHOD run.
|
||||||
|
|
||||||
|
@ -450,7 +450,7 @@ CLASS lcl_http IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
IF lo_settings->get_proxy_authentication( ) = abap_true.
|
IF lo_settings->get_proxy_authentication( ) = abap_true.
|
||||||
lcl_proxy_authentication=>run( li_client ).
|
lcl_proxy_auth=>run( li_client ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
CREATE OBJECT ro_client
|
CREATE OBJECT ro_client
|
||||||
|
@ -565,7 +565,7 @@ CLASS lcl_http IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
" Offer two factor authentication if it is available and required
|
" Offer two factor authentication if it is available and required
|
||||||
lcl_2fa_authenticator_registry=>use_2fa_if_required(
|
lcl_2fa_auth_registry=>use_2fa_if_required(
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_url = iv_url
|
iv_url = iv_url
|
||||||
CHANGING
|
CHANGING
|
||||||
|
|
|
@ -21,7 +21,7 @@ CLASS lcl_migrations IMPLEMENTATION.
|
||||||
METHOD run.
|
METHOD run.
|
||||||
|
|
||||||
" Migrate STDTEXT to TABLE
|
" Migrate STDTEXT to TABLE
|
||||||
lcl_persistence_migrate=>run( ).
|
lcl_persist_migrate=>run( ).
|
||||||
|
|
||||||
" Rebuild local file checksums
|
" Rebuild local file checksums
|
||||||
rebuild_local_checksums_161112( ).
|
rebuild_local_checksums_161112( ).
|
||||||
|
|
|
@ -150,7 +150,7 @@ CLASS lcl_object_acid IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~jump
|
ENDMETHOD. "lif_object~jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_acid IMPLEMENTATION
|
ENDCLASS. "lcl_object_acid IMPLEMENTATION
|
||||||
|
|
|
@ -127,7 +127,7 @@ CLASS lcl_object_auth IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~jump
|
ENDMETHOD. "lif_object~jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_auth IMPLEMENTATION
|
ENDCLASS. "lcl_object_auth IMPLEMENTATION
|
||||||
|
|
|
@ -26,7 +26,7 @@ CLASS lcl_object_clas DEFINITION INHERITING FROM lcl_objects_program.
|
||||||
METHODS deserialize_docu
|
METHODS deserialize_docu
|
||||||
IMPORTING io_xml TYPE REF TO lcl_xml_input
|
IMPORTING io_xml TYPE REF TO lcl_xml_input
|
||||||
RAISING lcx_exception.
|
RAISING lcx_exception.
|
||||||
DATA mo_object_oriented_object_fct TYPE REF TO lif_object_oriented_object_fnc.
|
DATA mo_object_oriented_object_fct TYPE REF TO lif_oo_object_fnc.
|
||||||
PRIVATE SECTION.
|
PRIVATE SECTION.
|
||||||
DATA mv_skip_testclass TYPE abap_bool.
|
DATA mv_skip_testclass TYPE abap_bool.
|
||||||
|
|
||||||
|
@ -389,36 +389,36 @@ CLASS lcl_object_clas IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
super->constructor(
|
super->constructor(
|
||||||
is_item = is_item
|
is_item = is_item
|
||||||
iv_language = iv_language ).
|
iv_language = iv_language ).
|
||||||
mo_object_oriented_object_fct = lcl_object_oriented_factory=>make( iv_object_type = ms_item-obj_type ).
|
mo_object_oriented_object_fct = lcl_oo_factory=>make( iv_object_type = ms_item-obj_type ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_CLAS IMPLEMENTATION
|
ENDCLASS. "lcl_object_CLAS IMPLEMENTATION
|
||||||
|
|
||||||
|
CLASS lcl_oo_class DEFINITION INHERITING FROM lcl_oo_base.
|
||||||
|
|
||||||
CLASS lcl_object_oriented_class DEFINITION
|
|
||||||
INHERITING FROM lcl_object_oriented_base.
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
lif_object_oriented_object_fnc~create REDEFINITION,
|
lif_oo_object_fnc~create REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~generate_locals REDEFINITION,
|
lif_oo_object_fnc~generate_locals REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~insert_text_pool REDEFINITION,
|
lif_oo_object_fnc~insert_text_pool REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~create_sotr REDEFINITION,
|
lif_oo_object_fnc~create_sotr REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~get_includes REDEFINITION,
|
lif_oo_object_fnc~get_includes REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~get_class_properties REDEFINITION,
|
lif_oo_object_fnc~get_class_properties REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~read_text_pool REDEFINITION,
|
lif_oo_object_fnc~read_text_pool REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~read_sotr REDEFINITION,
|
lif_oo_object_fnc~read_sotr REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~delete REDEFINITION.
|
lif_oo_object_fnc~delete REDEFINITION.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
CLASS lcl_object_oriented_class IMPLEMENTATION.
|
|
||||||
METHOD lif_object_oriented_object_fnc~create.
|
CLASS lcl_oo_class IMPLEMENTATION.
|
||||||
|
METHOD lif_oo_object_fnc~create.
|
||||||
CALL FUNCTION 'SEO_CLASS_CREATE_COMPLETE'
|
CALL FUNCTION 'SEO_CLASS_CREATE_COMPLETE'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
devclass = iv_package
|
devclass = iv_package
|
||||||
|
@ -437,7 +437,8 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
lcx_exception=>raise( 'error from SEO_CLASS_CREATE_COMPLETE' ).
|
lcx_exception=>raise( 'error from SEO_CLASS_CREATE_COMPLETE' ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
METHOD lif_object_oriented_object_fnc~generate_locals.
|
|
||||||
|
METHOD lif_oo_object_fnc~generate_locals.
|
||||||
CALL FUNCTION 'SEO_CLASS_GENERATE_LOCALS'
|
CALL FUNCTION 'SEO_CLASS_GENERATE_LOCALS'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
clskey = is_key
|
clskey = is_key
|
||||||
|
@ -456,7 +457,7 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
lcx_exception=>raise( 'error from generate_locals' ).
|
lcx_exception=>raise( 'error from generate_locals' ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
METHOD lif_object_oriented_object_fnc~insert_text_pool.
|
METHOD lif_oo_object_fnc~insert_text_pool.
|
||||||
DATA: lv_cp TYPE program.
|
DATA: lv_cp TYPE program.
|
||||||
|
|
||||||
lv_cp = cl_oo_classname_service=>get_classpool_name( iv_class_name ).
|
lv_cp = cl_oo_classname_service=>get_classpool_name( iv_class_name ).
|
||||||
|
@ -473,7 +474,7 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
iv_name = lv_cp ).
|
iv_name = lv_cp ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~create_sotr.
|
METHOD lif_oo_object_fnc~create_sotr.
|
||||||
DATA: lt_sotr TYPE lif_defs=>ty_sotr_tt,
|
DATA: lt_sotr TYPE lif_defs=>ty_sotr_tt,
|
||||||
lt_objects TYPE sotr_objects,
|
lt_objects TYPE sotr_objects,
|
||||||
ls_paket TYPE sotr_pack,
|
ls_paket TYPE sotr_pack,
|
||||||
|
@ -533,7 +534,7 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
ENDLOOP.
|
ENDLOOP.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_includes.
|
METHOD lif_oo_object_fnc~get_includes.
|
||||||
* note: includes returned might not exist
|
* note: includes returned might not exist
|
||||||
* method cl_oo_classname_service=>GET_ALL_CLASS_INCLUDES does not exist in 702
|
* method cl_oo_classname_service=>GET_ALL_CLASS_INCLUDES does not exist in 702
|
||||||
|
|
||||||
|
@ -566,7 +567,7 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
|
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_class_properties.
|
METHOD lif_oo_object_fnc~get_class_properties.
|
||||||
CALL FUNCTION 'SEO_CLIF_GET'
|
CALL FUNCTION 'SEO_CLIF_GET'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
cifkey = is_class_key
|
cifkey = is_class_key
|
||||||
|
@ -585,7 +586,7 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_text_pool.
|
METHOD lif_oo_object_fnc~read_text_pool.
|
||||||
DATA:
|
DATA:
|
||||||
lv_cp TYPE program.
|
lv_cp TYPE program.
|
||||||
|
|
||||||
|
@ -593,7 +594,7 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
READ TEXTPOOL lv_cp INTO rt_text_pool LANGUAGE iv_language. "#EC CI_READ_REP
|
READ TEXTPOOL lv_cp INTO rt_text_pool LANGUAGE iv_language. "#EC CI_READ_REP
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_sotr.
|
METHOD lif_oo_object_fnc~read_sotr.
|
||||||
DATA: lv_concept TYPE sotr_head-concept,
|
DATA: lv_concept TYPE sotr_head-concept,
|
||||||
lt_seocompodf TYPE STANDARD TABLE OF seocompodf WITH DEFAULT KEY,
|
lt_seocompodf TYPE STANDARD TABLE OF seocompodf WITH DEFAULT KEY,
|
||||||
ls_header TYPE sotr_head,
|
ls_header TYPE sotr_head,
|
||||||
|
@ -652,7 +653,7 @@ CLASS lcl_object_oriented_class IMPLEMENTATION.
|
||||||
ENDLOOP.
|
ENDLOOP.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~delete.
|
METHOD lif_oo_object_fnc~delete.
|
||||||
CALL FUNCTION 'SEO_CLASS_DELETE_COMPLETE'
|
CALL FUNCTION 'SEO_CLASS_DELETE_COMPLETE'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
clskey = is_deletion_key
|
clskey = is_deletion_key
|
||||||
|
|
|
@ -183,7 +183,7 @@ CLASS lcl_object_dcls IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
|
@ -207,7 +207,7 @@ CLASS lcl_object_ddls IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD. "lif_object~compare_to_remote_version
|
ENDMETHOD. "lif_object~compare_to_remote_version
|
||||||
|
|
||||||
METHOD open_adt_stob.
|
METHOD open_adt_stob.
|
||||||
|
|
|
@ -152,7 +152,7 @@ CLASS lcl_object_doct IMPLEMENTATION.
|
||||||
ENDMETHOD. "serialize
|
ENDMETHOD. "serialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_msag IMPLEMENTATION
|
ENDCLASS. "lcl_object_msag IMPLEMENTATION
|
||||||
|
|
|
@ -156,7 +156,7 @@ CLASS lcl_object_docv IMPLEMENTATION.
|
||||||
ENDMETHOD. "serialize
|
ENDMETHOD. "serialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_msag IMPLEMENTATION
|
ENDCLASS. "lcl_object_msag IMPLEMENTATION
|
||||||
|
|
|
@ -360,7 +360,7 @@ CLASS lcl_object_doma IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize_texts
|
ENDMETHOD. "deserialize_texts
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_doma IMPLEMENTATION
|
ENDCLASS. "lcl_object_doma IMPLEMENTATION
|
||||||
|
|
|
@ -328,7 +328,7 @@ CLASS lcl_object_dtel IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_dtel IMPLEMENTATION
|
ENDCLASS. "lcl_object_dtel IMPLEMENTATION
|
||||||
|
|
|
@ -23,7 +23,7 @@ ENDINTERFACE. "lif_object_enho
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
*
|
*
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
CLASS lcl_object_enho_wdyconf DEFINITION.
|
CLASS lcl_object_enho_wdyc DEFINITION.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS: constructor
|
METHODS: constructor
|
||||||
|
@ -43,7 +43,7 @@ ENDCLASS. "lcl_object_enho_wdyconf DEFINITION
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
*
|
*
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
CLASS lcl_object_enho_wdyconf IMPLEMENTATION.
|
CLASS lcl_object_enho_wdyc IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
ms_item = is_item.
|
ms_item = is_item.
|
||||||
|
@ -633,7 +633,7 @@ ENDCLASS. "lcl_object_enho_hook IMPLEMENTATION
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
*
|
*
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
CLASS lcl_object_enho_interface DEFINITION.
|
CLASS lcl_object_enho_intf DEFINITION.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
|
@ -654,7 +654,7 @@ ENDCLASS. "lcl_object_enho_interface DEFINITION
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
*
|
*
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
CLASS lcl_object_enho_interface IMPLEMENTATION.
|
CLASS lcl_object_enho_intf IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
ms_item = is_item.
|
ms_item = is_item.
|
||||||
|
@ -979,12 +979,12 @@ CLASS lcl_object_enho IMPLEMENTATION.
|
||||||
is_item = ms_item
|
is_item = ms_item
|
||||||
io_files = mo_files.
|
io_files = mo_files.
|
||||||
WHEN cl_enh_tool_intf=>tooltype.
|
WHEN cl_enh_tool_intf=>tooltype.
|
||||||
CREATE OBJECT ri_enho TYPE lcl_object_enho_interface
|
CREATE OBJECT ri_enho TYPE lcl_object_enho_intf
|
||||||
EXPORTING
|
EXPORTING
|
||||||
is_item = ms_item
|
is_item = ms_item
|
||||||
io_files = mo_files.
|
io_files = mo_files.
|
||||||
WHEN cl_wdr_cfg_enhancement=>tooltype.
|
WHEN cl_wdr_cfg_enhancement=>tooltype.
|
||||||
CREATE OBJECT ri_enho TYPE lcl_object_enho_wdyconf
|
CREATE OBJECT ri_enho TYPE lcl_object_enho_wdyc
|
||||||
EXPORTING
|
EXPORTING
|
||||||
is_item = ms_item
|
is_item = ms_item
|
||||||
io_files = mo_files.
|
io_files = mo_files.
|
||||||
|
@ -1051,7 +1051,7 @@ CLASS lcl_object_enho IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD. "lif_object~compare_to_remote_version
|
ENDMETHOD. "lif_object~compare_to_remote_version
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_enho IMPLEMENTATION
|
ENDCLASS. "lcl_object_enho IMPLEMENTATION
|
||||||
|
|
|
@ -212,7 +212,7 @@ CLASS lcl_object_enhs IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_enhs
|
ENDCLASS. "lcl_object_enhs
|
||||||
|
|
|
@ -184,7 +184,7 @@ CLASS lcl_object_enqu IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_enqu IMPLEMENTATION
|
ENDCLASS. "lcl_object_enqu IMPLEMENTATION
|
||||||
|
|
|
@ -191,7 +191,7 @@ CLASS lcl_object_ensc IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_ensc
|
ENDCLASS. "lcl_object_ensc
|
||||||
|
|
|
@ -260,7 +260,7 @@ CLASS lcl_object_form IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD _build_extra_from_header.
|
METHOD _build_extra_from_header.
|
||||||
|
|
|
@ -769,7 +769,7 @@ CLASS lcl_object_fugr IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_fugr IMPLEMENTATION
|
ENDCLASS. "lcl_object_fugr IMPLEMENTATION
|
||||||
|
|
|
@ -189,7 +189,7 @@ CLASS lcl_object_iarp IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~jump
|
ENDMETHOD. "lif_object~jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_iarp IMPLEMENTATION
|
ENDCLASS. "lcl_object_iarp IMPLEMENTATION
|
||||||
|
|
|
@ -189,7 +189,7 @@ CLASS lcl_object_iasp IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~jump
|
ENDMETHOD. "lif_object~jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_iasp IMPLEMENTATION
|
ENDCLASS. "lcl_object_iasp IMPLEMENTATION
|
||||||
|
|
|
@ -206,7 +206,7 @@ CLASS lcl_object_iatu IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~jump
|
ENDMETHOD. "lif_object~jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_iatu IMPLEMENTATION
|
ENDCLASS. "lcl_object_iatu IMPLEMENTATION
|
||||||
|
|
|
@ -26,7 +26,7 @@ CLASS lcl_object_intf DEFINITION FINAL INHERITING FROM lcl_objects_program.
|
||||||
RAISING lcx_exception.
|
RAISING lcx_exception.
|
||||||
|
|
||||||
PRIVATE SECTION.
|
PRIVATE SECTION.
|
||||||
DATA mo_object_oriented_object_fct TYPE REF TO lif_object_oriented_object_fnc.
|
DATA mo_object_oriented_object_fct TYPE REF TO lif_oo_object_fnc.
|
||||||
|
|
||||||
METHODS serialize_xml
|
METHODS serialize_xml
|
||||||
IMPORTING io_xml TYPE REF TO lcl_xml_output
|
IMPORTING io_xml TYPE REF TO lcl_xml_output
|
||||||
|
@ -40,23 +40,25 @@ CLASS lcl_object_intf IMPLEMENTATION.
|
||||||
super->constructor(
|
super->constructor(
|
||||||
is_item = is_item
|
is_item = is_item
|
||||||
iv_language = iv_language ).
|
iv_language = iv_language ).
|
||||||
mo_object_oriented_object_fct = lcl_object_oriented_factory=>make( iv_object_type = ms_item-obj_type ).
|
mo_object_oriented_object_fct = lcl_oo_factory=>make( iv_object_type = ms_item-obj_type ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~deserialize.
|
METHOD lif_object~deserialize.
|
||||||
deserialize_abap( io_xml = io_xml
|
deserialize_abap( io_xml = io_xml
|
||||||
iv_package = iv_package ).
|
iv_package = iv_package ).
|
||||||
|
|
||||||
deserialize_docu( io_xml ).
|
deserialize_docu( io_xml ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD deserialize_abap.
|
METHOD deserialize_abap.
|
||||||
DATA: ls_vseointerf TYPE vseointerf,
|
DATA: ls_vseointerf TYPE vseointerf,
|
||||||
lt_source TYPE seop_source_string,
|
lt_source TYPE seop_source_string,
|
||||||
lt_descriptions TYPE lif_defs=>ty_seocompotx_tt,
|
lt_descriptions TYPE lif_defs=>ty_seocompotx_tt,
|
||||||
ls_clskey TYPE seoclskey.
|
ls_clskey TYPE seoclskey.
|
||||||
|
|
||||||
|
|
||||||
ls_clskey-clsname = ms_item-obj_name.
|
ls_clskey-clsname = ms_item-obj_name.
|
||||||
|
|
||||||
lt_source = mo_files->read_abap( ).
|
lt_source = mo_files->read_abap( ).
|
||||||
|
|
||||||
io_xml->read( EXPORTING iv_name = 'VSEOINTERF'
|
io_xml->read( EXPORTING iv_name = 'VSEOINTERF'
|
||||||
CHANGING cg_data = ls_vseointerf ).
|
CHANGING cg_data = ls_vseointerf ).
|
||||||
|
|
||||||
|
@ -212,7 +214,7 @@ CLASS lcl_object_intf IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~delete.
|
METHOD lif_object~delete.
|
||||||
|
@ -259,18 +261,18 @@ CLASS lcl_object_intf IMPLEMENTATION.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
|
|
||||||
CLASS lcl_object_oriented_interface DEFINITION
|
CLASS lcl_oo_interface DEFINITION
|
||||||
INHERITING FROM lcl_object_oriented_base.
|
INHERITING FROM lcl_oo_base.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
lif_object_oriented_object_fnc~create REDEFINITION,
|
lif_oo_object_fnc~create REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~get_includes REDEFINITION,
|
lif_oo_object_fnc~get_includes REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~get_interface_properties REDEFINITION,
|
lif_oo_object_fnc~get_interface_properties REDEFINITION,
|
||||||
lif_object_oriented_object_fnc~delete REDEFINITION.
|
lif_oo_object_fnc~delete REDEFINITION.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_object_oriented_interface IMPLEMENTATION.
|
CLASS lcl_oo_interface IMPLEMENTATION.
|
||||||
METHOD lif_object_oriented_object_fnc~create.
|
METHOD lif_oo_object_fnc~create.
|
||||||
CALL FUNCTION 'SEO_INTERFACE_CREATE_COMPLETE'
|
CALL FUNCTION 'SEO_INTERFACE_CREATE_COMPLETE'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
devclass = iv_package
|
devclass = iv_package
|
||||||
|
@ -289,13 +291,14 @@ CLASS lcl_object_oriented_interface IMPLEMENTATION.
|
||||||
lcx_exception=>raise( 'Error from SEO_INTERFACE_CREATE_COMPLETE' ).
|
lcx_exception=>raise( 'Error from SEO_INTERFACE_CREATE_COMPLETE' ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
METHOD lif_object_oriented_object_fnc~get_includes.
|
|
||||||
|
METHOD lif_oo_object_fnc~get_includes.
|
||||||
DATA lv_interface_name TYPE seoclsname.
|
DATA lv_interface_name TYPE seoclsname.
|
||||||
lv_interface_name = iv_object_name.
|
lv_interface_name = iv_object_name.
|
||||||
APPEND cl_oo_classname_service=>get_interfacepool_name( lv_interface_name ) TO rt_includes.
|
APPEND cl_oo_classname_service=>get_interfacepool_name( lv_interface_name ) TO rt_includes.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_interface_properties.
|
METHOD lif_oo_object_fnc~get_interface_properties.
|
||||||
CALL FUNCTION 'SEO_CLIF_GET'
|
CALL FUNCTION 'SEO_CLIF_GET'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
cifkey = is_interface_key
|
cifkey = is_interface_key
|
||||||
|
@ -314,7 +317,7 @@ CLASS lcl_object_oriented_interface IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~delete.
|
METHOD lif_oo_object_fnc~delete.
|
||||||
CALL FUNCTION 'SEO_INTERFACE_DELETE_COMPLETE'
|
CALL FUNCTION 'SEO_INTERFACE_DELETE_COMPLETE'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
intkey = is_deletion_key
|
intkey = is_deletion_key
|
||||||
|
|
|
@ -299,7 +299,7 @@ CLASS lcl_object_msag IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_msag IMPLEMENTATION
|
ENDCLASS. "lcl_object_msag IMPLEMENTATION
|
||||||
|
|
|
@ -255,7 +255,7 @@ CLASS lcl_object_nrob IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_nrob IMPLEMENTATION
|
ENDCLASS. "lcl_object_nrob IMPLEMENTATION
|
||||||
|
|
|
@ -1,16 +1,16 @@
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
*& Include zabapgit_object_oo_factory
|
*& Include zabapgit_object_oo_factory
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
CLASS lcl_object_oriented_factory IMPLEMENTATION.
|
CLASS lcl_oo_factory IMPLEMENTATION.
|
||||||
METHOD make.
|
METHOD make.
|
||||||
IF go_object_oriented_object IS BOUND.
|
IF go_object_oriented_object IS BOUND.
|
||||||
ro_object_oriented_object = go_object_oriented_object.
|
ro_object_oriented_object = go_object_oriented_object.
|
||||||
RETURN.
|
RETURN.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
IF iv_object_type = 'CLAS'.
|
IF iv_object_type = 'CLAS'.
|
||||||
CREATE OBJECT ro_object_oriented_object TYPE lcl_object_oriented_class.
|
CREATE OBJECT ro_object_oriented_object TYPE lcl_oo_class.
|
||||||
ELSEIF iv_object_type = 'INTF'.
|
ELSEIF iv_object_type = 'INTF'.
|
||||||
CREATE OBJECT ro_object_oriented_object TYPE lcl_object_oriented_interface.
|
CREATE OBJECT ro_object_oriented_object TYPE lcl_oo_interface.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
@ -20,11 +20,11 @@ CLASS ltcl_oo_factory_injector DEFINITION FOR TESTING.
|
||||||
CLASS-METHODS:
|
CLASS-METHODS:
|
||||||
inject
|
inject
|
||||||
IMPORTING
|
IMPORTING
|
||||||
io_object_oriented_object TYPE REF TO lif_object_oriented_object_fnc.
|
io_object_oriented_object TYPE REF TO lif_oo_object_fnc.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS ltcl_oo_factory_injector IMPLEMENTATION.
|
CLASS ltcl_oo_factory_injector IMPLEMENTATION.
|
||||||
METHOD inject.
|
METHOD inject.
|
||||||
lcl_object_oriented_factory=>go_object_oriented_object = io_object_oriented_object.
|
lcl_oo_factory=>go_object_oriented_object = io_object_oriented_object.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
|
@ -1,6 +1,6 @@
|
||||||
"This interface contains SAP object oriented functions that can't be put under test
|
"This interface contains SAP object oriented functions that can't be put under test
|
||||||
"(i.e. creating a Class in the system)
|
"(i.e. creating a Class in the system)
|
||||||
INTERFACE lif_object_oriented_object_fnc.
|
INTERFACE lif_oo_object_fnc.
|
||||||
TYPES: BEGIN OF ty_includes,
|
TYPES: BEGIN OF ty_includes,
|
||||||
programm TYPE programm,
|
programm TYPE programm,
|
||||||
END OF ty_includes,
|
END OF ty_includes,
|
||||||
|
@ -128,7 +128,7 @@ INTERFACE lif_object_oriented_object_fnc.
|
||||||
lcx_exception.
|
lcx_exception.
|
||||||
ENDINTERFACE.
|
ENDINTERFACE.
|
||||||
|
|
||||||
CLASS lcl_oo_object_serializer DEFINITION.
|
CLASS lcl_oo_serializer DEFINITION.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
|
|
||||||
METHODS:
|
METHODS:
|
||||||
|
@ -187,7 +187,7 @@ CLASS lcl_oo_object_serializer DEFINITION.
|
||||||
CHANGING ct_source TYPE lif_defs=>ty_string_tt.
|
CHANGING ct_source TYPE lif_defs=>ty_string_tt.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_oo_object_serializer IMPLEMENTATION.
|
CLASS lcl_oo_serializer IMPLEMENTATION.
|
||||||
METHOD serialize_abap_clif_source.
|
METHOD serialize_abap_clif_source.
|
||||||
TRY.
|
TRY.
|
||||||
rt_source = serialize_abap_new( is_class_key ).
|
rt_source = serialize_abap_new( is_class_key ).
|
||||||
|
@ -195,6 +195,7 @@ CLASS lcl_oo_object_serializer IMPLEMENTATION.
|
||||||
rt_source = serialize_abap_old( is_class_key ).
|
rt_source = serialize_abap_old( is_class_key ).
|
||||||
ENDTRY.
|
ENDTRY.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD serialize_abap_old.
|
METHOD serialize_abap_old.
|
||||||
* for old ABAP AS versions
|
* for old ABAP AS versions
|
||||||
DATA: lo_source TYPE REF TO cl_oo_source.
|
DATA: lo_source TYPE REF TO cl_oo_source.
|
||||||
|
@ -383,11 +384,13 @@ CLASS lcl_oo_object_serializer IMPLEMENTATION.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_object_oriented_base DEFINITION ABSTRACT.
|
CLASS lcl_oo_base DEFINITION ABSTRACT.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
INTERFACES: lif_object_oriented_object_fnc.
|
INTERFACES: lif_oo_object_fnc.
|
||||||
|
|
||||||
PRIVATE SECTION.
|
PRIVATE SECTION.
|
||||||
DATA mv_skip_test_classes TYPE abap_bool.
|
DATA mv_skip_test_classes TYPE abap_bool.
|
||||||
|
|
||||||
METHODS deserialize_abap_source_old
|
METHODS deserialize_abap_source_old
|
||||||
IMPORTING is_clskey TYPE seoclskey
|
IMPORTING is_clskey TYPE seoclskey
|
||||||
it_source TYPE lif_defs=>ty_string_tt
|
it_source TYPE lif_defs=>ty_string_tt
|
||||||
|
@ -400,13 +403,13 @@ CLASS lcl_object_oriented_base DEFINITION ABSTRACT.
|
||||||
cx_sy_dyn_call_error.
|
cx_sy_dyn_call_error.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_object_oriented_base IMPLEMENTATION.
|
CLASS lcl_oo_base IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~create.
|
METHOD lif_oo_object_fnc~create.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~deserialize_source.
|
METHOD lif_oo_object_fnc~deserialize_source.
|
||||||
TRY.
|
TRY.
|
||||||
deserialize_abap_source_new(
|
deserialize_abap_source_new(
|
||||||
is_clskey = is_key
|
is_clskey = is_key
|
||||||
|
@ -418,7 +421,7 @@ CLASS lcl_object_oriented_base IMPLEMENTATION.
|
||||||
ENDTRY.
|
ENDTRY.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~generate_locals.
|
METHOD lif_oo_object_fnc~generate_locals.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
|
@ -479,24 +482,25 @@ CLASS lcl_object_oriented_base IMPLEMENTATION.
|
||||||
CALL METHOD lo_source->('IF_OO_CLIF_SOURCE~UNLOCK').
|
CALL METHOD lo_source->('IF_OO_CLIF_SOURCE~UNLOCK').
|
||||||
|
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
METHOD lif_object_oriented_object_fnc~add_to_activation_list.
|
|
||||||
|
METHOD lif_oo_object_fnc~add_to_activation_list.
|
||||||
lcl_objects_activation=>add_item( is_item ).
|
lcl_objects_activation=>add_item( is_item ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~update_descriptions.
|
METHOD lif_oo_object_fnc~update_descriptions.
|
||||||
DELETE FROM seocompotx WHERE clsname = is_key-clsname. "#EC CI_SUBRC
|
DELETE FROM seocompotx WHERE clsname = is_key-clsname. "#EC CI_SUBRC
|
||||||
INSERT seocompotx FROM TABLE it_descriptions. "#EC CI_SUBRC
|
INSERT seocompotx FROM TABLE it_descriptions. "#EC CI_SUBRC
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~insert_text_pool.
|
METHOD lif_oo_object_fnc~insert_text_pool.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~create_sotr.
|
METHOD lif_oo_object_fnc~create_sotr.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~create_documentation.
|
METHOD lif_oo_object_fnc~create_documentation.
|
||||||
CALL FUNCTION 'DOCU_UPD'
|
CALL FUNCTION 'DOCU_UPD'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
id = 'CL'
|
id = 'CL'
|
||||||
|
@ -512,11 +516,11 @@ CLASS lcl_object_oriented_base IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_includes.
|
METHOD lif_oo_object_fnc~get_includes.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~exists.
|
METHOD lif_oo_object_fnc~exists.
|
||||||
CALL FUNCTION 'SEO_CLASS_EXISTENCE_CHECK'
|
CALL FUNCTION 'SEO_CLASS_EXISTENCE_CHECK'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
clskey = iv_object_name
|
clskey = iv_object_name
|
||||||
|
@ -530,8 +534,8 @@ CLASS lcl_object_oriented_base IMPLEMENTATION.
|
||||||
rv_exists = boolc( sy-subrc <> 2 ).
|
rv_exists = boolc( sy-subrc <> 2 ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~serialize_abap.
|
METHOD lif_oo_object_fnc~serialize_abap.
|
||||||
DATA lo_oo_serializer TYPE REF TO lcl_oo_object_serializer.
|
DATA lo_oo_serializer TYPE REF TO lcl_oo_serializer.
|
||||||
CREATE OBJECT lo_oo_serializer.
|
CREATE OBJECT lo_oo_serializer.
|
||||||
CASE iv_type.
|
CASE iv_type.
|
||||||
WHEN seop_ext_class_locals_def.
|
WHEN seop_ext_class_locals_def.
|
||||||
|
@ -548,29 +552,28 @@ CLASS lcl_object_oriented_base IMPLEMENTATION.
|
||||||
ENDCASE.
|
ENDCASE.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_skip_test_classes.
|
METHOD lif_oo_object_fnc~get_skip_test_classes.
|
||||||
rv_skip = mv_skip_test_classes.
|
rv_skip = mv_skip_test_classes.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_class_properties.
|
METHOD lif_oo_object_fnc~get_class_properties.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_interface_properties.
|
METHOD lif_oo_object_fnc~get_interface_properties.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_text_pool.
|
METHOD lif_oo_object_fnc~read_text_pool.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_sotr.
|
METHOD lif_oo_object_fnc~read_sotr.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_documentation.
|
METHOD lif_oo_object_fnc~read_documentation.
|
||||||
DATA:
|
DATA: lv_state TYPE dokstate,
|
||||||
lv_state TYPE dokstate,
|
|
||||||
lv_object TYPE dokhl-object,
|
lv_object TYPE dokhl-object,
|
||||||
lt_lines TYPE tlinetab.
|
lt_lines TYPE tlinetab.
|
||||||
|
|
||||||
|
@ -598,13 +601,13 @@ CLASS lcl_object_oriented_base IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_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. "#EC CI_SUBRC
|
||||||
DELETE rt_descriptions WHERE descript IS INITIAL.
|
DELETE rt_descriptions WHERE descript IS INITIAL.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~delete.
|
METHOD lif_oo_object_fnc~delete.
|
||||||
ASSERT 0 = 1. "Subclass responsibility
|
ASSERT 0 = 1. "Subclass responsibility
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
|
@ -613,7 +616,7 @@ ENDCLASS.
|
||||||
"Backdoor injection for test purposes
|
"Backdoor injection for test purposes
|
||||||
CLASS ltcl_oo_factory_injector DEFINITION DEFERRED.
|
CLASS ltcl_oo_factory_injector DEFINITION DEFERRED.
|
||||||
|
|
||||||
CLASS lcl_object_oriented_factory DEFINITION
|
CLASS lcl_oo_factory DEFINITION
|
||||||
FRIENDS ltcl_oo_factory_injector.
|
FRIENDS ltcl_oo_factory_injector.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
|
@ -622,10 +625,10 @@ CLASS lcl_object_oriented_factory DEFINITION
|
||||||
IMPORTING
|
IMPORTING
|
||||||
iv_object_type TYPE tadir-object
|
iv_object_type TYPE tadir-object
|
||||||
RETURNING
|
RETURNING
|
||||||
VALUE(ro_object_oriented_object) TYPE REF TO lif_object_oriented_object_fnc.
|
VALUE(ro_object_oriented_object) TYPE REF TO lif_oo_object_fnc.
|
||||||
PRIVATE SECTION.
|
PRIVATE SECTION.
|
||||||
CLASS-DATA:
|
CLASS-DATA:
|
||||||
go_object_oriented_object TYPE REF TO lif_object_oriented_object_fnc.
|
go_object_oriented_object TYPE REF TO lif_oo_object_fnc.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
"lcl_object_oriented_factory implementation is in include ZABAPGIT_OBJECT_OO_FACTORY.
|
"lcl_object_oriented_factory implementation is in include ZABAPGIT_OBJECT_OO_FACTORY.
|
||||||
"Reason: In this way, clas and intf specific OO functions implementations can be done
|
"Reason: In this way, clas and intf specific OO functions implementations can be done
|
||||||
|
|
|
@ -145,7 +145,7 @@ CLASS lcl_object_para IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_para IMPLEMENTATION
|
ENDCLASS. "lcl_object_para IMPLEMENTATION
|
||||||
|
|
|
@ -356,7 +356,7 @@ CLASS lcl_object_pinf IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_PINF IMPLEMENTATION
|
ENDCLASS. "lcl_object_PINF IMPLEMENTATION
|
||||||
|
|
|
@ -158,7 +158,7 @@ CLASS lcl_object_prog IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_serialize~deserialize
|
ENDMETHOD. "lif_serialize~deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD. "lif_object~compare_to_remote_version
|
ENDMETHOD. "lif_object~compare_to_remote_version
|
||||||
|
|
||||||
METHOD serialize_texts.
|
METHOD serialize_texts.
|
||||||
|
|
|
@ -256,9 +256,7 @@ CLASS lcl_object_samc IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
|
||||||
|
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD get_data_object.
|
METHOD get_data_object.
|
||||||
|
|
|
@ -256,9 +256,7 @@ CLASS lcl_object_sapc IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
|
||||||
|
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD get_data_object.
|
METHOD get_data_object.
|
||||||
|
|
|
@ -249,7 +249,7 @@ CLASS lcl_object_sfbf IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_SFBF IMPLEMENTATION
|
ENDCLASS. "lcl_object_SFBF IMPLEMENTATION
|
||||||
|
|
|
@ -223,7 +223,7 @@ CLASS lcl_object_sfbs IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_SFBS IMPLEMENTATION
|
ENDCLASS. "lcl_object_SFBS IMPLEMENTATION
|
||||||
|
|
|
@ -216,7 +216,7 @@ CLASS lcl_object_sfpf IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_doma IMPLEMENTATION
|
ENDCLASS. "lcl_object_doma IMPLEMENTATION
|
||||||
|
|
|
@ -162,7 +162,7 @@ CLASS lcl_object_sfpi IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_doma IMPLEMENTATION
|
ENDCLASS. "lcl_object_doma IMPLEMENTATION
|
||||||
|
|
|
@ -215,7 +215,7 @@ CLASS lcl_object_sfsw IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_sfsw IMPLEMENTATION
|
ENDCLASS. "lcl_object_sfsw IMPLEMENTATION
|
||||||
|
|
|
@ -336,7 +336,7 @@ CLASS lcl_object_shi3 IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_shi3 IMPLEMENTATION
|
ENDCLASS. "lcl_object_shi3 IMPLEMENTATION
|
||||||
|
|
|
@ -205,7 +205,7 @@ CLASS lcl_object_shlp IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_shlp IMPLEMENTATION
|
ENDCLASS. "lcl_object_shlp IMPLEMENTATION
|
||||||
|
|
|
@ -423,7 +423,7 @@ CLASS lcl_object_sicf IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_sicf IMPLEMENTATION
|
ENDCLASS. "lcl_object_sicf IMPLEMENTATION
|
||||||
|
|
|
@ -332,7 +332,7 @@ CLASS lcl_object_smim IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_smim IMPLEMENTATION
|
ENDCLASS. "lcl_object_smim IMPLEMENTATION
|
||||||
|
|
|
@ -120,7 +120,7 @@ CLASS lcl_object_splo IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~jump
|
ENDMETHOD. "lif_object~jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_splo IMPLEMENTATION
|
ENDCLASS. "lcl_object_splo IMPLEMENTATION
|
||||||
|
|
|
@ -240,7 +240,7 @@ CLASS lcl_object_ssfo IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_ssfo IMPLEMENTATION
|
ENDCLASS. "lcl_object_ssfo IMPLEMENTATION
|
||||||
|
|
|
@ -204,7 +204,7 @@ CLASS lcl_object_ssst IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_ssst IMPLEMENTATION
|
ENDCLASS. "lcl_object_ssst IMPLEMENTATION
|
||||||
|
|
|
@ -157,7 +157,7 @@ CLASS lcl_object_styl IMPLEMENTATION.
|
||||||
ENDMETHOD. "serialize
|
ENDMETHOD. "serialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_styl IMPLEMENTATION
|
ENDCLASS. "lcl_object_styl IMPLEMENTATION
|
||||||
|
|
|
@ -122,7 +122,7 @@ CLASS lcl_object_susc IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_susc IMPLEMENTATION
|
ENDCLASS. "lcl_object_susc IMPLEMENTATION
|
||||||
|
|
|
@ -172,7 +172,7 @@ CLASS lcl_object_suso IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_suso IMPLEMENTATION
|
ENDCLASS. "lcl_object_suso IMPLEMENTATION
|
||||||
|
|
|
@ -426,7 +426,7 @@ CLASS lcl_object_tabl IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
DATA: lo_table_validation TYPE REF TO lcl_object_tabl_validation,
|
DATA: lo_table_validation TYPE REF TO lcl_object_tabl_valid,
|
||||||
lo_local_version_output TYPE REF TO lcl_xml_output,
|
lo_local_version_output TYPE REF TO lcl_xml_output,
|
||||||
lo_local_version_input TYPE REF TO lcl_xml_input,
|
lo_local_version_input TYPE REF TO lcl_xml_input,
|
||||||
lv_validation_text TYPE string.
|
lv_validation_text TYPE string.
|
||||||
|
@ -445,11 +445,11 @@ CLASS lcl_object_tabl IMPLEMENTATION.
|
||||||
io_local_version = lo_local_version_input ).
|
io_local_version = lo_local_version_input ).
|
||||||
IF lv_validation_text IS NOT INITIAL.
|
IF lv_validation_text IS NOT INITIAL.
|
||||||
lv_validation_text = |Database Table { ms_item-obj_name }: { lv_validation_text }|.
|
lv_validation_text = |Database Table { ms_item-obj_name }: { lv_validation_text }|.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_tabl_validation_dialog
|
CREATE OBJECT ro_comparison_result TYPE lcl_tabl_valid_dialog
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_message = lv_validation_text.
|
iv_message = lv_validation_text.
|
||||||
ELSE.
|
ELSE.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include zabapgit_object_tabl_valid
|
*& Include zabapgit_object_tabl_valid
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_object_tabl_validation DEFINITION FINAL.
|
CLASS lcl_object_tabl_valid DEFINITION FINAL.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS validate
|
METHODS validate
|
||||||
IMPORTING
|
IMPORTING
|
||||||
|
@ -14,20 +14,20 @@ CLASS lcl_object_tabl_validation DEFINITION FINAL.
|
||||||
lcx_exception.
|
lcx_exception.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_tabl_validation_dialog DEFINITION FINAL.
|
CLASS lcl_tabl_valid_dialog DEFINITION FINAL.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
constructor
|
constructor
|
||||||
IMPORTING
|
IMPORTING
|
||||||
iv_message TYPE string.
|
iv_message TYPE string.
|
||||||
INTERFACES: lif_object_comparison_result.
|
INTERFACES: lif_comparison_result.
|
||||||
|
|
||||||
PRIVATE SECTION.
|
PRIVATE SECTION.
|
||||||
DATA mv_message TYPE string.
|
DATA mv_message TYPE string.
|
||||||
DATA mv_halt TYPE string.
|
DATA mv_halt TYPE string.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_object_tabl_validation IMPLEMENTATION.
|
CLASS lcl_object_tabl_valid IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD validate.
|
METHOD validate.
|
||||||
DATA: lt_previous_table_fields TYPE TABLE OF dd03p,
|
DATA: lt_previous_table_fields TYPE TABLE OF dd03p,
|
||||||
|
@ -60,15 +60,16 @@ CLASS lcl_object_tabl_validation IMPLEMENTATION.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_tabl_validation_dialog IMPLEMENTATION.
|
CLASS lcl_tabl_valid_dialog IMPLEMENTATION.
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
mv_message = iv_message.
|
mv_message = iv_message.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
METHOD lif_object_comparison_result~is_result_complete_halt.
|
|
||||||
|
METHOD lif_comparison_result~is_result_complete_halt.
|
||||||
rv_response = mv_halt.
|
rv_response = mv_halt.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_comparison_result~show_confirmation_dialog.
|
METHOD lif_comparison_result~show_confirmation_dialog.
|
||||||
DATA lv_answer TYPE string.
|
DATA lv_answer TYPE string.
|
||||||
TRY.
|
TRY.
|
||||||
lv_answer = lcl_popups=>popup_to_confirm(
|
lv_answer = lcl_popups=>popup_to_confirm(
|
||||||
|
@ -102,7 +103,8 @@ CLASS lct_table_validation DEFINITION FOR TESTING RISK LEVEL HARMLESS DURATION S
|
||||||
create_xmls
|
create_xmls
|
||||||
RAISING
|
RAISING
|
||||||
lcx_exception.
|
lcx_exception.
|
||||||
DATA: mo_table_validator TYPE REF TO lcl_object_tabl_validation,
|
|
||||||
|
DATA: mo_table_validator TYPE REF TO lcl_object_tabl_valid,
|
||||||
mo_previous_version_out_xml TYPE REF TO lcl_xml_output,
|
mo_previous_version_out_xml TYPE REF TO lcl_xml_output,
|
||||||
mo_previous_version_input_xml TYPE REF TO lcl_xml_input,
|
mo_previous_version_input_xml TYPE REF TO lcl_xml_input,
|
||||||
mo_current_version_out_xml TYPE REF TO lcl_xml_output,
|
mo_current_version_out_xml TYPE REF TO lcl_xml_output,
|
||||||
|
|
|
@ -195,7 +195,7 @@ CLASS lcl_object_tobj IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_tobj IMPLEMENTATION
|
ENDCLASS. "lcl_object_tobj IMPLEMENTATION
|
||||||
|
|
|
@ -430,7 +430,7 @@ CLASS lcl_object_tran IMPLEMENTATION.
|
||||||
ENDMETHOD. "serialize
|
ENDMETHOD. "serialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD serialize_texts.
|
METHOD serialize_texts.
|
||||||
|
|
|
@ -184,7 +184,7 @@ CLASS lcl_object_ttyp IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_ttyp IMPLEMENTATION
|
ENDCLASS. "lcl_object_ttyp IMPLEMENTATION
|
||||||
|
|
|
@ -199,14 +199,12 @@ CLASS lcl_object_type IMPLEMENTATION.
|
||||||
ENDMETHOD. "delete
|
ENDMETHOD. "delete
|
||||||
|
|
||||||
METHOD lif_object~jump.
|
METHOD lif_object~jump.
|
||||||
|
|
||||||
jump_se11( iv_radio = 'RSRD1-TYMA'
|
jump_se11( iv_radio = 'RSRD1-TYMA'
|
||||||
iv_field = 'RSRD1-TYMA_VAL' ).
|
iv_field = 'RSRD1-TYMA_VAL' ).
|
||||||
|
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_type IMPLEMENTATION
|
ENDCLASS. "lcl_object_type IMPLEMENTATION
|
||||||
|
|
|
@ -196,7 +196,7 @@ CLASS lcl_object_vcls IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_vcls IMPLEMENTATION
|
ENDCLASS. "lcl_object_vcls IMPLEMENTATION
|
||||||
|
|
|
@ -261,7 +261,7 @@ CLASS lcl_object_view IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD. "lif_object~compare_to_remote_version
|
ENDMETHOD. "lif_object~compare_to_remote_version
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_view IMPLEMENTATION
|
ENDCLASS. "lcl_object_view IMPLEMENTATION
|
||||||
|
|
|
@ -434,7 +434,7 @@ CLASS lcl_object_w3super IMPLEMENTATION.
|
||||||
ENDMETHOD. " find_param.
|
ENDMETHOD. " find_param.
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_W3SUPER IMPLEMENTATION
|
ENDCLASS. "lcl_object_W3SUPER IMPLEMENTATION
|
||||||
|
|
|
@ -422,7 +422,7 @@ CLASS lcl_object_wapa IMPLEMENTATION.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_tran IMPLEMENTATION
|
ENDCLASS. "lcl_object_tran IMPLEMENTATION
|
||||||
|
|
|
@ -236,7 +236,7 @@ CLASS lcl_object_wdya IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_wdya IMPLEMENTATION
|
ENDCLASS. "lcl_object_wdya IMPLEMENTATION
|
||||||
|
|
|
@ -809,7 +809,7 @@ CLASS lcl_object_wdyn IMPLEMENTATION.
|
||||||
ENDMETHOD. "jump
|
ENDMETHOD. "jump
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD. "lif_object~compare_to_remote_version
|
ENDMETHOD. "lif_object~compare_to_remote_version
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_wdyn IMPLEMENTATION
|
ENDCLASS. "lcl_object_wdyn IMPLEMENTATION
|
||||||
|
|
|
@ -444,7 +444,7 @@ CLASS lcl_object_webi IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~get_metadata
|
ENDMETHOD. "lif_object~get_metadata
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_webi IMPLEMENTATION
|
ENDCLASS. "lcl_object_webi IMPLEMENTATION
|
||||||
|
|
|
@ -199,7 +199,7 @@ CLASS lcl_object_xslt IMPLEMENTATION.
|
||||||
ENDMETHOD. "lif_object~get_metadata
|
ENDMETHOD. "lif_object~get_metadata
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_xslt IMPLEMENTATION
|
ENDCLASS. "lcl_object_xslt IMPLEMENTATION
|
||||||
|
|
|
@ -234,26 +234,26 @@ CLASS lcl_objects_files DEFINITION.
|
||||||
|
|
||||||
ENDCLASS. "lcl_objects_files DEFINITION
|
ENDCLASS. "lcl_objects_files DEFINITION
|
||||||
|
|
||||||
INTERFACE lif_object_comparison_result.
|
INTERFACE lif_comparison_result.
|
||||||
METHODS:
|
METHODS:
|
||||||
show_confirmation_dialog,
|
show_confirmation_dialog,
|
||||||
is_result_complete_halt
|
is_result_complete_halt
|
||||||
RETURNING VALUE(rv_response) TYPE abap_bool.
|
RETURNING VALUE(rv_response) TYPE abap_bool.
|
||||||
|
|
||||||
ENDINTERFACE.
|
ENDINTERFACE.
|
||||||
|
|
||||||
"Null Object Pattern
|
"Null Object Pattern
|
||||||
CLASS lcl_null_comparison_result DEFINITION FINAL.
|
CLASS lcl_comparison_null DEFINITION FINAL.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
INTERFACES lif_object_comparison_result.
|
INTERFACES lif_comparison_result.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
CLASS lcl_null_comparison_result IMPLEMENTATION.
|
|
||||||
|
|
||||||
METHOD lif_object_comparison_result~is_result_complete_halt.
|
CLASS lcl_comparison_null IMPLEMENTATION.
|
||||||
|
|
||||||
|
METHOD lif_comparison_result~is_result_complete_halt.
|
||||||
rv_response = abap_false.
|
rv_response = abap_false.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_comparison_result~show_confirmation_dialog.
|
METHOD lif_comparison_result~show_confirmation_dialog.
|
||||||
RETURN.
|
RETURN.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
|
@ -293,7 +293,7 @@ INTERFACE lif_object.
|
||||||
METHODS:
|
METHODS:
|
||||||
compare_to_remote_version
|
compare_to_remote_version
|
||||||
IMPORTING io_remote_version_xml TYPE REF TO lcl_xml_input
|
IMPORTING io_remote_version_xml TYPE REF TO lcl_xml_input
|
||||||
RETURNING VALUE(ro_comparison_result) TYPE REF TO lif_object_comparison_result
|
RETURNING VALUE(ro_comparison_result) TYPE REF TO lif_comparison_result
|
||||||
RAISING lcx_exception.
|
RAISING lcx_exception.
|
||||||
|
|
||||||
DATA: mo_files TYPE REF TO lcl_objects_files.
|
DATA: mo_files TYPE REF TO lcl_objects_files.
|
||||||
|
@ -785,7 +785,7 @@ CLASS lcl_objects_bridge IMPLEMENTATION.
|
||||||
ENDMETHOD. "class_constructor
|
ENDMETHOD. "class_constructor
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_comparison_null.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_objects_bridge IMPLEMENTATION
|
ENDCLASS. "lcl_objects_bridge IMPLEMENTATION
|
||||||
|
|
|
@ -702,7 +702,7 @@ CLASS lcl_objects IMPLEMENTATION.
|
||||||
|
|
||||||
DATA: ls_remote_file TYPE lif_defs=>ty_file,
|
DATA: ls_remote_file TYPE lif_defs=>ty_file,
|
||||||
lo_remote_version TYPE REF TO lcl_xml_input,
|
lo_remote_version TYPE REF TO lcl_xml_input,
|
||||||
lo_comparison_result TYPE REF TO lif_object_comparison_result.
|
lo_comparison_result TYPE REF TO lif_comparison_result.
|
||||||
|
|
||||||
|
|
||||||
IF is_result-filename CS '.XML'.
|
IF is_result-filename CS '.XML'.
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include ZABAPGIT_PAGE_BACKGROUND
|
*& Include ZABAPGIT_PAGE_BACKGROUND
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_gui_page_background_run DEFINITION FINAL
|
CLASS lcl_gui_page_bkg_run DEFINITION FINAL
|
||||||
INHERITING FROM lcl_gui_page.
|
INHERITING FROM lcl_gui_page.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
|
@ -19,7 +19,7 @@ CLASS lcl_gui_page_background_run DEFINITION FINAL
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_gui_page_background_run IMPLEMENTATION.
|
CLASS lcl_gui_page_bkg_run IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
super->constructor( ).
|
super->constructor( ).
|
||||||
|
@ -72,7 +72,7 @@ CLASS lcl_gui_page_background_run IMPLEMENTATION.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_gui_page_background DEFINITION FINAL
|
CLASS lcl_gui_page_bkg DEFINITION FINAL
|
||||||
INHERITING FROM lcl_gui_page.
|
INHERITING FROM lcl_gui_page.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
|
@ -96,7 +96,7 @@ CLASS lcl_gui_page_background DEFINITION FINAL
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_gui_page_background IMPLEMENTATION.
|
CLASS lcl_gui_page_bkg IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
|
|
||||||
|
@ -116,13 +116,13 @@ CLASS lcl_gui_page_background IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD lif_gui_page~on_event.
|
METHOD lif_gui_page~on_event.
|
||||||
|
|
||||||
DATA ls_bg_task TYPE lcl_persistence_background=>ty_background.
|
DATA ls_bg_task TYPE lcl_persist_background=>ty_background.
|
||||||
|
|
||||||
CASE iv_action.
|
CASE iv_action.
|
||||||
WHEN lif_defs=>gc_action-bg_update.
|
WHEN lif_defs=>gc_action-bg_update.
|
||||||
ls_bg_task = lcl_html_action_utils=>decode_bg_update( iv_getdata ).
|
ls_bg_task = lcl_html_action_utils=>decode_bg_update( iv_getdata ).
|
||||||
ls_bg_task-key = mv_key.
|
ls_bg_task-key = mv_key.
|
||||||
lcl_services_background=>update_task( ls_bg_task ).
|
lcl_services_bkg=>update_task( ls_bg_task ).
|
||||||
ev_state = lif_defs=>gc_event_state-re_render.
|
ev_state = lif_defs=>gc_event_state-re_render.
|
||||||
ENDCASE.
|
ENDCASE.
|
||||||
|
|
||||||
|
@ -131,8 +131,8 @@ CLASS lcl_gui_page_background IMPLEMENTATION.
|
||||||
METHOD render_data.
|
METHOD render_data.
|
||||||
|
|
||||||
DATA: lo_repo TYPE REF TO lcl_repo_online,
|
DATA: lo_repo TYPE REF TO lcl_repo_online,
|
||||||
lo_per TYPE REF TO lcl_persistence_background,
|
lo_per TYPE REF TO lcl_persist_background,
|
||||||
lt_per TYPE lcl_persistence_background=>tt_background,
|
lt_per TYPE lcl_persist_background=>tt_background,
|
||||||
ls_per LIKE LINE OF lt_per,
|
ls_per LIKE LINE OF lt_per,
|
||||||
lv_nothing TYPE string,
|
lv_nothing TYPE string,
|
||||||
lv_push TYPE string,
|
lv_push TYPE string,
|
||||||
|
@ -163,16 +163,16 @@ CLASS lcl_gui_page_background IMPLEMENTATION.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
CASE ls_per-method.
|
CASE ls_per-method.
|
||||||
WHEN lcl_persistence_background=>c_method-push.
|
WHEN lcl_persist_background=>c_method-push.
|
||||||
lv_push = ' checked' ##NO_TEXT.
|
lv_push = ' checked' ##NO_TEXT.
|
||||||
WHEN lcl_persistence_background=>c_method-pull.
|
WHEN lcl_persist_background=>c_method-pull.
|
||||||
lv_pull = ' checked' ##NO_TEXT.
|
lv_pull = ' checked' ##NO_TEXT.
|
||||||
WHEN OTHERS.
|
WHEN OTHERS.
|
||||||
lv_nothing = ' checked' ##NO_TEXT.
|
lv_nothing = ' checked' ##NO_TEXT.
|
||||||
ENDCASE.
|
ENDCASE.
|
||||||
|
|
||||||
CASE ls_per-amethod.
|
CASE ls_per-amethod.
|
||||||
WHEN lcl_persistence_background=>c_amethod-auto.
|
WHEN lcl_persist_background=>c_amethod-auto.
|
||||||
lv_aauto = ' checked' ##NO_TEXT.
|
lv_aauto = ' checked' ##NO_TEXT.
|
||||||
WHEN OTHERS.
|
WHEN OTHERS.
|
||||||
lv_afixed = ' checked' ##NO_TEXT.
|
lv_afixed = ' checked' ##NO_TEXT.
|
||||||
|
|
|
@ -302,7 +302,7 @@ ENDCLASS.
|
||||||
|
|
||||||
***********************
|
***********************
|
||||||
|
|
||||||
CLASS lcl_gui_page_branch_overview DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
CLASS lcl_gui_page_boverview DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
|
@ -358,7 +358,7 @@ CLASS lcl_gui_page_branch_overview DEFINITION FINAL INHERITING FROM lcl_gui_page
|
||||||
|
|
||||||
ENDCLASS. "lcl_gui_page_explore DEFINITION
|
ENDCLASS. "lcl_gui_page_explore DEFINITION
|
||||||
|
|
||||||
CLASS lcl_gui_page_branch_overview IMPLEMENTATION.
|
CLASS lcl_gui_page_boverview IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
super->constructor( ).
|
super->constructor( ).
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include ZABAPGIT_PAGE_DB
|
*& Include ZABAPGIT_PAGE_DB
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_gui_page_db_display DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
CLASS lcl_gui_page_db_dis DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS: constructor
|
METHODS: constructor
|
||||||
|
@ -20,7 +20,7 @@ CLASS lcl_gui_page_db_display DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_gui_page_db_display IMPLEMENTATION.
|
CLASS lcl_gui_page_db_dis IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
super->constructor( ).
|
super->constructor( ).
|
||||||
|
@ -131,7 +131,7 @@ CLASS lcl_gui_page_db_edit IMPLEMENTATION.
|
||||||
|
|
||||||
" Banners & Toolbar
|
" Banners & Toolbar
|
||||||
ro_html->add( '<table class="toolbar"><tr><td>' ).
|
ro_html->add( '<table class="toolbar"><tr><td>' ).
|
||||||
ro_html->add( lcl_gui_page_db_display=>render_record_banner( ms_key ) ).
|
ro_html->add( lcl_gui_page_db_dis=>render_record_banner( ms_key ) ).
|
||||||
ro_html->add( '</td><td>' ).
|
ro_html->add( '</td><td>' ).
|
||||||
ro_html->add( lo_toolbar->render( iv_right = abap_true ) ).
|
ro_html->add( lo_toolbar->render( iv_right = abap_true ) ).
|
||||||
ro_html->add( '</td></tr></table>' ).
|
ro_html->add( '</td></tr></table>' ).
|
||||||
|
|
|
@ -20,7 +20,7 @@ CLASS lcl_gui_page_main DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
||||||
END OF c_actions.
|
END OF c_actions.
|
||||||
|
|
||||||
DATA: mv_show TYPE lcl_persistence_db=>ty_value,
|
DATA: mv_show TYPE lcl_persistence_db=>ty_value,
|
||||||
mo_repo_content TYPE REF TO lcl_gui_view_repo_content.
|
mo_repo_content TYPE REF TO lcl_gui_view_repo.
|
||||||
|
|
||||||
METHODS:
|
METHODS:
|
||||||
test_changed_by
|
test_changed_by
|
||||||
|
@ -206,7 +206,7 @@ CLASS lcl_gui_page_main IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD render_toc.
|
METHOD render_toc.
|
||||||
|
|
||||||
DATA: lo_pback TYPE REF TO lcl_persistence_background,
|
DATA: lo_pback TYPE REF TO lcl_persist_background,
|
||||||
lv_current TYPE abap_bool,
|
lv_current TYPE abap_bool,
|
||||||
lv_key TYPE lcl_persistence_repo=>ty_repo-key,
|
lv_key TYPE lcl_persistence_repo=>ty_repo-key,
|
||||||
lv_icon TYPE string,
|
lv_icon TYPE string,
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include ZABAPGIT_PAGE_REPO_SETTINGS
|
*& Include ZABAPGIT_PAGE_REPO_SETTINGS
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_gui_page_repo_settings DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
CLASS lcl_gui_page_repo_sett DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
constructor
|
constructor
|
||||||
|
@ -25,9 +25,9 @@ CLASS lcl_gui_page_repo_settings DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
||||||
RETURNING
|
RETURNING
|
||||||
VALUE(rt_post_fields) TYPE tihttpnvp.
|
VALUE(rt_post_fields) TYPE tihttpnvp.
|
||||||
|
|
||||||
ENDCLASS. "lcl_gui_page_debuginfo
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_gui_page_repo_settings IMPLEMENTATION.
|
CLASS lcl_gui_page_repo_sett IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
super->constructor( ).
|
super->constructor( ).
|
||||||
|
|
|
@ -226,7 +226,7 @@ CLASS lcl_gui_page_settings IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD persist_settings.
|
METHOD persist_settings.
|
||||||
|
|
||||||
DATA lo_settings_persistence TYPE REF TO lcl_persistence_settings.
|
DATA lo_settings_persistence TYPE REF TO lcl_persist_settings.
|
||||||
|
|
||||||
lo_settings_persistence = lcl_app=>settings( ).
|
lo_settings_persistence = lcl_app=>settings( ).
|
||||||
lo_settings_persistence->modify( mo_settings ).
|
lo_settings_persistence->modify( mo_settings ).
|
||||||
|
@ -254,7 +254,7 @@ CLASS lcl_gui_page_settings IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD read_settings.
|
METHOD read_settings.
|
||||||
|
|
||||||
DATA lo_settings_persistence TYPE REF TO lcl_persistence_settings.
|
DATA lo_settings_persistence TYPE REF TO lcl_persist_settings.
|
||||||
|
|
||||||
lo_settings_persistence = lcl_app=>settings( ).
|
lo_settings_persistence = lcl_app=>settings( ).
|
||||||
mo_settings = lo_settings_persistence->read( ).
|
mo_settings = lo_settings_persistence->read( ).
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include ZABAPGIT_PERSISTENCE
|
*& Include ZABAPGIT_PERSISTENCE
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_persistence_migrate DEFINITION FINAL.
|
CLASS lcl_persist_migrate DEFINITION FINAL.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
CLASS-METHODS: run RAISING lcx_exception.
|
CLASS-METHODS: run RAISING lcx_exception.
|
||||||
|
@ -204,7 +204,7 @@ CLASS lcl_persistence_repo DEFINITION FINAL.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_persistence_background DEFINITION FINAL.
|
CLASS lcl_persist_background DEFINITION FINAL.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
|
|
||||||
|
@ -270,7 +270,7 @@ CLASS lcl_persistence_background DEFINITION FINAL.
|
||||||
|
|
||||||
ENDCLASS. "lcl_persistence_background DEFINITION
|
ENDCLASS. "lcl_persistence_background DEFINITION
|
||||||
|
|
||||||
CLASS lcl_persistence_background IMPLEMENTATION.
|
CLASS lcl_persist_background IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
mo_db = lcl_app=>db( ).
|
mo_db = lcl_app=>db( ).
|
||||||
|
@ -1010,7 +1010,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD delete.
|
METHOD delete.
|
||||||
|
|
||||||
DATA: lo_background TYPE REF TO lcl_persistence_background.
|
DATA: lo_background TYPE REF TO lcl_persist_background.
|
||||||
|
|
||||||
CREATE OBJECT lo_background.
|
CREATE OBJECT lo_background.
|
||||||
lo_background->delete( iv_key ).
|
lo_background->delete( iv_key ).
|
||||||
|
@ -1271,7 +1271,7 @@ CLASS lcl_persistence_repo IMPLEMENTATION.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_persistence_migrate IMPLEMENTATION.
|
CLASS lcl_persist_migrate IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD run.
|
METHOD run.
|
||||||
|
|
||||||
|
@ -1662,7 +1662,7 @@ CLASS lcl_settings IMPLEMENTATION.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_persistence_settings DEFINITION FINAL.
|
CLASS lcl_persist_settings DEFINITION FINAL.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS modify
|
METHODS modify
|
||||||
|
@ -1676,7 +1676,7 @@ CLASS lcl_persistence_settings DEFINITION FINAL.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_persistence_settings IMPLEMENTATION.
|
CLASS lcl_persist_settings IMPLEMENTATION.
|
||||||
* todo, refactor this to use XML and only 1 row in the database?
|
* todo, refactor this to use XML and only 1 row in the database?
|
||||||
|
|
||||||
METHOD modify.
|
METHOD modify.
|
||||||
|
|
|
@ -2,14 +2,14 @@
|
||||||
*& Include ZABAPGIT_PERSISTENCE_OLD
|
*& Include ZABAPGIT_PERSISTENCE_OLD
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_persistence_migrate DEFINITION DEFERRED.
|
CLASS lcl_persist_migrate DEFINITION DEFERRED.
|
||||||
|
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
* CLASS lcl_persistence DEFINITION
|
* CLASS lcl_persistence DEFINITION
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
*
|
*
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
CLASS lcl_persistence DEFINITION FINAL FRIENDS lcl_persistence_migrate.
|
CLASS lcl_persistence DEFINITION FINAL FRIENDS lcl_persist_migrate.
|
||||||
|
|
||||||
* this class is obsolete, use LCL_PERSISTENCE_REPO instead
|
* this class is obsolete, use LCL_PERSISTENCE_REPO instead
|
||||||
|
|
||||||
|
@ -370,7 +370,7 @@ ENDCLASS. "lcl_persistence IMPLEMENTATION
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
*
|
*
|
||||||
*----------------------------------------------------------------------*
|
*----------------------------------------------------------------------*
|
||||||
CLASS lcl_user DEFINITION FINAL FRIENDS lcl_persistence_migrate.
|
CLASS lcl_user DEFINITION FINAL FRIENDS lcl_persist_migrate.
|
||||||
|
|
||||||
* this class is obsolete, use LCL_PERSISTENCE_USER instead
|
* this class is obsolete, use LCL_PERSISTENCE_USER instead
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include ZABAPGIT_REPO_BROWSER_UTIL
|
*& Include ZABAPGIT_REPO_BROWSER_UTIL
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_repo_content_browser DEFINITION FINAL.
|
CLASS lcl_repo_content_list DEFINITION FINAL.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
|
|
||||||
|
@ -73,7 +73,7 @@ DEFINE _reduce_state.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
END-OF-DEFINITION.
|
END-OF-DEFINITION.
|
||||||
|
|
||||||
CLASS lcl_repo_content_browser IMPLEMENTATION.
|
CLASS lcl_repo_content_list IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
mo_repo = io_repo.
|
mo_repo = io_repo.
|
||||||
|
|
|
@ -2,25 +2,25 @@
|
||||||
*& Include ZABAPGIT_SERVICES_BACKGROUND
|
*& Include ZABAPGIT_SERVICES_BACKGROUND
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_services_background DEFINITION FINAL.
|
CLASS lcl_services_bkg DEFINITION FINAL.
|
||||||
|
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
|
|
||||||
CLASS-METHODS update_task
|
CLASS-METHODS update_task
|
||||||
IMPORTING is_bg_task TYPE lcl_persistence_background=>ty_background
|
IMPORTING is_bg_task TYPE lcl_persist_background=>ty_background
|
||||||
RAISING lcx_exception.
|
RAISING lcx_exception.
|
||||||
|
|
||||||
ENDCLASS. "lcl_services_background
|
ENDCLASS. "lcl_services_background
|
||||||
|
|
||||||
CLASS lcl_services_background IMPLEMENTATION.
|
CLASS lcl_services_bkg IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD update_task.
|
METHOD update_task.
|
||||||
|
|
||||||
DATA lo_persistence TYPE REF TO lcl_persistence_background.
|
DATA lo_persistence TYPE REF TO lcl_persist_background.
|
||||||
|
|
||||||
CREATE OBJECT lo_persistence.
|
CREATE OBJECT lo_persistence.
|
||||||
|
|
||||||
IF is_bg_task-method = lcl_persistence_background=>c_method-nothing.
|
IF is_bg_task-method = lcl_persist_background=>c_method-nothing.
|
||||||
lo_persistence->delete( is_bg_task-key ).
|
lo_persistence->delete( is_bg_task-key ).
|
||||||
ELSE.
|
ELSE.
|
||||||
lo_persistence->modify( is_bg_task ).
|
lo_persistence->modify( is_bg_task ).
|
||||||
|
|
|
@ -311,18 +311,17 @@ CLASS lcl_services_repo IMPLEMENTATION.
|
||||||
CALL FUNCTION 'RS_TOOL_ACCESS'
|
CALL FUNCTION 'RS_TOOL_ACCESS'
|
||||||
EXPORTING
|
EXPORTING
|
||||||
operation = 'SHOW'
|
operation = 'SHOW'
|
||||||
in_new_window = 'X'
|
in_new_window = abap_true
|
||||||
object_name = iv_package
|
object_name = iv_package
|
||||||
object_type = 'DEVC'
|
object_type = 'DEVC'
|
||||||
with_objectlist = 'X'.
|
with_objectlist = abap_true.
|
||||||
|
|
||||||
ENDMETHOD. " open_se80.
|
ENDMETHOD. " open_se80.
|
||||||
|
|
||||||
|
|
||||||
METHOD transport_to_branch.
|
METHOD transport_to_branch.
|
||||||
DATA:
|
DATA:
|
||||||
lo_repository TYPE REF TO lcl_repo_online,
|
lo_repository TYPE REF TO lcl_repo_online,
|
||||||
lo_transport_to_branch TYPE REF TO lcl_transport_to_branch,
|
lo_transport_to_branch TYPE REF TO lcl_transport_2_branch,
|
||||||
lt_transport_headers TYPE trwbo_request_headers,
|
lt_transport_headers TYPE trwbo_request_headers,
|
||||||
lt_transport_objects TYPE scts_tadir,
|
lt_transport_objects TYPE scts_tadir,
|
||||||
ls_transport_to_branch TYPE lif_defs=>ty_transport_to_branch.
|
ls_transport_to_branch TYPE lif_defs=>ty_transport_to_branch.
|
||||||
|
@ -334,6 +333,7 @@ CLASS lcl_services_repo IMPLEMENTATION.
|
||||||
IF lt_transport_objects IS INITIAL.
|
IF lt_transport_objects IS INITIAL.
|
||||||
lcx_exception=>raise( 'Canceled or List of objects is empty ' ).
|
lcx_exception=>raise( 'Canceled or List of objects is empty ' ).
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
ls_transport_to_branch = lcl_popups=>popup_to_create_transp_branch(
|
ls_transport_to_branch = lcl_popups=>popup_to_create_transp_branch(
|
||||||
lt_transport_headers ).
|
lt_transport_headers ).
|
||||||
|
|
||||||
|
|
|
@ -251,7 +251,7 @@ CLASS lcl_transport_objects IMPLEMENTATION.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_transport_to_branch DEFINITION.
|
CLASS lcl_transport_2_branch DEFINITION.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
METHODS:
|
METHODS:
|
||||||
create
|
create
|
||||||
|
@ -282,7 +282,7 @@ CLASS lcl_transport_to_branch DEFINITION.
|
||||||
lcx_exception.
|
lcx_exception.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
CLASS lcl_transport_to_branch IMPLEMENTATION.
|
CLASS lcl_transport_2_branch IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD create.
|
METHOD create.
|
||||||
DATA:
|
DATA:
|
||||||
|
|
|
@ -2159,7 +2159,7 @@ CLASS ltcl_persistence_settings DEFINITION FINAL FOR TESTING
|
||||||
read_run_critical_tests FOR TESTING RAISING cx_static_check,
|
read_run_critical_tests FOR TESTING RAISING cx_static_check,
|
||||||
read_not_found_critical_tests FOR TESTING RAISING cx_static_check.
|
read_not_found_critical_tests FOR TESTING RAISING cx_static_check.
|
||||||
DATA:
|
DATA:
|
||||||
mo_persistence_settings TYPE REF TO lcl_persistence_settings,
|
mo_persistence_settings TYPE REF TO lcl_persist_settings,
|
||||||
mo_settings TYPE REF TO lcl_settings.
|
mo_settings TYPE REF TO lcl_settings.
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
|
|
||||||
|
|
|
@ -1,7 +1,7 @@
|
||||||
|
|
||||||
CLASS ltd_spy_oo_object DEFINITION FOR TESTING.
|
CLASS ltd_spy_oo_object DEFINITION FOR TESTING.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
INTERFACES: lif_object_oriented_object_fnc.
|
INTERFACES: lif_oo_object_fnc.
|
||||||
DATA:
|
DATA:
|
||||||
mv_package TYPE devclass,
|
mv_package TYPE devclass,
|
||||||
mv_overwrite TYPE seox_boolean,
|
mv_overwrite TYPE seox_boolean,
|
||||||
|
@ -37,7 +37,7 @@ CLASS ltd_spy_oo_object DEFINITION FOR TESTING.
|
||||||
|
|
||||||
ENDCLASS.
|
ENDCLASS.
|
||||||
CLASS ltd_spy_oo_object IMPLEMENTATION.
|
CLASS ltd_spy_oo_object IMPLEMENTATION.
|
||||||
METHOD lif_object_oriented_object_fnc~create.
|
METHOD lif_oo_object_fnc~create.
|
||||||
DATA lv_properties_structure_name TYPE string.
|
DATA lv_properties_structure_name TYPE string.
|
||||||
lv_properties_structure_name = cl_abap_typedescr=>describe_by_data( is_properties )->absolute_name.
|
lv_properties_structure_name = cl_abap_typedescr=>describe_by_data( is_properties )->absolute_name.
|
||||||
IF lv_properties_structure_name = cl_abap_typedescr=>describe_by_data( ms_interface_properties )->absolute_name.
|
IF lv_properties_structure_name = cl_abap_typedescr=>describe_by_data( ms_interface_properties )->absolute_name.
|
||||||
|
@ -48,7 +48,8 @@ CLASS ltd_spy_oo_object IMPLEMENTATION.
|
||||||
mv_package = iv_package.
|
mv_package = iv_package.
|
||||||
mv_overwrite = iv_overwrite.
|
mv_overwrite = iv_overwrite.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
METHOD lif_object_oriented_object_fnc~generate_locals.
|
|
||||||
|
METHOD lif_oo_object_fnc~generate_locals.
|
||||||
ms_locals_key = is_key.
|
ms_locals_key = is_key.
|
||||||
mt_local_definitions = it_local_definitions.
|
mt_local_definitions = it_local_definitions.
|
||||||
mt_local_implementations = it_local_implementations.
|
mt_local_implementations = it_local_implementations.
|
||||||
|
@ -57,21 +58,21 @@ CLASS ltd_spy_oo_object IMPLEMENTATION.
|
||||||
mv_force = iv_force.
|
mv_force = iv_force.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~deserialize_source.
|
METHOD lif_oo_object_fnc~deserialize_source.
|
||||||
ms_deserialize_key = is_key.
|
ms_deserialize_key = is_key.
|
||||||
mt_source = it_source.
|
mt_source = it_source.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~add_to_activation_list.
|
METHOD lif_oo_object_fnc~add_to_activation_list.
|
||||||
ms_item_to_activate = is_item.
|
ms_item_to_activate = is_item.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~update_descriptions.
|
METHOD lif_oo_object_fnc~update_descriptions.
|
||||||
ms_description_key = is_key.
|
ms_description_key = is_key.
|
||||||
mt_descriptions = it_descriptions.
|
mt_descriptions = it_descriptions.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~insert_text_pool.
|
METHOD lif_oo_object_fnc~insert_text_pool.
|
||||||
mv_text_pool_inserted = abap_true.
|
mv_text_pool_inserted = abap_true.
|
||||||
mv_text_pool_class_name = iv_class_name.
|
mv_text_pool_class_name = iv_class_name.
|
||||||
mt_text_pool = it_text_pool.
|
mt_text_pool = it_text_pool.
|
||||||
|
@ -80,28 +81,28 @@ CLASS ltd_spy_oo_object IMPLEMENTATION.
|
||||||
exp = sy-langu ).
|
exp = sy-langu ).
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~create_sotr.
|
METHOD lif_oo_object_fnc~create_sotr.
|
||||||
mt_sotr = it_sotr.
|
mt_sotr = it_sotr.
|
||||||
mt_sotr_package = iv_package.
|
mt_sotr_package = iv_package.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~create_documentation.
|
METHOD lif_oo_object_fnc~create_documentation.
|
||||||
mv_docu_object_name = iv_object_name.
|
mv_docu_object_name = iv_object_name.
|
||||||
mv_docu_language = iv_language.
|
mv_docu_language = iv_language.
|
||||||
mt_docu_lines = it_lines.
|
mt_docu_lines = it_lines.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_includes.
|
METHOD lif_oo_object_fnc~get_includes.
|
||||||
APPEND 'dummy' TO rt_includes.
|
APPEND 'dummy' TO rt_includes.
|
||||||
mv_get_includes_called = abap_true.
|
mv_get_includes_called = abap_true.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~exists.
|
METHOD lif_oo_object_fnc~exists.
|
||||||
mv_exists_called = abap_true.
|
mv_exists_called = abap_true.
|
||||||
rv_exists = mv_exists.
|
rv_exists = mv_exists.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~serialize_abap.
|
METHOD lif_oo_object_fnc~serialize_abap.
|
||||||
ms_serialize_key = is_class_key.
|
ms_serialize_key = is_class_key.
|
||||||
CASE iv_type.
|
CASE iv_type.
|
||||||
WHEN seop_ext_class_locals_def.
|
WHEN seop_ext_class_locals_def.
|
||||||
|
@ -117,35 +118,35 @@ CLASS ltd_spy_oo_object IMPLEMENTATION.
|
||||||
ENDCASE.
|
ENDCASE.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_class_properties.
|
METHOD lif_oo_object_fnc~get_class_properties.
|
||||||
rs_class_properties = ms_class_properties.
|
rs_class_properties = ms_class_properties.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_interface_properties.
|
METHOD lif_oo_object_fnc~get_interface_properties.
|
||||||
rs_interface_properties = ms_interface_properties.
|
rs_interface_properties = ms_interface_properties.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_text_pool.
|
METHOD lif_oo_object_fnc~read_text_pool.
|
||||||
rt_text_pool = mt_text_pool.
|
rt_text_pool = mt_text_pool.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_sotr.
|
METHOD lif_oo_object_fnc~read_sotr.
|
||||||
rt_sotr = mt_sotr.
|
rt_sotr = mt_sotr.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_documentation.
|
METHOD lif_oo_object_fnc~read_documentation.
|
||||||
rt_lines = mt_docu_lines.
|
rt_lines = mt_docu_lines.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~read_descriptions.
|
METHOD lif_oo_object_fnc~read_descriptions.
|
||||||
rt_descriptions = mt_descriptions.
|
rt_descriptions = mt_descriptions.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~get_skip_test_classes.
|
METHOD lif_oo_object_fnc~get_skip_test_classes.
|
||||||
rv_skip = mv_skip_test_classes.
|
rv_skip = mv_skip_test_classes.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
METHOD lif_object_oriented_object_fnc~delete.
|
METHOD lif_oo_object_fnc~delete.
|
||||||
ms_delete_key = is_deletion_key.
|
ms_delete_key = is_deletion_key.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
|
|
|
@ -2,7 +2,7 @@
|
||||||
*& Include ZABAPGIT_VIEW_REPO
|
*& Include ZABAPGIT_VIEW_REPO
|
||||||
*&---------------------------------------------------------------------*
|
*&---------------------------------------------------------------------*
|
||||||
|
|
||||||
CLASS lcl_gui_view_repo_content DEFINITION FINAL.
|
CLASS lcl_gui_view_repo DEFINITION FINAL.
|
||||||
PUBLIC SECTION.
|
PUBLIC SECTION.
|
||||||
INTERFACES lif_gui_page.
|
INTERFACES lif_gui_page.
|
||||||
ALIASES render FOR lif_gui_page~render.
|
ALIASES render FOR lif_gui_page~render.
|
||||||
|
@ -44,20 +44,20 @@ CLASS lcl_gui_view_repo_content DEFINITION FINAL.
|
||||||
RETURNING VALUE(ro_toolbar) TYPE REF TO lcl_html_toolbar
|
RETURNING VALUE(ro_toolbar) TYPE REF TO lcl_html_toolbar
|
||||||
RAISING lcx_exception,
|
RAISING lcx_exception,
|
||||||
render_item
|
render_item
|
||||||
IMPORTING is_item TYPE lcl_repo_content_browser=>ty_repo_item
|
IMPORTING is_item TYPE lcl_repo_content_list=>ty_repo_item
|
||||||
RETURNING VALUE(ro_html) TYPE REF TO lcl_html
|
RETURNING VALUE(ro_html) TYPE REF TO lcl_html
|
||||||
RAISING lcx_exception,
|
RAISING lcx_exception,
|
||||||
render_item_files
|
render_item_files
|
||||||
IMPORTING is_item TYPE lcl_repo_content_browser=>ty_repo_item
|
IMPORTING is_item TYPE lcl_repo_content_list=>ty_repo_item
|
||||||
RETURNING VALUE(ro_html) TYPE REF TO lcl_html,
|
RETURNING VALUE(ro_html) TYPE REF TO lcl_html,
|
||||||
render_item_command
|
render_item_command
|
||||||
IMPORTING is_item TYPE lcl_repo_content_browser=>ty_repo_item
|
IMPORTING is_item TYPE lcl_repo_content_list=>ty_repo_item
|
||||||
RETURNING VALUE(ro_html) TYPE REF TO lcl_html,
|
RETURNING VALUE(ro_html) TYPE REF TO lcl_html,
|
||||||
get_item_class
|
get_item_class
|
||||||
IMPORTING is_item TYPE lcl_repo_content_browser=>ty_repo_item
|
IMPORTING is_item TYPE lcl_repo_content_list=>ty_repo_item
|
||||||
RETURNING VALUE(rv_html) TYPE string,
|
RETURNING VALUE(rv_html) TYPE string,
|
||||||
get_item_icon
|
get_item_icon
|
||||||
IMPORTING is_item TYPE lcl_repo_content_browser=>ty_repo_item
|
IMPORTING is_item TYPE lcl_repo_content_list=>ty_repo_item
|
||||||
RETURNING VALUE(rv_html) TYPE string,
|
RETURNING VALUE(rv_html) TYPE string,
|
||||||
render_empty_package
|
render_empty_package
|
||||||
RETURNING VALUE(rv_html) TYPE string,
|
RETURNING VALUE(rv_html) TYPE string,
|
||||||
|
@ -67,7 +67,7 @@ CLASS lcl_gui_view_repo_content DEFINITION FINAL.
|
||||||
|
|
||||||
METHODS:
|
METHODS:
|
||||||
build_obj_jump_link
|
build_obj_jump_link
|
||||||
IMPORTING is_item TYPE lcl_repo_content_browser=>ty_repo_item
|
IMPORTING is_item TYPE lcl_repo_content_list=>ty_repo_item
|
||||||
RETURNING VALUE(rv_html) TYPE string,
|
RETURNING VALUE(rv_html) TYPE string,
|
||||||
build_dir_jump_link
|
build_dir_jump_link
|
||||||
IMPORTING iv_path TYPE string
|
IMPORTING iv_path TYPE string
|
||||||
|
@ -75,7 +75,7 @@ CLASS lcl_gui_view_repo_content DEFINITION FINAL.
|
||||||
|
|
||||||
ENDCLASS. "lcl_gui_view_repo_content
|
ENDCLASS. "lcl_gui_view_repo_content
|
||||||
|
|
||||||
CLASS lcl_gui_view_repo_content IMPLEMENTATION.
|
CLASS lcl_gui_view_repo IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD constructor.
|
METHOD constructor.
|
||||||
|
|
||||||
|
@ -123,8 +123,8 @@ CLASS lcl_gui_view_repo_content IMPLEMENTATION.
|
||||||
|
|
||||||
METHOD lif_gui_page~render.
|
METHOD lif_gui_page~render.
|
||||||
|
|
||||||
DATA: lt_repo_items TYPE lcl_repo_content_browser=>tt_repo_items,
|
DATA: lt_repo_items TYPE lcl_repo_content_list=>tt_repo_items,
|
||||||
lo_browser TYPE REF TO lcl_repo_content_browser,
|
lo_browser TYPE REF TO lcl_repo_content_list,
|
||||||
lx_error TYPE REF TO lcx_exception,
|
lx_error TYPE REF TO lcx_exception,
|
||||||
lv_lstate TYPE char1,
|
lv_lstate TYPE char1,
|
||||||
lv_rstate TYPE char1,
|
lv_rstate TYPE char1,
|
||||||
|
|
Loading…
Reference in New Issue
Block a user