SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-02 04:36:49 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Merge pull request #1 from larshp/master

Browse Source 
Sync version with remote
This commit is contained in:
Christian Tapia Sabogal 2017-01-23 07:07:36 -05:00 committed by GitHub
commit 942361be6e
218 changed files with 482 additions and 3099 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
changelog.txt
View File

@ -8,6 +8,15 @@ Legend
+ : added + : added
- : removed - : removed
2017-01-22 v1.26.0
------------------
+ XML ignore initial fields
+ Newline added to end of all ABAP code
2017-01-22 v1.25.2
------------------
+ Possibility to set max number of objects in list
2016-12-01 v1.24.0 2016-12-01 v1.24.0
------------------ ------------------
+ abap syntax highlighting + abap syntax highlighting

2
src/zabapgit.prog.abap
View File

@ -3,7 +3,7 @@ REPORT zabapgit LINE-SIZE 100.
* See http://www.abapgit.org * See http://www.abapgit.org
CONSTANTS: gc_xml_version TYPE string VALUE 'v1.0.0', "#EC NOTEXT CONSTANTS: gc_xml_version TYPE string VALUE 'v1.0.0', "#EC NOTEXT
gc_abap_version TYPE string VALUE 'v1.25.1'. "#EC NOTEXT gc_abap_version TYPE string VALUE 'v1.26.1'. "#EC NOTEXT
******************************************************************************** ********************************************************************************
* The MIT License (MIT) * The MIT License (MIT)

24
src/zabapgit.prog.xml
View File

@ -5,32 +5,10 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT</NAME> <NAME>ZABAPGIT</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL>S</DBAPL> <DBAPL>S</DBAPL>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>1</SUBC> <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> <FIXPT>X</FIXPT>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME>D$S</LDBNAME> <LDBNAME>D$S</LDBNAME>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
@ -38,10 +16,8 @@
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>abapGit</ENTRY> <ENTRY>abapGit</ENTRY>
<LENGTH>7</LENGTH> <LENGTH>7</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

7
src/zabapgit.tran.xml
View File

@ -6,20 +6,13 @@
<TCODE>ZABAPGIT</TCODE> <TCODE>ZABAPGIT</TCODE>
<PGMNA>ZABAPGIT</PGMNA> <PGMNA>ZABAPGIT</PGMNA>
<DYPNO>1000</DYPNO> <DYPNO>1000</DYPNO>
<MENUE/>
<CINFO>gA==</CINFO> <CINFO>gA==</CINFO>
<ARBGB/>
</TSTC> </TSTC>
<TSTCC> <TSTCC>
<TCODE>ZABAPGIT</TCODE> <TCODE>ZABAPGIT</TCODE>
<S_WEBGUI>1</S_WEBGUI> <S_WEBGUI>1</S_WEBGUI>
<S_WIN32>X</S_WIN32> <S_WIN32>X</S_WIN32>
<S_PLATIN>X</S_PLATIN> <S_PLATIN>X</S_PLATIN>
<S_SERVICE/>
<S_PERVAS/>
<S_DUMMY/>
<S_DUMMY1/>
<S_DUMMY2/>
</TSTCC> </TSTCC>
<TSTCT> <TSTCT>
<SPRSL>E</SPRSL> <SPRSL>E</SPRSL>

26
src/zabapgit_app.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_APP</NAME> <NAME>ZABAPGIT_APP</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_APP</ENTRY> <ENTRY>Include ZABAPGIT_APP</ENTRY>
<LENGTH>20</LENGTH> <LENGTH>20</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_app_impl.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_APP_IMPL</NAME> <NAME>ZABAPGIT_APP_IMPL</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_APP_IMPL</ENTRY> <ENTRY>Include ZABAPGIT_APP_IMPL</ENTRY>
<LENGTH>25</LENGTH> <LENGTH>25</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_background.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_BACKGROUND</NAME> <NAME>ZABAPGIT_BACKGROUND</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_BACKGROUND</ENTRY> <ENTRY>Include ZABAPGIT_BACKGROUND</ENTRY>
<LENGTH>27</LENGTH> <LENGTH>27</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_definitions.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_DEFINITIONS</NAME> <NAME>ZABAPGIT_DEFINITIONS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_DEFINITIONS</ENTRY> <ENTRY>Include ZABAPGIT_DEFINITIONS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_dot_abapgit.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_DOT_ABAPGIT</NAME> <NAME>ZABAPGIT_DOT_ABAPGIT</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_DOT_ABAPGIT</ENTRY> <ENTRY>Include ZABAPGIT_DOT_ABAPGIT</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_exceptions.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_EXCEPTIONS</NAME> <NAME>ZABAPGIT_EXCEPTIONS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_EXCEPTIONS</ENTRY> <ENTRY>Include ZABAPGIT_EXCEPTIONS</ENTRY>
<LENGTH>27</LENGTH> <LENGTH>27</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_file_status.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_FILE_STATUS</NAME> <NAME>ZABAPGIT_FILE_STATUS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_FILE_STATUS</ENTRY> <ENTRY>Include ZABAPGIT_FILE_STATUS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_forms.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_FORMS</NAME> <NAME>ZABAPGIT_FORMS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_FORMS</ENTRY> <ENTRY>Include ZABAPGIT_FORMS</ENTRY>
<LENGTH>22</LENGTH> <LENGTH>22</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

2
src/zabapgit_git.prog.abap
View File

@ -261,6 +261,8 @@ CLASS lcl_git_transport IMPLEMENTATION.
lcx_exception=>raise( 'unpack not ok' ). lcx_exception=>raise( 'unpack not ok' ).
ELSEIF lv_string CP '*pre-receive hook declined*'. ELSEIF lv_string CP '*pre-receive hook declined*'.
lcx_exception=>raise( 'pre-receive hook declined' ). lcx_exception=>raise( 'pre-receive hook declined' ).
ELSEIF lv_string CP '*funny refname*'.
lcx_exception=>raise( 'funny refname' ).
ENDIF. ENDIF.
ENDMETHOD. "receive_pack ENDMETHOD. "receive_pack

26
src/zabapgit_git.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_GIT</NAME> <NAME>ZABAPGIT_GIT</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_GIT</ENTRY> <ENTRY>Include ZABAPGIT_GIT</ENTRY>
<LENGTH>20</LENGTH> <LENGTH>20</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_git_helpers.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_GIT_HELPERS</NAME> <NAME>ZABAPGIT_GIT_HELPERS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_GIT_HELPERS</ENTRY> <ENTRY>Include ZABAPGIT_GIT_HELPERS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

