mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
cherrypick macro include
This commit is contained in:
parent
4940e7538f
commit
c0fb995e24
23
src/zabapgit_macros.prog.abap
Normal file
23
src/zabapgit_macros.prog.abap
Normal file
|
@ -0,0 +1,23 @@
|
|||
*&---------------------------------------------------------------------*
|
||||
*& Include ZABAPGIT_MACROS
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
* Macros
|
||||
|
||||
DEFINE _object_check_timestamp.
|
||||
IF sy-subrc = 0 AND &1 IS NOT INITIAL AND &2 IS NOT INITIAL.
|
||||
cl_abap_tstmp=>systemtstmp_syst2utc(
|
||||
EXPORTING syst_date = &1
|
||||
syst_time = &2
|
||||
IMPORTING utc_tstmp = lv_ts ).
|
||||
IF lv_ts < iv_timestamp.
|
||||
rv_changed = abap_false. " Unchanged
|
||||
ELSE.
|
||||
rv_changed = abap_true.
|
||||
RETURN.
|
||||
ENDIF.
|
||||
ELSE. " Not found? => changed
|
||||
rv_changed = abap_true.
|
||||
RETURN.
|
||||
ENDIF.
|
||||
END-OF-DEFINITION.
|
48
src/zabapgit_macros.prog.xml
Normal file
48
src/zabapgit_macros.prog.xml
Normal file
|
@ -0,0 +1,48 @@
|
|||
<?xml version="1.0" encoding="utf-8"?>
|
||||
<abapGit version="v1.0.0" serializer="LCL_OBJECT_PROG" serializer_version="v1.0.0">
|
||||
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
|
||||
<asx:values>
|
||||
<PROGDIR>
|
||||
<NAME>ZABAPGIT_MACROS</NAME>
|
||||
<STATE>A</STATE>
|
||||
<SQLX/>
|
||||
<EDTX/>
|
||||
<VARCL>X</VARCL>
|
||||
<DBAPL/>
|
||||
<DBNA/>
|
||||
<CLAS/>
|
||||
<TYPE/>
|
||||
<OCCURS/>
|
||||
<SUBC>I</SUBC>
|
||||
<APPL/>
|
||||
<SECU/>
|
||||
<CNAM/>
|
||||
<CDAT>0000-00-00</CDAT>
|
||||
<UNAM/>
|
||||
<UDAT>0000-00-00</UDAT>
|
||||
<VERN/>
|
||||
<LEVL/>
|
||||
<RSTAT/>
|
||||
<RMAND/>
|
||||
<RLOAD>E</RLOAD>
|
||||
<FIXPT/>
|
||||
<SSET/>
|
||||
<SDATE>0000-00-00</SDATE>
|
||||
<STIME/>
|
||||
<IDATE>0000-00-00</IDATE>
|
||||
<ITIME/>
|
||||
<LDBNAME/>
|
||||
<UCCHECK>X</UCCHECK>
|
||||
</PROGDIR>
|
||||
<TPOOL>
|
||||
<item>
|
||||
<ID>R</ID>
|
||||
<KEY/>
|
||||
<ENTRY>Include ZABAPGIT_MACROS</ENTRY>
|
||||
<LENGTH>23</LENGTH>
|
||||
<SPLIT/>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
Loading…
Reference in New Issue
Block a user