-
Notifications
You must be signed in to change notification settings - Fork 0
Commit
This commit does not belong to any branch on this repository, and may belong to a fork outside of the repository.
new folders, moved from abap2xlsx repository (#1)
abap2xlsx/#908
- Loading branch information
Showing
51 changed files
with
271,041 additions
and
0 deletions.
There are no files selected for viewing
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,2 @@ | ||
| <?xml version="1.0" encoding="utf-8"?> | ||
| <DEVC DEVCLASS="ZABAP2XLSX" CTEXT="abap2xlsx" LANGUAGE="E" MASTERLANG="E" KORRFLAG="X" PDEVCLASS="ZHVE" DLVUNIT="HOME" NAMESPACE="/0CUST/" PARENTCL="ZT3G_NW_DEV" CREATED_BY="FEMIA" CREATED_ON="20140905" CHANGED_BY="FEMIA" CHANGED_ON="20141226" PROJECT_GUID="00000000000000000000000000000000"/> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,139 @@ | ||
| <?xml version="1.0" encoding="utf-16"?> | ||
| <PROG NAME="ZAKE_SVN_A2X" VARCL="X" SUBC="1" CNAM="FEMIA" CDAT="20100713" UNAM="DEVELOPER" UDAT="20120310" VERN="000020" RSTAT="T" RMAND="000" RLOAD="E" FIXPT="X" SDATE="20120310" STIME="172535" IDATE="20120310" ITIME="172535" UCCHECK="X"> | ||
| <textPool> | ||
| <language SPRAS="E"> | ||
| <textElement ID="R" ENTRY="Program Z_ZAKE_SVN" LENGTH="18 "/> | ||
| </language> | ||
| </textPool> | ||
| <source>*&---------------------------------------------------------------------* | ||
| *& Report Z_ZAKE_SVN | ||
| *& | ||
| *&---------------------------------------------------------------------* | ||
| *& Checkout / Checkin the ZAKE_SVN Project | ||
| *& | ||
| *&---------------------------------------------------------------------* | ||
|
|
||
| REPORT zake_svn_a2x. | ||
|
|
||
| CONSTANTS cl_svn TYPE seoclsname VALUE 'ZCL_ZAKE_SVN'. | ||
| CONSTANTS cl_tortoise_svn TYPE seoclsname VALUE 'ZCL_ZAKE_TORTOISE_SVN'. | ||
|
|
||
| DATA package TYPE devclass. | ||
| DATA zake TYPE REF TO zake. | ||
|
|
||
| DATA objects TYPE scts_tadir. | ||
| DATA object LIKE LINE OF objects. | ||
|
|
||
| DATA files TYPE string_table. | ||
| DATA file LIKE LINE OF files. | ||
|
|
||
| DATA zake_build TYPE string. | ||
| DATA zake_nuggetname TYPE string. | ||
|
|
||
| DATA comment_str TYPE string. | ||
| DATA loclpath_str TYPE string. | ||
| DATA svnpath_str TYPE string. | ||
| DATA username_str TYPE string. | ||
| DATA password_str TYPE string. | ||
| DATA class TYPE seoclsname. | ||
|
|
||
| DATA: ex TYPE REF TO zcx_saplink, | ||
| message TYPE string. | ||
|
|
||
| SELECTION-SCREEN BEGIN OF BLOCK a WITH FRAME TITLE a. | ||
| PARAMETERS: | ||
| checkout TYPE flag RADIOBUTTON GROUP act, | ||
| update TYPE flag RADIOBUTTON GROUP act DEFAULT 'X', | ||
| install TYPE flag RADIOBUTTON GROUP act, | ||
| export TYPE flag RADIOBUTTON GROUP act, | ||
| build TYPE flag RADIOBUTTON GROUP act, | ||
| checkin TYPE flag RADIOBUTTON GROUP act. | ||
| SELECTION-SCREEN END OF BLOCK a. | ||
|
|
||
| SELECTION-SCREEN BEGIN OF BLOCK b WITH FRAME TITLE b. | ||
| PARAMETERS: | ||
| svn TYPE flag RADIOBUTTON GROUP cl, | ||
| tortoise TYPE flag RADIOBUTTON GROUP cl. | ||
| SELECTION-SCREEN END OF BLOCK b. | ||
|
|
||
| SELECTION-SCREEN BEGIN OF BLOCK c WITH FRAME TITLE c. | ||
| PARAMETERS: | ||
| loclpath TYPE char512 DEFAULT 'C:\Projects\abap2xlsx\trunk' LOWER CASE OBLIGATORY, | ||
| zakenugg TYPE char512 DEFAULT 'C:\Projects\abap2xlsx\nuggs\abap2xlsx_Daily.nugg' LOWER CASE OBLIGATORY, | ||
| svnpath TYPE char512 DEFAULT 'https://code.sdn.sap.com/svn/abap2xlsx/trunk' LOWER CASE OBLIGATORY, | ||
| comment TYPE char512 DEFAULT '' LOWER CASE, | ||
| username TYPE char512 LOWER CASE, | ||
| password TYPE char512 LOWER CASE, | ||
| testrun TYPE flag DEFAULT 'X'. | ||
| SELECTION-SCREEN END OF BLOCK c. | ||
|
|
||
| INITIALIZATION. | ||
| a = 'Action'. | ||
| b = 'Version Controll Program'. | ||
| c = 'Parameters'. | ||
|
|
||
| START-OF-SELECTION. | ||
|
|
||
| svnpath_str = svnpath. | ||
| loclpath_str = loclpath. | ||
| zake_nuggetname = zakenugg. | ||
| comment_str = comment. | ||
|
|
||
| " SELECT * INTO TABLE objects FROM tadir WHERE devclass = 'ZABAP2XLSX'. | ||
| " DELETE zake_objects WHERE object = 'DEVC'. | ||
|
|
||
| TRY. | ||
| IF svn = 'X'. | ||
| class = cl_svn. | ||
| ELSE. | ||
| class = cl_tortoise_svn. | ||
| ENDIF. | ||
|
|
||
| CREATE OBJECT zake | ||
| TYPE | ||
| (class) | ||
| EXPORTING | ||
| i_svnpath = svnpath_str | ||
| i_localpath = loclpath_str. | ||
| zake->set_testrun( testrun ). | ||
| zake->set_package( 'ZA2X' ). | ||
|
|
||
| IF checkout = 'X'. | ||
| zake->checkout( ). | ||
| ELSEIF update = 'X'. | ||
| zake->update( ). | ||
| ELSEIF install = 'X'. | ||
| zake->install_slinkees_from_lm( testrun ). | ||
| " zake->install_objects( zake_objects ). | ||
| ELSEIF export = 'X'. | ||
| " Build Object list for Export | ||
| " Programs | ||
| object-object = 'PROG'. | ||
| object-obj_name = 'ZAKE_SVN_A2X'. | ||
| APPEND object TO objects. | ||
| zake->set_checkin_objects( objects ). | ||
| zake->download_slinkees_to_lm = abap_true. | ||
| zake->download_nugget_to_lm = space. | ||
| zake->download_zip_to_lm_flag = space. | ||
| zake->create_slinkees( zake_nuggetname ). | ||
| ELSEIF build = 'X'. | ||
| " Build a complete package for download | ||
| zake->set_checkin_objects( objects ). | ||
| " We don't want that for the complete Package Slinkees are created | ||
| " in the ZAKE folder | ||
| zake->download_slinkees_to_lm = space. | ||
| zake->download_nugget_to_lm = space. | ||
| zake->create_slinkees( zake_nuggetname ). | ||
| ELSEIF checkin = 'X'. | ||
| zake->set_package( 'ZA2X' ). | ||
| zake->set_checkin_objects( objects ). | ||
| zake->create_slinkees( zake_nuggetname ). | ||
| IF testrun IS INITIAL. | ||
| zake->checkin( comment_str ). | ||
| ENDIF. | ||
| ENDIF. | ||
| CATCH zcx_saplink INTO ex. | ||
| message = ex->msg. | ||
| WRITE: / 'An Error occured: ', message. | ||
| ENDTRY.</source> | ||
| </PROG> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,71 @@ | ||
| <?xml version="1.0" encoding="utf-16"?> | ||
| <PROG NAME="ZDEMO_EXCEL_GAPPS" VARCL="X" SUBC="1" CNAM="IANNACCI" CDAT="20110823" UNAM="FEMIA" UDAT="20110907" VERN="000012" RSTAT="T" RMAND="001" RLOAD="E" FIXPT="X" SDATE="20110907" STIME="221339" IDATE="20110907" ITIME="221339" UCCHECK="X"> | ||
| <textPool> | ||
| <language SPRAS="E"> | ||
| <textElement ID="R" ENTRY="From abap2xlsx to abap2gapps Demo: Hello World" LENGTH="46 "/> | ||
| <textElement ID="S" KEY="P_PATH" ENTRY="D ." LENGTH="9 "/> | ||
| </language> | ||
| </textPool> | ||
| <source>*&---------------------------------------------------------------------* | ||
| *& Report ZDEMO_EXCEL1 | ||
| *& | ||
| *&---------------------------------------------------------------------* | ||
| *& | ||
| *& | ||
| *&---------------------------------------------------------------------* | ||
|
|
||
| REPORT zdemo_excel_gapps. | ||
|
|
||
| DATA: lo_excel TYPE REF TO zcl_excel, | ||
| lo_excel_writer TYPE REF TO zif_excel_writer, | ||
| lo_worksheet TYPE REF TO zcl_excel_worksheet, | ||
| lo_hyperlink TYPE REF TO zcl_excel_hyperlink, | ||
| column_dimension TYPE REF TO zcl_excel_worksheet_columndime. | ||
|
|
||
| DATA: lv_file TYPE xstring, | ||
| lv_bytecount TYPE i. | ||
|
|
||
|
|
||
| PARAMETERS: consumer TYPE zoauth2_consumer_name, | ||
| username TYPE zoauth2_user_name, | ||
| proxyhst TYPE string, | ||
| proxysrv TYPE string, | ||
| ssl_id TYPE ssfapplssl DEFAULT 'ANONYM'. | ||
|
|
||
| START-OF-SELECTION. | ||
|
|
||
|
|
||
| " Creates active sheet | ||
| CREATE OBJECT lo_excel. | ||
|
|
||
| " Get active sheet | ||
| lo_worksheet = lo_excel->get_active_worksheet( ). | ||
| lo_worksheet->set_title( ip_title = 'Sheet1' ). | ||
| lo_worksheet->set_cell( ip_column = 'B' ip_row = 2 ip_value = 'Hello world' ). | ||
| lo_worksheet->set_cell( ip_column = 'B' ip_row = 3 ip_value = sy-datum ). | ||
| lo_worksheet->set_cell( ip_column = 'C' ip_row = 3 ip_value = sy-uzeit ). | ||
| lo_hyperlink = zcl_excel_hyperlink=>create_external_link( iv_url = 'https://cw.sdn.sap.com/cw/groups/abap2xlsx' ). | ||
| lo_worksheet->set_cell( ip_column = 'B' ip_row = 4 ip_value = 'Click here to visit abap2xlsx homepage' ip_hyperlink = lo_hyperlink ). | ||
|
|
||
| column_dimension = lo_worksheet->get_column_dimension( ip_column = 'B' ). | ||
| column_dimension->set_width( ip_width = 11 ). | ||
|
|
||
| CREATE OBJECT lo_excel_writer TYPE zcl_excel_writer_2007. | ||
| lv_file = lo_excel_writer->write_file( lo_excel ). | ||
|
|
||
| " Save the file ONLINE | ||
| DATA: lo_spreadsheet TYPE REF TO zcl_docs_spreadsheet. | ||
|
|
||
| CREATE OBJECT lo_spreadsheet | ||
| EXPORTING | ||
| i_consumer_name = consumer | ||
| i_user_name = username | ||
| i_proxy_host = proxyhst | ||
| i_proxy_service = proxysrv | ||
| i_ssl_id = ssl_id. | ||
|
|
||
| lv_bytecount = XSTRLEN( lv_file ). | ||
|
|
||
| lo_spreadsheet->zif_docs~upload( i_document = lv_file | ||
| i_title = 'demo1froma2xlsx' i_size = lv_bytecount ).</source> | ||
| </PROG> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
| Original file line number | Diff line number | Diff line change |
|---|---|---|
| @@ -0,0 +1,4 @@ | ||
| <?xml version="1.0" encoding="utf-16"?> | ||
| <WDYA APPLICATION_NAME="ZDEMO_EXCEL_WDA01" COMPONENT="ZDEMO_EXCEL_WDA01" STARTUP_VIEW="W_MAIN" STARTUP_PLUG="DEFAULT" DISPLAY_NAME="ZDEMO_EXCEL_WDA01" MSG_DISP_MODE="00" help_desc_txt=""> | ||
| <wdy_applicationt APPLICATION_NAME="ZDEMO_EXCEL_WDA01" LANGU="E" DESCRIPTION="abap2xlsx Web Dynpro Demo 1"/> | ||
| </WDYA> |
Oops, something went wrong.