6
src/zabapgit_gui.prog.abap
View File

@ -251,9 +251,11 @@ CLASS lcl_gui IMPLEMENTATION.
METHOD render. METHOD render.
DATA lv_url TYPE w3url. DATA: lv_url TYPE w3url,
lo_html TYPE REF TO lcl_html.
lv_url = cache_html( mi_cur_page->render( )->mv_html ). lo_html = mi_cur_page->render( ).
lv_url = cache_html( lo_html->render( iv_no_indent_jscss = abap_true ) ).
mo_html_viewer->show_url( lv_url ). mo_html_viewer->show_url( lv_url ).

26
src/zabapgit_gui.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_GUI</NAME> <NAME>ZABAPGIT_GUI</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_GUI</ENTRY> <ENTRY>Include ZABAPGIT_GUI</ENTRY>
<LENGTH>20</LENGTH> <LENGTH>20</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_gui_asset_manager.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_GUI_ASSET_MANAGER</NAME> <NAME>ZABAPGIT_GUI_ASSET_MANAGER</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_GUI_ASSET_MANAGER</ENTRY> <ENTRY>Include ZABAPGIT_GUI_ASSET_MANAGER</ENTRY>
<LENGTH>34</LENGTH> <LENGTH>34</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_gui_pages.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_GUI_PAGES</NAME> <NAME>ZABAPGIT_GUI_PAGES</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_GUI_PAGES</ENTRY> <ENTRY>Include ZABAPGIT_GUI_PAGES</ENTRY>
<LENGTH>26</LENGTH> <LENGTH>26</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_gui_router.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_GUI_ROUTER</NAME> <NAME>ZABAPGIT_GUI_ROUTER</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_GUI_ROUTER</ENTRY> <ENTRY>Include ZABAPGIT_GUI_ROUTER</ENTRY>
<LENGTH>27</LENGTH> <LENGTH>27</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

334
src/zabapgit_html.prog.abap
View File

