From d73e00bc8ae6d914819a909abd4825bad40a6f21 Mon Sep 17 00:00:00 2001 From: Lars Hvam Date: Tue, 8 Apr 2025 11:10:59 +0200 Subject: [PATCH] remove use of `PGMID` (#7199) --- abaplint.json | 3 ++- src/cts/zcl_abapgit_cts_api.clas.abap | 10 +++++----- .../enh/zcl_abapgit_object_enhs_hook_d.clas.abap | 2 +- src/objects/texts/zcl_abapgit_sotr_handler.clas.abap | 6 +++--- src/objects/texts/zcl_abapgit_sots_handler.clas.abap | 6 +++--- 5 files changed, 14 insertions(+), 13 deletions(-) diff --git a/abaplint.json b/abaplint.json index 730fae701..d80987386 100644 --- a/abaplint.json +++ b/abaplint.json @@ -225,8 +225,8 @@ "^if_adt_lock_handle$", "^if_aff_", "^if_satc_ci_variant_access$", - "^if_saunit_internal_result$", "^if_saunit_internal_result_type$", + "^if_saunit_internal_result$", "^if_srvd_types$", "^if_wb_adt_plugin_resource_co$", "^if_wb_object_data_selection_co$", @@ -234,6 +234,7 @@ "^if_xco_", "^int4$", "^numc2$", + "^pgmid$", "^sabp_t_tadir_keys$", "^sap_bool$", "^srcsystem$", diff --git a/src/cts/zcl_abapgit_cts_api.clas.abap b/src/cts/zcl_abapgit_cts_api.clas.abap index c503d4eae..99e41afdb 100644 --- a/src/cts/zcl_abapgit_cts_api.clas.abap +++ b/src/cts/zcl_abapgit_cts_api.clas.abap @@ -21,7 +21,7 @@ CLASS zcl_abapgit_cts_api DEFINITION "! @raising zcx_abapgit_exception | Object is not locked in a transport METHODS get_current_transport_for_obj IMPORTING - !iv_program_id TYPE pgmid DEFAULT 'R3TR' + !iv_program_id TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object_type TYPE trobjtype !iv_object_name TYPE sobj_name RETURNING @@ -36,7 +36,7 @@ CLASS zcl_abapgit_cts_api DEFINITION "! @raising zcx_abapgit_exception | Object is not locked in a transport METHODS get_current_transport_from_db IMPORTING - !iv_program_id TYPE pgmid DEFAULT 'R3TR' + !iv_program_id TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object_type TYPE trobjtype !iv_object_name TYPE sobj_name RETURNING @@ -51,7 +51,7 @@ CLASS zcl_abapgit_cts_api DEFINITION "! @raising zcx_abapgit_exception | Object type is not lockable METHODS is_object_locked_in_transport IMPORTING - !iv_program_id TYPE pgmid DEFAULT 'R3TR' + !iv_program_id TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object_type TYPE trobjtype !iv_object_name TYPE sobj_name RETURNING @@ -64,7 +64,7 @@ CLASS zcl_abapgit_cts_api DEFINITION "! @parameter rv_lockable | Lockable METHODS is_object_type_lockable IMPORTING - !iv_program_id TYPE pgmid DEFAULT 'R3TR' + !iv_program_id TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object_type TYPE trobjtype RETURNING VALUE(rv_lockable) TYPE abap_bool . @@ -74,7 +74,7 @@ CLASS zcl_abapgit_cts_api DEFINITION "! @parameter rv_transportable | Transportable METHODS is_object_type_transportable IMPORTING - !iv_program_id TYPE pgmid DEFAULT 'R3TR' + !iv_program_id TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object_type TYPE trobjtype RETURNING VALUE(rv_transportable) TYPE abap_bool . diff --git a/src/objects/enh/zcl_abapgit_object_enhs_hook_d.clas.abap b/src/objects/enh/zcl_abapgit_object_enhs_hook_d.clas.abap index a5ff20145..ab49606ba 100644 --- a/src/objects/enh/zcl_abapgit_object_enhs_hook_d.clas.abap +++ b/src/objects/enh/zcl_abapgit_object_enhs_hook_d.clas.abap @@ -6,7 +6,7 @@ CLASS zcl_abapgit_object_enhs_hook_d DEFINITION PUBLIC. PROTECTED SECTION. PRIVATE SECTION. TYPES: BEGIN OF ty_hook_defifnition, - pgmid TYPE pgmid, + pgmid TYPE tadir-pgmid, obj_name TYPE trobj_name, obj_type TYPE trobjtype, main_type TYPE trobjtype, diff --git a/src/objects/texts/zcl_abapgit_sotr_handler.clas.abap b/src/objects/texts/zcl_abapgit_sotr_handler.clas.abap index fe2bf7f7c..357b87848 100644 --- a/src/objects/texts/zcl_abapgit_sotr_handler.clas.abap +++ b/src/objects/texts/zcl_abapgit_sotr_handler.clas.abap @@ -17,7 +17,7 @@ CLASS zcl_abapgit_sotr_handler DEFINITION CLASS-METHODS read_sotr IMPORTING - !iv_pgmid TYPE pgmid DEFAULT 'R3TR' + !iv_pgmid TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object TYPE trobjtype !iv_obj_name TYPE csequence !io_xml TYPE REF TO zif_abapgit_xml_output OPTIONAL @@ -45,7 +45,7 @@ CLASS zcl_abapgit_sotr_handler DEFINITION CLASS-METHODS delete_sotr IMPORTING - !iv_pgmid TYPE pgmid DEFAULT 'R3TR' + !iv_pgmid TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object TYPE trobjtype !iv_obj_name TYPE csequence RAISING @@ -68,7 +68,7 @@ CLASS zcl_abapgit_sotr_handler DEFINITION CLASS-METHODS get_sotr_usage IMPORTING - !iv_pgmid TYPE pgmid + !iv_pgmid TYPE tadir-pgmid !iv_object TYPE trobjtype !iv_obj_name TYPE csequence RETURNING diff --git a/src/objects/texts/zcl_abapgit_sots_handler.clas.abap b/src/objects/texts/zcl_abapgit_sots_handler.clas.abap index 1cb700037..b54792a65 100644 --- a/src/objects/texts/zcl_abapgit_sots_handler.clas.abap +++ b/src/objects/texts/zcl_abapgit_sots_handler.clas.abap @@ -17,7 +17,7 @@ CLASS zcl_abapgit_sots_handler DEFINITION CLASS-METHODS read_sots IMPORTING - !iv_pgmid TYPE pgmid DEFAULT 'R3TR' + !iv_pgmid TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object TYPE trobjtype !iv_obj_name TYPE csequence !io_xml TYPE REF TO zif_abapgit_xml_output OPTIONAL @@ -45,7 +45,7 @@ CLASS zcl_abapgit_sots_handler DEFINITION CLASS-METHODS delete_sots IMPORTING - !iv_pgmid TYPE pgmid DEFAULT 'R3TR' + !iv_pgmid TYPE tadir-pgmid DEFAULT 'R3TR' !iv_object TYPE trobjtype !iv_obj_name TYPE csequence RAISING @@ -55,7 +55,7 @@ CLASS zcl_abapgit_sots_handler DEFINITION CLASS-METHODS get_sots_usage IMPORTING - !iv_pgmid TYPE pgmid + !iv_pgmid TYPE tadir-pgmid !iv_object TYPE trobjtype !iv_obj_name TYPE csequence RETURNING