downport

Author: CI

src/apack/zcl_abapgit_apack_migration.clas.abap

@@ -124,9 +124,10 @@ CLASS zcl_abapgit_apack_migration IMPLEMENTATION.
 
   METHOD add_intf_source_and_activate.
 
-    DATA: ls_clskey           TYPE seoclskey,
+    TYPES temp1 TYPE TABLE OF dwinactiv.
+DATA: ls_clskey           TYPE seoclskey,
           ls_inactive_object  TYPE dwinactiv,
-          lt_inactive_objects TYPE TABLE OF dwinactiv.
+          lt_inactive_objects TYPE temp1.
 
     ls_clskey-clsname = zif_abapgit_apack_definitions=>c_apack_interface_cust.
 
@@ -244,7 +245,9 @@ 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 = xsdbool( sy-subrc = 0 ).
+    DATA temp1 TYPE xsdboolean.
+    temp1 = boolc( sy-subrc = 0 ).
+    rv_interface_exists = temp1.
 
   ENDMETHOD.
 
@@ -254,8 +257,9 @@ 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 = xsdbool( <lv_interface_vers> IS ASSIGNED
-      AND <lv_interface_vers> >= c_apack_interface_version ).
+    DATA temp2 TYPE xsdboolean.
+    temp2 = boolc( <lv_interface_vers> IS ASSIGNED AND <lv_interface_vers> >= c_apack_interface_version ).
+    rv_interface_valid = temp2.
 
   ENDMETHOD.
 
@@ -275,7 +279,7 @@ CLASS zcl_abapgit_apack_migration IMPLEMENTATION.
 
     DATA: lo_apack_migration TYPE REF TO zcl_abapgit_apack_migration.
 
-    lo_apack_migration = NEW #( ).
+    CREATE OBJECT lo_apack_migration.
     lo_apack_migration->perform_migration( ).
 
   ENDMETHOD.

src/apack/zcl_abapgit_apack_reader.clas.abap

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

src/apack/zcl_abapgit_apack_writer.clas.abap

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

src/apack/zcl_abapgit_apack_writer.clas.testclasses.abap

@@ -21,16 +21,22 @@ 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 = xsdbool( contains( val = lv_actual_xml
-                               sub = '<ARTIFACT_ID>abapGit</ARTIFACT_ID>' ) ).
+    DATA temp1 TYPE xsdboolean.
+    temp1 = boolc( contains( val = lv_actual_xml
+                             sub = '<ARTIFACT_ID>abapGit</ARTIFACT_ID>' ) ).
+    lv_bool = temp1.
     cl_abap_unit_assert=>assert_equals( act = lv_bool
                                         exp = abap_true ).
-    lv_bool = xsdbool( contains( val = lv_actual_xml
-                               sub = '<GROUP_ID>github.com/larshp</GROUP_ID>' ) ).
+    DATA temp2 TYPE xsdboolean.
+    temp2 = boolc( contains( val = lv_actual_xml
+                             sub = '<GROUP_ID>github.com/larshp</GROUP_ID>' ) ).
+    lv_bool = temp2.
     cl_abap_unit_assert=>assert_equals( act = lv_bool
                                         exp = abap_true ).
-    lv_bool = xsdbool( contains( val = lv_actual_xml
-                               sub = '<REPOSITORY_TYPE>abapGit</REPOSITORY_TYPE>' ) ).
+    DATA temp3 TYPE xsdboolean.
+    temp3 = boolc( contains( val = lv_actual_xml
+                             sub = '<REPOSITORY_TYPE>abapGit</REPOSITORY_TYPE>' ) ).
+    lv_bool = temp3.
     cl_abap_unit_assert=>assert_equals( act = lv_bool
                                         exp = abap_true ).
   ENDMETHOD.

src/background/zcl_abapgit_background.clas.abap

@@ -152,13 +152,13 @@ CLASS ZCL_ABAPGIT_BACKGROUND IMPLEMENTATION.
         RETURN.
     ENDTRY.
 
-    lo_per = NEW #( ).
+    CREATE OBJECT lo_per.
     lt_list = lo_per->list( ).
 
     WRITE: / 'Background mode'.
 
     LOOP AT lt_list ASSIGNING <ls_list>.
-      li_log = NEW zcl_abapgit_log( ).
+      CREATE OBJECT li_log TYPE 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 ).
 
-      lo_stage = NEW #( ).
+      CREATE OBJECT lo_stage.
 
       CLEAR ls_user_files.
 
@@ -193,7 +193,7 @@ CLASS zcl_abapgit_background_push_au IMPLEMENTATION.
 
     ASSERT lines( is_files-remote ) > 0.
 
-    lo_stage = NEW #( ).
+    CREATE OBJECT lo_stage.
 
     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.
 