@ -9,49 +9,92 @@ END-OF-DEFINITION.
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
* CLASS lcl_html DEFINITION * CLASS lcl_html DEFINITION
*----------------------------------------------------------------------* *----------------------------------------------------------------------*
CLASS lcl_html DEFINITION FINAL. CLASS lcl_html DEFINITION FINAL.
PUBLIC SECTION. PUBLIC SECTION.
CONSTANTS: c_indent_size TYPE i VALUE 2. CONSTANTS: c_indent_size TYPE i VALUE 2.
DATA mv_html TYPE string READ-ONLY. CLASS-METHODS class_constructor.
DATA mv_indent TYPE i READ-ONLY.
DATA mv_within_style TYPE i READ-ONLY.
DATA mv_within_js TYPE i READ-ONLY.
METHODS add IMPORTING iv_chunk TYPE any.
METHODS reset. METHODS reset.
METHODS add
IMPORTING iv_chunk TYPE any.
METHODS render
IMPORTING iv_no_indent_jscss TYPE abap_bool OPTIONAL
RETURNING VALUE(rv_html) TYPE string.
METHODS is_empty
RETURNING VALUE(rv_yes) TYPE abap_bool.
METHODS add_a IMPORTING iv_txt TYPE string METHODS add_a
iv_act TYPE string IMPORTING
iv_typ TYPE char1 DEFAULT gc_action_type-sapevent iv_txt TYPE string
iv_opt TYPE clike OPTIONAL iv_act TYPE string
iv_class TYPE string OPTIONAL iv_typ TYPE char1 DEFAULT gc_action_type-sapevent
iv_id TYPE string OPTIONAL iv_opt TYPE clike OPTIONAL
iv_style TYPE string OPTIONAL. iv_class TYPE string OPTIONAL
iv_id TYPE string OPTIONAL
iv_style TYPE string OPTIONAL.
METHODS add_icon IMPORTING iv_name TYPE string METHODS add_icon
iv_hint TYPE string OPTIONAL IMPORTING
iv_alt TYPE string OPTIONAL iv_name TYPE string
iv_class TYPE string OPTIONAL. iv_hint TYPE string OPTIONAL
iv_alt TYPE string OPTIONAL
iv_class TYPE string OPTIONAL.
CLASS-METHODS a IMPORTING iv_txt TYPE string CLASS-METHODS a
iv_act TYPE string IMPORTING
iv_typ TYPE char1 DEFAULT gc_action_type-sapevent iv_txt TYPE string
iv_opt TYPE clike OPTIONAL iv_act TYPE string
iv_class TYPE string OPTIONAL iv_typ TYPE char1 DEFAULT gc_action_type-sapevent
iv_id TYPE string OPTIONAL iv_opt TYPE clike OPTIONAL
iv_style TYPE string OPTIONAL iv_class TYPE string OPTIONAL
RETURNING VALUE(rv_str) TYPE string. iv_id TYPE string OPTIONAL
iv_style TYPE string OPTIONAL
RETURNING VALUE(rv_str) TYPE string.
CLASS-METHODS icon IMPORTING iv_name TYPE string CLASS-METHODS icon
iv_hint TYPE string OPTIONAL IMPORTING
iv_alt TYPE string OPTIONAL iv_name TYPE string
iv_class TYPE string OPTIONAL iv_hint TYPE string OPTIONAL
RETURNING VALUE(rv_str) TYPE string. iv_alt TYPE string OPTIONAL
iv_class TYPE string OPTIONAL
RETURNING VALUE(rv_str) TYPE string.
PRIVATE SECTION. PRIVATE SECTION.
METHODS _add_str IMPORTING iv_str TYPE csequence. CLASS-DATA go_single_tags_re TYPE REF TO cl_abap_regex.
METHODS _add_htm IMPORTING io_html TYPE REF TO lcl_html. DATA mt_buffer TYPE string_table.
TYPES:
BEGIN OF ty_indent_context,
no_indent_jscss TYPE abap_bool,
within_style TYPE abap_bool,
within_js TYPE abap_bool,
indent TYPE i,
indent_str TYPE string,
END OF ty_indent_context,
BEGIN OF ty_study_result,
style_open TYPE abap_bool,
style_close TYPE abap_bool,
script_open TYPE abap_bool,
script_close TYPE abap_bool,
tag_close TYPE abap_bool,
curly_close TYPE abap_bool,
openings TYPE i,
closings TYPE i,
singles TYPE i,
END OF ty_study_result.
METHODS indent_line
CHANGING
cs_context TYPE ty_indent_context
cv_line TYPE string.
METHODS study_line
IMPORTING
iv_line TYPE string
is_context TYPE ty_indent_context
RETURNING VALUE(rs_result) TYPE ty_study_result.
ENDCLASS. "lcl_html DEFINITION ENDCLASS. "lcl_html DEFINITION
@ -62,26 +105,28 @@ CLASS lcl_html IMPLEMENTATION.
METHOD add. METHOD add.
DATA lo_type TYPE REF TO cl_abap_typedescr. DATA: lv_type TYPE c,
DATA lo_html TYPE REF TO lcl_html. lo_html TYPE REF TO lcl_html.
lo_type = cl_abap_typedescr=>describe_by_data( iv_chunk ). FIELD-SYMBOLS: <tab> TYPE string_table,
<str> LIKE LINE OF <tab>.
CASE lo_type->type_kind. DESCRIBE FIELD iv_chunk TYPE lv_type. " Describe is faster than RTTI classes
WHEN cl_abap_typedescr=>typekind_char
OR cl_abap_typedescr=>typekind_string. CASE lv_type.
IF strlen( iv_chunk ) = 0. WHEN 'C' OR 'g'. " Char or string
RETURN. APPEND iv_chunk TO mt_buffer.
ENDIF. WHEN 'h'. " Table
_add_str( iv_chunk ). ASSIGN iv_chunk TO <tab>. " Assuming table of strings ! Will dump otherwise
WHEN cl_abap_typedescr=>typekind_oref. APPEND LINES OF <tab> TO mt_buffer.
WHEN 'r'. " Object ref
ASSERT iv_chunk IS BOUND. " Dev mistake ASSERT iv_chunk IS BOUND. " Dev mistake
TRY. TRY.
lo_html ?= iv_chunk. lo_html ?= iv_chunk.
CATCH cx_sy_move_cast_error. CATCH cx_sy_move_cast_error.
ASSERT 1 = 0. " Dev mistake ASSERT 1 = 0. " Dev mistake
ENDTRY. ENDTRY.
_add_htm( lo_html ). APPEND LINES OF lo_html->mt_buffer TO mt_buffer.
WHEN OTHERS. WHEN OTHERS.
ASSERT 1 = 0. " Dev mistake ASSERT 1 = 0. " Dev mistake
ENDCASE. ENDCASE.
@ -89,94 +134,153 @@ CLASS lcl_html IMPLEMENTATION.
ENDMETHOD. " add ENDMETHOD. " add
METHOD reset. METHOD reset.
CLEAR: me->mv_html, me->mv_indent. CLEAR me->mt_buffer.
ENDMETHOD. "reset ENDMETHOD. "reset
METHOD _add_str. METHOD is_empty.
rv_yes = boolc( lines( mt_buffer ) = 0 ).
ENDMETHOD. "is_empty
CONSTANTS lc_single_tags_re TYPE string " HTML5 singleton tags METHOD class_constructor.
VALUE '<(area|base|br|col|command|embed|hr|img|input|link|meta|param|source|!)'. CREATE OBJECT go_single_tags_re
EXPORTING
pattern = '<(AREA|BASE|BR|COL|COMMAND|EMBED|HR|IMG|INPUT|LINK|META|PARAM|SOURCE|!)'
ignore_case = abap_false.
ENDMETHOD. "class_constructor
DATA lv_tags TYPE i. METHOD study_line.
DATA lv_tags_open TYPE i.
DATA lv_tags_close TYPE i. DATA: lv_line TYPE string,
DATA lv_tags_single TYPE i. lv_len TYPE i.
DATA lv_close_offs TYPE i.
DATA lv_shift_back TYPE i. lv_line = to_upper( shift_left( val = iv_line sub = ` ` ) ).
DATA lv_style_tag_open TYPE i. lv_len = strlen( lv_line ).
DATA lv_style_tag_close TYPE i.
DATA lv_js_tag_open TYPE i. " Some assumptions for simplification and speed
DATA lv_js_tag_close TYPE i. " - style & scripts tag should be opened/closed in a separate line
DATA lv_curly TYPE i. " - style & scripts opening and closing in one line is possible but only once
" TODO & Issues
" - What if the string IS a well formed html already not just single line ?
IF is_context-within_js = abap_true OR is_context-within_style = abap_true.
IF is_context-within_js = abap_true AND lv_len >= 8 AND lv_line(8) = '</SCRIPT'.
rs_result-script_close = abap_true.
ELSEIF is_context-within_style = abap_true AND lv_len >= 7 AND lv_line(7) = '</STYLE'.
rs_result-style_close = abap_true.
ENDIF.
IF is_context-no_indent_jscss = abap_false.
IF lv_len >= 1 AND lv_line(1) = '}'.
rs_result-curly_close = abap_true.
ENDIF.
FIND ALL OCCURRENCES OF '{' IN lv_line MATCH COUNT rs_result-openings.
FIND ALL OCCURRENCES OF '}' IN lv_line MATCH COUNT rs_result-closings.
ENDIF.
ELSE.
IF lv_len >= 7 AND lv_line(7) = '<SCRIPT'.
FIND FIRST OCCURRENCE OF '</SCRIPT' IN lv_line.
IF sy-subrc > 0. " Not found
rs_result-script_open = abap_true.
ENDIF.
ENDIF.
IF lv_len >= 6 AND lv_line(6) = '<STYLE'.
FIND FIRST OCCURRENCE OF '</STYLE' IN lv_line.
IF sy-subrc > 0. " Not found
rs_result-style_open = abap_true.
ENDIF.
ENDIF.
IF lv_len >= 2 AND lv_line(2) = '</'.
rs_result-tag_close = abap_true.
ENDIF.
FIND ALL OCCURRENCES OF '<' IN lv_line MATCH COUNT rs_result-openings.
FIND ALL OCCURRENCES OF '</' IN lv_line MATCH COUNT rs_result-closings.
FIND ALL OCCURRENCES OF REGEX go_single_tags_re IN lv_line MATCH COUNT rs_result-singles.
rs_result-openings = rs_result-openings - rs_result-closings - rs_result-singles.
FIND FIRST OCCURRENCE OF '</' IN iv_str MATCH OFFSET lv_close_offs.
IF sy-subrc = 0 AND lv_close_offs = 0 AND mv_indent > 0. " Found close tag @beginning
lv_shift_back = 1.
ENDIF. ENDIF.
FIND FIRST OCCURRENCE OF '}' IN iv_str MATCH OFFSET lv_close_offs. " Find close } @beginning ENDMETHOD. "study_line
IF ( mv_within_style > 0 OR mv_within_js > 0 )
AND sy-subrc = 0 AND lv_close_offs = 0 AND mv_indent > 0. METHOD indent_line.
lv_shift_back = 1.
DATA: ls_study TYPE ty_study_result,
lv_x_str TYPE string.
ls_study = study_line(
is_context = cs_context
iv_line = cv_line ).
" First closing tag - shift back exceptionally
IF ( ls_study-script_close = abap_true
OR ls_study-style_close = abap_true
OR ls_study-curly_close = abap_true
OR ls_study-tag_close = abap_true )
AND cs_context-indent > 0.
lv_x_str = repeat( val = ` ` occ = ( cs_context-indent - 1 ) * c_indent_size ).
cv_line = lv_x_str && cv_line.
ELSE.
cv_line = cs_context-indent_str && cv_line.
ENDIF. ENDIF.
mv_html = mv_html " Context status update
&& repeat( val = ` ` occ = ( mv_indent - lv_shift_back ) * c_indent_size ) CASE abap_true.
&& iv_str WHEN ls_study-script_open.
&& gc_newline. cs_context-within_js = abap_true.
cs_context-within_style = abap_false.
FIND ALL OCCURRENCES OF '<' IN iv_str MATCH COUNT lv_tags. WHEN ls_study-style_open.
FIND ALL OCCURRENCES OF '</' IN iv_str MATCH COUNT lv_tags_close. cs_context-within_js = abap_false.
FIND ALL OCCURRENCES OF REGEX lc_single_tags_re IN iv_str MATCH COUNT lv_tags_single. cs_context-within_style = abap_true.
WHEN ls_study-script_close OR ls_study-style_close.
lv_tags_open = lv_tags - lv_tags_close - lv_tags_single. cs_context-within_js = abap_false.
cs_context-within_style = abap_false.
FIND ALL OCCURRENCES OF '<style' IN iv_str MATCH COUNT lv_style_tag_open IGNORING CASE. ls_study-closings = ls_study-closings + 1.
FIND ALL OCCURRENCES OF '</style>' IN iv_str MATCH COUNT lv_style_tag_close IGNORING CASE. ENDCASE.
mv_within_style = mv_within_style + lv_style_tag_open - lv_style_tag_close.
FIND ALL OCCURRENCES OF '<script' IN iv_str MATCH COUNT lv_js_tag_open IGNORING CASE.
FIND ALL OCCURRENCES OF '</script>' IN iv_str MATCH COUNT lv_js_tag_close IGNORING CASE.
mv_within_js = mv_within_js + lv_js_tag_open - lv_js_tag_close.
IF mv_within_style > 0 OR mv_within_js > 0.
FIND ALL OCCURRENCES OF '{' IN iv_str MATCH COUNT lv_curly.
lv_tags_open = lv_tags_open + lv_curly.
FIND ALL OCCURRENCES OF '}' IN iv_str MATCH COUNT lv_curly.
lv_tags_close = lv_tags_close + lv_curly.
ENDIF.
" More-less logic chosen due to possible double tags in a line '<a><b>' " More-less logic chosen due to possible double tags in a line '<a><b>'
IF lv_tags_open > lv_tags_close. IF ls_study-openings <> ls_study-closings.
mv_indent = mv_indent + 1. IF ls_study-openings > ls_study-closings.
ELSEIF lv_tags_open < lv_tags_close AND mv_indent > 0. cs_context-indent = cs_context-indent + 1.
mv_indent = mv_indent - 1. ELSEIF cs_context-indent > 0. " AND ls_study-openings < ls_study-closings
cs_context-indent = cs_context-indent - 1.
ENDIF.
cs_context-indent_str = repeat( val = ` ` occ = cs_context-indent * c_indent_size ).
ENDIF. ENDIF.
ENDMETHOD. "_add_str ENDMETHOD. "indent_line
METHOD _add_htm. METHOD render.
DATA lt_strtab TYPE TABLE OF string. DATA: ls_context TYPE ty_indent_context,
DATA lv_str TYPE string. lt_temp TYPE string_table.
SPLIT io_html->mv_html AT gc_newline INTO TABLE lt_strtab. FIELD-SYMBOLS: <line> LIKE LINE OF lt_temp,
LOOP AT lt_strtab INTO lv_str. <line_c> LIKE LINE OF lt_temp.
SHIFT lv_str LEFT DELETING LEADING space.
_add_str( lv_str ). ls_context-no_indent_jscss = iv_no_indent_jscss.
LOOP AT mt_buffer ASSIGNING <line>.
APPEND <line> TO lt_temp ASSIGNING <line_c>.
indent_line( CHANGING cs_context = ls_context cv_line = <line_c> ).
ENDLOOP. ENDLOOP.
ENDMETHOD. "_add_htm CONCATENATE LINES OF lt_temp INTO rv_html SEPARATED BY gc_newline.
ENDMETHOD. "render
METHOD add_a. METHOD add_a.
_add_str( a( iv_txt = iv_txt add( a( iv_txt = iv_txt
iv_act = iv_act iv_act = iv_act
iv_typ = iv_typ iv_typ = iv_typ
iv_opt = iv_opt iv_opt = iv_opt
iv_class = iv_class iv_class = iv_class
iv_id = iv_id iv_id = iv_id
iv_style = iv_style ) ). iv_style = iv_style ) ).
ENDMETHOD. "add_a ENDMETHOD. "add_a
@ -228,10 +332,10 @@ CLASS lcl_html IMPLEMENTATION.
METHOD add_icon. METHOD add_icon.
_add_str( icon( iv_name = iv_name add( icon( iv_name = iv_name
iv_class = iv_class iv_class = iv_class
iv_alt = iv_alt iv_alt = iv_alt
iv_hint = iv_hint ) ). iv_hint = iv_hint ) ).
ENDMETHOD. "add_icon ENDMETHOD. "add_icon

