move abapGit to new abapGit

This commit is contained in:
larshp 2016-03-06 10:35:51 +00:00
parent c7b84e5380
commit ca8c9faccd
2 changed files with 74 additions and 61 deletions

View File

@ -1740,7 +1740,8 @@ CLASS lcl_xml_output DEFINITION FINAL INHERITING FROM lcl_xml CREATE PUBLIC.
METHODS:
add
IMPORTING iv_name TYPE clike
ig_data TYPE any,
ig_data TYPE any
RAISING lcx_exception,
render
IMPORTING iv_normalize TYPE sap_bool DEFAULT abap_true
RETURNING VALUE(rv_xml) TYPE string.
@ -1759,6 +1760,11 @@ CLASS lcl_xml_output IMPLEMENTATION.
ASSERT NOT iv_name IS INITIAL.
READ TABLE mt_stab WITH KEY name = iv_name TRANSPORTING NO FIELDS.
IF sy-subrc = 0.
_raise 'XML mt_stab name already exists'.
ENDIF.
APPEND INITIAL LINE TO mt_stab ASSIGNING <ls_stab>.
<ls_stab>-name = iv_name.
GET REFERENCE OF ig_data INTO <ls_stab>-value.

View File

@ -1,62 +1,69 @@
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v0.2-alpha">
<PROGDIR>
<NAME>ZABAPGIT</NAME>
<STATE>A</STATE>
<SQLX></SQLX>
<EDTX></EDTX>
<VARCL>X</VARCL>
<DBAPL>S</DBAPL>
<DBNA></DBNA>
<CLAS></CLAS>
<TYPE></TYPE>
<OCCURS></OCCURS>
<SUBC>1</SUBC>
<APPL></APPL>
<SECU></SECU>
<CNAM></CNAM>
<CDAT>00000000</CDAT>
<UNAM></UNAM>
<UDAT>00000000</UDAT>
<VERN></VERN>
<LEVL></LEVL>
<RSTAT></RSTAT>
<RMAND></RMAND>
<RLOAD></RLOAD>
<FIXPT>X</FIXPT>
<SSET></SSET>
<SDATE>00000000</SDATE>
<STIME></STIME>
<IDATE>00000000</IDATE>
<ITIME></ITIME>
<LDBNAME>D$S</LDBNAME>
<UCCHECK>X</UCCHECK>
</PROGDIR>
<RSMPE_ADM>
<ACTCODE></ACTCODE>
<MENCODE></MENCODE>
<PFKCODE></PFKCODE>
<DEFAULTACT></DEFAULTACT>
<DEFAULTPFK></DEFAULTPFK>
<MOD_LANGU></MOD_LANGU>
</RSMPE_ADM>
<RSMPE_STAT_TABLE/>
<RSMPE_FUNT_TABLE/>
<RSMPE_MEN_TABLE/>
<RSMPE_MNLT_TABLE/>
<RSMPE_ACT_TABLE/>
<RSMPE_BUT_TABLE/>
<RSMPE_PFK_TABLE/>
<RSMPE_STAF_TABLE/>
<RSMPE_ATRT_TABLE/>
<RSMPE_TITT_TABLE/>
<RSMPE_BUTS_TABLE/>
<TEXTPOOL_TABLE>
<TEXTPOOL>
<ID>R</ID>
<KEY></KEY>
<ENTRY>abapGit</ENTRY>
<LENGTH>7 </LENGTH>
</TEXTPOOL>
</TEXTPOOL_TABLE>
<abapGit version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<PROGDIR>
<NAME>ZABAPGIT</NAME>
<STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL>
<DBAPL>S</DBAPL>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>1</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD/>
<FIXPT>X</FIXPT>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME>D$S</LDBNAME>
<UCCHECK>X</UCCHECK>
</PROGDIR>
<DYNPROS/>
<CUA>
<ADM>
<ACTCODE/>
<MENCODE/>
<PFKCODE/>
<DEFAULTACT/>
<DEFAULTPFK/>
<MOD_LANGU/>
</ADM>
<STA/>
<FUN/>
<MEN/>
<MTX/>
<ACT/>
<BUT/>
<PFK/>
<SET/>
<DOC/>
<TIT/>
<BIV/>
</CUA>
<TPOOL>
<TEXTPOOL>
<ID>R</ID>
<KEY/>
<ENTRY>abapGit</ENTRY>
<LENGTH>7</LENGTH>
</TEXTPOOL>
</TPOOL>
</asx:values>
</asx:abap>
</abapGit>