-    lo_stage = NEW #( ).
+    CREATE OBJECT lo_stage.
 
     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,9 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
       zcx_abapgit_exception=>raise_t100( ).
     ENDIF.
 
-    rv_locked = xsdbool( lv_lock_flag <> space ).
+    DATA temp1 TYPE xsdboolean.
+    temp1 = boolc( lv_lock_flag <> space ).
+    rv_locked = temp1.
   ENDMETHOD.
 
 
@@ -191,7 +193,9 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
       IMPORTING
         pe_result = lv_type_check_result.
 
-    rv_lockable = xsdbool( lv_type_check_result = 'L' ).
+    DATA temp2 TYPE xsdboolean.
+    temp2 = boolc( lv_type_check_result = 'L' ).
+    rv_lockable = temp2.
   ENDMETHOD.
 
 
@@ -209,7 +213,9 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
       IMPORTING
         pe_result = lv_type_check_result.
 
-    rv_transportable = xsdbool( lv_type_check_result CA 'RTL' OR iv_object_type = 'TABU' ).
+    DATA temp3 TYPE xsdboolean.
+    temp3 = boolc( lv_type_check_result CA 'RTL' OR iv_object_type = 'TABU' ).
+    rv_transportable = temp3.
   ENDMETHOD.
 
 
@@ -342,7 +348,8 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
   METHOD zif_abapgit_cts_api~create_transport_entries.
 
     DATA lt_tables      TYPE tredt_objects.
-    DATA lt_table_keys  TYPE STANDARD TABLE OF e071k.
+    TYPES temp1 TYPE STANDARD TABLE OF e071k.
+DATA lt_table_keys  TYPE temp1.
     DATA lv_with_dialog TYPE abap_bool.
 
     FIELD-SYMBOLS <ls_table> LIKE LINE OF lt_tables.
@@ -432,7 +439,8 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
   METHOD zif_abapgit_cts_api~get_transports_for_list.
 
     DATA lv_request TYPE trkorr.
-    DATA lt_tlock TYPE SORTED TABLE OF tlock WITH NON-UNIQUE KEY object hikey.
+    TYPES temp2 TYPE SORTED TABLE OF tlock WITH NON-UNIQUE KEY object hikey.
+DATA lt_tlock TYPE temp2.
     DATA ls_object_key TYPE e071.
     DATA lv_type_check_result TYPE c LENGTH 1.
     DATA ls_lock_key TYPE tlock_int.
@@ -554,7 +562,8 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
              trfunction TYPE e070-trfunction,
              strkorr    TYPE e070-strkorr,
            END OF ty_e070.
-    DATA lt_e070 TYPE STANDARD TABLE OF ty_e070 WITH DEFAULT KEY.
+    TYPES temp3 TYPE STANDARD TABLE OF ty_e070 WITH DEFAULT KEY.
+DATA lt_e070 TYPE temp3.
 
 * find all tasks first
     SELECT trkorr trfunction strkorr
@@ -585,8 +594,10 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
              obj_name TYPE e071-obj_name,
            END OF ty_contents.
 
-    DATA lt_tasks    TYPE STANDARD TABLE OF trkorr WITH DEFAULT KEY.
-    DATA lt_contents TYPE STANDARD TABLE OF ty_contents WITH DEFAULT KEY.
+    TYPES temp4 TYPE STANDARD TABLE OF trkorr WITH DEFAULT KEY.
+DATA lt_tasks    TYPE temp4.
+    TYPES temp5 TYPE STANDARD TABLE OF ty_contents WITH DEFAULT KEY.
+DATA lt_contents TYPE temp5.
     DATA ls_contents LIKE LINE OF lt_contents.
     DATA ls_list     LIKE LINE OF rt_list.
 

src/cts/zcl_abapgit_transport.clas.abap

@@ -305,7 +305,7 @@ CLASS ZCL_ABAPGIT_TRANSPORT IMPLEMENTATION.
           lv_message TYPE string.
     FIELD-SYMBOLS: <ls_log> TYPE sprot_u.
 
-    li_log = NEW zcl_abapgit_log( iv_title = iv_title ).
+    CREATE OBJECT li_log TYPE zcl_abapgit_log EXPORTING 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 ).
 
-    lo_stage = NEW #( ).
+    CREATE OBJECT lo_stage.
 
     ls_stage_objects = zcl_abapgit_factory=>get_stage_logic( )->get( io_repository ).
 
@@ -76,7 +76,7 @@ CLASS zcl_abapgit_transport_2_branch IMPLEMENTATION.
 
   METHOD stage_transport_objects.
     DATA lo_transport_objects TYPE REF TO zcl_abapgit_transport_objects.
-    lo_transport_objects = NEW #( it_transport_objects = it_transport_objects ).
+    CREATE OBJECT lo_transport_objects EXPORTING it_transport_objects = it_transport_objects.
 
     lo_transport_objects->to_stage(
       io_stage           = io_stage