26
src/zabapgit_html.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_HTML</NAME> <NAME>ZABAPGIT_HTML</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_HTML</ENTRY> <ENTRY>Include ZABAPGIT_HTML</ENTRY>
<LENGTH>21</LENGTH> <LENGTH>21</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_html_action_utils.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_HTML_ACTION_UTILS</NAME> <NAME>ZABAPGIT_HTML_ACTION_UTILS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_HTML_ACTION_UTILS</ENTRY> <ENTRY>Include ZABAPGIT_HTML_ACTION_UTILS</ENTRY>
<LENGTH>34</LENGTH> <LENGTH>34</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_html_chunks.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_HTML_CHUNKS</NAME> <NAME>ZABAPGIT_HTML_CHUNKS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_HTML_CHUNKS</ENTRY> <ENTRY>Include ZABAPGIT_HTML_CHUNKS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_http.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_HTTP</NAME> <NAME>ZABAPGIT_HTTP</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_HTTP</ENTRY> <ENTRY>Include ZABAPGIT_HTTP</ENTRY>
<LENGTH>21</LENGTH> <LENGTH>21</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_macros.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_MACROS</NAME> <NAME>ZABAPGIT_MACROS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_MACROS</ENTRY> <ENTRY>Include ZABAPGIT_MACROS</ENTRY>
<LENGTH>23</LENGTH> <LENGTH>23</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_migrations.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_MIGRATIONS</NAME> <NAME>ZABAPGIT_MIGRATIONS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_MIGRATIONS</ENTRY> <ENTRY>Include ZABAPGIT_MIGRATIONS</ENTRY>
<LENGTH>27</LENGTH> <LENGTH>27</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_acid.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_ACID</NAME> <NAME>ZABAPGIT_OBJECT_ACID</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_ACID</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_ACID</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_auth.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_AUTH</NAME> <NAME>ZABAPGIT_OBJECT_AUTH</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_AUTH</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_AUTH</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_clas.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_CLAS</NAME> <NAME>ZABAPGIT_OBJECT_CLAS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_CLAS</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_CLAS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_doct.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_DOCT</NAME> <NAME>ZABAPGIT_OBJECT_DOCT</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_DOCT</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_DOCT</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_docv.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_DOCV</NAME> <NAME>ZABAPGIT_OBJECT_DOCV</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_DOCT</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_DOCT</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_doma.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_DOMA</NAME> <NAME>ZABAPGIT_OBJECT_DOMA</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_DOMA</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_DOMA</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_dtel.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_DTEL</NAME> <NAME>ZABAPGIT_OBJECT_DTEL</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_DTEL</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_DTEL</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_enho.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_ENHO</NAME> <NAME>ZABAPGIT_OBJECT_ENHO</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_ENHO</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_ENHO</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_enhs.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_ENHS</NAME> <NAME>ZABAPGIT_OBJECT_ENHS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_ENHS</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_ENHS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_enqu.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_ENQU</NAME> <NAME>ZABAPGIT_OBJECT_ENQU</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_ENUQ</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_ENUQ</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_ensc.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_ENSC</NAME> <NAME>ZABAPGIT_OBJECT_ENSC</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_ENSC</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_ENSC</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_fugr.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_FUGR</NAME> <NAME>ZABAPGIT_OBJECT_FUGR</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_FUGR</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_FUGR</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_iarp.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_IARP</NAME> <NAME>ZABAPGIT_OBJECT_IARP</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_IARP</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_IARP</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_iasp.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_IASP</NAME> <NAME>ZABAPGIT_OBJECT_IASP</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_IASP</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_IASP</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_iatu.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_IATU</NAME> <NAME>ZABAPGIT_OBJECT_IATU</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_IATU</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_IATU</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_msag.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_MSAG</NAME> <NAME>ZABAPGIT_OBJECT_MSAG</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_MSAG</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_MSAG</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_nrob.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_NROB</NAME> <NAME>ZABAPGIT_OBJECT_NROB</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_NROB</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_NROB</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_para.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_PARA</NAME> <NAME>ZABAPGIT_OBJECT_PARA</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_PARA</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_PARA</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_pinf.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_PINF</NAME> <NAME>ZABAPGIT_OBJECT_PINF</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_PINF</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_PINF</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_prog.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_PROG</NAME> <NAME>ZABAPGIT_OBJECT_PROG</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_PROG</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_PROG</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_serializing.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SERIALIZING</NAME> <NAME>ZABAPGIT_OBJECT_SERIALIZING</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SERIALIZATION</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SERIALIZATION</ENTRY>
<LENGTH>37</LENGTH> <LENGTH>37</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_sfbf.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SFBF</NAME> <NAME>ZABAPGIT_OBJECT_SFBF</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SFBF</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SFBF</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_sfbs.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SFBS</NAME> <NAME>ZABAPGIT_OBJECT_SFBS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SFBS</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SFBS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_sfsw.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SFSW</NAME> <NAME>ZABAPGIT_OBJECT_SFSW</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SFSW</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SFSW</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_shi3.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SHI3</NAME> <NAME>ZABAPGIT_OBJECT_SHI3</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SHI3</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SHI3</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_shlp.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SHLP</NAME> <NAME>ZABAPGIT_OBJECT_SHLP</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SHLP</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SHLP</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_sicf.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SICF</NAME> <NAME>ZABAPGIT_OBJECT_SICF</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SICF</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SICF</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_smim.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SMIM</NAME> <NAME>ZABAPGIT_OBJECT_SMIM</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SMIM</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SMIM</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_splo.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SPLO</NAME> <NAME>ZABAPGIT_OBJECT_SPLO</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SPLO</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SPLO</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_ssfo.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SSFO</NAME> <NAME>ZABAPGIT_OBJECT_SSFO</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SSFO</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SSFO</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_ssst.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SSST</NAME> <NAME>ZABAPGIT_OBJECT_SSST</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SSST</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SSST</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_susc.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SUSC</NAME> <NAME>ZABAPGIT_OBJECT_SUSC</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SUSC</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SUSC</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_suso.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_SUSO</NAME> <NAME>ZABAPGIT_OBJECT_SUSO</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_SUSO</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_SUSO</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_tabl.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_TABL</NAME> <NAME>ZABAPGIT_OBJECT_TABL</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_TABL</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_TABL</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_tabl_valid.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_TABL_VALID</NAME> <NAME>ZABAPGIT_OBJECT_TABL_VALID</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_TABL_VALID</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_TABL_VALID</ENTRY>
<LENGTH>34</LENGTH> <LENGTH>34</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_tobj.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_TOBJ</NAME> <NAME>ZABAPGIT_OBJECT_TOBJ</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_TOBJ</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_TOBJ</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_tran.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_TRAN</NAME> <NAME>ZABAPGIT_OBJECT_TRAN</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_TRAN</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_TRAN</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_ttyp.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_TTYP</NAME> <NAME>ZABAPGIT_OBJECT_TTYP</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_TTYP</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_TTYP</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_type.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_TYPE</NAME> <NAME>ZABAPGIT_OBJECT_TYPE</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_TYPE</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_TYPE</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_vcls.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_VCLS</NAME> <NAME>ZABAPGIT_OBJECT_VCLS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_VCLS</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_VCLS</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_view.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_VIEW</NAME> <NAME>ZABAPGIT_OBJECT_VIEW</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_VIEW</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_VIEW</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_w3xx.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_W3XX</NAME> <NAME>ZABAPGIT_OBJECT_W3XX</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_W3XX</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_W3XX</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_wdya.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_WDYA</NAME> <NAME>ZABAPGIT_OBJECT_WDYA</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_WDYA</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_WDYA</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_wdyn.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_WDYN</NAME> <NAME>ZABAPGIT_OBJECT_WDYN</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_WDYN</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_WDYN</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_object_webi.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_WEBI</NAME> <NAME>ZABAPGIT_OBJECT_WEBI</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_WEBI</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_WEBI</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

