downport

Author: CI

package.json

@@ -1,5 +1,5 @@
 {
   "dependencies": {
-    "@abaplint/cli": "^2.120.57"
+    "@abaplint/cli": "^2.120.58"
   }
 }

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

@@ -158,7 +158,7 @@ CLASS zcl_abapgit_background IMPLEMENTATION.
     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.
           li_repo = zcl_abapgit_repo_srv=>get_instance( )->get( <ls_list>-key ).

src/background/zcl_abapgit_background_push_au.clas.abap

@@ -135,7 +135,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.
 
@@ -196,7 +196,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

@@ -98,12 +98,14 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
 
 
   METHOD get_current_transport_for_obj.
-    DATA: lv_object_lockable   TYPE abap_bool,
+    TYPES temp1 TYPE STANDARD TABLE OF tlock WITH DEFAULT KEY.
+TYPES temp2 TYPE STANDARD TABLE OF trkorr WITH DEFAULT KEY.
+DATA: lv_object_lockable   TYPE abap_bool,
           lv_locked            TYPE abap_bool,
           lv_transport_request TYPE trkorr,
           ls_tlock             TYPE tlock,
-          lt_tlock             TYPE STANDARD TABLE OF tlock WITH DEFAULT KEY,
-          lt_transports        TYPE STANDARD TABLE OF trkorr WITH DEFAULT KEY,
+          lt_tlock             TYPE temp1,
+          lt_transports        TYPE temp2,
           lv_task              TYPE trkorr,
           lv_tr_object_name    TYPE trobj_name.
 
@@ -251,7 +253,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.
 
 
@@ -269,7 +273,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.
 
 
@@ -287,7 +293,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.
 
 
@@ -420,7 +428,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 temp3 TYPE STANDARD TABLE OF e071k.
+DATA lt_table_keys  TYPE temp3.
     DATA lv_with_dialog TYPE abap_bool.
 
     FIELD-SYMBOLS <ls_table> LIKE LINE OF lt_tables.
@@ -523,7 +532,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 temp4 TYPE SORTED TABLE OF tlock WITH NON-UNIQUE KEY object hikey.
+DATA lt_tlock TYPE temp4.
     DATA ls_object_key TYPE e071.
     DATA lv_type_check_result TYPE c LENGTH 1.
     DATA ls_lock_key TYPE tlock_int.
@@ -673,8 +683,9 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
         we_category = lv_category
         ev_logo_obj = lv_is_logical_object.
 
-    rv_is_customizing_object = xsdbool(
-      lv_category = zif_abapgit_cts_api~c_transport_category-customizing AND lv_is_logical_object = abap_true ).
+    DATA temp4 TYPE xsdboolean.
+    temp4 = boolc( lv_category = zif_abapgit_cts_api~c_transport_category-customizing AND lv_is_logical_object = abap_true ).
+    rv_is_customizing_object = temp4.
 
   ENDMETHOD.
 
@@ -701,8 +712,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 temp5 TYPE STANDARD TABLE OF trkorr WITH DEFAULT KEY.
+DATA lt_tasks    TYPE temp5.
+    TYPES temp6 TYPE STANDARD TABLE OF ty_contents WITH DEFAULT KEY.
+DATA lt_contents TYPE temp6.
     DATA ls_contents LIKE LINE OF lt_contents.
     DATA ls_list     LIKE LINE OF rt_list.
 
@@ -818,7 +831,8 @@ CLASS zcl_abapgit_cts_api IMPLEMENTATION.
            END OF ty_e070create.
 
     DATA lt_trkorr     LIKE it_trkorr.
-    DATA lt_e070create TYPE STANDARD TABLE OF ty_e070create WITH DEFAULT KEY.
+    TYPES temp7 TYPE STANDARD TABLE OF ty_e070create WITH DEFAULT KEY.
+DATA lt_e070create TYPE temp7.
     DATA ls_e070create LIKE LINE OF lt_e070create.
     DATA ls_created_on LIKE LINE OF rt_created_on.
 

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>.