upport

Author: CI

src/apack/zcl_abapgit_apack_migration.clas.abap

@@ -244,7 +244,7 @@ CLASS zcl_abapgit_apack_migration IMPLEMENTATION.
 
     SELECT SINGLE clsname FROM seoclass INTO lv_interface_name
       WHERE clsname = zif_abapgit_apack_definitions=>c_apack_interface_cust.
-    rv_interface_exists = boolc( sy-subrc = 0 ).
+    rv_interface_exists = xsdbool( sy-subrc = 0 ).
 
   ENDMETHOD.
 
@@ -254,7 +254,7 @@ CLASS zcl_abapgit_apack_migration IMPLEMENTATION.
     FIELD-SYMBOLS: <lv_interface_vers> TYPE i.
 
     ASSIGN (zif_abapgit_apack_definitions=>c_apack_interface_cust)=>('CO_INTERFACE_VERSION') TO <lv_interface_vers>.
-    rv_interface_valid = boolc( <lv_interface_vers> IS ASSIGNED
+    rv_interface_valid = xsdbool( <lv_interface_vers> IS ASSIGNED
       AND <lv_interface_vers> >= c_apack_interface_version ).
 
   ENDMETHOD.
@@ -275,7 +275,7 @@ CLASS zcl_abapgit_apack_migration IMPLEMENTATION.
 
     DATA: lo_apack_migration TYPE REF TO zcl_abapgit_apack_migration.
 
-    CREATE OBJECT lo_apack_migration.
+    lo_apack_migration = NEW #( ).
     lo_apack_migration->perform_migration( ).
 
   ENDMETHOD.

src/apack/zcl_abapgit_apack_reader.clas.abap

@@ -145,9 +145,7 @@ CLASS zcl_abapgit_apack_reader IMPLEMENTATION.
     IF sy-subrc <> 0.
       ls_instance-package = iv_package_name.
 
-      CREATE OBJECT ls_instance-instance
-        EXPORTING
-          iv_package_name = iv_package_name.
+      ls_instance-instance = NEW #( iv_package_name = iv_package_name ).
 
       INSERT ls_instance INTO TABLE gt_instances.
     ENDIF.
@@ -247,7 +245,7 @@ CLASS zcl_abapgit_apack_reader IMPLEMENTATION.
 
     ls_returned_manifest = get_manifest_descriptor( ).
 
-    rv_has_manifest = boolc( ls_returned_manifest IS NOT INITIAL ).
+    rv_has_manifest = xsdbool( ls_returned_manifest IS NOT INITIAL ).
 
   ENDMETHOD.
 

src/apack/zcl_abapgit_apack_writer.clas.abap

@@ -35,7 +35,7 @@ CLASS zcl_abapgit_apack_writer IMPLEMENTATION.
 
 
   METHOD create_instance.
-    CREATE OBJECT ro_manifest_writer EXPORTING is_apack_manifest_descriptor = is_apack_manifest_descriptor.
+    ro_manifest_writer = NEW #( is_apack_manifest_descriptor = is_apack_manifest_descriptor ).
   ENDMETHOD.
 
 

src/apack/zcl_abapgit_apack_writer.clas.testclasses.abap

@@ -21,15 +21,15 @@ CLASS ltcl_apack_manifest_writer IMPLEMENTATION.
     lv_actual_xml = lo_manifest_writer->serialize( ).
     cl_abap_unit_assert=>assert_not_initial( lv_actual_xml ).
 
-    lv_bool = boolc( contains( val = lv_actual_xml
+    lv_bool = xsdbool( contains( val = lv_actual_xml
                                sub = '<ARTIFACT_ID>abapGit</ARTIFACT_ID>' ) ).
     cl_abap_unit_assert=>assert_equals( act = lv_bool
                                         exp = abap_true ).
-    lv_bool = boolc( contains( val = lv_actual_xml
+    lv_bool = xsdbool( contains( val = lv_actual_xml
                                sub = '<GROUP_ID>github.com/larshp</GROUP_ID>' ) ).
     cl_abap_unit_assert=>assert_equals( act = lv_bool
                                         exp = abap_true ).
-    lv_bool = boolc( contains( val = lv_actual_xml
+    lv_bool = xsdbool( contains( val = lv_actual_xml
                                sub = '<REPOSITORY_TYPE>abapGit</REPOSITORY_TYPE>' ) ).
     cl_abap_unit_assert=>assert_equals( act = lv_bool
                                         exp = abap_true ).

src/background/zcl_abapgit_background.clas.abap

@@ -152,13 +152,13 @@ CLASS ZCL_ABAPGIT_BACKGROUND IMPLEMENTATION.
         RETURN.
     ENDTRY.
 
-    CREATE OBJECT lo_per.
+    lo_per = NEW #( ).
     lt_list = lo_per->list( ).
 
     WRITE: / 'Background mode'.
 
     LOOP AT lt_list ASSIGNING <ls_list>.
-      CREATE OBJECT li_log TYPE zcl_abapgit_log.
+      li_log = NEW zcl_abapgit_log( ).
 
       TRY.
           lo_repo ?= zcl_abapgit_repo_srv=>get_instance( )->get( <ls_list>-key ).

src/background/zcl_abapgit_background_push_au.clas.abap

@@ -132,7 +132,7 @@ CLASS zcl_abapgit_background_push_au IMPLEMENTATION.
 *     Fill user details
       ls_comment-committer = determine_user_details( lv_changed_by ).
 
-      CREATE OBJECT lo_stage.
+      lo_stage = NEW #( ).
 
       CLEAR ls_user_files.
 
@@ -193,7 +193,7 @@ CLASS zcl_abapgit_background_push_au IMPLEMENTATION.
 
     ASSERT lines( is_files-remote ) > 0.
 
-    CREATE OBJECT lo_stage.
+    lo_stage = NEW #( ).
 
     ls_comment-comment = 'BG: Deletion'.
 

src/background/zcl_abapgit_background_push_fi.clas.abap

@@ -77,7 +77,7 @@ CLASS zcl_abapgit_background_push_fi IMPLEMENTATION.
     ASSERT lines( ls_files-local ) > 0
         OR lines( ls_files-remote ) > 0.
 
-    CREATE OBJECT lo_stage.
+    lo_stage = NEW #( ).
 
     LOOP AT ls_files-local ASSIGNING <ls_local>.
       mi_log->add_info( |stage: { <ls_local>-file-path } { <ls_local>-file-filename }| ).

src/cts/zcl_abapgit_cts_api.clas.abap

@@ -173,7 +173,7 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
       zcx_abapgit_exception=>raise_t100( ).
     ENDIF.
 
-    rv_locked = boolc( lv_lock_flag <> space ).
+    rv_locked = xsdbool( lv_lock_flag <> space ).
   ENDMETHOD.
 
 
@@ -191,7 +191,7 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
       IMPORTING
         pe_result = lv_type_check_result.
 
-    rv_lockable = boolc( lv_type_check_result = 'L' ).
+    rv_lockable = xsdbool( lv_type_check_result = 'L' ).
   ENDMETHOD.
 
 
@@ -209,7 +209,7 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
       IMPORTING
         pe_result = lv_type_check_result.
 
-    rv_transportable = boolc( lv_type_check_result CA 'RTL' OR iv_object_type = 'TABU' ).
+    rv_transportable = xsdbool( lv_type_check_result CA 'RTL' OR iv_object_type = 'TABU' ).
   ENDMETHOD.
 
 

src/cts/zcl_abapgit_transport.clas.abap

@@ -305,9 +305,7 @@ CLASS ZCL_ABAPGIT_TRANSPORT IMPLEMENTATION.
           lv_message TYPE string.
     FIELD-SYMBOLS: <ls_log> TYPE sprot_u.
 
-    CREATE OBJECT li_log TYPE zcl_abapgit_log
-      EXPORTING
-        iv_title = iv_title.
+    li_log = NEW zcl_abapgit_log( iv_title = iv_title ).
 
     LOOP AT it_log ASSIGNING <ls_log>.
 

src/cts/zcl_abapgit_transport_2_branch.clas.abap

@@ -48,7 +48,7 @@ CLASS zcl_abapgit_transport_2_branch IMPLEMENTATION.
 
     io_repository->create_branch( lv_branch_name ).
 
-    CREATE OBJECT lo_stage.
+    lo_stage = NEW #( ).
 
     ls_stage_objects = zcl_abapgit_factory=>get_stage_logic( )->get( io_repository ).
 
@@ -76,9 +76,7 @@ CLASS zcl_abapgit_transport_2_branch IMPLEMENTATION.
 
   METHOD stage_transport_objects.
     DATA lo_transport_objects TYPE REF TO zcl_abapgit_transport_objects.
-    CREATE OBJECT lo_transport_objects
-      EXPORTING
-        it_transport_objects = it_transport_objects.
+    lo_transport_objects = NEW #( it_transport_objects = it_transport_objects ).
 
     lo_transport_objects->to_stage(
       io_stage           = io_stage

src/cts/zcl_abapgit_transport_mass.clas.abap

@@ -40,9 +40,7 @@ CLASS zcl_abapgit_transport_mass IMPLEMENTATION.
           ENDIF.
 
 * Instantiate transport zipper object that will also create the timestamped output folder
-          CREATE OBJECT lo_transport_zipper TYPE lcl_transport_zipper
-            EXPORTING
-              iv_folder = lv_folder.
+          lo_transport_zipper = NEW lcl_transport_zipper( iv_folder = lv_folder ).
 
 * Generate the local zip files from the given list of transport requests
           lo_transport_zipper->generate_files(

src/cts/zcl_abapgit_transport_objects.clas.testclasses.abap

@@ -57,7 +57,7 @@ ENDCLASS.
 CLASS ltcl_transport_objects IMPLEMENTATION.
 
   METHOD setup.
-    CREATE OBJECT mo_stage.
+    mo_stage = NEW #( ).
   ENDMETHOD.
 
   METHOD add_new_to_local_files.
@@ -308,9 +308,7 @@ CLASS ltcl_transport_objects IMPLEMENTATION.
   ENDMETHOD.
 
   METHOD when_staging.
-    CREATE OBJECT mo_transport_objects
-      EXPORTING
-        it_transport_objects = mt_transport_objects.
+    mo_transport_objects = NEW #( it_transport_objects = mt_transport_objects ).
     mo_transport_objects->to_stage(
       io_stage           = mo_stage
       is_stage_objects   = ms_stage_objects

src/data/zcl_abapgit_data_config.clas.testclasses.abap

@@ -38,7 +38,7 @@ CLASS ltcl_test IMPLEMENTATION.
     DATA li_config TYPE REF TO zif_abapgit_data_config.
     DATA ls_config TYPE zif_abapgit_data_config=>ty_config.
 
-    CREATE OBJECT li_config TYPE zcl_abapgit_data_config.
+    li_config = NEW zcl_abapgit_data_config( ).
 
     ls_config-name = 'HELLO'.
     ls_config-type = zif_abapgit_data_config=>c_data_type-tabu.
@@ -64,7 +64,7 @@ CLASS ltcl_test IMPLEMENTATION.
     DATA lv_json TYPE string.
 
 
-    CREATE OBJECT li_config TYPE zcl_abapgit_data_config.
+    li_config = NEW zcl_abapgit_data_config( ).
     li_config->add_config( ms_config ).
 
     lt_files = li_config->to_json( ).
@@ -92,7 +92,7 @@ CLASS ltcl_test IMPLEMENTATION.
 
     DATA li_config TYPE REF TO zif_abapgit_data_config.
 
-    CREATE OBJECT li_config TYPE zcl_abapgit_data_config.
+    li_config = NEW zcl_abapgit_data_config( ).
 
     li_config->from_json( it_files ).
 

src/data/zcl_abapgit_data_deserializer.clas.testclasses.abap

@@ -21,8 +21,8 @@ CLASS ltcl_test IMPLEMENTATION.
     DATA lt_files TYPE zif_abapgit_git_definitions=>ty_files_tt.
     DATA ls_config TYPE zif_abapgit_data_config=>ty_config.
 
-    CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer.
-    CREATE OBJECT li_config TYPE zcl_abapgit_data_config.
+    li_cut = NEW zcl_abapgit_data_deserializer( ).
+    li_config = NEW zcl_abapgit_data_config( ).
 
     ls_config-type = zif_abapgit_data_config=>c_data_type-tabu.
     ls_config-name = 'T100'.
@@ -70,7 +70,7 @@ CLASS ltcl_test IMPLEMENTATION.
     ls_t100-text  = |abapGit aunit test|.
     INSERT ls_t100 INTO TABLE <lt_lc_data>.
 
-    CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer.
+    li_cut = NEW zcl_abapgit_data_deserializer( ).
     ls_result = li_cut->preview_database_changes(
       iv_name    = ls_config-name
       ir_db_data = lr_db_data
@@ -138,7 +138,7 @@ CLASS ltcl_test IMPLEMENTATION.
     ls_t100-text  = |abapGit aunit test UPDATE|.
     INSERT ls_t100 INTO TABLE <lt_lc_data>.
 
-    CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer.
+    li_cut = NEW zcl_abapgit_data_deserializer( ).
     ls_result = li_cut->preview_database_changes(
       iv_name    = ls_config-name
       ir_db_data = lr_db_data
@@ -200,7 +200,7 @@ CLASS ltcl_test IMPLEMENTATION.
     ls_t100-text  = |abapGit aunit test DELETE|.
     INSERT ls_t100 INTO TABLE <lt_db_data>.
 
-    CREATE OBJECT li_cut TYPE zcl_abapgit_data_deserializer.
+    li_cut = NEW zcl_abapgit_data_deserializer( ).
     ls_result = li_cut->preview_database_changes(
       iv_name    = ls_config-name
       ir_db_data = lr_db_data

src/data/zcl_abapgit_data_factory.clas.abap

@@ -31,14 +31,14 @@ CLASS zcl_abapgit_data_factory IMPLEMENTATION.
 
 
   METHOD get_config.
-    CREATE OBJECT ri_config TYPE zcl_abapgit_data_config.
+    ri_config = NEW zcl_abapgit_data_config( ).
   ENDMETHOD.
 
 
   METHOD get_deserializer.
 
     IF gi_deserializer IS INITIAL.
-      CREATE OBJECT gi_deserializer TYPE zcl_abapgit_data_deserializer.
+      gi_deserializer = NEW zcl_abapgit_data_deserializer( ).
     ENDIF.
 
     ri_deserializer = gi_deserializer.
@@ -49,7 +49,7 @@ CLASS zcl_abapgit_data_factory IMPLEMENTATION.
   METHOD get_serializer.
 
     IF gi_serializer IS INITIAL.
-      CREATE OBJECT gi_serializer TYPE zcl_abapgit_data_serializer.
+      gi_serializer = NEW zcl_abapgit_data_serializer( ).
     ENDIF.
 
     ri_serializer = gi_serializer.
@@ -60,7 +60,7 @@ CLASS zcl_abapgit_data_factory IMPLEMENTATION.
   METHOD get_supporter.
 
     IF gi_supporter IS INITIAL.
-      CREATE OBJECT gi_supporter TYPE zcl_abapgit_data_supporter.
+      gi_supporter = NEW zcl_abapgit_data_supporter( ).
     ENDIF.
 
     ri_supporter = gi_supporter.

src/data/zcl_abapgit_data_serializer.clas.testclasses.abap

@@ -18,8 +18,8 @@ ENDCLASS.
 CLASS ltcl_test IMPLEMENTATION.
 
   METHOD setup.
-    CREATE OBJECT mi_cut TYPE zcl_abapgit_data_serializer.
-    CREATE OBJECT mi_config TYPE zcl_abapgit_data_config.
+    mi_cut = NEW zcl_abapgit_data_serializer( ).
+    mi_config = NEW zcl_abapgit_data_config( ).
   ENDMETHOD.
 
   METHOD serialize.

src/data/zcl_abapgit_data_supporter.clas.testclasses.abap

@@ -50,8 +50,8 @@ CLASS ltcl_supporter IMPLEMENTATION.
     DATA lv_act TYPE abap_bool.
 
     " Mock sets table T005 to be supported
-    CREATE OBJECT lo_mock.
-    CREATE OBJECT lo_inject.
+    lo_mock = NEW #( ).
+    lo_inject = NEW #( ).
     lo_inject->set_supporter( lo_mock ).
 
     lv_act = zcl_abapgit_data_factory=>get_supporter( )->is_object_supported(

src/env/zcl_abapgit_abap_language_vers.clas.testclasses.abap

@@ -62,7 +62,7 @@ ENDCLASS.
 CLASS lcl_persist_settings IMPLEMENTATION.
 
   METHOD constructor.
-    CREATE OBJECT mo_settings.
+    mo_settings = NEW #( ).
   ENDMETHOD.
 
   METHOD zif_abapgit_persist_settings~modify.
@@ -135,10 +135,10 @@ ENDCLASS.
 CLASS ltcl_abap_language_version IMPLEMENTATION.
 
   METHOD setup.
-    CREATE OBJECT mo_environment.
+    mo_environment = NEW #( ).
     zcl_abapgit_injector=>set_environment( mo_environment ).
 
-    CREATE OBJECT mi_persistency TYPE lcl_persist_settings.
+    mi_persistency = NEW lcl_persist_settings( ).
     zcl_abapgit_persist_injector=>set_settings( mi_persistency ).
 
     APPEND zif_abapgit_dot_abapgit=>c_abap_language_version-undefined TO mt_versions.
@@ -154,9 +154,7 @@ CLASS ltcl_abap_language_version IMPLEMENTATION.
     mo_dot_abapgit = zcl_abapgit_dot_abapgit=>build_default( ).
     mo_dot_abapgit->set_abap_language_version( iv_abap_language_version ).
 
-    CREATE OBJECT mo_cut
-      EXPORTING
-        io_dot_abapgit = mo_dot_abapgit.
+    mo_cut = NEW #( io_dot_abapgit = mo_dot_abapgit ).
   ENDMETHOD.
 
   METHOD set_environment.
@@ -423,7 +421,7 @@ CLASS ltcl_abap_language_version IMPLEMENTATION.
         clskey = ls_clskey
       EXCEPTIONS
         OTHERS = 1.
-    mv_has_language_cfg = boolc( sy-subrc = 0 ).
+    mv_has_language_cfg = xsdbool( sy-subrc = 0 ).
 
     LOOP AT mt_versions INTO lv_version.
 

src/env/zcl_abapgit_environment.clas.abap

@@ -67,7 +67,7 @@ CLASS zcl_abapgit_environment IMPLEMENTATION.
     " Changes to repository objects are not permitted in this client (TK 729)
     " Shadow system
     " Running upgrade
-    rv_result = boolc(
+    rv_result = xsdbool(
       lv_systemedit <> 'N' AND
       lv_sys_cliinddep_edit NA '23' AND
       lv_is_shadow <> abap_true AND
@@ -300,7 +300,7 @@ CLASS zcl_abapgit_environment IMPLEMENTATION.
     " Memory is set in LSVARF08 / EXPORT_SCREEN_TABLES.
     IMPORT variscreens = lt_variscreens FROM MEMORY ID '%_SCRNR_%'.
 
-    rv_is_variant_maintenance = boolc( lines( lt_variscreens ) > 0 ).
+    rv_is_variant_maintenance = xsdbool( lines( lt_variscreens ) > 0 ).
 
   ENDMETHOD.
 ENDCLASS.

src/env/zcl_abapgit_environment.clas.testclasses.abap

@@ -24,7 +24,7 @@ CLASS ltcl_test IMPLEMENTATION.
 
   METHOD setup.
 
-    CREATE OBJECT mi_cut TYPE zcl_abapgit_environment.
+    mi_cut = NEW zcl_abapgit_environment( ).
 
   ENDMETHOD.