4
src/zabapgit_object_xslt.prog.abap
View File

@ -94,6 +94,10 @@ CLASS lcl_object_xslt IMPLEMENTATION.
ls_attributes TYPE o2xsltattr. ls_attributes TYPE o2xsltattr.
IF lif_object~exists( ) = abap_true.
lif_object~delete( ).
ENDIF.
io_xml->read( EXPORTING iv_name = 'ATTRIBUTES' io_xml->read( EXPORTING iv_name = 'ATTRIBUTES'
CHANGING cg_data = ls_attributes ). CHANGING cg_data = ls_attributes ).

26
src/zabapgit_object_xslt.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECT_XSLT</NAME> <NAME>ZABAPGIT_OBJECT_XSLT</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT_XSLT</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT_XSLT</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

3
src/zabapgit_objects.prog.abap
View File

@ -373,6 +373,9 @@ CLASS lcl_objects_files IMPLEMENTATION.
CONCATENATE LINES OF it_abap INTO lv_source SEPARATED BY gc_newline. CONCATENATE LINES OF it_abap INTO lv_source SEPARATED BY gc_newline.
* when editing files via eg. GitHub web interface it adds a newline at end of file
lv_source = lv_source && gc_newline.
ls_file-path = '/'. ls_file-path = '/'.
ls_file-filename = filename( iv_extra = iv_extra ls_file-filename = filename( iv_extra = iv_extra
iv_ext = 'abap' ). "#EC NOTEXT iv_ext = 'abap' ). "#EC NOTEXT

26
src/zabapgit_objects.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECTS</NAME> <NAME>ZABAPGIT_OBJECTS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECTS</ENTRY> <ENTRY>Include ZABAPGIT_OBJECTS</ENTRY>
<LENGTH>24</LENGTH> <LENGTH>24</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_objects_impl.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_OBJECTS_IMPL</NAME> <NAME>ZABAPGIT_OBJECTS_IMPL</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_OBJECT</ENTRY> <ENTRY>Include ZABAPGIT_OBJECT</ENTRY>
<LENGTH>23</LENGTH> <LENGTH>23</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

2
src/zabapgit_page.prog.abap
View File

@ -173,7 +173,7 @@ CLASS lcl_gui_page IMPLEMENTATION.
lo_script = scripts( ). lo_script = scripts( ).
IF lo_script IS BOUND AND lo_script->mv_html IS NOT INITIAL. IF lo_script IS BOUND AND lo_script->is_empty( ) = abap_false.
ro_html->add( '<script type="text/javascript">' ). ro_html->add( '<script type="text/javascript">' ).
ro_html->add( lo_script ). ro_html->add( lo_script ).
ro_html->add( 'debugOutput("js: OK");' ). ro_html->add( 'debugOutput("js: OK");' ).

26
src/zabapgit_page.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE</NAME> <NAME>ZABAPGIT_PAGE</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE</ENTRY> <ENTRY>Include ZABAPGIT_PAGE</ENTRY>
<LENGTH>21</LENGTH> <LENGTH>21</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_background.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_BACKGROUND</NAME> <NAME>ZABAPGIT_PAGE_BACKGROUND</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_BACKGROUND</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_BACKGROUND</ENTRY>
<LENGTH>32</LENGTH> <LENGTH>32</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_branch_overview.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_BRANCH_OVERVIEW</NAME> <NAME>ZABAPGIT_PAGE_BRANCH_OVERVIEW</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_BRANCH_OVERVIEW</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_BRANCH_OVERVIEW</ENTRY>
<LENGTH>37</LENGTH> <LENGTH>37</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_commit.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_COMMIT</NAME> <NAME>ZABAPGIT_PAGE_COMMIT</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_COMMIT</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_COMMIT</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_db.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_DB</NAME> <NAME>ZABAPGIT_PAGE_DB</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_DB</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_DB</ENTRY>
<LENGTH>24</LENGTH> <LENGTH>24</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

2
src/zabapgit_page_debug.prog.abap
View File

@ -85,7 +85,7 @@ CLASS lcl_gui_page_debuginfo IMPLEMENTATION.
ENDIF. ENDIF.
ENDLOOP. ENDLOOP.
rv_html = |</p>Supported objects: { lv_list }</p>|. rv_html = |<p>Supported objects: { lv_list }</p>|.
ENDMETHOD. " render_supported_object_types ENDMETHOD. " render_supported_object_types

26
src/zabapgit_page_debug.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_DEBUG</NAME> <NAME>ZABAPGIT_PAGE_DEBUG</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_DEBUG</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_DEBUG</ENTRY>
<LENGTH>27</LENGTH> <LENGTH>27</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_diff.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_DIFF</NAME> <NAME>ZABAPGIT_PAGE_DIFF</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_DIFF</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_DIFF</ENTRY>
<LENGTH>26</LENGTH> <LENGTH>26</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_explore.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_EXPLORE</NAME> <NAME>ZABAPGIT_PAGE_EXPLORE</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_EXPLORE</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_EXPLORE</ENTRY>
<LENGTH>29</LENGTH> <LENGTH>29</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

23
src/zabapgit_page_main.prog.abap
View File

@ -33,9 +33,6 @@ CLASS lcl_gui_page_main DEFINITION FINAL INHERITING FROM lcl_gui_page.
RAISING lcx_exception, RAISING lcx_exception,
build_main_menu build_main_menu
RETURNING VALUE(ro_menu) TYPE REF TO lcl_html_toolbar, RETURNING VALUE(ro_menu) TYPE REF TO lcl_html_toolbar,
render_explore
RETURNING VALUE(ro_html) TYPE REF TO lcl_html
RAISING lcx_exception,
render_repo render_repo
IMPORTING io_repo TYPE REF TO lcl_repo IMPORTING io_repo TYPE REF TO lcl_repo
RETURNING VALUE(ro_html) TYPE REF TO lcl_html RETURNING VALUE(ro_html) TYPE REF TO lcl_html
@ -136,9 +133,7 @@ CLASS lcl_gui_page_main IMPLEMENTATION.
ro_html->add( render_toc( lt_repos ) ). ro_html->add( render_toc( lt_repos ) ).
IF lines( lt_repos ) = 0 AND lx_error IS INITIAL. IF mv_show IS INITIAL OR lines( lt_repos ) = 0.
ro_html->add( render_explore( ) ).
ELSEIF mv_show IS INITIAL.
CREATE OBJECT lo_tutorial. CREATE OBJECT lo_tutorial.
ro_html->add( lo_tutorial->render( ) ). ro_html->add( lo_tutorial->render( ) ).
ELSE. ELSE.
@ -310,22 +305,6 @@ CLASS lcl_gui_page_main IMPLEMENTATION.
ENDMETHOD. "render_toc ENDMETHOD. "render_toc
METHOD render_explore.
DATA lo_toolbar TYPE REF TO lcl_html_toolbar.
CREATE OBJECT ro_html.
CREATE OBJECT lo_toolbar.
lo_toolbar->add( iv_txt = 'Explore new projects'
iv_act = gc_action-go_explore ) ##NO_TEXT.
ro_html->add( '<div class="dummydiv">' ).
ro_html->add( lo_toolbar->render( ) ).
ro_html->add( '</div>' ).
ENDMETHOD. "render_explore
METHOD render_repo. METHOD render_repo.
CREATE OBJECT ro_html. CREATE OBJECT ro_html.

26
src/zabapgit_page_main.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_MAIN</NAME> <NAME>ZABAPGIT_PAGE_MAIN</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_MAIN</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_MAIN</ENTRY>
<LENGTH>26</LENGTH> <LENGTH>26</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_merge.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_MERGE</NAME> <NAME>ZABAPGIT_PAGE_MERGE</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_MERGE</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_MERGE</ENTRY>
<LENGTH>27</LENGTH> <LENGTH>27</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_page_settings.prog.abap
View File

@ -30,6 +30,8 @@ CLASS lcl_gui_page_settings DEFINITION FINAL INHERITING FROM lcl_gui_page.
RETURNING VALUE(ro_html) TYPE REF TO lcl_html. RETURNING VALUE(ro_html) TYPE REF TO lcl_html.
METHODS render_form_end METHODS render_form_end
RETURNING VALUE(ro_html) TYPE REF TO lcl_html. RETURNING VALUE(ro_html) TYPE REF TO lcl_html.
METHODS render_max_lines
RETURNING VALUE(ro_html) TYPE REF TO lcl_html.
METHODS build_settings METHODS build_settings
IMPORTING IMPORTING
it_post_fields TYPE tihttpnvp. it_post_fields TYPE tihttpnvp.
@ -63,6 +65,8 @@ CLASS lcl_gui_page_settings IMPLEMENTATION.
ro_html->add( render_proxy( ) ). ro_html->add( render_proxy( ) ).
ro_html->add( |<hr>| ). ro_html->add( |<hr>| ).
ro_html->add( render_development_internals( ) ). ro_html->add( render_development_internals( ) ).
ro_html->add( |<hr>| ).
ro_html->add( render_max_lines( ) ).
ro_html->add( render_form_end( ) ). ro_html->add( render_form_end( ) ).
ENDMETHOD. "render_content ENDMETHOD. "render_content
@ -110,7 +114,8 @@ CLASS lcl_gui_page_settings IMPLEMENTATION.
METHOD build_settings. METHOD build_settings.
DATA ls_post_field TYPE ihttpnvp. DATA: ls_post_field TYPE ihttpnvp,
lv_max_lines_as_integer TYPE i.
CREATE OBJECT mo_settings. CREATE OBJECT mo_settings.
READ TABLE it_post_fields INTO ls_post_field WITH KEY name = 'proxy_url'. READ TABLE it_post_fields INTO ls_post_field WITH KEY name = 'proxy_url'.
@ -132,6 +137,14 @@ CLASS lcl_gui_page_settings IMPLEMENTATION.
mo_settings->set_run_critical_tests( abap_false ). mo_settings->set_run_critical_tests( abap_false ).
ENDIF. ENDIF.
READ TABLE it_post_fields INTO ls_post_field WITH KEY name = 'max_lines'.
IF sy-subrc = 0.
lv_max_lines_as_integer = ls_post_field-value.
mo_settings->set_max_lines( lv_max_lines_as_integer ).
ELSE.
mo_settings->set_max_lines( 0 ).
ENDIF.
ENDMETHOD. ENDMETHOD.
@ -209,4 +222,15 @@ CLASS lcl_gui_page_settings IMPLEMENTATION.
ENDMETHOD. ENDMETHOD.
METHOD render_max_lines.
CREATE OBJECT ro_html.
ro_html->add( |<h2>List size</h2>| ).
ro_html->add( |<label for="max_lines">Max. # of objects listed (0 = all)</label>| ).
ro_html->add( |<br>| ).
ro_html->add( `<input name="max_lines" type="text" size="5" value="` && mo_settings->get_max_lines( ) && `">` ).
ro_html->add( |<br>| ).
ro_html->add( |<br>| ).
ENDMETHOD.
ENDCLASS. ENDCLASS.

26
src/zabapgit_page_settings.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_SETTINGS</NAME> <NAME>ZABAPGIT_PAGE_SETTINGS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_SETTINGS</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_SETTINGS</ENTRY>
<LENGTH>30</LENGTH> <LENGTH>30</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

6
src/zabapgit_page_stage.prog.abap
View File

@ -151,12 +151,14 @@ CLASS lcl_gui_page_stage IMPLEMENTATION.
LOOP AT ms_files-local ASSIGNING <ls_local>. LOOP AT ms_files-local ASSIGNING <ls_local>.
AT FIRST. AT FIRST.
ro_html->add('<thead><tr>'). ro_html->add('<thead><tr>').
ro_html->add('<th></th><th colspan="2">LOCAL</th><th>' ). ro_html->add('<th></th><th colspan="2">LOCAL</th>' ).
ro_html->add('<th>' ).
IF lines( ms_files-local ) > 1. IF lines( ms_files-local ) > 1.
ro_html->add_a( iv_txt = |{ lines( ms_files-local ) } diffs| ro_html->add_a( iv_txt = |{ lines( ms_files-local ) } diffs|
iv_act = |{ gc_action-go_diff }?key={ mo_repo->get_key( ) }| ). iv_act = |{ gc_action-go_diff }?key={ mo_repo->get_key( ) }| ).
ENDIF. ENDIF.
ro_html->add('</th></tr></thead>'). ro_html->add('</th>').
ro_html->add('</tr></thead>').
ro_html->add('<tbody class="local">'). ro_html->add('<tbody class="local">').
ENDAT. ENDAT.

26
src/zabapgit_page_stage.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PAGE_STAGE</NAME> <NAME>ZABAPGIT_PAGE_STAGE</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PAGE_STAGE</ENTRY> <ENTRY>Include ZABAPGIT_PAGE_STAGE</ENTRY>
<LENGTH>27</LENGTH> <LENGTH>27</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_password_dialog.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PASSWORD_DIALOG</NAME> <NAME>ZABAPGIT_PASSWORD_DIALOG</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Password dialog and selection screen</ENTRY> <ENTRY>Password dialog and selection screen</ENTRY>
<LENGTH>36</LENGTH> <LENGTH>36</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

33
src/zabapgit_persistence.prog.abap
View File

@ -1459,11 +1459,17 @@ CLASS lcl_settings DEFINITION FINAL.
METHODS METHODS
get_run_critical_tests get_run_critical_tests
RETURNING VALUE(rv_run) TYPE abap_bool. RETURNING VALUE(rv_run) TYPE abap_bool.
METHODS set_max_lines
IMPORTING iv_lines TYPE i.
METHODS get_max_lines
RETURNING
VALUE(rv_lines) TYPE i.
PRIVATE SECTION. PRIVATE SECTION.
DATA mv_proxy_url TYPE string. DATA mv_proxy_url TYPE string.
DATA mv_proxy_port TYPE string. DATA mv_proxy_port TYPE string.
DATA mv_run_critical_tests TYPE abap_bool. DATA mv_run_critical_tests TYPE abap_bool.
DATA mv_lines TYPE i.
ENDCLASS. ENDCLASS.
@ -1494,6 +1500,14 @@ CLASS lcl_settings IMPLEMENTATION.
rv_run = mv_run_critical_tests. rv_run = mv_run_critical_tests.
ENDMETHOD. ENDMETHOD.
METHOD get_max_lines.
rv_lines = mv_lines.
ENDMETHOD.
METHOD set_max_lines.
mv_lines = iv_lines.
ENDMETHOD.
ENDCLASS. ENDCLASS.
@ -1529,12 +1543,20 @@ CLASS lcl_persistence_settings IMPLEMENTATION.
iv_type = 'SETTINGS' iv_type = 'SETTINGS'
iv_value = 'CRIT_TESTS' iv_value = 'CRIT_TESTS'
iv_data = io_settings->get_run_critical_tests( ) ). iv_data = io_settings->get_run_critical_tests( ) ).
lcl_app=>db( )->modify(
iv_type = 'SETTINGS'
iv_value = 'MAX_LINES'
iv_data = |{ io_settings->get_max_lines( ) }| ).
ENDMETHOD. ENDMETHOD.
METHOD read. METHOD read.
DATA: lv_critical_tests_as_string TYPE string, DATA: lv_critical_tests_as_string TYPE string,
lv_critical_tests_as_boolean TYPE abap_bool. lv_critical_tests_as_boolean TYPE abap_bool,
lv_max_lines_as_string TYPE string,
lv_max_lines_as_integer TYPE i.
CREATE OBJECT ro_settings. CREATE OBJECT ro_settings.
TRY. TRY.
@ -1562,6 +1584,15 @@ CLASS lcl_persistence_settings IMPLEMENTATION.
CATCH lcx_not_found. CATCH lcx_not_found.
ro_settings->set_run_critical_tests( abap_false ). ro_settings->set_run_critical_tests( abap_false ).
ENDTRY. ENDTRY.
TRY.
lv_max_lines_as_string = lcl_app=>db( )->read(
iv_type = 'SETTINGS'
iv_value = 'MAX_LINES' ).
lv_max_lines_as_integer = lv_max_lines_as_string.
ro_settings->set_max_lines( lv_max_lines_as_integer ).
CATCH lcx_not_found.
ro_settings->set_max_lines( 500 ). " default
ENDTRY.
ENDMETHOD. ENDMETHOD.
ENDCLASS. ENDCLASS.

