mirror of
https://github.com/abapGit/abapGit.git
synced 2025-04-30 20:03:20 +08:00
Added support for COTA Object type
This commit is contained in:
parent
93935b3dfb
commit
4747f79f46
|
@ -52,6 +52,7 @@ CLASS ZCL_ABAPGIT_AFF_REGISTRY IMPLEMENTATION.
|
|||
register( 'CHKC' ).
|
||||
register( 'CHKO' ).
|
||||
register( 'CHKV' ).
|
||||
register( 'COTA' ).
|
||||
register( 'DRTY' ).
|
||||
register( 'DTEB' ).
|
||||
register( 'DSFI' ).
|
||||
|
|
28
src/objects/aff/zcl_abapgit_object_cota.clas.abap
Normal file
28
src/objects/aff/zcl_abapgit_object_cota.clas.abap
Normal file
|
@ -0,0 +1,28 @@
|
|||
class zcl_abapgit_object_cota definition
|
||||
public
|
||||
inheriting from ZCL_ABAPGIT_OBJECT_COMMON_AFF
|
||||
final
|
||||
create public .
|
||||
|
||||
public section.
|
||||
METHODS zif_abapgit_object~changed_by REDEFINITION.
|
||||
protected section.
|
||||
private section.
|
||||
ENDCLASS.
|
||||
|
||||
|
||||
|
||||
CLASS zcl_abapgit_object_cota IMPLEMENTATION.
|
||||
|
||||
METHOD zif_abapgit_object~changed_by.
|
||||
SELECT SINGLE changedby FROM ('sapcontargethead')
|
||||
WHERE id = @ms_item-obj_name AND version = 'I'
|
||||
INTO @rv_user.
|
||||
|
||||
IF rv_user IS INITIAL.
|
||||
SELECT SINGLE changedby FROM ('sapcontargethead')
|
||||
WHERE id = @ms_item-obj_name AND version = 'A'
|
||||
INTO @rv_user.
|
||||
ENDIF.
|
||||
ENDMETHOD.
|
||||
ENDCLASS.
|
16
src/objects/aff/zcl_abapgit_object_cota.clas.xml
Normal file
16
src/objects/aff/zcl_abapgit_object_cota.clas.xml
Normal 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_COTA</CLSNAME>
|
||||
<LANGU>E</LANGU>
|
||||
<DESCRIPT>abapGit - COTA - Communication Target</DESCRIPT>
|
||||
<STATE>1</STATE>
|
||||
<CLSCCINCL>X</CLSCCINCL>
|
||||
<FIXPT>X</FIXPT>
|
||||
<UNICODE>X</UNICODE>
|
||||
</VSEOCLASS>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
Loading…
Reference in New Issue
Block a user