AQSG support (#6161)

This commit is contained in:
Lars Hvam 2023-03-23 13:07:42 +01:00 committed by GitHub
parent 6187d12812
commit 2df96f9143
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
3 changed files with 126 additions and 5 deletions

View File

@ -22,7 +22,7 @@ ENDCLASS.
CLASS ZCL_ABAPGIT_OBJECT_AQBG IMPLEMENTATION.
CLASS zcl_abapgit_object_aqbg IMPLEMENTATION.
METHOD get_field_rules.
@ -76,8 +76,6 @@ CLASS ZCL_ABAPGIT_OBJECT_AQBG IMPLEMENTATION.
METHOD zif_abapgit_object~delete.
set_default_transport( iv_transport ).
get_generic( )->delete( iv_package ).
ENDMETHOD.
@ -85,8 +83,6 @@ CLASS ZCL_ABAPGIT_OBJECT_AQBG IMPLEMENTATION.
METHOD zif_abapgit_object~deserialize.
set_default_transport( iv_transport ).
get_generic( )->deserialize(
iv_package = iv_package
io_xml = io_xml ).

View File

@ -0,0 +1,109 @@
CLASS zcl_abapgit_object_aqsg DEFINITION
PUBLIC
INHERITING FROM zcl_abapgit_objects_super
CREATE PUBLIC .
PUBLIC SECTION.
INTERFACES zif_abapgit_object .
PROTECTED SECTION.
PRIVATE SECTION.
METHODS get_generic
RETURNING
VALUE(ro_generic) TYPE REF TO zcl_abapgit_objects_generic
RAISING
zcx_abapgit_exception .
METHODS get_field_rules
RETURNING
VALUE(ro_result) TYPE REF TO zif_abapgit_field_rules.
ENDCLASS.
CLASS zcl_abapgit_object_aqsg IMPLEMENTATION.
METHOD get_field_rules.
ro_result = zcl_abapgit_field_rules=>create( ).
* add rules here if needed
ENDMETHOD.
METHOD get_generic.
" transaction SQ02
CREATE OBJECT ro_generic
EXPORTING
is_item = ms_item
io_field_rules = get_field_rules( )
iv_language = mv_language.
ENDMETHOD.
METHOD zif_abapgit_object~changed_by.
rv_user = zcl_abapgit_objects_super=>c_user_unknown.
ENDMETHOD.
METHOD zif_abapgit_object~delete.
get_generic( )->delete( iv_package ).
ENDMETHOD.
METHOD zif_abapgit_object~deserialize.
get_generic( )->deserialize(
iv_package = iv_package
io_xml = io_xml ).
ENDMETHOD.
METHOD zif_abapgit_object~exists.
rv_bool = get_generic( )->exists( ).
ENDMETHOD.
METHOD zif_abapgit_object~get_comparator.
RETURN.
ENDMETHOD.
METHOD zif_abapgit_object~get_deserialize_steps.
APPEND zif_abapgit_object=>gc_step_id-late TO rt_steps.
ENDMETHOD.
METHOD zif_abapgit_object~get_metadata.
rs_metadata = get_metadata( ).
ENDMETHOD.
METHOD zif_abapgit_object~is_active.
rv_active = is_active( ).
ENDMETHOD.
METHOD zif_abapgit_object~is_locked.
rv_is_locked = abap_false.
ENDMETHOD.
METHOD zif_abapgit_object~jump.
RETURN.
ENDMETHOD.
METHOD zif_abapgit_object~serialize.
get_generic( )->serialize( io_xml ).
ENDMETHOD.
ENDCLASS.

View File

@ -0,0 +1,16 @@
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOCLASS>
<CLSNAME>ZCL_ABAPGIT_OBJECT_AQSG</CLSNAME>
<LANGU>E</LANGU>
<DESCRIPT>abapGit - AQSG - ABAP Query: Functional area</DESCRIPT>
<STATE>1</STATE>
<CLSCCINCL>X</CLSCCINCL>
<FIXPT>X</FIXPT>
<UNICODE>X</UNICODE>
</VSEOCLASS>
</asx:values>
</asx:abap>
</abapGit>