26
src/zabapgit_persistence.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PERSISTENCE</NAME> <NAME>ZABAPGIT_PERSISTENCE</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PERSISTENCE</ENTRY> <ENTRY>Include ZABAPGIT_PERSISTENCE</ENTRY>
<LENGTH>28</LENGTH> <LENGTH>28</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_persistence_old.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_PERSISTENCE_OLD</NAME> <NAME>ZABAPGIT_PERSISTENCE_OLD</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_PERSISTENCE_OLD</ENTRY> <ENTRY>Include ZABAPGIT_PERSISTENCE_OLD</ENTRY>
<LENGTH>32</LENGTH> <LENGTH>32</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_popups.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_POPUPS</NAME> <NAME>ZABAPGIT_POPUPS</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_POPUPS</ENTRY> <ENTRY>Include ZABAPGIT_POPUPS</ENTRY>
<LENGTH>23</LENGTH> <LENGTH>23</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

26
src/zabapgit_repo.prog.xml
View File

@ -5,42 +5,16 @@
<PROGDIR> <PROGDIR>
<NAME>ZABAPGIT_REPO</NAME> <NAME>ZABAPGIT_REPO</NAME>
<STATE>A</STATE> <STATE>A</STATE>
<SQLX/>
<EDTX/>
<VARCL>X</VARCL> <VARCL>X</VARCL>
<DBAPL/>
<DBNA/>
<CLAS/>
<TYPE/>
<OCCURS/>
<SUBC>I</SUBC> <SUBC>I</SUBC>
<APPL/>
<SECU/>
<CNAM/>
<CDAT>0000-00-00</CDAT>
<UNAM/>
<UDAT>0000-00-00</UDAT>
<VERN/>
<LEVL/>
<RSTAT/>
<RMAND/>
<RLOAD>E</RLOAD> <RLOAD>E</RLOAD>
<FIXPT/>
<SSET/>
<SDATE>0000-00-00</SDATE>
<STIME/>
<IDATE>0000-00-00</IDATE>
<ITIME/>
<LDBNAME/>
<UCCHECK>X</UCCHECK> <UCCHECK>X</UCCHECK>
</PROGDIR> </PROGDIR>
<TPOOL> <TPOOL>
<item> <item>
<ID>R</ID> <ID>R</ID>
<KEY/>
<ENTRY>Include ZABAPGIT_REPO</ENTRY> <ENTRY>Include ZABAPGIT_REPO</ENTRY>
<LENGTH>21</LENGTH> <LENGTH>21</LENGTH>
<SPLIT/>
</item> </item>
</TPOOL> </TPOOL>
</asx:values> </asx:values>

Some files were not shown because too many files have changed in this diff Show More