SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 04:08:27 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

ASFC,SPLO,SPPF: Fix missing transport entry (#5541)

Browse Source 
In certain cases, the default transport set by abapGit does not work and there's no API to pass the transport for the object type. Therefore, we need to set the transport via ABAP memory (similar to setting the default package).

Co-authored-by: Lars Hvam <larshp@hotmail.com>
This commit is contained in:
Marc Bernard 2022-05-09 08:11:49 +02:00 committed by GitHub
parent 5127bfdb9d
commit db91c9bb08
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
4 changed files with 31 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/objects/zcl_abapgit_object_asfc.clas.abap
View File

@ -38,6 +38,8 @@ CLASS zcl_abapgit_object_asfc IMPLEMENTATION.
METHOD zif_abapgit_object~delete.
set_default_transport( iv_transport ).
get_generic( )->delete( iv_package ).
ENDMETHOD.
@ -45,6 +47,8 @@ CLASS zcl_abapgit_object_asfc IMPLEMENTATION.
METHOD zif_abapgit_object~deserialize.
set_default_transport( iv_transport ).
get_generic( )->deserialize(
iv_package = iv_package
io_xml = io_xml ).

6
src/objects/zcl_abapgit_object_splo.clas.abap
View File

@ -30,6 +30,10 @@ CLASS zcl_abapgit_object_splo IMPLEMENTATION.
DELETE FROM tsp1d WHERE papart = ms_item-obj_name. "#EC CI_SUBRC
DELETE FROM tsp0p WHERE pdpaper = ms_item-obj_name. "#EC CI_SUBRC
set_default_transport( iv_transport ).
corr_insert( iv_package ).
ENDMETHOD.
@ -51,6 +55,8 @@ CLASS zcl_abapgit_object_splo IMPLEMENTATION.
MODIFY tsp1d FROM ls_tsp1d. "#EC CI_SUBRC
MODIFY tsp0p FROM ls_tsp0p. "#EC CI_SUBRC
set_default_transport( iv_transport ).
tadir_insert( iv_package ).
corr_insert( iv_package ).

6
src/objects/zcl_abapgit_object_sppf.clas.abap
View File

@ -18,7 +18,7 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_OBJECT_SPPF IMPLEMENTATION.
CLASS zcl_abapgit_object_sppf IMPLEMENTATION.
METHOD get_generic.
@ -38,6 +38,8 @@ CLASS ZCL_ABAPGIT_OBJECT_SPPF IMPLEMENTATION.
METHOD zif_abapgit_object~delete.
set_default_transport( iv_transport ).
get_generic( )->delete( iv_package ).
ENDMETHOD.
@ -45,6 +47,8 @@ CLASS ZCL_ABAPGIT_OBJECT_SPPF IMPLEMENTATION.
METHOD zif_abapgit_object~deserialize.
set_default_transport( iv_transport ).
get_generic( )->deserialize(
iv_package = iv_package
io_xml = io_xml ).

17
src/objects/zcl_abapgit_objects_super.clas.abap
View File

@ -41,6 +41,9 @@ CLASS zcl_abapgit_objects_super DEFINITION
METHODS set_default_package
IMPORTING
!iv_package TYPE devclass .
METHODS set_default_transport
IMPORTING
!iv_transport TYPE trkorr.
METHODS serialize_longtexts
IMPORTING
!ii_xml TYPE REF TO zif_abapgit_xml_output
@ -380,7 +383,7 @@ CLASS zcl_abapgit_objects_super IMPLEMENTATION.
METHOD set_default_package.
" In certain cases we need to set the package package via ABAP memory
" In certain cases we need to set the package via ABAP memory
" because we can't supply it via the APIs.
"
" Set default package, see function module RS_CORR_INSERT FORM get_current_devclass.
@ -395,6 +398,18 @@ CLASS zcl_abapgit_objects_super IMPLEMENTATION.
ENDMETHOD.
METHOD set_default_transport.
" In certain cases we need to set the transport via ABAP memory
" because we can't supply it via the APIs.
"
" See function module RS_CORR_INSERT
EXPORT tasknr FROM iv_transport TO MEMORY ID 'EUT'.
ENDMETHOD.
METHOD tadir_insert.
CALL FUNCTION 'TR_TADIR_INTERFACE'