mirror of
https://github.com/abapGit/abapGit.git
synced 2025-04-30 20:03:20 +08:00
new transport class, #271
This commit is contained in:
parent
a4c3d8e083
commit
f3b2f0ec33
|
@ -65,6 +65,7 @@ INCLUDE zabapgit_object.
|
|||
INCLUDE zabapgit_repo_impl.
|
||||
INCLUDE zabapgit_background.
|
||||
INCLUDE zabapgit_zip.
|
||||
INCLUDE zabapgit_transport.
|
||||
INCLUDE zabapgit_page.
|
||||
INCLUDE zabapgit_page_branch_overview.
|
||||
INCLUDE zabapgit_gui.
|
||||
|
|
|
@ -1478,6 +1478,7 @@ CLASS lcl_gui_page_main IMPLEMENTATION.
|
|||
|
||||
lo_betasub->add( iv_txt = 'Database util' iv_act = 'db' ).
|
||||
lo_betasub->add( iv_txt = 'Package to zip' iv_act = 'packagezip' ).
|
||||
lo_betasub->add( iv_txt = 'Transport to zip' iv_act = 'transportzip' ).
|
||||
lo_betasub->add( iv_txt = 'Background mode' iv_act = 'background' ).
|
||||
|
||||
ro_menu->add( iv_txt = 'Refresh all' iv_act = 'refresh' ).
|
||||
|
@ -2461,9 +2462,12 @@ CLASS lcl_gui_router IMPLEMENTATION.
|
|||
lcl_zip=>export( io_repo = lcl_app=>repo_srv( )->get( lv_key )
|
||||
iv_zip = abap_false ).
|
||||
ev_state = gc_event_state-no_more_act.
|
||||
WHEN 'packagezip'. "TODO refactor name ?
|
||||
WHEN 'packagezip'.
|
||||
repo_package_zip( ).
|
||||
ev_state = gc_event_state-no_more_act.
|
||||
WHEN 'transportzip'.
|
||||
lcl_transport=>zip( ).
|
||||
ev_state = gc_event_state-no_more_act.
|
||||
WHEN 'hide'.
|
||||
lv_key = iv_getdata.
|
||||
lcl_app=>user( )->hide( lv_key ).
|
||||
|
|
19
src/zabapgit_transport.prog.abap
Normal file
19
src/zabapgit_transport.prog.abap
Normal file
|
@ -0,0 +1,19 @@
|
|||
*&---------------------------------------------------------------------*
|
||||
*& Include ZABAPGIT_TRANSPORT
|
||||
*&---------------------------------------------------------------------*
|
||||
|
||||
CLASS lcl_transport DEFINITION.
|
||||
|
||||
PUBLIC SECTION.
|
||||
CLASS-METHODS:
|
||||
zip RAISING lcx_exception.
|
||||
|
||||
ENDCLASS.
|
||||
|
||||
CLASS lcl_transport IMPLEMENTATION.
|
||||
|
||||
METHOD zip.
|
||||
BREAK-POINT.
|
||||
ENDMETHOD.
|
||||
|
||||
ENDCLASS.
|
48
src/zabapgit_transport.prog.xml
Normal file
48
src/zabapgit_transport.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_TRANSPORT</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_TRANSPORT</ENTRY>
|
||||
<LENGTH>26</LENGTH>
|
||||
<SPLIT/>
|
||||
</item>
|
||||
</TPOOL>
|
||||
</asx:values>
|
||||
</asx:abap>
|
||||
</abapGit>
|
Loading…
Reference in New Issue
Block a user