diff --git a/ABAP SDK Walkthrough SharePoint with Graph.md b/ABAP SDK Walkthrough SharePoint with Graph.md new file mode 100644 index 0000000..6d11722 --- /dev/null +++ b/ABAP SDK Walkthrough SharePoint with Graph.md @@ -0,0 +1,162 @@ + + +

+ + Walkthrough for MS Graph using AAD Token V2.0 to work with SharePoint + +

+ +

+

+ +

+Author: Patrick Weber, BOMAG +

+

+Version: 1.0 +

+ +

+ Contents +

+ +
+ +
+ +* [2.1 Define RFC Destination for AAD Token V2](#heading--1-1) +* [2.2 Define RFC Destination for Graph](#heading--1-2) +* [2.3 Configuration](#heading--1-3) + + +
+ +
+ +
+

+ Purpose +

+

+

+
+ +If you want to connect with SharePoint Online i.e. to upload files, the available O365 classes of this SDK are not able to do this. I was mentioned to use MS Graph instead. + +With MS Graph, you get a variety of rest services to connect with many Microsoft products running on Azure or Office 365 cloud. In this SDK, a first implementation +of MS Graph api is present and described. With this example, one can fetch user data and calendar items. In total, only three services of Graph has been implemented so far. To get my task done, I started to enhance ZCL_ADF_SERVICE_GRAPH class and added some methods to act with SharePoint Online. While doing this, I noted that the +access token provided by login.microsoft.com/oauth2/token was not sufficient to access Graph. + +For anyone interested in interacting with SharePoint Online using MS Graph, necessary configuration of RFC destinations and ADF can be found here. Also a small demo program ZADF_DEMO_AZURE_GRAPH_V2 is available. + +
+

+ Prerequisites +

+

+ Make sure you have installed ABAP SDK for Azure in your SAP system. Refer document ‘ABAP SDK for Azure – + GitHub’ for more details. +

+
+ +Visit + +
+

+ 2.1 Define RFC Destination for AAD Token V2 +

+

+ Go to transaction SM59 in your SAP system and create new RFC destination of type ‘G’ like this +

+
+ +Target host: **login.microsoftonline.com** + +Port: 443 + +Path Prefix: **/InputTenantID/oauth2/v2.0/token** + +![](MD%20image/58.png) + +
+

+ 2.2 Define RFC Destination for Graph +

+

+ Go to transaction SM59 in your SAP system and create new RFC destination of type ‘G’ like this +

+
+ +Target host: **graph.microsoft.com** + +Port: 443 + +Path Prefix: **/v1.0** + +![](MD%20image/59.png) +
+

+ 2.3 Configuration +

+

+ Go to transaction ZADF_CONFIG and define the necessary interface IDs. You will need three in total. Please note, that GRAPH_GET and GRAPH_PUT uses the same RFC + destination. We need two interfaces pointing to the same URI but we want to configure http header differently. +

+
+ +![](MD%20image/60.png) + +Next go to SAP Azure Data Framework Configurations and create these three entries. Enter Client Secret into field Key/AAD for interface TOKEN_V2. Set call type to synchronuous for all three + +![](MD%20image/62.png) + +Next go to SAP Azure REST Call Header values and create these entries. +![](MD%20image/61.png) + +
+

+ 3. DEMO Program +

+ + Report ZADF_DEMO_AZURE_GRAPH_V2 of package ZADF_DEMO shows different usage examples. It shows you how to + +
+ + + + + + + + + + + + + + + + + + + + diff --git a/MD image/58.png b/MD image/58.png new file mode 100644 index 0000000..2e55a79 Binary files /dev/null and b/MD image/58.png differ diff --git a/MD image/59.png b/MD image/59.png new file mode 100644 index 0000000..5374812 Binary files /dev/null and b/MD image/59.png differ diff --git a/MD image/60.png b/MD image/60.png new file mode 100644 index 0000000..eb1ddc1 Binary files /dev/null and b/MD image/60.png differ diff --git a/MD image/61.png b/MD image/61.png new file mode 100644 index 0000000..b3e2360 Binary files /dev/null and b/MD image/61.png differ diff --git a/MD image/62.png b/MD image/62.png new file mode 100644 index 0000000..298519f Binary files /dev/null and b/MD image/62.png differ diff --git a/src/zadf/zadf_azopenai/zcl_adf_service_azureopenai.clas.xml b/src/zadf/zadf_azopenai/zcl_adf_service_azureopenai.clas.xml index 8510c2c..8778295 100644 --- a/src/zadf/zadf_azopenai/zcl_adf_service_azureopenai.clas.xml +++ b/src/zadf/zadf_azopenai/zcl_adf_service_azureopenai.clas.xml @@ -10,7 +10,6 @@ X X X - X diff --git a/src/zadf/zadf_con_indx.tabl.xml b/src/zadf/zadf_con_indx.tabl.xml index 98deabd..39f4825 100644 --- a/src/zadf/zadf_con_indx.tabl.xml +++ b/src/zadf/zadf_con_indx.tabl.xml @@ -19,9 +19,7 @@ - ZADF_CON_INDX MANDT - 0001 X MANDT 0 @@ -29,9 +27,7 @@ E - ZADF_CON_INDX RELID - 0002 X INDX_RELID 0 @@ -39,9 +35,7 @@ E - ZADF_CON_INDX SRTFD - 0003 X INDX_SRTFD 0 @@ -49,9 +43,7 @@ E - ZADF_CON_INDX SRTF2 - 0004 X INDX_SRTF2 0 @@ -59,50 +51,38 @@ E - ZADF_CON_INDX ZDEL_IND - 0005 SYCHAR01 0 E - ZADF_CON_INDX AEDAT - 0006 SYDATS 0 T E - ZADF_CON_INDX USERA - 0007 USERNAME 0 E - ZADF_CON_INDX PGMID - 0008 PROGNAME 0 E - ZADF_CON_INDX CLUSTR - 0009 INDX_CLSTR 0 E - ZADF_CON_INDX CLUSTD - 0010 INDX_CLUST 0 E diff --git a/src/zadf/zadf_config_view/zadf_configfg.fugr.xml b/src/zadf/zadf_config_view/zadf_configfg.fugr.xml index 9ef16c7..76509bb 100644 --- a/src/zadf/zadf_config_view/zadf_configfg.fugr.xml +++ b/src/zadf/zadf_config_view/zadf_configfg.fugr.xml @@ -2668,7 +2668,6 @@ X X N - X TABLE_CTRL diff --git a/src/zadf/zadf_config_view/zrest_v_conf_mis.view.xml b/src/zadf/zadf_config_view/zrest_v_conf_mis.view.xml index ee6250a..6a6b609 100644 --- a/src/zadf/zadf_config_view/zrest_v_conf_mis.view.xml +++ b/src/zadf/zadf_config_view/zrest_v_conf_mis.view.xml @@ -33,8 +33,6 @@ ZREST_CONF_MISC INTERFACE_ID X - ZREST_CONFIG - P METHOD diff --git a/src/zadf/zadf_drf/zadf_stru_ai_head.tabl.xml b/src/zadf/zadf_drf/zadf_stru_ai_head.tabl.xml index 337f015..700843e 100644 --- a/src/zadf/zadf_drf/zadf_stru_ai_head.tabl.xml +++ b/src/zadf/zadf_drf/zadf_stru_ai_head.tabl.xml @@ -10,25 +10,19 @@ - ZADF_STRU_AI_HEAD SERVICE_LINE - 0001 CHAR50 0 E - ZADF_STRU_AI_HEAD BUSINESS_PROCESS - 0002 CHAR50 0 E - ZADF_STRU_AI_HEAD SUB_PROCESS - 0003 CHAR50 0 E diff --git a/src/zadf/zadf_drf/zadf_stru_ai_info.tabl.xml b/src/zadf/zadf_drf/zadf_stru_ai_info.tabl.xml index a041d80..cbd812a 100644 --- a/src/zadf/zadf_drf/zadf_stru_ai_info.tabl.xml +++ b/src/zadf/zadf_drf/zadf_stru_ai_info.tabl.xml @@ -10,25 +10,19 @@ - ZADF_STRU_AI_INFO KEY - 0001 ZADF_KEY_ACTIONS 0 E - ZADF_STRU_AI_INFO FIELD - 0002 ZADF_KEYNAM 0 E - ZADF_STRU_AI_INFO VALUE - 0003 ZADF_VAL 0 E diff --git a/src/zadf/zadf_ehub_policy.tabl.xml b/src/zadf/zadf_ehub_policy.tabl.xml index c5f882a..06226e5 100644 --- a/src/zadf/zadf_ehub_policy.tabl.xml +++ b/src/zadf/zadf_ehub_policy.tabl.xml @@ -21,9 +21,7 @@ - ZADF_EHUB_POLICY MANDT - 0001 X MANDT 0 @@ -31,9 +29,7 @@ E - ZADF_EHUB_POLICY INTERFACE_ID - 0002 X ZINTERFACE_ID 0 @@ -41,14 +37,18 @@ E - ZADF_EHUB_POLICY POLICY - 0003 ZADF_POLICY 0 E + + + ZADF_EHUB_POLICY + ZSDK + + diff --git a/src/zadf/zadf_ehub_policys.tobj.xml b/src/zadf/zadf_ehub_policys.tobj.xml index cbdcd8b..5db312e 100644 --- a/src/zadf/zadf_ehub_policys.tobj.xml +++ b/src/zadf/zadf_ehub_policys.tobj.xml @@ -32,7 +32,6 @@ ZADF_EHUB_POLICY ZEHUBPOLICY - ZADF 1 9000 X diff --git a/src/zadf/zadf_fg.fugr.lzadf_fgf00.abap b/src/zadf/zadf_fg.fugr.lzadf_fgf00.abap index e1332b1..722fe1a 100644 --- a/src/zadf/zadf_fg.fugr.lzadf_fgf00.abap +++ b/src/zadf/zadf_fg.fugr.lzadf_fgf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 05/10/2017 at 02:12:26 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zadf/zadf_fg.fugr.lzadf_fgi00.abap b/src/zadf/zadf_fg.fugr.lzadf_fgi00.abap index 7a5bc9b..c265046 100644 --- a/src/zadf/zadf_fg.fugr.lzadf_fgi00.abap +++ b/src/zadf/zadf_fg.fugr.lzadf_fgi00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 05/10/2017 at 02:12:26 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zadf/zadf_fg.fugr.lzadf_fgt00.abap b/src/zadf/zadf_fg.fugr.lzadf_fgt00.abap index 68aef14..8403a6c 100644 --- a/src/zadf/zadf_fg.fugr.lzadf_fgt00.abap +++ b/src/zadf/zadf_fg.fugr.lzadf_fgt00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 05/10/2017 at 02:12:25 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZADF_CONFIG.....................................* DATA: BEGIN OF STATUS_ZADF_CONFIG . "state vector diff --git a/src/zadf/zadf_fg.fugr.lzadf_fgtop.abap b/src/zadf/zadf_fg.fugr.lzadf_fgtop.abap index 5c30d21..5f951b5 100644 --- a/src/zadf/zadf_fg.fugr.lzadf_fgtop.abap +++ b/src/zadf/zadf_fg.fugr.lzadf_fgtop.abap @@ -1,4 +1,3 @@ -* regenerated at 05/10/2017 02:12:26 FUNCTION-POOL ZADF_FG MESSAGE-ID SV. * INCLUDE LZADF_FGD... " Local class definition diff --git a/src/zadf/zadf_fg.fugr.saplzadf_fg.abap b/src/zadf/zadf_fg.fugr.saplzadf_fg.abap index a165960..4fc0a84 100644 --- a/src/zadf/zadf_fg.fugr.saplzadf_fg.abap +++ b/src/zadf/zadf_fg.fugr.saplzadf_fg.abap @@ -1,4 +1,3 @@ -* regenerated at 05/10/2017 02:12:26 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zadf/zadf_fg.fugr.tableframe_zadf_fg.abap b/src/zadf/zadf_fg.fugr.tableframe_zadf_fg.abap index 3821a0e..12d7906 100644 --- a/src/zadf/zadf_fg.fugr.tableframe_zadf_fg.abap +++ b/src/zadf/zadf_fg.fugr.tableframe_zadf_fg.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZADF_FG -* generation date: 05/10/2017 at 02:12:25 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZADF_FG . diff --git a/src/zadf/zadf_fg.fugr.tableproc_zadf_fg.abap b/src/zadf/zadf_fg.fugr.tableproc_zadf_fg.abap index d60648e..8831504 100644 --- a/src/zadf/zadf_fg.fugr.tableproc_zadf_fg.abap +++ b/src/zadf/zadf_fg.fugr.tableproc_zadf_fg.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZADF_FG -* generation date: 05/10/2017 at 02:12:25 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZADF_FG . diff --git a/src/zadf/zadf_fg.fugr.xml b/src/zadf/zadf_fg.fugr.xml index 46f0760..2dca4aa 100644 --- a/src/zadf/zadf_fg.fugr.xml +++ b/src/zadf/zadf_fg.fugr.xml @@ -8,8 +8,8 @@ LZADF_FGF01 LZADF_FGI00 LZADF_FGI01 - LZADF_FGTOP LZADF_FGT00 + LZADF_FGTOP SAPLZADF_FG @@ -63,55 +63,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -194,103 +185,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -404,7 +378,6 @@ TCTRL_ZADF_CONFIG TEXT *ZADF_CONFIG-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -421,7 +394,6 @@ TCTRL_ZADF_CONFIG TEXT *ZADF_CONFIG-INTERFACE_TYPE - Interface_Type__________________________ 001 002 040 @@ -438,7 +410,6 @@ TCTRL_ZADF_CONFIG TEXT *ZADF_CONFIG-SAS_KEY - SAS_Key_________________________________ 001 003 040 @@ -455,7 +426,6 @@ TCTRL_ZADF_CONFIG TEXT *ZADF_CONFIG-URI - Base_URI________________________________ 001 004 040 @@ -472,7 +442,6 @@ TCTRL_ZADF_CONFIG TEXT *ZADF_CONFIG-SERVICE_TYPE - Call_Type_______________________________ 001 005 040 @@ -489,7 +458,6 @@ TCTRL_ZADF_CONFIG TEXT *ZADF_CONFIG-IS_TRY - Reprocess_______________________________ 001 006 040 @@ -636,19 +604,19 @@ PROCESS BEFORE OUTPUT. - MODULE liste_initialisieren. + MODULE liste_initialisieren. - LOOP AT extract WITH CONTROL + LOOP AT extract WITH CONTROL - tctrl_zadf_config CURSOR nextline. + tctrl_zadf_config CURSOR nextline. - MODULE liste_show_liste. + MODULE liste_show_liste. - ENDLOOP. + ENDLOOP. * @@ -657,113 +625,78 @@ PROCESS AFTER INPUT. - MODULE liste_exit_command AT EXIT-COMMAND. + MODULE liste_exit_command AT EXIT-COMMAND. - MODULE liste_before_loop. + MODULE liste_before_loop. - LOOP AT extract. + LOOP AT extract. - MODULE liste_init_workarea. + MODULE liste_init_workarea. - CHAIN. + CHAIN. - FIELD zadf_config-interface_id . + FIELD zadf_config-interface_id . - FIELD zadf_config-interface_type . + FIELD zadf_config-interface_type . - FIELD zadf_config-sas_key . + FIELD zadf_config-sas_key . - FIELD zadf_config-uri . + FIELD zadf_config-uri . - FIELD zadf_config-service_type . + FIELD zadf_config-service_type . - FIELD zadf_config-is_try . + FIELD zadf_config-is_try . - MODULE set_update_flag ON CHAIN-REQUEST. + MODULE set_update_flag ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD vim_marked MODULE liste_mark_checkbox. + FIELD vim_marked MODULE liste_mark_checkbox. - CHAIN. + CHAIN. - FIELD zadf_config-interface_id . + FIELD zadf_config-interface_id . - MODULE liste_update_liste. + MODULE liste_update_liste. - ENDCHAIN. + ENDCHAIN. - CHAIN. + CHAIN. - FIELD zadf_config-sas_key. + FIELD zadf_config-sas_key. - MODULE validate_saskey ON CHAIN-REQUEST. + MODULE validate_saskey ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE liste_after_loop. + MODULE liste_after_loop. - - 0 - 0 - 2 - 2 - 3 - 4 - 2 - 0 - 0 - 2 - 2 - 2 - 4 - 4 - 6 - 6 - 6 - 6 - 6 - 6 - 6 - 4 - 4 - 4 - 6 - 6 - 4 - 4 - 6 - 6 - 4 - 2 - 2 - diff --git a/src/zadf/zadf_format_type.doma.xml b/src/zadf/zadf_format_type.doma.xml index d7c15bf..c077189 100644 --- a/src/zadf/zadf_format_type.doma.xml +++ b/src/zadf/zadf_format_type.doma.xml @@ -13,14 +13,12 @@ - ZADF_FORMAT_TYPE 0001 E XML XML Format - ZADF_FORMAT_TYPE 0002 E JSON diff --git a/src/zadf/zadf_graph/zcl_adf_service_graph.clas.abap b/src/zadf/zadf_graph/zcl_adf_service_graph.clas.abap index 3e44d6b..dc890af 100644 --- a/src/zadf/zadf_graph/zcl_adf_service_graph.clas.abap +++ b/src/zadf/zadf_graph/zcl_adf_service_graph.clas.abap @@ -1,12 +1,12 @@ -class ZCL_ADF_SERVICE_GRAPH definition - public - inheriting from ZCL_ADF_SERVICE - final - create public . +CLASS zcl_adf_service_graph DEFINITION + PUBLIC + INHERITING FROM zcl_adf_service + FINAL + CREATE PUBLIC . -public section. + PUBLIC SECTION. - interfaces ZIF_ADF_SERVICE_GRAPH . + INTERFACES zif_adf_service_graph . PROTECTED SECTION. PRIVATE SECTION. @@ -15,7 +15,7 @@ ENDCLASS. -CLASS ZCL_ADF_SERVICE_GRAPH IMPLEMENTATION. +CLASS zcl_adf_service_graph IMPLEMENTATION. METHOD zif_adf_service_graph~create_calendar_event. @@ -59,10 +59,10 @@ CLASS ZCL_ADF_SERVICE_GRAPH IMPLEMENTATION. failed = 1 OTHERS = 2. IF sy-subrc <> 0. - RAISE EXCEPTION TYPE zcx_adf_service - EXPORTING - textid = zcx_adf_service=>error_con_xstring - interface_id = gv_interface_id. + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>error_con_xstring + interface_id = gv_interface_id. ENDIF. go_rest_api->zif_rest_framework~set_binary_body( lv_body_xstring ). @@ -221,4 +221,301 @@ CLASS ZCL_ADF_SERVICE_GRAPH IMPLEMENTATION. go_rest_api->close( ). ENDIF. ENDMETHOD. + + + METHOD zif_adf_service_graph~get_spsite_by_name. + + "response zif_adf_service_graph~sharepointsite, + + DATA: lo_response TYPE REF TO if_rest_entity, + lo_request TYPE REF TO if_rest_entity, + lv_path_prefix TYPE string, + lv_host_s TYPE string, + ls_response TYPE zif_adf_service_graph~sharepointsite. + + IF go_rest_api IS BOUND. + lv_path_prefix = |/sites/{ iv_hostname }:/sites/{ iv_site }|. + IF NOT lv_path_prefix IS INITIAL. + go_rest_api->zif_rest_framework~set_uri( lv_path_prefix ). + ENDIF. + lv_host_s = gv_host. +**Add header attributes in REST call. + add_request_header( iv_name = 'Content-Type' iv_value = 'application/json; charset=utf-8' ). + add_request_header( iv_name = 'Host' iv_value = lv_host_s ). + add_request_header( iv_name = 'Authorization' iv_value = |Bearer | && iv_aad_token ). + +**Rest API call to get response from Azure Destination + lo_response = go_rest_api->zif_rest_framework~execute( + io_entity = lo_request + async = gv_asynchronous + is_retry = gv_is_try + ). + + ev_http_status = go_rest_api->get_status( ). + + IF lo_response IS BOUND. + DATA(response) = lo_response->get_string_data( ). + IF ev_http_status = 400. + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>general_exception + text = response. + ELSE. + /ui2/cl_json=>deserialize( + EXPORTING + json = response " Data to serialize + " pretty_name = abap_true " Pretty Print property names + CHANGING + data = ls_response + ). + rt_sp_site = ls_response. + ENDIF. + ELSE. + + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>restapi_response_not_found + interface_id = gv_interface_id. + ENDIF. + go_rest_api->close( ). + ENDIF. + + ENDMETHOD. + + METHOD zif_adf_service_graph~get_splists. + + TYPES: BEGIN OF response, + value TYPE zif_adf_service_graph~sharepointlists, + END OF response. + + DATA: lo_response TYPE REF TO if_rest_entity, + lo_request TYPE REF TO if_rest_entity, + lv_path_prefix TYPE string, + lv_host_s TYPE string, + ls_response TYPE response. + + IF go_rest_api IS BOUND. + lv_path_prefix = |/sites/{ iv_site_id }/lists|. + IF NOT lv_path_prefix IS INITIAL. + go_rest_api->zif_rest_framework~set_uri( lv_path_prefix ). + ENDIF. + lv_host_s = gv_host. +**Add header attributes in REST call. + add_request_header( iv_name = 'Content-Type' iv_value = 'application/json; charset=utf-8' ). + add_request_header( iv_name = 'Host' iv_value = lv_host_s ). + add_request_header( iv_name = 'Authorization' iv_value = |Bearer | && iv_aad_token ). + +**Rest API call to get response from Azure Destination + lo_response = go_rest_api->zif_rest_framework~execute( + io_entity = lo_request + async = gv_asynchronous + is_retry = gv_is_try + ). + + ev_http_status = go_rest_api->get_status( ). + + IF lo_response IS BOUND. + DATA(lv_response) = lo_response->get_string_data( ). + IF ev_http_status = 400. + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>general_exception + text = lv_response. + ELSE. + /ui2/cl_json=>deserialize( + EXPORTING + json = lv_response " Data to serialize + " pretty_name = abap_true " Pretty Print property names + CHANGING + data = ls_response + ). + rt_sp_lists = ls_response-value. + ENDIF. + ELSE. + + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>restapi_response_not_found + interface_id = gv_interface_id. + ENDIF. + go_rest_api->close( ). + ENDIF. + + ENDMETHOD. + + METHOD zif_adf_service_graph~get_splistitems. + + TYPES: BEGIN OF response, + value TYPE zif_adf_service_graph~sharepointlistitems, + END OF response. + + DATA: lo_response TYPE REF TO if_rest_entity, + lo_request TYPE REF TO if_rest_entity, + lv_path_prefix TYPE string, + lv_host_s TYPE string, + ls_response TYPE response. + + IF go_rest_api IS BOUND. + lv_path_prefix = |/sites/{ iv_site_id }/lists/{ iv_list_id }/items?expand=fields|. + IF NOT lv_path_prefix IS INITIAL. + go_rest_api->zif_rest_framework~set_uri( lv_path_prefix ). + ENDIF. + lv_host_s = gv_host. +**Add header attributes in REST call. + add_request_header( iv_name = 'Content-Type' iv_value = 'application/json; charset=utf-8' ). + add_request_header( iv_name = 'Host' iv_value = lv_host_s ). + add_request_header( iv_name = 'Authorization' iv_value = |Bearer | && iv_aad_token ). + +**Rest API call to get response from Azure Destination + lo_response = go_rest_api->zif_rest_framework~execute( + io_entity = lo_request + async = gv_asynchronous + is_retry = gv_is_try + ). + + ev_http_status = go_rest_api->get_status( ). + + IF lo_response IS BOUND. + DATA(lv_response) = lo_response->get_string_data( ). + IF ev_http_status = 400. + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>general_exception + text = lv_response. + ELSE. + /ui2/cl_json=>deserialize( + EXPORTING + json = lv_response " Data to serialize + " pretty_name = abap_true " Pretty Print property names + CHANGING + data = ls_response + ). + + rt_sp_items = ls_response-value. + ENDIF. + ELSE. + + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>restapi_response_not_found + interface_id = gv_interface_id. + ENDIF. + go_rest_api->close( ). + ENDIF. + + ENDMETHOD. + + METHOD zif_adf_service_graph~get_spdrives. + + TYPES: BEGIN OF response, + value TYPE zif_adf_service_graph~sharepointdrives, + END OF response. + + DATA: lo_response TYPE REF TO if_rest_entity, + lo_request TYPE REF TO if_rest_entity, + lv_path_prefix TYPE string, + lv_host_s TYPE string, + ls_response TYPE response. + + IF go_rest_api IS BOUND. + lv_path_prefix = |/sites/{ iv_site_id }/drives|. + IF NOT lv_path_prefix IS INITIAL. + go_rest_api->zif_rest_framework~set_uri( lv_path_prefix ). + ENDIF. + lv_host_s = gv_host. +**Add header attributes in REST call. + add_request_header( iv_name = 'Content-Type' iv_value = 'application/json; charset=utf-8' ). + add_request_header( iv_name = 'Host' iv_value = lv_host_s ). + add_request_header( iv_name = 'Authorization' iv_value = |Bearer | && iv_aad_token ). + +**Rest API call to get response from Azure Destination + lo_response = go_rest_api->zif_rest_framework~execute( + io_entity = lo_request + async = gv_asynchronous + is_retry = gv_is_try + ). + + ev_http_status = go_rest_api->get_status( ). + + IF lo_response IS BOUND. + DATA(lv_response) = lo_response->get_string_data( ). + IF ev_http_status = 400. + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>general_exception + text = lv_response. + ELSE. + /ui2/cl_json=>deserialize( + EXPORTING + json = lv_response " Data to serialize + " pretty_name = abap_true " Pretty Print property names + CHANGING + data = ls_response + ). + + rt_drives = ls_response-value. + ENDIF. + ELSE. + + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>restapi_response_not_found + interface_id = gv_interface_id. + ENDIF. + go_rest_api->close( ). + ENDIF. + + ENDMETHOD. + + METHOD zif_adf_service_graph~upload_file_to_sharepoint. + + DATA: lo_response TYPE REF TO if_rest_entity, + lo_request TYPE REF TO if_rest_entity, + lv_path_prefix TYPE string, + lv_host_s TYPE string, + ls_response TYPE response. + + IF go_rest_api IS BOUND. + lv_path_prefix = |/sites/{ iv_site_id }/drives/{ iv_drive_id }/root:/{ iv_filename }:/content|. + IF NOT lv_path_prefix IS INITIAL. + go_rest_api->zif_rest_framework~set_uri( lv_path_prefix ). + ENDIF. + lv_host_s = gv_host. +**Add header attributes in REST call. + add_request_header( iv_name = 'Content-Type' iv_value = 'application/octet-stream' ). + add_request_header( iv_name = 'Host' iv_value = lv_host_s ). + add_request_header( iv_name = 'Authorization' iv_value = |Bearer | && iv_aad_token ). + + go_rest_api->zif_rest_framework~set_binary_body( iv_binary ). + +**Rest API call to get response from Azure Destination + lo_response = go_rest_api->zif_rest_framework~execute( + io_entity = lo_request + async = gv_asynchronous + is_retry = gv_is_try + ). + + ev_http_status = go_rest_api->get_status( ). + + IF lo_response IS BOUND. + DATA(lv_response) = lo_response->get_string_data( ). + IF ev_http_status = 400. + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>general_exception + text = lv_response. + ELSE. + ev_response = lv_response. + ENDIF. + ELSE. + + RAISE EXCEPTION TYPE zcx_adf_service + EXPORTING + textid = zcx_adf_service=>restapi_response_not_found + interface_id = gv_interface_id. + ENDIF. + go_rest_api->close( ). + ENDIF. + + ENDMETHOD. ENDCLASS. diff --git a/src/zadf/zadf_graph/zcl_adf_service_graph.clas.xml b/src/zadf/zadf_graph/zcl_adf_service_graph.clas.xml index a2a716f..1b6c527 100644 --- a/src/zadf/zadf_graph/zcl_adf_service_graph.clas.xml +++ b/src/zadf/zadf_graph/zcl_adf_service_graph.clas.xml @@ -10,7 +10,6 @@ X X X - X diff --git a/src/zadf/zadf_graph/zcx_adf_service_graph.clas.xml b/src/zadf/zadf_graph/zcx_adf_service_graph.clas.xml index 994a64e..82dc24c 100644 --- a/src/zadf/zadf_graph/zcx_adf_service_graph.clas.xml +++ b/src/zadf/zadf_graph/zcx_adf_service_graph.clas.xml @@ -41,6 +41,14 @@ 0001 + + + LIMU + CPUB + ZCX_ADF_SERVICE_GRAPH + 0001 + + CONSTRUCTOR diff --git a/src/zadf/zadf_graph/zif_adf_service_graph.intf.abap b/src/zadf/zadf_graph/zif_adf_service_graph.intf.abap index 01dec9b..4ffd6de 100644 --- a/src/zadf/zadf_graph/zif_adf_service_graph.intf.abap +++ b/src/zadf/zadf_graph/zif_adf_service_graph.intf.abap @@ -45,6 +45,67 @@ INTERFACE zif_adf_service_graph users TYPE STANDARD TABLE OF user WITH DEFAULT KEY. + TYPES: + "! Type to represent a SharePoint Site + BEGIN OF SharePointSite, + createdDateTime TYPE string, + description TYPE string, + id TYPE string, + lastModifiedDateTime TYPE string, + name TYPE string, + webUrl TYPE string, + displayName TYPE string, + END OF SharePointSite. + + TYPES: + "! Type represents a single SharePoint List + BEGIN OF SharePointList, + createdDateTime TYPE string, + description TYPE string, + eTag TYPE string, + id TYPE string, + lastModifiedDateTime TYPE string, + name TYPE string, + webUrl TYPE string, + displayName TYPE string, + END OF SharePointList. + + TYPES: + "! Table with SharePoint Lists + SharePointLists TYPE STANDARD TABLE OF SharePointList WITH DEFAULT KEY. + + TYPES: + "! Type representing a single List Item. Fields are available as JSON String + BEGIN OF SharePointListItem, + createdDateTime TYPE string, + description TYPE string, + eTag TYPE string, + id TYPE string, + lastModifiedDateTime TYPE string, + webUrl TYPE string, + fields TYPE /ui2/cl_json=>json, + END OF SharePointListItem. + + TYPES: + "! Table containing SharePoint List items + SharePointListItems TYPE STANDARD TABLE OF SharePointListItem WITH DEFAULT KEY. + + TYPES: + "! Type representing a single SharePoint Drive + BEGIN OF SharePointDrive, + createdDateTime TYPE string, + description TYPE string, + id TYPE string, + lastModifiedDateTime TYPE string, + name TYPE string, + webUrl TYPE string, + driveType TYPE string, + END OF SharePointDrive. + + TYPES: + "! Table containing SharePoint Drives + SharePointDrives TYPE STANDARD TABLE OF SharePointDrive WITH DEFAULT KEY. + METHODS create_calendar_event IMPORTING !iv_calendar_event TYPE calendar_event @@ -79,5 +140,84 @@ INTERFACE zif_adf_service_graph RAISING zcx_adf_service . + "!

Get information of a SharePoint Site

+ "! + "! @parameter iv_aad_token |

Access Token V2.0

+ "! @parameter iv_hostname |

Hostname

+ "! @parameter iv_site |

Name of Site

+ "! @parameter ev_http_status |

response http status

+ "! @parameter rt_sp_site |

Information about SharePoint Site

+ METHODS get_SPSite_by_Name + IMPORTING + VALUE(iv_aad_token) TYPE string + VALUE(iv_hostname) TYPE string + VALUE(iv_site) TYPE string + EXPORTING + VALUE(ev_http_status) TYPE i + RETURNING + VALUE(rt_sp_site) TYPE sharepointsite . + "!

Get all lists of a SharePoint Site

+ "! + "! @parameter iv_aad_token |

Access Token V2.0

+ "! @parameter iv_site_id |

ID of SharePoint Site

+ "! @parameter ev_http_status |

response http status

+ "! @parameter rt_sp_lists |

Table containing metadata of all Lists

+ METHODS get_SPLists + IMPORTING + VALUE(iv_aad_token) TYPE string + VALUE(iv_site_id) TYPE string + EXPORTING + VALUE(ev_http_status) TYPE i + RETURNING VALUE(rt_sp_lists) TYPE sharepointlists. + + "!

Get all items of a SharePoint List

+ "! + "! @parameter iv_aad_token |

Access Token V2.0

+ "! @parameter iv_site_id |

ID of SharePointSite

+ "! @parameter iv_list_id |

ID of SharePoint List

+ "! @parameter ev_http_status |

response http status

+ "! @parameter rt_sp_items |

Table containing all list items

+ METHODS get_SPListItems + IMPORTING + VALUE(iv_aad_token) TYPE string + VALUE(iv_site_id) TYPE string + VALUE(iv_list_id) TYPE string + EXPORTING + VALUE(ev_http_status) TYPE i + RETURNING VALUE(rt_sp_items) TYPE sharepointlistItems. + + "!

Get all document libraries of a SharePoint Site

+ "! + "! @parameter iv_aad_token |

Access Token V2.0

+ "! @parameter iv_site_id |

ID of SharePoint Site

+ "! @parameter ev_http_status |

response http status

+ "! @parameter rt_drives |

Table containing all document libraries aka drives

+ METHODS get_SPDrives + IMPORTING + VALUE(iv_aad_token) TYPE string + VALUE(iv_site_id) TYPE string + EXPORTING + VALUE(ev_http_status) TYPE i + RETURNING VALUE(rt_drives) TYPE sharepointdrives. + + "!

Upload file to SharePoint

+ "! + "! @parameter iv_aad_token |

Access Token V2.0

+ "! @parameter iv_site_id |

ID of SharePoint Site

+ "! @parameter iv_drive_id |

ID of drive (document library)

+ "! @parameter iv_filename |

Filename (with extension) to upload

+ "! @parameter iv_binary |

Binary data of file

+ "! @parameter ev_http_status |

response http status

+ "! @parameter ev_response |

Response message as String

+ METHODS upload_file_to_SharePoint + IMPORTING + VALUE(iv_aad_token) TYPE string + VALUE(iv_site_id) TYPE string + VALUE(iv_drive_id) TYPE string + VALUE(iv_filename) TYPE string + VALUE(iv_binary) TYPE xstring + EXPORTING + VALUE(ev_http_status) TYPE i + RETURNING VALUE(ev_response) TYPE string. ENDINTERFACE. diff --git a/src/zadf/zadf_graph/zif_adf_service_graph.intf.xml b/src/zadf/zadf_graph/zif_adf_service_graph.intf.xml index b7f97a4..7063555 100644 --- a/src/zadf/zadf_graph/zif_adf_service_graph.intf.xml +++ b/src/zadf/zadf_graph/zif_adf_service_graph.intf.xml @@ -10,6 +10,185 @@ 1 X + + + GET_SPDRIVES + E + Get all document libraries of a SharePoint Site + + + GET_SPLISTITEMS + E + Get all items of a SharePoint List + + + GET_SPLISTS + E + Get all lists of a SharePoint Site + + + GET_SPSITE_BY_NAME + E + Get information of a SharePoint Site + + + UPLOAD_FILE_TO_SHAREPOINT + E + Upload file to SharePoint + + + + + GET_SPDRIVES + EV_HTTP_STATUS + E + response http status + + + GET_SPDRIVES + IV_AAD_TOKEN + E + Access Token V2.0 + + + GET_SPDRIVES + IV_SITE_ID + E + ID of SharePoint Site + + + GET_SPDRIVES + RT_DRIVES + E + Table containing all document libraries aka drives + + + GET_SPLISTITEMS + EV_HTTP_STATUS + E + response http status + + + GET_SPLISTITEMS + IV_AAD_TOKEN + E + Access Token V2.0 + + + GET_SPLISTITEMS + IV_LIST_ID + E + ID of SharePoint List + + + GET_SPLISTITEMS + IV_SITE_ID + E + ID of SharePointSite + + + GET_SPLISTITEMS + RT_SP_ITEMS + E + Table containing all list items + + + GET_SPLISTS + EV_HTTP_STATUS + E + response http status + + + GET_SPLISTS + IV_AAD_TOKEN + E + Access Token V2.0 + + + GET_SPLISTS + IV_SITE_ID + E + ID of SharePoint Site + + + GET_SPLISTS + RT_SP_LISTS + E + Table containing metadata of all Lists + + + GET_SPSITE_BY_NAME + EV_HTTP_STATUS + E + response http status + + + GET_SPSITE_BY_NAME + IV_AAD_TOKEN + E + Access Token V2.0 + + + GET_SPSITE_BY_NAME + IV_HOSTNAME + E + Hostname + + + GET_SPSITE_BY_NAME + IV_SITE + E + Name of Site + + + GET_SPSITE_BY_NAME + RT_SP_SITE + E + Information about SharePoint Site + + + UPLOAD_FILE_TO_SHAREPOINT + EV_HTTP_STATUS + E + response http status + + + UPLOAD_FILE_TO_SHAREPOINT + EV_RESPONSE + E + Response message as String + + + UPLOAD_FILE_TO_SHAREPOINT + IV_AAD_TOKEN + E + Access Token V2.0 + + + UPLOAD_FILE_TO_SHAREPOINT + IV_BINARY + E + Binary data of file + + + UPLOAD_FILE_TO_SHAREPOINT + IV_DRIVE_ID + E + ID of drive (document library) + + + UPLOAD_FILE_TO_SHAREPOINT + IV_FILENAME + E + Filename (with extension) to upload + + + UPLOAD_FILE_TO_SHAREPOINT + IV_SITE_ID + E + ID of SharePoint Site + + diff --git a/src/zadf/zadf_mi.fugr.lzadf_mif00.abap b/src/zadf/zadf_mi.fugr.lzadf_mif00.abap index baa7877..722fe1a 100644 --- a/src/zadf/zadf_mi.fugr.lzadf_mif00.abap +++ b/src/zadf/zadf_mi.fugr.lzadf_mif00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 02/11/2022 at 02:29:02 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zadf/zadf_mi.fugr.lzadf_mii00.abap b/src/zadf/zadf_mi.fugr.lzadf_mii00.abap index bab6da6..c265046 100644 --- a/src/zadf/zadf_mi.fugr.lzadf_mii00.abap +++ b/src/zadf/zadf_mi.fugr.lzadf_mii00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 02/11/2022 at 02:29:02 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zadf/zadf_mi.fugr.lzadf_mit00.abap b/src/zadf/zadf_mi.fugr.lzadf_mit00.abap index f5bf12d..d8fb5e4 100644 --- a/src/zadf/zadf_mi.fugr.lzadf_mit00.abap +++ b/src/zadf/zadf_mi.fugr.lzadf_mit00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 02/11/2022 at 02:17:16 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZADF_MI_CONFIG..................................* DATA: BEGIN OF STATUS_ZADF_MI_CONFIG . "state vector diff --git a/src/zadf/zadf_mi.fugr.lzadf_mitop.abap b/src/zadf/zadf_mi.fugr.lzadf_mitop.abap index bdc06af..86ad197 100644 --- a/src/zadf/zadf_mi.fugr.lzadf_mitop.abap +++ b/src/zadf/zadf_mi.fugr.lzadf_mitop.abap @@ -1,4 +1,3 @@ -* regenerated at 02/11/2022 02:17:16 FUNCTION-POOL ZADF_MI MESSAGE-ID SV. * INCLUDE LZADF_MID... " Local class definition diff --git a/src/zadf/zadf_mi.fugr.saplzadf_mi.abap b/src/zadf/zadf_mi.fugr.saplzadf_mi.abap index e8ded51..b86ca2c 100644 --- a/src/zadf/zadf_mi.fugr.saplzadf_mi.abap +++ b/src/zadf/zadf_mi.fugr.saplzadf_mi.abap @@ -1,4 +1,3 @@ -* regenerated at 02/11/2022 02:17:16 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zadf/zadf_mi.fugr.tableframe_zadf_mi.abap b/src/zadf/zadf_mi.fugr.tableframe_zadf_mi.abap index d953a36..ee225b9 100644 --- a/src/zadf/zadf_mi.fugr.tableframe_zadf_mi.abap +++ b/src/zadf/zadf_mi.fugr.tableframe_zadf_mi.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZADF_MI -* generation date: 02/11/2022 at 02:29:02 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZADF_MI . diff --git a/src/zadf/zadf_mi.fugr.tableproc_zadf_mi.abap b/src/zadf/zadf_mi.fugr.tableproc_zadf_mi.abap index a2b21f2..5e5f233 100644 --- a/src/zadf/zadf_mi.fugr.tableproc_zadf_mi.abap +++ b/src/zadf/zadf_mi.fugr.tableproc_zadf_mi.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZADF_MI -* generation date: 02/11/2022 at 02:29:02 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZADF_MI . diff --git a/src/zadf/zadf_mi.fugr.xml b/src/zadf/zadf_mi.fugr.xml index d5e7770..37c0689 100644 --- a/src/zadf/zadf_mi.fugr.xml +++ b/src/zadf/zadf_mi.fugr.xml @@ -6,8 +6,8 @@ LZADF_MIF00 LZADF_MII00 - LZADF_MITOP LZADF_MIT00 + LZADF_MITOP SAPLZADF_MI @@ -61,55 +61,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -192,103 +183,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -402,7 +376,6 @@ TCTRL_ZADF_MI_CONFIG TEXT *ZADF_MI_CONFIG-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -550,19 +523,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZADF_MI_CONFIG CURSOR NEXTLINE. + TCTRL_ZADF_MI_CONFIG CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -571,88 +544,60 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZADF_MI_CONFIG-INTERFACE_ID . + FIELD ZADF_MI_CONFIG-INTERFACE_ID . - FIELD ZADF_MI_CONFIG-RESOURCE_ID . + FIELD ZADF_MI_CONFIG-RESOURCE_ID . - FIELD ZADF_MI_CONFIG-CLIENT_ID . + FIELD ZADF_MI_CONFIG-CLIENT_ID . - FIELD ZADF_MI_CONFIG-MI_NAME . + FIELD ZADF_MI_CONFIG-MI_NAME . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZADF_MI_CONFIG-INTERFACE_ID . + FIELD ZADF_MI_CONFIG-INTERFACE_ID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 - diff --git a/src/zadf/zadf_mi_config.tabl.xml b/src/zadf/zadf_mi_config.tabl.xml index 433c503..937f4dc 100644 --- a/src/zadf/zadf_mi_config.tabl.xml +++ b/src/zadf/zadf_mi_config.tabl.xml @@ -21,9 +21,7 @@ - ZADF_MI_CONFIG MANDT - 0001 X MANDT 0 @@ -31,9 +29,7 @@ E - ZADF_MI_CONFIG INTERFACE_ID - 0002 X ZINTERFACE_ID 0 @@ -41,30 +37,30 @@ E - ZADF_MI_CONFIG RESOURCE_ID - 0003 ZADF_RESOURCE 0 E - ZADF_MI_CONFIG CLIENT_ID - 0004 ZADF_CLIENT_ID 0 E - ZADF_MI_CONFIG MI_NAME - 0005 ZADF_MSI_ID 0 E + + + ZADF_MI_CONFIG + &NC& + + diff --git a/src/zadf/zadf_mi_configs.tobj.xml b/src/zadf/zadf_mi_configs.tobj.xml index 241c878..06eef9c 100644 --- a/src/zadf/zadf_mi_configs.tobj.xml +++ b/src/zadf/zadf_mi_configs.tobj.xml @@ -32,7 +32,6 @@ ZADF_MI_CONFIG ZADF_MI - ZADF 1 0001 X diff --git a/src/zadf/zadf_sec/zcl_adf_manage_access_keys.clas.xml b/src/zadf/zadf_sec/zcl_adf_manage_access_keys.clas.xml index 248560a..502e53c 100644 --- a/src/zadf/zadf_sec/zcl_adf_manage_access_keys.clas.xml +++ b/src/zadf/zadf_sec/zcl_adf_manage_access_keys.clas.xml @@ -14,85 +14,71 @@ - ZCL_ADF_MANAGE_ACCESS_KEYS CHECK_CALL_STACK E Check Call Stack - ZCL_ADF_MANAGE_ACCESS_KEYS DECRYPT E Decrypt - ZCL_ADF_MANAGE_ACCESS_KEYS ENCRYPT E Encrypt - ZCL_ADF_MANAGE_ACCESS_KEYS GET_CERT_FROM_PSE E Get Certficate from PSE - ZCL_ADF_MANAGE_ACCESS_KEYS GET_DECRYPT_CERT_APPLIC E Get Decryption Certficate Type - ZCL_ADF_MANAGE_ACCESS_KEYS GET_ENCRYPT_CERT_APPLIC E Get Encryption Certifcate Type - ZCL_ADF_MANAGE_ACCESS_KEYS GET_INSTANCE E Get Instance of the Class - ZCL_ADF_MANAGE_ACCESS_KEYS GET_PSE_FROM_APPLIC E Get PSE Name from Application - ZCL_ADF_MANAGE_ACCESS_KEYS GV_DECRYPT_CERT_APPLIC E Character Field Length = 10 - ZCL_ADF_MANAGE_ACCESS_KEYS GV_ENCRYPT_CERT_APPLIC E Character Field Length = 10 - ZCL_ADF_MANAGE_ACCESS_KEYS PARSE_CERTIFICATE E Parse the Certficate - ZCL_ADF_MANAGE_ACCESS_KEYS READ_APPLIC_FROM_DESTINATION E Read Application from RFC destination - ZCL_ADF_MANAGE_ACCESS_KEYS SET_DECRYPT_CERT_APPLIC E Set Decryption Certficate Type - ZCL_ADF_MANAGE_ACCESS_KEYS SET_ENCRYPT_CERT_APPLIC E Set Encryption Certifcate Type diff --git a/src/zadf/zadf_sec/zcx_adf_manage_access_keys.clas.xml b/src/zadf/zadf_sec/zcx_adf_manage_access_keys.clas.xml index 050a35f..99ed384 100644 --- a/src/zadf/zadf_sec/zcx_adf_manage_access_keys.clas.xml +++ b/src/zadf/zadf_sec/zcx_adf_manage_access_keys.clas.xml @@ -14,25 +14,21 @@ - ZCX_ADF_MANAGE_ACCESS_KEYS CONSTRUCTOR E CONSTRUCTOR - ZCX_ADF_MANAGE_ACCESS_KEYS IV_APPLIC E SSL Client Identity - ZCX_ADF_MANAGE_ACCESS_KEYS IV_DESTINATION E Logical destination (specified in function call) - ZCX_ADF_MANAGE_ACCESS_KEYS IV_PSE E Local file for upload/download diff --git a/src/zadf/zadf_service_blob/zcx_adf_service_blob.clas.xml b/src/zadf/zadf_service_blob/zcx_adf_service_blob.clas.xml index 9f88c83..6804950 100644 --- a/src/zadf/zadf_service_blob/zcx_adf_service_blob.clas.xml +++ b/src/zadf/zadf_service_blob/zcx_adf_service_blob.clas.xml @@ -33,15 +33,30 @@ + + + LIMU + CPUB + ZCX_ADF_SERVICE_BLOB + 000D3A3BFDAD1EDCADC77D22B8ED5070 + 0001 + + + + + LIMU + CPUB + ZCX_ADF_SERVICE_BLOB + 0001 + + - ZCX_ADF_SERVICE_BLOB CONSTRUCTOR E CONSTRUCTOR - ZCX_ADF_SERVICE_BLOB INTERFACE_ID E Interface ID diff --git a/src/zadf/zadf_service_eventgrid/zcl_adf_service_eventgrid.clas.xml b/src/zadf/zadf_service_eventgrid/zcl_adf_service_eventgrid.clas.xml index c79feac..11af09e 100644 --- a/src/zadf/zadf_service_eventgrid/zcl_adf_service_eventgrid.clas.xml +++ b/src/zadf/zadf_service_eventgrid/zcl_adf_service_eventgrid.clas.xml @@ -10,7 +10,6 @@ X X X - X diff --git a/src/zadf/zadf_service_files/zcl_adf_service_files.clas.xml b/src/zadf/zadf_service_files/zcl_adf_service_files.clas.xml index 417885e..21dd096 100644 --- a/src/zadf/zadf_service_files/zcl_adf_service_files.clas.xml +++ b/src/zadf/zadf_service_files/zcl_adf_service_files.clas.xml @@ -10,7 +10,6 @@ X X X - X diff --git a/src/zadf/zadf_service_graph_passwordpro.tabl.xml b/src/zadf/zadf_service_graph_passwordpro.tabl.xml index 1b53f24..a68cb44 100644 --- a/src/zadf/zadf_service_graph_passwordpro.tabl.xml +++ b/src/zadf/zadf_service_graph_passwordpro.tabl.xml @@ -11,10 +11,7 @@ - ZADF_SERVICE_GRAPH_PASSWORDPRO PASSWORD - E - 0001 0 g 000008 @@ -22,9 +19,7 @@ STRG - ZADF_SERVICE_GRAPH_PASSWORDPRO FORCE_CHANGE_PASSWORD_NEXT_LOG - 0002 BOOLEAN 0 X diff --git a/src/zadf/zadf_service_graph_signinname.tabl.xml b/src/zadf/zadf_service_graph_signinname.tabl.xml index e6232d4..30c46be 100644 --- a/src/zadf/zadf_service_graph_signinname.tabl.xml +++ b/src/zadf/zadf_service_graph_signinname.tabl.xml @@ -11,10 +11,7 @@ - ZADF_SERVICE_GRAPH_SIGNINNAME TYPE - E - 0001 0 g 000008 @@ -22,10 +19,7 @@ STRG - ZADF_SERVICE_GRAPH_SIGNINNAME VALUE - E - 0002 0 g 000008 diff --git a/src/zadf/zadf_service_graph_user.tabl.xml b/src/zadf/zadf_service_graph_user.tabl.xml index 96d0d05..07296b3 100644 --- a/src/zadf/zadf_service_graph_user.tabl.xml +++ b/src/zadf/zadf_service_graph_user.tabl.xml @@ -11,10 +11,7 @@ - ZADF_SERVICE_GRAPH_USER OBJECT_ID - E - 0001 0 g 000008 @@ -22,9 +19,7 @@ STRG - ZADF_SERVICE_GRAPH_USER ACCOUNT_ENABLED - 0002 BOOLEAN 0 X @@ -32,9 +27,7 @@ E - ZADF_SERVICE_GRAPH_USER SIGN_IN_NAMES - 0003 ZADF_SERVICE_GRAPH_SIGNINNAM_T 0 TTYP @@ -42,10 +35,7 @@ L - ZADF_SERVICE_GRAPH_USER CREATION_TYPE - E - 0004 0 g 000008 @@ -53,10 +43,7 @@ STRG - ZADF_SERVICE_GRAPH_USER DISPLAY_NAME - E - 0005 0 g 000008 @@ -64,10 +51,7 @@ STRG - ZADF_SERVICE_GRAPH_USER GIVEN_NAME - E - 0006 0 g 000008 @@ -75,10 +59,7 @@ STRG - ZADF_SERVICE_GRAPH_USER SURNAME - E - 0007 0 g 000008 @@ -86,10 +67,7 @@ STRG - ZADF_SERVICE_GRAPH_USER MAIL_NICKNAME - E - 0008 0 g 000008 @@ -97,9 +75,7 @@ STRG - ZADF_SERVICE_GRAPH_USER PASSWORD_PROFILE - 0009 ZADF_SERVICE_GRAPH_PASSWORDPRO 0 STRU @@ -107,10 +83,7 @@ S - ZADF_SERVICE_GRAPH_USER PASSWORD_POLICIES - E - 0012 0 g 000008 diff --git a/src/zadf/zadf_service_type.doma.xml b/src/zadf/zadf_service_type.doma.xml index 12379ec..2e3a705 100644 --- a/src/zadf/zadf_service_type.doma.xml +++ b/src/zadf/zadf_service_type.doma.xml @@ -14,14 +14,12 @@ - ZADF_SERVICE_TYPE 0001 E S Synchronous Call - ZADF_SERVICE_TYPE 0002 E A diff --git a/src/zadf/zadf_shma/zcl_adf_shma_area.clas.xml b/src/zadf/zadf_shma/zcl_adf_shma_area.clas.xml index 6051f6f..8ff283a 100644 --- a/src/zadf/zadf_shma/zcl_adf_shma_area.clas.xml +++ b/src/zadf/zadf_shma/zcl_adf_shma_area.clas.xml @@ -15,115 +15,96 @@ - ZCL_ADF_SHMA_AREA AREA_NAME E Name of an Area Class - ZCL_ADF_SHMA_AREA ATTACH_FOR_READ E Request a Read Lock - ZCL_ADF_SHMA_AREA ATTACH_FOR_UPDATE E Request a Change Lock - ZCL_ADF_SHMA_AREA ATTACH_FOR_WRITE E Request a Write Lock - ZCL_ADF_SHMA_AREA BUILD E Direct Call of Area Constructor - ZCL_ADF_SHMA_AREA CLASS_CONSTRUCTOR E CLASS_CONSTRUCTOR - ZCL_ADF_SHMA_AREA DETACH_AREA E Release all locks on all instances - ZCL_ADF_SHMA_AREA FREE_AREA E Delete all instances - ZCL_ADF_SHMA_AREA FREE_INSTANCE E Deletion of an Instance - ZCL_ADF_SHMA_AREA GET_GENERATOR_VERSION E Query Generator Version - ZCL_ADF_SHMA_AREA GET_INSTANCE_INFOS E Returns the names of all instances - ZCL_ADF_SHMA_AREA INVALIDATE_AREA E Active versions of all instances will be set to obsolete - ZCL_ADF_SHMA_AREA INVALIDATE_INSTANCE E Active version of one instance will be set to obsolete - ZCL_ADF_SHMA_AREA ROOT E SHM: Model of a Data Class - ZCL_ADF_SHMA_AREA SET_ROOT E Sets Root Objects - ZCL_ADF_SHMA_AREA _LIFE_CONTEXT E Lifetime of an Area (Constants in CL_SHM_AREA) - ZCL_ADF_SHMA_AREA _TRACE_ACTIVE E (Internal) Flag: Trace Active? - ZCL_ADF_SHMA_AREA _TRACE_SERVICE E (Internal) Reference to Trace Class - ZCL_ADF_SHMA_AREA _VERSION_ E (internal) diff --git a/src/zadf/zadf_shma/zcl_adf_shma_root.clas.xml b/src/zadf/zadf_shma/zcl_adf_shma_root.clas.xml index 72a4b44..333ee02 100644 --- a/src/zadf/zadf_shma/zcl_adf_shma_root.clas.xml +++ b/src/zadf/zadf_shma/zcl_adf_shma_root.clas.xml @@ -15,25 +15,21 @@ - ZCL_ADF_SHMA_ROOT CALL_STACK_CHECK E Call Stack Check - ZCL_ADF_SHMA_ROOT GET_SAS_KEY E Get Sas Key - ZCL_ADF_SHMA_ROOT GT_ADF_CONFIG E SAP-Azure Data Framework Configurations - ZCL_ADF_SHMA_ROOT SET_SAS_KEY E Set Sas Key diff --git a/src/zadf/zadf_try.doma.xml b/src/zadf/zadf_try.doma.xml index a05604f..65eaa41 100644 --- a/src/zadf/zadf_try.doma.xml +++ b/src/zadf/zadf_try.doma.xml @@ -14,7 +14,6 @@ - ZADF_TRY 0001 E X diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvcf00.abap b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvcf00.abap index 6f88f44..722fe1a 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvcf00.abap +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvcf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 11/10/2022 at 09:16:05 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvci00.abap b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvci00.abap index 73593f8..c265046 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvci00.abap +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvci00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 11/10/2022 at 09:16:05 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvct00.abap b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvct00.abap index 559a319..d936b57 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvct00.abap +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvct00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 11/10/2022 at 09:16:04 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZTVARVC.........................................* DATA: BEGIN OF STATUS_ZTVARVC . "state vector diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvctop.abap b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvctop.abap index b4f0217..ebe896f 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvctop.abap +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.lzadf_ztvarvctop.abap @@ -1,4 +1,3 @@ -* regenerated at 11/10/2022 09:16:04 FUNCTION-POOL ZADF_ZTVARVC MESSAGE-ID SV. * INCLUDE LZADF_ZTVARVCD... " Local class definition diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.saplzadf_ztvarvc.abap b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.saplzadf_ztvarvc.abap index 004d836..6ab36e6 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.saplzadf_ztvarvc.abap +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.saplzadf_ztvarvc.abap @@ -1,4 +1,3 @@ -* regenerated at 11/10/2022 09:16:05 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableframe_zadf_ztvarvc.abap b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableframe_zadf_ztvarvc.abap index 1a7dc79..0546978 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableframe_zadf_ztvarvc.abap +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableframe_zadf_ztvarvc.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZADF_ZTVARVC -* generation date: 11/10/2022 at 09:16:02 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZADF_ZTVARVC . diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableproc_zadf_ztvarvc.abap b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableproc_zadf_ztvarvc.abap index c4beaf6..ffea8f8 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableproc_zadf_ztvarvc.abap +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.tableproc_zadf_ztvarvc.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZADF_ZTVARVC -* generation date: 11/10/2022 at 09:16:03 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZADF_ZTVARVC . diff --git a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.xml b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.xml index 68f6f15..7431e83 100644 --- a/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.xml +++ b/src/zadf/zadf_ztvarvc/zadf_ztvarvc.fugr.xml @@ -6,8 +6,8 @@ LZADF_ZTVARVCF00 LZADF_ZTVARVCI00 - LZADF_ZTVARVCTOP LZADF_ZTVARVCT00 + LZADF_ZTVARVCTOP SAPLZADF_ZTVARVC @@ -61,55 +61,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -192,103 +183,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -402,7 +376,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-VARNAME - Variable_Name___________________________ 001 001 040 @@ -419,7 +392,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-TYPE - Type____________________________________ 001 002 040 @@ -436,7 +408,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-NUMB - Number__________________________________ 001 003 040 @@ -453,7 +424,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-ENDDA - End_Date________________________________ 001 004 040 @@ -470,7 +440,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-BEGDA - Start_Date______________________________ 001 005 040 @@ -487,7 +456,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-TABLENAME - Table_Name______________________________ 001 006 040 @@ -504,7 +472,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-FIELDNAME - Field_Name______________________________ 001 007 040 @@ -521,7 +488,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-CREATEDBY - User_Name_______________________________ 001 008 040 @@ -538,7 +504,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-CREATEDON - Date____________________________________ 001 009 040 @@ -555,7 +520,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-CHANGEDBY - User_Name_______________________________ 001 010 040 @@ -572,7 +536,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-CHANGEDON - Date____________________________________ 001 011 040 @@ -589,7 +552,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-SIGN - I/E_____________________________________ 001 012 040 @@ -606,7 +568,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-OPTI - sel-opt_________________________________ 001 013 040 @@ -623,7 +584,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-LOW - Selection_value_________________________ 001 014 040 @@ -640,7 +600,6 @@ TCTRL_ZTVARVC TEXT *ZTVARVC-HIGH - Selection_value_________________________ 001 015 040 @@ -939,19 +898,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZTVARVC CURSOR NEXTLINE. + TCTRL_ZTVARVC CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -960,140 +919,99 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZTVARVC-VARNAME . + FIELD ZTVARVC-VARNAME . - FIELD ZTVARVC-TYPE . + FIELD ZTVARVC-TYPE . - FIELD ZTVARVC-NUMB . + FIELD ZTVARVC-NUMB . - FIELD ZTVARVC-ENDDA . + FIELD ZTVARVC-ENDDA . - FIELD ZTVARVC-BEGDA . + FIELD ZTVARVC-BEGDA . - FIELD ZTVARVC-TABLENAME . + FIELD ZTVARVC-TABLENAME . - FIELD ZTVARVC-FIELDNAME . + FIELD ZTVARVC-FIELDNAME . - FIELD ZTVARVC-CREATEDBY . + FIELD ZTVARVC-CREATEDBY . - FIELD ZTVARVC-CREATEDON . + FIELD ZTVARVC-CREATEDON . - FIELD ZTVARVC-CHANGEDBY . + FIELD ZTVARVC-CHANGEDBY . - FIELD ZTVARVC-CHANGEDON . + FIELD ZTVARVC-CHANGEDON . - FIELD ZTVARVC-SIGN . + FIELD ZTVARVC-SIGN . - FIELD ZTVARVC-OPTI . + FIELD ZTVARVC-OPTI . - FIELD ZTVARVC-LOW . + FIELD ZTVARVC-LOW . - FIELD ZTVARVC-HIGH . + FIELD ZTVARVC-HIGH . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZTVARVC-VARNAME . + FIELD ZTVARVC-VARNAME . - FIELD ZTVARVC-TYPE . + FIELD ZTVARVC-TYPE . - FIELD ZTVARVC-NUMB . + FIELD ZTVARVC-NUMB . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 4 - 4 - 3 - 1 - 1 - diff --git a/src/zadf/zadf_ztvarvc/zoption1.doma.xml b/src/zadf/zadf_ztvarvc/zoption1.doma.xml index b370352..8d9f711 100644 --- a/src/zadf/zadf_ztvarvc/zoption1.doma.xml +++ b/src/zadf/zadf_ztvarvc/zoption1.doma.xml @@ -13,49 +13,42 @@ - ZOPTION1 0001 E EQ Equal to - ZOPTION1 0002 E NE Not equal to - ZOPTION1 0003 E LT Less than - ZOPTION1 0004 E BT Between - ZOPTION1 0005 E GT Greater than - ZOPTION1 0006 E GE Greater than or equal to - ZOPTION1 0007 E LE diff --git a/src/zadf/zadf_ztvarvc/zsign.doma.xml b/src/zadf/zadf_ztvarvc/zsign.doma.xml index eb07925..8402d85 100644 --- a/src/zadf/zadf_ztvarvc/zsign.doma.xml +++ b/src/zadf/zadf_ztvarvc/zsign.doma.xml @@ -13,14 +13,12 @@ - ZSIGN 0001 E I Inclusive - ZSIGN 0002 E E diff --git a/src/zadf/zadf_ztvarvc/ztvarvc s.tobj.xml b/src/zadf/zadf_ztvarvc/ztvarvc s.tobj.xml index 793e2ad..4173384 100644 --- a/src/zadf/zadf_ztvarvc/ztvarvc s.tobj.xml +++ b/src/zadf/zadf_ztvarvc/ztvarvc s.tobj.xml @@ -32,7 +32,6 @@ ZTVARVC ZADF_ZTVARVC - ZADF_ZTVARVC 1 0001 X diff --git a/src/zadf/zadf_ztvarvc/ztvarvc.tabl.xml b/src/zadf/zadf_ztvarvc/ztvarvc.tabl.xml index 4211001..cf9902e 100644 --- a/src/zadf/zadf_ztvarvc/ztvarvc.tabl.xml +++ b/src/zadf/zadf_ztvarvc/ztvarvc.tabl.xml @@ -23,9 +23,7 @@ - ZTVARVC MANDT - 0001 X MANDT 0 @@ -33,9 +31,7 @@ E - ZTVARVC VARNAME - 0002 X RVARI_VNAM 0 @@ -43,9 +39,7 @@ E - ZTVARVC TYPE - 0003 X RSSCR_KIND 0 @@ -53,9 +47,7 @@ E - ZTVARVC NUMB - 0004 X TVARV_NUMB 0 @@ -63,77 +55,59 @@ E - ZTVARVC ENDDA - 0005 ENDDA 0 T E - ZTVARVC BEGDA - 0006 BEGDA 0 T E - ZTVARVC TABLENAME - 0007 TABNAME 0 E - ZTVARVC FIELDNAME - 0008 FIELDNAME 0 E - ZTVARVC CREATEDBY - 0009 SYUNAME 0 E - ZTVARVC CREATEDON - 0010 DATUM 0 T E - ZTVARVC CHANGEDBY - 0011 SYUNAME 0 E - ZTVARVC CHANGEDON - 0012 DATUM 0 T E - ZTVARVC SIGN - 0013 ZSIGN 0 X @@ -141,9 +115,7 @@ E - ZTVARVC OPTI - 0014 ZOPTION1 0 X @@ -151,22 +123,24 @@ E - ZTVARVC LOW - 0015 TVARV_VAL 0 E - ZTVARVC HIGH - 0016 TVARV_VAL 0 E + + + ZTVARVC + ZRES + + diff --git a/src/zadf/zcl_adf_service_aad.clas.abap b/src/zadf/zcl_adf_service_aad.clas.abap index 4bfe45d..9840ae2 100644 --- a/src/zadf/zcl_adf_service_aad.clas.abap +++ b/src/zadf/zcl_adf_service_aad.clas.abap @@ -1,76 +1,78 @@ -class ZCL_ADF_SERVICE_AAD definition - public - inheriting from ZCL_ADF_SERVICE - final - create public - - global friends ZCL_ADF_SERVICE_REPROCESS . - -public section. - - methods GET_AAD_TOKEN - importing - value(IV_CLIENT_ID) type STRING - value(IV_RESOURCE) type STRING - exporting - value(EV_AAD_TOKEN) type STRING - value(EV_RESPONSE) type STRING - raising - ZCX_ADF_SERVICE - ZCX_INTERACE_CONFIG_MISSING - ZCX_HTTP_CLIENT_FAILED . - methods GET_AAD_TOKEN_MSI - importing - !IV_TOKENGEN_FLAG type CHAR01 optional - exporting - value(EV_AAD_TOKEN) type STRING - value(EV_RESPONSE) type STRING - value(EV_HTTP_STATUS) type I - raising - ZCX_ADF_SERVICE - ZCX_INTERACE_CONFIG_MISSING - ZCX_HTTP_CLIENT_FAILED . - methods GET_AAD_FCI_TOKEN - importing - value(IV_ASSERTION_TOKEN) type STRING - value(IV_CLIENT_ID) type STRING - value(IV_SCOPE) type STRING - exporting - value(EV_ACCESS_TOKEN) type STRING - value(EV_RESPONSE) type STRING - raising - ZCX_ADF_SERVICE - ZCX_INTERACE_CONFIG_MISSING - ZCX_HTTP_CLIENT_FAILED . -protected section. -private section. - - data GV_RESPONSE type STRING . - - methods GET_AAD_TOKEN_CLNT_CRED - importing - value(IV_CLIENT_ID) type STRING - value(IV_RESOURCE) type STRING - exporting - value(EV_AAD_TOKEN) type STRING - value(EV_RESPONSE) type STRING - raising - ZCX_ADF_SERVICE - ZCX_INTERACE_CONFIG_MISSING - ZCX_HTTP_CLIENT_FAILED . - methods MI_TOKEN_STORE - importing - !IT_MI_RESPONSE type TIHTTPNVP . - methods MI_TOKEN_GET - importing - !IM_INTERFACE_ID type ZINTERFACE_ID - returning - value(RV_TOKEN) type STRINGVAL . +CLASS zcl_adf_service_aad DEFINITION + PUBLIC + INHERITING FROM zcl_adf_service + FINAL + CREATE PUBLIC + + GLOBAL FRIENDS zcl_adf_service_reprocess . + + PUBLIC SECTION. + + METHODS get_aad_token + IMPORTING + VALUE(iv_client_id) TYPE string + VALUE(iv_resource) TYPE string + VALUE(iv_scope) TYPE string OPTIONAL + EXPORTING + VALUE(ev_aad_token) TYPE string + VALUE(ev_response) TYPE string + RAISING + zcx_adf_service + zcx_interace_config_missing + zcx_http_client_failed . + METHODS get_aad_token_msi + IMPORTING + !iv_tokengen_flag TYPE char01 OPTIONAL + EXPORTING + VALUE(ev_aad_token) TYPE string + VALUE(ev_response) TYPE string + VALUE(ev_http_status) TYPE i + RAISING + zcx_adf_service + zcx_interace_config_missing + zcx_http_client_failed . + METHODS get_aad_fci_token + IMPORTING + VALUE(iv_assertion_token) TYPE string + VALUE(iv_client_id) TYPE string + VALUE(iv_scope) TYPE string + EXPORTING + VALUE(ev_access_token) TYPE string + VALUE(ev_response) TYPE string + RAISING + zcx_adf_service + zcx_interace_config_missing + zcx_http_client_failed . + PROTECTED SECTION. + PRIVATE SECTION. + + DATA gv_response TYPE string . + + METHODS get_aad_token_clnt_cred + IMPORTING + VALUE(iv_client_id) TYPE string + VALUE(iv_resource) TYPE string + VALUE(iv_scope) TYPE string OPTIONAL + EXPORTING + VALUE(ev_aad_token) TYPE string + VALUE(ev_response) TYPE string + RAISING + zcx_adf_service + zcx_interace_config_missing + zcx_http_client_failed . + METHODS mi_token_store + IMPORTING + !it_mi_response TYPE tihttpnvp . + METHODS mi_token_get + IMPORTING + !im_interface_id TYPE zinterface_id + RETURNING + VALUE(rv_token) TYPE stringval . ENDCLASS. -CLASS ZCL_ADF_SERVICE_AAD IMPLEMENTATION. +CLASS zcl_adf_service_aad IMPLEMENTATION. METHOD get_aad_fci_token. @@ -179,36 +181,37 @@ CLASS ZCL_ADF_SERVICE_AAD IMPLEMENTATION. ENDMETHOD. -METHOD get_aad_token. + METHOD get_aad_token. * Switch to managed identities/ AAD authentication * based on the configuration in table ZADF_MI_CONFIG - DATA: - lv_switch_to_mi TYPE boolean, - lv_http_status TYPE i. - - CALL METHOD me->check_switch_to_mi - EXPORTING - iv_interface_id = gv_interface_id - IMPORTING - ev_switch_to_mi = lv_switch_to_mi. -* Switching to exising fuctionality of getting AAD token - IF lv_switch_to_mi EQ abap_false. - CALL METHOD me->get_aad_token_clnt_cred + DATA: + lv_switch_to_mi TYPE boolean, + lv_http_status TYPE i. + + CALL METHOD me->check_switch_to_mi EXPORTING - iv_client_id = iv_client_id - iv_resource = iv_resource + iv_interface_id = gv_interface_id IMPORTING - ev_aad_token = ev_aad_token - ev_response = ev_response. - ELSE. + ev_switch_to_mi = lv_switch_to_mi. +* Switching to exising fuctionality of getting AAD token + IF lv_switch_to_mi EQ abap_false. + CALL METHOD me->get_aad_token_clnt_cred + EXPORTING + iv_client_id = iv_client_id + iv_resource = iv_resource + iv_scope = iv_scope + IMPORTING + ev_aad_token = ev_aad_token + ev_response = ev_response. + ELSE. * Switching managed identites based authentication. - CALL METHOD me->get_aad_token_msi - IMPORTING - ev_aad_token = ev_aad_token - ev_response = ev_response - ev_http_status = lv_http_status. - ENDIF. -ENDMETHOD. + CALL METHOD me->get_aad_token_msi + IMPORTING + ev_aad_token = ev_aad_token + ev_response = ev_response + ev_http_status = lv_http_status. + ENDIF. + ENDMETHOD. METHOD get_aad_token_clnt_cred. @@ -233,9 +236,16 @@ ENDMETHOD. CREATE OBJECT form_data_helper EXPORTING io_entity = lo_request. - wa_params-name = 'resource'. - wa_params-value = iv_resource . - APPEND wa_params TO it_params. + IF iv_resource IS NOT INITIAL. + wa_params-name = 'resource'. + wa_params-value = iv_resource . + APPEND wa_params TO it_params. + ENDIF. + IF iv_scope IS NOT INITIAL. + wa_params-name = 'scope'. + wa_params-value = iv_scope . + APPEND wa_params TO it_params. + ENDIF. CLEAR wa_params. wa_params-name = 'client_id'. wa_params-value = iv_client_id . diff --git a/src/zadf/zcl_adf_service_appinsights.clas.xml b/src/zadf/zcl_adf_service_appinsights.clas.xml index 017b3e1..4c84efb 100644 --- a/src/zadf/zcl_adf_service_appinsights.clas.xml +++ b/src/zadf/zcl_adf_service_appinsights.clas.xml @@ -10,7 +10,6 @@ X X X - X diff --git a/src/zadf/zcl_adf_service_cosmosdb.clas.xml b/src/zadf/zcl_adf_service_cosmosdb.clas.xml index 792b1e3..ca6b716 100644 --- a/src/zadf/zcl_adf_service_cosmosdb.clas.xml +++ b/src/zadf/zcl_adf_service_cosmosdb.clas.xml @@ -10,7 +10,6 @@ X X X - X diff --git a/src/zadf/zcl_adf_service_default_config.clas.xml b/src/zadf/zcl_adf_service_default_config.clas.xml index d468ab8..e645552 100644 --- a/src/zadf/zcl_adf_service_default_config.clas.xml +++ b/src/zadf/zcl_adf_service_default_config.clas.xml @@ -4,12 +4,9 @@ ZCL_ADF_SERVICE_DEFAULT_CONFIG - 1 E Configuration repository for Azure Services - 2 1 - X X X X diff --git a/src/zadf/zcl_adf_service_keyvault.clas.xml b/src/zadf/zcl_adf_service_keyvault.clas.xml index 2cd91d8..8071f3c 100644 --- a/src/zadf/zcl_adf_service_keyvault.clas.xml +++ b/src/zadf/zcl_adf_service_keyvault.clas.xml @@ -13,49 +13,41 @@ - ZCL_ADF_SERVICE_KEYVAULT GET_AAD_TOKEN E Get AAD token - ZCL_ADF_SERVICE_KEYVAULT GET_KEY_FROM_KV E Get Key from Keyvault - ZCL_ADF_SERVICE_KEYVAULT GET_KV_DETAILS E Get KeyVault Details - ZCL_ADF_SERVICE_KEYVAULT GV_CLIENT_ID E Client ID - ZCL_ADF_SERVICE_KEYVAULT GV_KV_INTERFACE E ZINTERFACE_ID - ZCL_ADF_SERVICE_KEYVAULT GV_RESOURCE E Client Resource - ZCL_ADF_SERVICE_KEYVAULT GV_RESPONSE E Rest API response - ZCL_ADF_SERVICE_KEYVAULT GV_TOKEN E AAD Token diff --git a/src/zadf/zcl_adf_service_oms_la.clas.xml b/src/zadf/zcl_adf_service_oms_la.clas.xml index 7611db3..f37412f 100644 --- a/src/zadf/zcl_adf_service_oms_la.clas.xml +++ b/src/zadf/zcl_adf_service_oms_la.clas.xml @@ -10,7 +10,6 @@ X X X - X diff --git a/src/zadf/zcx_adf_manage_interface_key.clas.xml b/src/zadf/zcx_adf_manage_interface_key.clas.xml index 4eb9fe2..523d206 100644 --- a/src/zadf/zcx_adf_manage_interface_key.clas.xml +++ b/src/zadf/zcx_adf_manage_interface_key.clas.xml @@ -12,39 +12,71 @@ X X + + + LIMU + CPUB + ZCX_ADF_MANAGE_INTERFACE_KEY + 000D3A000D181EEA8DA89710700129A6 + 0001 + + + LIMU + CPUB + ZCX_ADF_MANAGE_INTERFACE_KEY + 000D3A000D181EEA8DA8986535E3A9A6 + 0001 + + + LIMU + CPUB + ZCX_ADF_MANAGE_INTERFACE_KEY + 000D3A000D181EEA8DAC264196C349A6 + 0001 + + + LIMU + CPUB + ZCX_ADF_MANAGE_INTERFACE_KEY + 000D3A000D181EEA8F9F538638BDA9A8 + 0001 + + + + + LIMU + CPUB + ZCX_ADF_MANAGE_INTERFACE_KEY + 0001 + + - ZCX_ADF_MANAGE_INTERFACE_KEY CONSTRUCTOR E CONSTRUCTOR - ZCX_ADF_MANAGE_INTERFACE_KEY INTERFACE_ID E Interface ID - ZCX_ADF_MANAGE_INTERFACE_KEY ZCX_ADF_CONFIG_NOT_FOUND E Key for Logical Object in the OTR - ZCX_ADF_MANAGE_INTERFACE_KEY ZCX_ADF_CON_UPDATE_FAILED E Key for Logical Object in the OTR - ZCX_ADF_MANAGE_INTERFACE_KEY ZCX_ADF_IMPORT_FAILED E Key for Logical Object in the OTR - ZCX_ADF_MANAGE_INTERFACE_KEY ZCX_ADF_REST_CONFIG_NOT_FOUND E Key for Logical Object in the OTR diff --git a/src/zadf/zcx_adf_service.clas.xml b/src/zadf/zcx_adf_service.clas.xml index 18bfaba..8917d3a 100644 --- a/src/zadf/zcx_adf_service.clas.xml +++ b/src/zadf/zcx_adf_service.clas.xml @@ -1472,6 +1472,14 @@ 0001 + + + LIMU + CPUB + ZCX_ADF_SERVICE + 0001 + + CONSTRUCTOR diff --git a/src/zadf/zcx_adf_sqldb.clas.xml b/src/zadf/zcx_adf_sqldb.clas.xml index 57bf685..99ec639 100644 --- a/src/zadf/zcx_adf_sqldb.clas.xml +++ b/src/zadf/zcx_adf_sqldb.clas.xml @@ -14,7 +14,6 @@ - ZCX_ADF_SQLDB CONSTRUCTOR E CONSTRUCTOR diff --git a/src/zadf/zehubpolicy.fugr.lzehubpolicyf00.abap b/src/zadf/zehubpolicy.fugr.lzehubpolicyf00.abap index d6536fc..722fe1a 100644 --- a/src/zadf/zehubpolicy.fugr.lzehubpolicyf00.abap +++ b/src/zadf/zehubpolicy.fugr.lzehubpolicyf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 10/04/2017 at 11:21:30 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zadf/zehubpolicy.fugr.lzehubpolicyi00.abap b/src/zadf/zehubpolicy.fugr.lzehubpolicyi00.abap index 264a5a2..c265046 100644 --- a/src/zadf/zehubpolicy.fugr.lzehubpolicyi00.abap +++ b/src/zadf/zehubpolicy.fugr.lzehubpolicyi00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 10/04/2017 at 11:21:30 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zadf/zehubpolicy.fugr.lzehubpolicyt00.abap b/src/zadf/zehubpolicy.fugr.lzehubpolicyt00.abap index a033c17..e00ec49 100644 --- a/src/zadf/zehubpolicy.fugr.lzehubpolicyt00.abap +++ b/src/zadf/zehubpolicy.fugr.lzehubpolicyt00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 11/28/2017 at 21:02:16 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZADF_EHUB_POLICY................................* DATA: BEGIN OF STATUS_ZADF_EHUB_POLICY . "state vector diff --git a/src/zadf/zehubpolicy.fugr.lzehubpolicytop.abap b/src/zadf/zehubpolicy.fugr.lzehubpolicytop.abap index a2d4de8..8d3ec7d 100644 --- a/src/zadf/zehubpolicy.fugr.lzehubpolicytop.abap +++ b/src/zadf/zehubpolicy.fugr.lzehubpolicytop.abap @@ -1,4 +1,3 @@ -* regenerated at 10/04/2017 11:21:30 FUNCTION-POOL ZEHUBPOLICY MESSAGE-ID SV. * INCLUDE LZEHUBPOLICYD... " Local class definition diff --git a/src/zadf/zehubpolicy.fugr.saplzehubpolicy.abap b/src/zadf/zehubpolicy.fugr.saplzehubpolicy.abap index 1e8d047..5ee8110 100644 --- a/src/zadf/zehubpolicy.fugr.saplzehubpolicy.abap +++ b/src/zadf/zehubpolicy.fugr.saplzehubpolicy.abap @@ -1,4 +1,3 @@ -* regenerated at 10/04/2017 11:21:30 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zadf/zehubpolicy.fugr.tableframe_zehubpolicy.abap b/src/zadf/zehubpolicy.fugr.tableframe_zehubpolicy.abap index d787141..5f0eb3a 100644 --- a/src/zadf/zehubpolicy.fugr.tableframe_zehubpolicy.abap +++ b/src/zadf/zehubpolicy.fugr.tableframe_zehubpolicy.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZEHUBPOLICY -* generation date: 11/28/2017 at 21:02:16 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZEHUBPOLICY . diff --git a/src/zadf/zehubpolicy.fugr.tableproc_zehubpolicy.abap b/src/zadf/zehubpolicy.fugr.tableproc_zehubpolicy.abap index a77ef9b..fba1b00 100644 --- a/src/zadf/zehubpolicy.fugr.tableproc_zehubpolicy.abap +++ b/src/zadf/zehubpolicy.fugr.tableproc_zehubpolicy.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZEHUBPOLICY -* generation date: 11/28/2017 at 21:02:16 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZEHUBPOLICY . diff --git a/src/zadf/zehubpolicy.fugr.xml b/src/zadf/zehubpolicy.fugr.xml index 53c22d9..e895dad 100644 --- a/src/zadf/zehubpolicy.fugr.xml +++ b/src/zadf/zehubpolicy.fugr.xml @@ -6,8 +6,8 @@ LZEHUBPOLICYF00 LZEHUBPOLICYI00 - LZEHUBPOLICYTOP LZEHUBPOLICYT00 + LZEHUBPOLICYTOP SAPLZEHUBPOLICY @@ -61,55 +61,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -192,103 +183,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -402,7 +376,6 @@ TCTRL_ZADF_EHUB_POLICY TEXT *ZADF_EHUB_POLICY-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -419,7 +392,6 @@ TCTRL_ZADF_EHUB_POLICY TEXT *ZADF_EHUB_POLICY-POLICY - Policy__________________________________ 001 002 040 @@ -487,19 +459,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZADF_EHUB_POLICY CURSOR NEXTLINE. + TCTRL_ZADF_EHUB_POLICY CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -508,80 +480,54 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZADF_EHUB_POLICY-INTERFACE_ID . + FIELD ZADF_EHUB_POLICY-INTERFACE_ID . - FIELD ZADF_EHUB_POLICY-POLICY . + FIELD ZADF_EHUB_POLICY-POLICY . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZADF_EHUB_POLICY-INTERFACE_ID . + FIELD ZADF_EHUB_POLICY-INTERFACE_ID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 - diff --git a/src/zadf/zif_adf_azure_defconfig.intf.xml b/src/zadf/zif_adf_azure_defconfig.intf.xml index e5976cc..5fc0c92 100644 --- a/src/zadf/zif_adf_azure_defconfig.intf.xml +++ b/src/zadf/zif_adf_azure_defconfig.intf.xml @@ -4,7 +4,6 @@ ZIF_ADF_AZURE_DEFCONFIG - 1 E Interface for Azure Services Constants 2 diff --git a/src/zadf/zo365_sdk/zcl_o365_service.clas.xml b/src/zadf/zo365_sdk/zcl_o365_service.clas.xml index a09c806..b8eb83d 100644 --- a/src/zadf/zo365_sdk/zcl_o365_service.clas.xml +++ b/src/zadf/zo365_sdk/zcl_o365_service.clas.xml @@ -13,259 +13,216 @@ - ZCL_O365_SERVICE ADD_REQUEST_HEADER E Set Request Header - ZCL_O365_SERVICE CALL_STACK_CHECK E Call Stack Check - ZCL_O365_SERVICE CONSTRUCTOR E CONSTRUCTOR - ZCL_O365_SERVICE CSV_XSTRING_TO_INT_TABLE E Convert CSV XSTRING to Internal table - ZCL_O365_SERVICE GC_ASYNCHRONOUS E Single-Character Indicator - ZCL_O365_SERVICE GC_AUTH E HTTP Name - ZCL_O365_SERVICE GC_BEARER E Character field of length 6 - ZCL_O365_SERVICE GC_CONTENT E HTTP Name - ZCL_O365_SERVICE GC_CSV E HTTP Value - ZCL_O365_SERVICE GC_DOT E Single-Character Flag - ZCL_O365_SERVICE GC_FILES E Character field, length 7 - ZCL_O365_SERVICE GC_PDF E HTTP Value - ZCL_O365_SERVICE GC_SEP E Single-Character Flag - ZCL_O365_SERVICE GC_SEP1 E Version Number Component - ZCL_O365_SERVICE GC_SEP2 E Single-Character Flag - ZCL_O365_SERVICE GC_SYNCHRONOUS E Synchronous Servcie Call - ZCL_O365_SERVICE GC_TAB E Single-Character Flag - ZCL_O365_SERVICE GC_TEXT E HTTP Value - ZCL_O365_SERVICE GC_VALUE E Character field, length 7 - ZCL_O365_SERVICE GC_X E Single-Character Flag - ZCL_O365_SERVICE GC_XLS E HTTP Value - ZCL_O365_SERVICE GET_INTERFACE_DETAILS E Gets the details of Interface ID - ZCL_O365_SERVICE GET_REST_API_REF E Get the reference of the Rest API Framework - ZCL_O365_SERVICE GET_TARGET_HOST E Get target host of Azure Service - ZCL_O365_SERVICE GO_REST_API1 E Class for interface - ZCL_O365_SERVICE GT_HEADERS E HTTP Framework (iHTTP) Table Name/Value Pairs - ZCL_O365_SERVICE GV_FILE_NAME E Name of DBA Log - ZCL_O365_SERVICE GV_FILE_TYPE E Char 20 - ZCL_O365_SERVICE GV_FOLDER_NAME E Character 100 - ZCL_O365_SERVICE GV_HOST E Target Host - ZCL_O365_SERVICE GV_INTERFACE_ID E Interface ID - ZCL_O365_SERVICE GV_INTERFACE_ID_AAD E Interface ID - ZCL_O365_SERVICE GV_PATH_PREFIX E Path prefix in URI - ZCL_O365_SERVICE GV_RFC_DESTINATION E Logical Destination (Specified in Function Call) - ZCL_O365_SERVICE GV_SERVICE_ID E Interface Type - ZCL_O365_SERVICE GV_URI E URI - ZCL_O365_SERVICE INT_TABLE_TO_CSV_XSTRING E Convert Internal Table to CSV XSTRING - ZCL_O365_SERVICE INT_TABLE_TO_TEXT_XSTRING E Convert Internal Table to Text XSTRING - ZCL_O365_SERVICE INT_TABLE_TO_XLS_XSTRING E Convert Internal Table to Excel XSTRING - ZCL_O365_SERVICE SEND E Push the data to O365 service - ZCL_O365_SERVICE TXT_XSTRING_TO_INT_TABLE E Convert TXT XSTRING to Internal table - ZCL_O365_SERVICE URI_NOT_MAINTAINED E Key for Logical Object in the OTR - ZCL_O365_SERVICE XLS_XSTRING_TO_INT_TABLE E Convert Excel XSTRING to Internal table diff --git a/src/zadf/zo365_sdk/zcl_o365_service_factory.clas.xml b/src/zadf/zo365_sdk/zcl_o365_service_factory.clas.xml index ed1e289..3186360 100644 --- a/src/zadf/zo365_sdk/zcl_o365_service_factory.clas.xml +++ b/src/zadf/zo365_sdk/zcl_o365_service_factory.clas.xml @@ -14,13 +14,11 @@ - ZCL_O365_SERVICE_FACTORY CREATE E Create the Instance Of O365 Service - ZCL_O365_SERVICE_FACTORY GC_SERVICE_SHAREPOINT E SAP-O365 Integration Framework Interface type diff --git a/src/zadf/zo365_sdk/zcl_o365_service_sharepoint.clas.xml b/src/zadf/zo365_sdk/zcl_o365_service_sharepoint.clas.xml index e7be4b1..be5398d 100644 --- a/src/zadf/zo365_sdk/zcl_o365_service_sharepoint.clas.xml +++ b/src/zadf/zo365_sdk/zcl_o365_service_sharepoint.clas.xml @@ -14,127 +14,106 @@ - ZCL_O365_SERVICE_SHAREPOINT CREATE_FOLDER E Create Folder - ZCL_O365_SERVICE_SHAREPOINT DELETE_FILE_FROM_FOLDER E Delete a file from a folder - ZCL_O365_SERVICE_SHAREPOINT GC_FOLDER E Character field, length 7 - ZCL_O365_SERVICE_SHAREPOINT GC_I E Single-Character Indicator - ZCL_O365_SERVICE_SHAREPOINT GC_SEPARATOR E Single-Character Flag - ZCL_O365_SERVICE_SHAREPOINT GC_SEPARATOR_1 E Single-Character Flag - ZCL_O365_SERVICE_SHAREPOINT GET_AAD_TOKEN E Get AAD Token - ZCL_O365_SERVICE_SHAREPOINT GV_BUSINESSID E Business Identifier - ZCL_O365_SERVICE_SHAREPOINT READ_ALL_FILE_FROM_FOLDER E Read all file from a folder - ZCL_O365_SERVICE_SHAREPOINT READ_FILE_DATA E Read file from O365 service - ZCL_O365_SERVICE_SHAREPOINT SEND_HEADER_CSV E Send Text CSV File - ZCL_O365_SERVICE_SHAREPOINT SEND_HEADER_EXCEL E Send Excel File - ZCL_O365_SERVICE_SHAREPOINT SEND_HEADER_FOLDER E Create Folder Header - ZCL_O365_SERVICE_SHAREPOINT SEND_HEADER_PDF E Send PDF File - ZCL_O365_SERVICE_SHAREPOINT SEND_HEADER_TXT E Send Text TXT File - ZCL_O365_SERVICE_SHAREPOINT SET_FILE_PARAMETERS E Set File Parameters - ZCL_O365_SERVICE_SHAREPOINT SET_HEADER_ATTRIBUTES E Set Header Parameters for read - ZCL_O365_SERVICE_SHAREPOINT SET_HEADER_PARAMETERS E Set Header Parameters - ZCL_O365_SERVICE_SHAREPOINT SET_URI_PATH E Set URI Path - ZCL_O365_SERVICE_SHAREPOINT SET_URI_PATH_FOR_DELETE E Set URI Path for Deleting a file from a folder - ZCL_O365_SERVICE_SHAREPOINT VALIDATE_PARAMETERS E Validate SharePoint Parameters diff --git a/src/zadf/zo365_sdk/zcx_o365_service.clas.xml b/src/zadf/zo365_sdk/zcx_o365_service.clas.xml index 5beda80..67c60bc 100644 --- a/src/zadf/zo365_sdk/zcx_o365_service.clas.xml +++ b/src/zadf/zo365_sdk/zcx_o365_service.clas.xml @@ -15,935 +15,1167 @@
- AC162D8534601ED797AB5CC36E759453 - E - 1 - CA== -
- - - AC162D8534601ED797AB5CC36E759453 - E - 0001 - X - R - 255 - AAD token not found for &INTERFACE_ID& - - -
- -
- AC162D8534601ED6BDEA11EC356C3440 + 000D3A0176021ED9A08E8821D98BC11D E 1 CA==
- AC162D8534601ED6BDEA11EC356C3440 + 000D3A0176021ED9A08E8821D98BC11D E 0001 X R 255 - Service Call type not maintained for &INTERFACE_ID& + File type not handled &INTERFACE_ID&
- 000D3A0418C91EE9B2B6EA37CBBA0967 + 000D3A0180251ED8999B73223E2700DC E 1 CA==
- 000D3A0418C91EE9B2B6EA37CBBA0967 + 000D3A0180251ED8999B73223E2700DC E 0001 X R 255 - Input table data is empty for &INTERFACE_ID& + Method name not maintained for &INTERFACE_ID&
- AC162D8534601ED797AB2500EF95B453 + 000D3A0418C91EE9ADD6E0440915E966 E 1 CA==
- AC162D8534601ED797AB2500EF95B453 + 000D3A0418C91EE9ADD6E0440915E966 E 0001 X R 255 - Error in receiving token from AAD for &INTERFACE_ID& + Interface &INTERFACE_ID& not maintained
- AC162D8534601ED78CF8B16C4043744B + 000D3A0418C91EE9B2B6EA37CBBA0967 E 1 CA==
- AC162D8534601ED78CF8B16C4043744B + 000D3A0418C91EE9B2B6EA37CBBA0967 E 0001 X R 255 - Error in retrieving attributes of certificate for &INTERFACE_ID& + Input table data is empty for &INTERFACE_ID&
- AC162D8534601ED78CF8C6BA194E944B + 000D3A0418C91EE9B2B6EE78CD844967 E 1 CA==
- AC162D8534601ED78CF8C6BA194E944B + 000D3A0418C91EE9B2B6EE78CD844967 E 0001 X R 255 - Error in conversion of SAS Key String for &INTERFACE_ID& + Error in converting STRING to XSTRING &INTERFACE_ID&
- 000D3A0418C91EE9B2B6EE78CD844967 + 000D3A0418C91EE9B2B6FF82D41D2967 E 1 CA==
- 000D3A0418C91EE9B2B6EE78CD844967 + 000D3A0418C91EE9B2B6FF82D41D2967 E 0001 X R 255 - Error in converting STRING to XSTRING &INTERFACE_ID& + Error in converting STRING to XSTRING
- AC162D8534601ED78CF8B9DD08F6544B + 000D3A0418C91EE9B2B81EE8A0CA2967 E 1 CA==
- AC162D8534601ED78CF8B9DD08F6544B + 000D3A0418C91EE9B2B81EE8A0CA2967 E 0001 X R 255 - Error in decoding of SAS key for &INTERFACE_ID& + File name not found
- AC162D8534601ED78CF8AA43DE01544B + 000D3A0418C91EE9B2B81EE8A0CA4967 E 1 CA==
- AC162D8534601ED78CF8AA43DE01544B + 000D3A0418C91EE9B2B81EE8A0CA4967 E 0001 X R 255 - Error in getting instance of certificate for &INTERFACE_ID& + File type not found
- AC162D8534601ED78CF8D69E1657144B + 000D3A0418C91EE9B2B81EE8A0CA6967 E 1 CA==
- AC162D8534601ED78CF8D69E1657144B + 000D3A0418C91EE9B2B81EE8A0CA6967 E 0001 X R 255 - Error in importing encoded SAS Key value for &INTERFACE_ID& + Folder not found
- AC162D8534601ED783912385A3E13443 + 000D3A3BFDAD1EDAAFA298ABC49C2FED E 1 CA==
- AC162D8534601ED783912385A3E13443 + 000D3A3BFDAD1EDAAFA298ABC49C2FED E 0001 X R 255 - Error in AppendBlob creation for &INTERFACE_ID& + Error in conversion
- 000D3A3BFDAD1EDAAFA298ABC49C2FED + 000D3A3BFDAD1EDAAFA2A326D70CEFED E 1 CA==
- 000D3A3BFDAD1EDAAFA298ABC49C2FED + 000D3A3BFDAD1EDAAFA2A326D70CEFED E 0001 X R 255 - Error in conversion + Input table data is empty for &INTERFACE_ID&
- AC162D8534601ED78CF8EF5F6EA4144B + 000D3A3BFDAD1EDAAFA2B6BC8D348FED E 1 CA==
- AC162D8534601ED78CF8EF5F6EA4144B + 000D3A3BFDAD1EDAAFA2B6BC8D348FED E 0001 X R 255 - Error in retrieving encoded SAS Key for &INTERFACE_ID& + Error in converting XSTRING to STRING
- AC162D8534601ED797AB4F44B77E1453 + AC162D8534601ED6BABF7F20BB28143F E 1 CA==
- AC162D8534601ED797AB4F44B77E1453 + AC162D8534601ED6BABF7F20BB28143F E 0001 X R 255 - Error in Rest API response for &INTERFACE_ID& + Format Type &FORMAT_TYPE& Not Supported
- AC162D8534601ED78D90A8CB34A0744B + AC162D8534601ED6BAC048BB654C943F E 1 CA==
- AC162D8534601ED78D90A8CB34A0744B + AC162D8534601ED6BAC048BB654C943F E 0001 X R 255 - Error in Rest API instance creation for &INTERFACE_ID& + SAS Key not Maintained for &INTERFACE_ID&
- AC162D8534601ED797AC1D7511E39453 + AC162D8534601ED6BAC048BB654CB43F E 1 CA==
- AC162D8534601ED797AC1D7511E39453 + AC162D8534601ED6BAC048BB654CB43F E 0001 X R 255 - Execution process terminated + URI not Maintained for &INTERFACE_ID&
- AC162D8534601ED7839077DD57807443 + AC162D8534601ED6BCE8BBBD03F7543F E 1 CA==
- AC162D8534601ED7839077DD57807443 + AC162D8534601ED6BCE8BBBD03F7543F E 0001 X R 255 - Expiry time not set for &INTERFACE_ID& + SAS Key not generated for &INTERFACE_ID&
- AC162D8534601ED78390B9D36646F443 + AC162D8534601ED6BCE94AFF3765F43F E 1 CA==
- AC162D8534601ED78390B9D36646F443 + AC162D8534601ED6BCE94AFF3765F43F E 0001 X R 255 - Expiry UTC time not set for &INTERFACE_ID& + Rest API response not found for &INTERFACE_ID&
- 000D3A0418C91EE9B2B81EE8A0CA2967 + AC162D8534601ED6BDEA11EC356C3440 E 1 CA==
- 000D3A0418C91EE9B2B81EE8A0CA2967 + AC162D8534601ED6BDEA11EC356C3440 E 0001 X R 255 - File name not found + Service Call type not maintained for &INTERFACE_ID&
- 000D3A0418C91EE9B2B81EE8A0CA4967 + AC162D8534601ED7839077DD57807443 E 1 CA==
- 000D3A0418C91EE9B2B81EE8A0CA4967 + AC162D8534601ED7839077DD57807443 E 0001 X R 255 - File type not found + Expiry time not set for &INTERFACE_ID&
- 000D3A0176021ED9A08E8821D98BC11D + AC162D8534601ED78390B9D36646F443 E 1 CA==
- 000D3A0176021ED9A08E8821D98BC11D + AC162D8534601ED78390B9D36646F443 E 0001 X R 255 - File type not handled &INTERFACE_ID& + Expiry UTC time not set for &INTERFACE_ID&
- 000D3A0418C91EE9B2B81EE8A0CA6967 + AC162D8534601ED783912385A3E13443 E 1 CA==
- 000D3A0418C91EE9B2B81EE8A0CA6967 + AC162D8534601ED783912385A3E13443 E 0001 X R 255 - Folder not found + Error in AppendBlob creation for &INTERFACE_ID&
- AC162D8534601ED6BABF7F20BB28143F + AC162D8534601ED78CF89C2237E9F44B E 1 CA==
- AC162D8534601ED6BABF7F20BB28143F + AC162D8534601ED78CF89C2237E9F44B E 0001 X R 255 - Format Type &FORMAT_TYPE& Not Supported + Error in reading attributes of RFC destnation for &INTERFACE_ID&
- 000D3A0418C91EE9ADD6E0440915E966 + AC162D8534601ED78CF8A20AC94C944B E 1 CA==
- 000D3A0418C91EE9ADD6E0440915E966 + AC162D8534601ED78CF8A20AC94C944B E 0001 X R 255 - Interface &INTERFACE_ID& not maintained + Error in getting PSE filename for &INTERFACE_ID&
- AC162D8534601ED78DABCC118DAA544B + AC162D8534601ED78CF8AA43DE01544B E 1 CA==
- AC162D8534601ED78DABCC118DAA544B + AC162D8534601ED78CF8AA43DE01544B E 0001 X R 255 - Interface Type not Maintained for Interface &INTERFACE_ID& + Error in getting instance of certificate for &INTERFACE_ID&
- 000D3A0180251ED8999B73223E2700DC + AC162D8534601ED78CF8B16C4043744B E 1 CA==
- 000D3A0180251ED8999B73223E2700DC + AC162D8534601ED78CF8B16C4043744B E 0001 X R 255 - Method name not maintained for &INTERFACE_ID& + Error in retrieving attributes of certificate for &INTERFACE_ID&
- 000D3A3BFDAD1EDAAFA2A326D70CEFED + AC162D8534601ED78CF8B9DD08F6544B E 1 CA==
- 000D3A3BFDAD1EDAAFA2A326D70CEFED + AC162D8534601ED78CF8B9DD08F6544B E 0001 X R 255 - Input table data is empty for &INTERFACE_ID& + Error in decoding of SAS key for &INTERFACE_ID&
- AC162D8534601ED78FF1D2161365D44F + AC162D8534601ED78CF8C6BA194E944B E 1 CA==
- AC162D8534601ED78FF1D2161365D44F + AC162D8534601ED78CF8C6BA194E944B E 0001 X R 255 - Error in Epoch time calculation &INTERFACE_ID& + Error in conversion of SAS Key String for &INTERFACE_ID&
- AC162D8534601ED78FF1D2161365B44F + AC162D8534601ED78CF8D69E1657144B E 1 CA==
- AC162D8534601ED78FF1D2161365B44F + AC162D8534601ED78CF8D69E1657144B E 0001 X R 255 - Error in Epoch time calculation for &INTERFACE_ID& + Error in importing encoded SAS Key value for &INTERFACE_ID&
- AC162D8534601ED78CF8A20AC94C944B + AC162D8534601ED78CF8E0ADB9E5944B E 1 CA==
- AC162D8534601ED78CF8A20AC94C944B + AC162D8534601ED78CF8E0ADB9E5944B E 0001 X R 255 - Error in getting PSE filename for &INTERFACE_ID& + RFC destination not maintained for &INTERFACE_ID&
- AC162D8534601ED78CF89C2237E9F44B + AC162D8534601ED78CF8EF5F6EA4144B E 1 CA==
- AC162D8534601ED78CF89C2237E9F44B + AC162D8534601ED78CF8EF5F6EA4144B E 0001 X R 255 - Error in reading attributes of RFC destnation for &INTERFACE_ID& + Error in retrieving encoded SAS Key for &INTERFACE_ID&
- AC162D8534601ED6BCE94AFF3765F43F + AC162D8534601ED78D90A8CB34A0744B E 1 CA==
- AC162D8534601ED6BCE94AFF3765F43F + AC162D8534601ED78D90A8CB34A0744B E 0001 X R 255 - Rest API response not found for &INTERFACE_ID& + Error in Rest API instance creation for &INTERFACE_ID&
- AC162D8534601ED78CF8E0ADB9E5944B + AC162D8534601ED78DABCC118DAA544B E 1 CA==
- AC162D8534601ED78CF8E0ADB9E5944B + AC162D8534601ED78DABCC118DAA544B E 0001 X R 255 - RFC destination not maintained for &INTERFACE_ID& + Interface Type not Maintained for Interface &INTERFACE_ID&
- AC162D8534601ED6BCE8BBBD03F7543F + AC162D8534601ED78FF1D2161365B44F E 1 CA==
- AC162D8534601ED6BCE8BBBD03F7543F + AC162D8534601ED78FF1D2161365B44F E 0001 X R 255 - SAS Key not generated for &INTERFACE_ID& + Error in Epoch time calculation for &INTERFACE_ID&
- AC162D8534601ED6BAC048BB654C943F + AC162D8534601ED78FF1D2161365D44F E 1 CA==
- AC162D8534601ED6BAC048BB654C943F + AC162D8534601ED78FF1D2161365D44F E 0001 X R 255 - SAS Key not Maintained for &INTERFACE_ID& + Error in Epoch time calculation &INTERFACE_ID&
- 000D3A0176021ED9A08E8821D98BC11D + AC162D8534601ED797AB2500EF95B453 E 1 CA==
- 000D3A0176021ED9A08E8821D98BC11D + AC162D8534601ED797AB2500EF95B453 E 0001 X R 255 - File type not handled &INTERFACE_ID& + Error in receiving token from AAD for &INTERFACE_ID&
- 000D3A0418C91EE9B2B6FF82D41D2967 + AC162D8534601ED797AB4F44B77E1453 E 1 CA==
- 000D3A0418C91EE9B2B6FF82D41D2967 + AC162D8534601ED797AB4F44B77E1453 E 0001 X R 255 - Error in converting STRING to XSTRING + Error in Rest API response for &INTERFACE_ID&
- AC162D8534601ED6BAC048BB654CB43F + AC162D8534601ED797AB5CC36E759453 E 1 CA==
- AC162D8534601ED6BAC048BB654CB43F + AC162D8534601ED797AB5CC36E759453 E 0001 X R 255 - URI not Maintained for &INTERFACE_ID& + AAD token not found for &INTERFACE_ID&
- 000D3A3BFDAD1EDAAFA2B6BC8D348FED + AC162D8534601ED797AC1D7511E39453 E 1 CA==
- 000D3A3BFDAD1EDAAFA2B6BC8D348FED + AC162D8534601ED797AC1D7511E39453 E 0001 X R 255 - Error in converting XSTRING to STRING + Execution process terminated
+ + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0176021ED9A08E8821D98BC11D + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0180251ED8999B73223E2700DC + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EE9ADD6E0440915E966 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EE9B2B6EA37CBBA0967 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EE9B2B6EE78CD844967 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EE9B2B6FF82D41D2967 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EE9B2B81EE8A0CA2967 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EE9B2B81EE8A0CA4967 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EE9B2B81EE8A0CA6967 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A0418C91EEAB1A3E8666278A976 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A3BFDAD1EDAAFA298ABC49C2FED + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A3BFDAD1EDAAFA2A326D70CEFED + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + 000D3A3BFDAD1EDAAFA2B6BC8D348FED + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED6BABF7F20BB28143F + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED6BAC048BB654C943F + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED6BAC048BB654CB43F + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED6BCE8BBBD03F7543F + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED6BCE94AFF3765F43F + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED6BDEA11EC356C3440 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED7839077DD57807443 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78390B9D36646F443 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED783912385A3E13443 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF89C2237E9F44B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8A20AC94C944B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8AA43DE01544B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8B16C4043744B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8B9DD08F6544B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8C6BA194E944B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8D69E1657144B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8E0ADB9E5944B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78CF8EF5F6EA4144B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78D90A8CB34A0744B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78DABCC118DAA544B + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78FF1D2161365B44F + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED78FF1D2161365D44F + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED797AB2500EF95B453 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED797AB4F44B77E1453 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED797AB5CC36E759453 + 0001 + + + LIMU + CPUB + ZCX_O365_SERVICE + AC162D8534601ED797AC1D7511E39453 + 0001 + + + + + LIMU + CPUB + ZCX_O365_SERVICE + 0001 + + - ZCX_O365_SERVICE AAD_TOKEN_NOT_FOUND E Key for Logical Object in the OTR - ZCX_O365_SERVICE CALL_TYPE_NOT_MAINTAINED E Key for Logical Object in the OTR - ZCX_O365_SERVICE CONSTRUCTOR E CONSTRUCTOR - ZCX_O365_SERVICE ERROR_AAD_TOKEN E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_ATTRIBUTES_CERTIFICATE E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_CON_SASKEY_STRING E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_DECODE_SAS_KEY E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_GET_CERTIFICATE_INSTANCE E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_IMPORT_SAS_KEY E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_IN_APPEND_BLOB_CREATION E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_IN_FOLDER_CREATION E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_READ_ENCODED_SASKEY E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_RESTAPI_RESPONSE E Key for Logical Object in the OTR - ZCX_O365_SERVICE ERROR_REST_API_INSTANCE E Key for Logical Object in the OTR - ZCX_O365_SERVICE EXECUTION_TERMINATED E Key for Logical Object in the OTR - ZCX_O365_SERVICE EXPIRY_TIME_NOT_SET E Key for Logical Object in the OTR - ZCX_O365_SERVICE EXPIRY_UTC_TIME_NOT_SET E Key for Logical Object in the OTR - ZCX_O365_SERVICE FILE_TYPE_NOT_HANDLED E Key for Logical Object in the OTR - ZCX_O365_SERVICE FORMAT_NOT_SUPPORTED E Key for Logical Object in the OTR - ZCX_O365_SERVICE INTERFACE_ID E Interface ID - ZCX_O365_SERVICE INTERFACE_TYPE_NOT_MAINTAINED E Key for Logical Object in the OTR - ZCX_O365_SERVICE METHOD_NOT_MAINTAINED E Key for Logical Object in the OTR - ZCX_O365_SERVICE PARAMETER_INVALID_RANGE E Key for Logical Object in the OTR - ZCX_O365_SERVICE PARAMETER_INVALID_TYPE E Key for Logical Object in the OTR - ZCX_O365_SERVICE READ_ERROR_PSE_FILENAME E Key for Logical Object in the OTR - ZCX_O365_SERVICE READ_ERROR_RFC_DESTINATION E Key for Logical Object in the OTR - ZCX_O365_SERVICE RESTAPI_RESPONSE_NOT_FOUND E Key for Logical Object in the OTR - ZCX_O365_SERVICE RFC_DESTINATION_NOT_MAINTAINED E Key for Logical Object in the OTR - ZCX_O365_SERVICE SAS_KEY_NOT_GENERATED E Key for Logical Object in the OTR - ZCX_O365_SERVICE SAS_KEY_NOT_MAINTAINED E Key for Logical Object in the OTR - ZCX_O365_SERVICE SP_CONFIG_DETAILS_NOT_FOUND E SharePoint Config details are not maintaiend - ZCX_O365_SERVICE URI_NOT_MAINTAINED E Key for Logical Object in the OTR diff --git a/src/zadf/zo365_sdk/zcx_o365_service_sharepoint.clas.xml b/src/zadf/zo365_sdk/zcx_o365_service_sharepoint.clas.xml index e391967..c69bf38 100644 --- a/src/zadf/zo365_sdk/zcx_o365_service_sharepoint.clas.xml +++ b/src/zadf/zo365_sdk/zcx_o365_service_sharepoint.clas.xml @@ -33,15 +33,30 @@ + + + LIMU + CPUB + ZCX_O365_SERVICE_SHAREPOINT + 000D3A0418C91EE9ADD6C12BE3342966 + 0001 + + + + + LIMU + CPUB + ZCX_O365_SERVICE_SHAREPOINT + 0001 + + - ZCX_O365_SERVICE_SHAREPOINT CONSTRUCTOR E CONSTRUCTOR - ZCX_O365_SERVICE_SHAREPOINT INTERFACE_ID E Interface ID diff --git a/src/zadf/zo365_sdk/zo365_config.tabl.xml b/src/zadf/zo365_sdk/zo365_config.tabl.xml index 8595d47..f7a61e2 100644 --- a/src/zadf/zo365_sdk/zo365_config.tabl.xml +++ b/src/zadf/zo365_sdk/zo365_config.tabl.xml @@ -20,9 +20,7 @@ - ZO365_CONFIG MANDT - 0001 X MANDT 0 @@ -30,9 +28,7 @@ E - ZO365_CONFIG INTERFACE_ID - 0002 X ZINTERFACE_ID 0 @@ -40,9 +36,7 @@ E - ZO365_CONFIG INTERFACE_TYPE - 0003 ZO365_DEST 0 X @@ -50,9 +44,7 @@ E - ZO365_CONFIG SERVICE_TYPE - 0004 ZADF_SERVICE_TYPE 0 X @@ -60,9 +52,7 @@ E - ZO365_CONFIG IS_TRY - 0005 ZADF_TRY 0 X @@ -70,30 +60,30 @@ E - ZO365_CONFIG CLIENT_ID - 0006 ZO365_CLIENT_ID 0 E - ZO365_CONFIG RESOURCE_ID - 0007 ZO365_RESOURCE 0 E - ZO365_CONFIG AAD_INTERFACE_ID - 0008 ZINTERFACE_ID 0 E + + + ZO365_CONFIG + ZSDK + +
diff --git a/src/zadf/zo365_sdk/zo365_configs.tobj.xml b/src/zadf/zo365_sdk/zo365_configs.tobj.xml index 876e2ca..24d9831 100644 --- a/src/zadf/zo365_sdk/zo365_configs.tobj.xml +++ b/src/zadf/zo365_sdk/zo365_configs.tobj.xml @@ -32,7 +32,6 @@ ZO365_CONFIG ZO365_FG - ZO365_SDK 1 0001 X diff --git a/src/zadf/zo365_sdk/zo365_dest.doma.xml b/src/zadf/zo365_sdk/zo365_dest.doma.xml index fe7d90d..2c08cdc 100644 --- a/src/zadf/zo365_sdk/zo365_dest.doma.xml +++ b/src/zadf/zo365_sdk/zo365_dest.doma.xml @@ -14,35 +14,30 @@ - ZO365_DEST 0001 E SHAREPOINT SharePoint - ZO365_DEST 0002 E TEAMS Microsoft Teams - ZO365_DEST 0003 E OUTLOOK Outlook - ZO365_DEST 0004 E ONEDRIVE OneDrive - ZO365_DEST 0005 E ONENOTE diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgf00.abap b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgf00.abap index 0a2355b..722fe1a 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgf00.abap +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 08/27/2019 at 09:46:07 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgi00.abap b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgi00.abap index bcdf688..c265046 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgi00.abap +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgi00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 08/27/2019 at 09:46:07 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgt00.abap b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgt00.abap index f2f9d70..c7e0021 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgt00.abap +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgt00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 08/27/2019 at 09:51:29 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZO365_CONFIG....................................* DATA: BEGIN OF STATUS_ZO365_CONFIG . "state vector diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgtop.abap b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgtop.abap index eb70ccd..2105502 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgtop.abap +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.lzo365_fgtop.abap @@ -1,4 +1,3 @@ -* regenerated at 08/27/2019 09:46:07 FUNCTION-POOL ZO365_FG MESSAGE-ID SV. * INCLUDE LZO365_FGD... " Local class definition diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.saplzo365_fg.abap b/src/zadf/zo365_sdk/zo365_fg.fugr.saplzo365_fg.abap index 406c477..f3d64c3 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.saplzo365_fg.abap +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.saplzo365_fg.abap @@ -1,4 +1,3 @@ -* regenerated at 08/27/2019 09:46:07 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.tableframe_zo365_fg.abap b/src/zadf/zo365_sdk/zo365_fg.fugr.tableframe_zo365_fg.abap index 6dbc650..0fa3408 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.tableframe_zo365_fg.abap +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.tableframe_zo365_fg.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZO365_FG -* generation date: 08/27/2019 at 09:51:29 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZO365_FG . diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.tableproc_zo365_fg.abap b/src/zadf/zo365_sdk/zo365_fg.fugr.tableproc_zo365_fg.abap index e81f46c..9b6e374 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.tableproc_zo365_fg.abap +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.tableproc_zo365_fg.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZO365_FG -* generation date: 08/27/2019 at 09:51:29 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZO365_FG . diff --git a/src/zadf/zo365_sdk/zo365_fg.fugr.xml b/src/zadf/zo365_sdk/zo365_fg.fugr.xml index 594b3aa..729c288 100644 --- a/src/zadf/zo365_sdk/zo365_fg.fugr.xml +++ b/src/zadf/zo365_sdk/zo365_fg.fugr.xml @@ -6,8 +6,8 @@ LZO365_FGF00 LZO365_FGI00 - LZO365_FGTOP LZO365_FGT00 + LZO365_FGTOP SAPLZO365_FG @@ -61,55 +61,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -192,103 +183,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -402,7 +376,6 @@ TCTRL_ZO365_CONFIG TEXT *ZO365_CONFIG-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -419,7 +392,6 @@ TCTRL_ZO365_CONFIG TEXT *ZO365_CONFIG-INTERFACE_TYPE - Interface_Type__________________________ 001 002 040 @@ -436,7 +408,6 @@ TCTRL_ZO365_CONFIG TEXT *ZO365_CONFIG-SERVICE_TYPE - Call_Type_______________________________ 001 003 040 @@ -453,7 +424,6 @@ TCTRL_ZO365_CONFIG TEXT *ZO365_CONFIG-IS_TRY - Reprocess_______________________________ 001 004 040 @@ -470,7 +440,6 @@ TCTRL_ZO365_CONFIG TEXT *ZO365_CONFIG-CLIENT_ID - Client_id_______________________________ 001 005 040 @@ -487,7 +456,6 @@ TCTRL_ZO365_CONFIG TEXT *ZO365_CONFIG-RESOURCE_ID - Resource________________________________ 001 006 040 @@ -504,7 +472,6 @@ TCTRL_ZO365_CONFIG TEXT *ZO365_CONFIG-AAD_INTERFACE_ID - Inter_ID________________________________ 001 007 040 @@ -665,19 +632,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZO365_CONFIG CURSOR NEXTLINE. + TCTRL_ZO365_CONFIG CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -686,100 +653,69 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZO365_CONFIG-INTERFACE_ID . + FIELD ZO365_CONFIG-INTERFACE_ID . - FIELD ZO365_CONFIG-INTERFACE_TYPE . + FIELD ZO365_CONFIG-INTERFACE_TYPE . - FIELD ZO365_CONFIG-SERVICE_TYPE . + FIELD ZO365_CONFIG-SERVICE_TYPE . - FIELD ZO365_CONFIG-IS_TRY . + FIELD ZO365_CONFIG-IS_TRY . - FIELD ZO365_CONFIG-CLIENT_ID . + FIELD ZO365_CONFIG-CLIENT_ID . - FIELD ZO365_CONFIG-RESOURCE_ID . + FIELD ZO365_CONFIG-RESOURCE_ID . - FIELD ZO365_CONFIG-AAD_INTERFACE_ID . + FIELD ZO365_CONFIG-AAD_INTERFACE_ID . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZO365_CONFIG-INTERFACE_ID . + FIELD ZO365_CONFIG-INTERFACE_ID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 - diff --git a/src/zadf/zsdk s_tabu_dis.sucu.xml b/src/zadf/zsdk s_tabu_dis.sucu.xml index 16a4fed..a4f7d77 100644 --- a/src/zadf/zsdk s_tabu_dis.sucu.xml +++ b/src/zadf/zsdk s_tabu_dis.sucu.xml @@ -1,5 +1,5 @@  - + @@ -8,22 +8,6 @@ S_TABU_DIS - - - 1 - BRGRU - C - 30 - X - - - 2 - OBJECT - C - 10 - X - - E @@ -32,35 +16,6 @@ Azure SDK - - - 1 - SPRAS - C - 1 - X - - - 2 - BRGRU - C - 30 - X - - - 3 - OBJECT - C - 10 - X - - - 4 - BEZEI - C - 40 - - diff --git a/src/zadf_demo/zadf_demo_azure_graph_v2.prog.abap b/src/zadf_demo/zadf_demo_azure_graph_v2.prog.abap new file mode 100644 index 0000000..ae41550 --- /dev/null +++ b/src/zadf_demo/zadf_demo_azure_graph_v2.prog.abap @@ -0,0 +1,183 @@ +*&---------------------------------------------------------------------* +*& Report zadf_demo_azure_graph_v2 +*&---------------------------------------------------------------------* +*& This report shows how to use MS Graph with Azure AAD Token V2.0 +*& to access information about SharePoint Objects like Sites, lists, +*& list items and files. +*& It also shows how to upload a file to a document library +*& of SharePoint Online site collection +*&---------------------------------------------------------------------* +REPORT zadf_demo_azure_graph_v2. + +DATA: filter TYPE zbusinessid, + oref_aad_token TYPE REF TO zcl_adf_service_aad, + oref_graph TYPE REF TO zcl_adf_service_graph, + oref_graph_post TYPE REF TO zcl_adf_service_graph, + lv_client_id TYPE string, + lv_request TYPE xstring, + lv_resource TYPE string VALUE '', + lt_headers TYPE tihttpnvp, + cx_interface TYPE REF TO zcx_interace_config_missing, + cx_http TYPE REF TO zcx_http_client_failed, + cx_adf_service TYPE REF TO zcx_adf_service, + cx_graph TYPE REF TO zcx_adf_service_graph, + lv_http_status TYPE i. + +DATA: o365_graph TYPE REF TO zcl_o365_service. + +TRY. + " get access token by calling V2.0 oauth service + DATA(oref) = zcl_adf_service_factory=>create( iv_interface_id = 'TOKEN_V2' + iv_business_identifier = filter ). + oref_aad_token ?= oref. + + oref_aad_token->get_aad_token( + EXPORTING + iv_client_id = '' + iv_resource = '' + iv_scope = 'https://graph.microsoft.com/.default' + IMPORTING + ev_aad_token = DATA(lv_aad_token) + ev_response = DATA(lv_response) +). + + " create rest connection + oref = zcl_adf_service_factory=>create( iv_interface_id = 'GRAPH_GET' + iv_business_identifier = filter ). + oref_graph ?= oref. + + " get SharePoint site id + DATA(ls_SPSite) = oref_graph->zif_adf_service_graph~get_spsite_by_name( + EXPORTING + iv_aad_token = lv_aad_token + iv_hostname = '.sharepoint.com' + iv_site = '' + IMPORTING + ev_http_status = lv_http_status + ). + + " rebuild connection for next query. This is necessary as methods always close connection when done + oref = zcl_adf_service_factory=>create( iv_interface_id = 'GRAPH_GET' + iv_business_identifier = filter ). + oref_graph ?= oref. + + " fetch all lists of given site + DATA(lt_lists) = oref_graph->zif_adf_service_graph~get_splists( + EXPORTING + iv_aad_token = lv_aad_token + iv_site_id = ls_spsite-id + IMPORTING + ev_http_status = lv_http_status + ). + + " rebuild connection for next query. This is necessary as methods always close connection when done + oref = zcl_adf_service_factory=>create( iv_interface_id = 'GRAPH_GET' + iv_business_identifier = filter ). + oref_graph ?= oref. + + " fetch list items of a list + DATA(lt_items) = oref_graph->zif_adf_service_graph~get_splistitems( + EXPORTING + iv_aad_token = lv_aad_token + iv_site_id = ls_spsite-id + iv_list_id = lt_lists[ 4 ]-id + IMPORTING + ev_http_status = lv_http_status + ). + + " rebuild connection for next query. This is necessary as methods always close connection when done + oref = zcl_adf_service_factory=>create( iv_interface_id = 'GRAPH_GET' + iv_business_identifier = filter ). + oref_graph ?= oref. + + " fetch all SharePoint Drives aka Document Libraries + DATA(lt_drives) = oref_graph->zif_adf_service_graph~get_spdrives( + EXPORTING + iv_aad_token = lv_aad_token + iv_site_id = ls_spsite-id + IMPORTING + ev_http_status = lv_http_status + ). + + + " rebuild connection for next query. This is necessary as methods always close connection when done + " But this time we want a PUT request + oref = zcl_adf_service_factory=>create( iv_interface_id = 'GRAPH_PUT' + iv_business_identifier = filter ). + oref_graph ?= oref. + + " read data from file + DATA: lt_bin_data TYPE w3mimetabtype. + + cl_gui_frontend_services=>gui_upload( + EXPORTING + filename = 'C:\Temp\Mappe1.xlsx' + filetype = 'BIN' +* has_field_separator = space +* header_length = 0 +* read_by_line = 'X' +* dat_mode = space +* codepage = +* ignore_cerr = abap_true +* replacement = '#' +* virus_scan_profile = + IMPORTING + filelength = DATA(lv_file_length) +* header = + CHANGING + data_tab = lt_bin_data +* isscanperformed = space +* EXCEPTIONS +* file_open_error = 1 +* file_read_error = 2 +* no_batch = 3 +* gui_refuse_filetransfer = 4 +* invalid_type = 5 +* no_authority = 6 +* unknown_error = 7 +* bad_data_format = 8 +* header_not_allowed = 9 +* separator_not_allowed = 10 +* header_too_long = 11 +* unknown_dp_error = 12 +* access_denied = 13 +* dp_out_of_memory = 14 +* disk_full = 15 +* dp_timeout = 16 +* not_supported_by_gui = 17 +* error_no_gui = 18 +* others = 19 + ). + + DATA(lv_xstring) = cl_bcs_convert=>solix_to_xstring( it_solix = lt_bin_data iv_size = lv_file_length ). + + + " upload file to SharePoint + DATA(response) = oref_graph->zif_adf_service_graph~upload_file_to_sharepoint( + EXPORTING + iv_aad_token = lv_aad_token + iv_site_id = ls_spsite-id + iv_drive_id = lt_drives[ name = 'Documents' ]-id + iv_filename = 'MySapTest.xlsx' + iv_binary = lv_xstring + IMPORTING + ev_http_status = lv_http_status + ). + WRITE: / 'HTTP Status: ', lv_http_status. + "DATA(lv_json_result) = /ui2/cl_json=>serialize( data = ls_spsite pretty_name = abap_true ). + cl_demo_output=>display_json( lt_items[ 1 ]-fields ). + + + CATCH zcx_adf_service_graph INTO cx_graph. + DATA(lv_string) = cx_graph->get_text( ). + MESSAGE lv_string TYPE 'E'. + CATCH zcx_interace_config_missing INTO cx_interface. + lv_string = cx_interface->get_text( ). + MESSAGE lv_string TYPE 'E'. + CATCH zcx_http_client_failed INTO cx_http . + lv_string = cx_http->get_text( ). + MESSAGE lv_string TYPE 'E'. + CATCH zcx_adf_service INTO cx_adf_service. + lv_string = cx_adf_service->get_text( ). + MESSAGE lv_string TYPE 'E'. +ENDTRY. diff --git a/src/zadf_demo/zadf_demo_azure_graph_v2.prog.xml b/src/zadf_demo/zadf_demo_azure_graph_v2.prog.xml new file mode 100644 index 0000000..6ac3ed9 --- /dev/null +++ b/src/zadf_demo/zadf_demo_azure_graph_v2.prog.xml @@ -0,0 +1,27 @@ + + + + + + ZADF_DEMO_AZURE_GRAPH_V2 + S + 1 + X + D$S + X + + + + D + + + R + SharePoint Online mittels MS Graph + 34 + + + + + + + diff --git a/src/zrest/zcx_http_client_failed.clas.xml b/src/zrest/zcx_http_client_failed.clas.xml index 1f03f9f..10f42ca 100644 --- a/src/zrest/zcx_http_client_failed.clas.xml +++ b/src/zrest/zcx_http_client_failed.clas.xml @@ -14,7 +14,6 @@ - ZCX_HTTP_CLIENT_FAILED CONSTRUCTOR E CONSTRUCTOR diff --git a/src/zrest/zcx_interace_config_missing.clas.xml b/src/zrest/zcx_interace_config_missing.clas.xml index 0b56c59..d3a6596 100644 --- a/src/zrest/zcx_interace_config_missing.clas.xml +++ b/src/zrest/zcx_interace_config_missing.clas.xml @@ -14,7 +14,6 @@ - ZCX_INTERACE_CONFIG_MISSING CONSTRUCTOR E CONSTRUCTOR diff --git a/src/zrest/zcx_rest.clas.xml b/src/zrest/zcx_rest.clas.xml index ff6cece..827e200 100644 --- a/src/zrest/zcx_rest.clas.xml +++ b/src/zrest/zcx_rest.clas.xml @@ -14,7 +14,6 @@ - ZCX_REST CONSTRUCTOR E CONSTRUCTOR diff --git a/src/zrest/zgroup_values.fugr.lzgroup_valuesf00.abap b/src/zrest/zgroup_values.fugr.lzgroup_valuesf00.abap index cd9a8c8..722fe1a 100644 --- a/src/zrest/zgroup_values.fugr.lzgroup_valuesf00.abap +++ b/src/zrest/zgroup_values.fugr.lzgroup_valuesf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 10/28/2022 at 01:36:17 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zrest/zgroup_values.fugr.lzgroup_valuesi00.abap b/src/zrest/zgroup_values.fugr.lzgroup_valuesi00.abap index e4acae3..c265046 100644 --- a/src/zrest/zgroup_values.fugr.lzgroup_valuesi00.abap +++ b/src/zrest/zgroup_values.fugr.lzgroup_valuesi00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 10/28/2022 at 01:36:17 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zrest/zgroup_values.fugr.lzgroup_valuest00.abap b/src/zrest/zgroup_values.fugr.lzgroup_valuest00.abap index 5624a6c..7ed6024 100644 --- a/src/zrest/zgroup_values.fugr.lzgroup_valuest00.abap +++ b/src/zrest/zgroup_values.fugr.lzgroup_valuest00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 10/28/2022 at 01:36:17 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZGROUP_VALUES...................................* DATA: BEGIN OF STATUS_ZGROUP_VALUES . "state vector diff --git a/src/zrest/zgroup_values.fugr.lzgroup_valuestop.abap b/src/zrest/zgroup_values.fugr.lzgroup_valuestop.abap index d2abfe2..e6aa27d 100644 --- a/src/zrest/zgroup_values.fugr.lzgroup_valuestop.abap +++ b/src/zrest/zgroup_values.fugr.lzgroup_valuestop.abap @@ -1,4 +1,3 @@ -* regenerated at 10/28/2022 01:36:17 FUNCTION-POOL ZGROUP_VALUES MESSAGE-ID SV. * INCLUDE LZGROUP_VALUESD... " Local class definition diff --git a/src/zrest/zgroup_values.fugr.saplzgroup_values.abap b/src/zrest/zgroup_values.fugr.saplzgroup_values.abap index fa901dd..5b0f763 100644 --- a/src/zrest/zgroup_values.fugr.saplzgroup_values.abap +++ b/src/zrest/zgroup_values.fugr.saplzgroup_values.abap @@ -1,4 +1,3 @@ -* regenerated at 10/28/2022 01:36:17 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zrest/zgroup_values.fugr.tableframe_zgroup_values.abap b/src/zrest/zgroup_values.fugr.tableframe_zgroup_values.abap index aa65bf9..51ea5d7 100644 --- a/src/zrest/zgroup_values.fugr.tableframe_zgroup_values.abap +++ b/src/zrest/zgroup_values.fugr.tableframe_zgroup_values.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZGROUP_VALUES -* generation date: 10/28/2022 at 01:36:16 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZGROUP_VALUES . diff --git a/src/zrest/zgroup_values.fugr.tableproc_zgroup_values.abap b/src/zrest/zgroup_values.fugr.tableproc_zgroup_values.abap index 430028e..bad0531 100644 --- a/src/zrest/zgroup_values.fugr.tableproc_zgroup_values.abap +++ b/src/zrest/zgroup_values.fugr.tableproc_zgroup_values.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZGROUP_VALUES -* generation date: 10/28/2022 at 01:36:17 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZGROUP_VALUES . diff --git a/src/zrest/zgroup_values.fugr.xml b/src/zrest/zgroup_values.fugr.xml index 3d7ed24..91fd8dd 100644 --- a/src/zrest/zgroup_values.fugr.xml +++ b/src/zrest/zgroup_values.fugr.xml @@ -6,8 +6,8 @@ LZGROUP_VALUESF00 LZGROUP_VALUESI00 - LZGROUP_VALUESTOP LZGROUP_VALUEST00 + LZGROUP_VALUESTOP SAPLZGROUP_VALUES @@ -61,55 +61,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -192,103 +183,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -402,7 +376,6 @@ TCTRL_ZGROUP_VALUES TEXT *ZGROUP_VALUES-AUTH_GROUP - Sensitive_Group_________________________ 001 001 040 @@ -484,19 +457,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZGROUP_VALUES CURSOR NEXTLINE. + TCTRL_ZGROUP_VALUES CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -505,80 +478,54 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZGROUP_VALUES-AUTH_GROUP . + FIELD ZGROUP_VALUES-AUTH_GROUP . - FIELD ZGROUP_VALUES-AUTH_GRP_DESC . + FIELD ZGROUP_VALUES-AUTH_GRP_DESC . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZGROUP_VALUES-AUTH_GROUP . + FIELD ZGROUP_VALUES-AUTH_GROUP . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 -
@@ -603,7 +550,6 @@ SCREEN TEXT ZGROUP_VALUES-AUTH_GROUP - Sensitive_Group_____ 001 001 020 @@ -620,7 +566,6 @@ SCREEN TEMPLATE ZGROUP_VALUES-AUTH_GROUP - ____________ 001 022 012 @@ -670,7 +615,6 @@ SCREEN TEMPLATE ZGROUP_VALUES-AUTH_GRP_DESC - ______________________________ 004 033 030 @@ -699,7 +643,7 @@ PROCESS BEFORE OUTPUT. - MODULE detail_init. + MODULE detail_init. * @@ -708,56 +652,39 @@ PROCESS AFTER INPUT. - MODULE DETAIL_EXIT_COMMAND AT EXIT-COMMAND. + MODULE DETAIL_EXIT_COMMAND AT EXIT-COMMAND. - MODULE DETAIL_SET_PFSTATUS. + MODULE DETAIL_SET_PFSTATUS. - CHAIN. + CHAIN. - FIELD ZGROUP_VALUES-AUTH_GROUP . + FIELD ZGROUP_VALUES-AUTH_GROUP . - FIELD ZGROUP_VALUES-AUTH_GRP_DESC . + FIELD ZGROUP_VALUES-AUTH_GRP_DESC . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - endchain. + endchain. - chain. + chain. - FIELD ZGROUP_VALUES-AUTH_GROUP . + FIELD ZGROUP_VALUES-AUTH_GROUP . - module detail_pai. + module detail_pai. - endchain. + endchain. - - 0 - 1 - 0 - 0 - 1 - 1 - 1 - 4 - 4 - 2 - 1 - 1 - 4 - 2 - 1 - diff --git a/src/zrest/zgroup_values.tabl.xml b/src/zrest/zgroup_values.tabl.xml index 401b8bb..1d501ea 100644 --- a/src/zrest/zgroup_values.tabl.xml +++ b/src/zrest/zgroup_values.tabl.xml @@ -21,9 +21,7 @@ - ZGROUP_VALUES MANDT - 0001 X MANDT 0 @@ -31,9 +29,7 @@ E - ZGROUP_VALUES AUTH_GROUP - 0002 X ZSENSITIVE_GROUP 0 @@ -41,14 +37,18 @@ E - ZGROUP_VALUES AUTH_GRP_DESC - 0003 CHAR30 0 E + + + ZGROUP_VALUES + &NC& + + diff --git a/src/zrest/zgroup_valuess.tobj.xml b/src/zrest/zgroup_valuess.tobj.xml index 65e4e32..7c086aa 100644 --- a/src/zrest/zgroup_valuess.tobj.xml +++ b/src/zrest/zgroup_valuess.tobj.xml @@ -32,7 +32,6 @@ ZGROUP_VALUES ZGROUP_VALUES - ZREST 2 9101 9102 diff --git a/src/zrest/zheader_structure.tabl.xml b/src/zrest/zheader_structure.tabl.xml index 53badbb..e531091 100644 --- a/src/zrest/zheader_structure.tabl.xml +++ b/src/zrest/zheader_structure.tabl.xml @@ -10,17 +10,13 @@ - ZHEADER_STRUCTURE ZNAME - 0001 ZHEADERPARAM 0 E - ZHEADER_STRUCTURE ZVALUE - 0002 ZHEADERPARAM 0 E diff --git a/src/zrest/zif_rest_http_constants.intf.xml b/src/zrest/zif_rest_http_constants.intf.xml index 30e98fc..5ea1d44 100644 --- a/src/zrest/zif_rest_http_constants.intf.xml +++ b/src/zrest/zif_rest_http_constants.intf.xml @@ -4,7 +4,6 @@ ZIF_REST_HTTP_CONSTANTS - 1 E Interface for Azure REST HTTP Constants 2 diff --git a/src/zrest/zinterface_method.doma.xml b/src/zrest/zinterface_method.doma.xml index b8fe975..5a58f37 100644 --- a/src/zrest/zinterface_method.doma.xml +++ b/src/zrest/zinterface_method.doma.xml @@ -13,42 +13,36 @@ - ZINTERFACE_METHOD 0001 E HEAD HTTP Request Method HEAD - ZINTERFACE_METHOD 0002 E OPTIONS HTTP Request Method OPTIONS - ZINTERFACE_METHOD 0003 E GET HTTP Request Method GET - ZINTERFACE_METHOD 0004 E PUT HTTP Request Method PUT - ZINTERFACE_METHOD 0005 E POST HTTP Request Method POST - ZINTERFACE_METHOD 0006 E DELETE diff --git a/src/zrest/znamevaluepair.tabl.xml b/src/zrest/znamevaluepair.tabl.xml index 97b5e67..b86307a 100644 --- a/src/zrest/znamevaluepair.tabl.xml +++ b/src/zrest/znamevaluepair.tabl.xml @@ -10,25 +10,19 @@ - ZNAMEVALUEPAIR NAME - 0001 ZHEADERPARAM 0 E - ZNAMEVALUEPAIR VALUE - 0002 ZHEADERPARAM 0 E - ZNAMEVALUEPAIR HEADER - 0003 ZHEADERPARAM 0 E diff --git a/src/zrest/zobfuscate.tabl.xml b/src/zrest/zobfuscate.tabl.xml index 43ad09e..5cf8ae2 100644 --- a/src/zrest/zobfuscate.tabl.xml +++ b/src/zrest/zobfuscate.tabl.xml @@ -19,9 +19,7 @@ - ZOBFUSCATE INETRFACE - 0001 X ZINTERFACE_ID 0 @@ -29,9 +27,7 @@ E - ZOBFUSCATE FIELDTAG - 0002 X ZORIGINAL 0 @@ -39,14 +35,18 @@ E - ZOBFUSCATE LENGTH - 0003 INT4 0 E + + + ZOBFUSCATE + ZRES + + diff --git a/src/zrest/zobfuscates.tobj.xml b/src/zrest/zobfuscates.tobj.xml index 7bc9ed4..2ac4702 100644 --- a/src/zrest/zobfuscates.tobj.xml +++ b/src/zrest/zobfuscates.tobj.xml @@ -32,7 +32,6 @@ ZOBFUSCATE ZREST - ZREST 1 9050 X diff --git a/src/zrest/zrest.fugr.lzrestf00.abap b/src/zrest/zrest.fugr.lzrestf00.abap index 2789436..722fe1a 100644 --- a/src/zrest/zrest.fugr.lzrestf00.abap +++ b/src/zrest/zrest.fugr.lzrestf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 08/02/2016 at 12:14:24 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zrest/zrest.fugr.lzresti00.abap b/src/zrest/zrest.fugr.lzresti00.abap index a7a1951..c265046 100644 --- a/src/zrest/zrest.fugr.lzresti00.abap +++ b/src/zrest/zrest.fugr.lzresti00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 08/02/2016 at 12:14:24 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zrest/zrest.fugr.lzrestt00.abap b/src/zrest/zrest.fugr.lzrestt00.abap index bc8026d..f0dfabe 100644 --- a/src/zrest/zrest.fugr.lzrestt00.abap +++ b/src/zrest/zrest.fugr.lzrestt00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 08/29/2018 at 03:15:49 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZOBFUSCATE......................................* DATA: BEGIN OF STATUS_ZOBFUSCATE . "state vector diff --git a/src/zrest/zrest.fugr.lzresttop.abap b/src/zrest/zrest.fugr.lzresttop.abap index 25e90f0..bd14bc9 100644 --- a/src/zrest/zrest.fugr.lzresttop.abap +++ b/src/zrest/zrest.fugr.lzresttop.abap @@ -1,4 +1,3 @@ -* regenerated at 08/02/2016 12:14:24 FUNCTION-POOL zrest MESSAGE-ID sv. * INCLUDE LZRESTD... " Local class definition diff --git a/src/zrest/zrest.fugr.saplzrest.abap b/src/zrest/zrest.fugr.saplzrest.abap index c369f02..2e06f55 100644 --- a/src/zrest/zrest.fugr.saplzrest.abap +++ b/src/zrest/zrest.fugr.saplzrest.abap @@ -1,4 +1,3 @@ -* regenerated at 12/30/2015 01:40:17 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zrest/zrest.fugr.tableframe_zrest.abap b/src/zrest/zrest.fugr.tableframe_zrest.abap index 4c25788..7ae4251 100644 --- a/src/zrest/zrest.fugr.tableframe_zrest.abap +++ b/src/zrest/zrest.fugr.tableframe_zrest.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZREST -* generation date: 08/02/2016 at 12:14:24 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZREST . diff --git a/src/zrest/zrest.fugr.tableproc_zrest.abap b/src/zrest/zrest.fugr.tableproc_zrest.abap index e486bb8..a98a4f2 100644 --- a/src/zrest/zrest.fugr.tableproc_zrest.abap +++ b/src/zrest/zrest.fugr.tableproc_zrest.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZREST -* generation date: 08/02/2016 at 12:14:24 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZREST . diff --git a/src/zrest/zrest.fugr.xml b/src/zrest/zrest.fugr.xml index ad2b3f7..54df14a 100644 --- a/src/zrest/zrest.fugr.xml +++ b/src/zrest/zrest.fugr.xml @@ -8,8 +8,8 @@ LZRESTF01 LZRESTF02 LZRESTI00 - LZRESTTOP LZRESTT00 + LZRESTTOP SAPLZREST @@ -63,55 +63,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -194,103 +185,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -314,13 +288,11 @@ FRAMEWORK_CLASS P Class for interface - 001 UPDATE_TASK P Single-Character Indicator - 002 @@ -346,19 +318,16 @@ PAYLOAD P REST Call Payloads - 001 MONITOR P Monitor - 002 RETRY P Retry log - 003 @@ -385,19 +354,16 @@ PAYLOAD P REST Call Payloads - 001 MONITOR P Monitor - 002 RETRY P Retry log - 003 @@ -511,7 +477,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-ZMESSAGEID - Msg_Id__________________________________ 001 001 040 @@ -528,7 +493,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-ZUSER - User_name_______________________________ 001 002 040 @@ -545,7 +509,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-RERTYNUM - Counter_________________________________ 001 003 040 @@ -562,7 +525,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-ZMESSAGENUM - Msg_Num_________________________________ 001 004 040 @@ -609,7 +571,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-METHOD - Char20__________________________________ 001 007 040 @@ -626,7 +587,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-DESTINATION - Char80__________________________________ 001 008 040 @@ -658,7 +618,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-URI - URI_____________________________________ 001 010 040 @@ -675,7 +634,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-INTERFACE_ID - Inter_ID________________________________ 001 011 040 @@ -692,7 +650,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-CALLING_PROGRAM - Class_Name______________________________ 001 012 040 @@ -709,7 +666,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-CALLING_METHOD - Method__________________________________ 001 013 040 @@ -726,7 +682,6 @@ TCTRL_ZREST_MONITOR TEXT *ZREST_MONITOR-BUSINESSID - Business_Identifier_____________________ 001 014 040 @@ -1093,19 +1048,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREST_MONITOR CURSOR NEXTLINE. + TCTRL_ZREST_MONITOR CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -1114,140 +1069,99 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREST_MONITOR-ZMESSAGEID . + FIELD ZREST_MONITOR-ZMESSAGEID . - FIELD ZREST_MONITOR-ZUSER . + FIELD ZREST_MONITOR-ZUSER . - FIELD ZREST_MONITOR-RERTYNUM . + FIELD ZREST_MONITOR-RERTYNUM . - FIELD ZREST_MONITOR-ZMESSAGENUM . + FIELD ZREST_MONITOR-ZMESSAGENUM . - FIELD ZREST_MONITOR-STATUS . + FIELD ZREST_MONITOR-STATUS . - FIELD ZREST_MONITOR-REASON . + FIELD ZREST_MONITOR-REASON . - FIELD ZREST_MONITOR-METHOD . + FIELD ZREST_MONITOR-METHOD . - FIELD ZREST_MONITOR-DESTINATION . + FIELD ZREST_MONITOR-DESTINATION . - FIELD ZREST_MONITOR-HOST . + FIELD ZREST_MONITOR-HOST . - FIELD ZREST_MONITOR-URI . + FIELD ZREST_MONITOR-URI . - FIELD ZREST_MONITOR-INTERFACE_ID . + FIELD ZREST_MONITOR-INTERFACE_ID . - FIELD ZREST_MONITOR-CALLING_PROGRAM . + FIELD ZREST_MONITOR-CALLING_PROGRAM . - FIELD ZREST_MONITOR-CALLING_METHOD . + FIELD ZREST_MONITOR-CALLING_METHOD . - FIELD ZREST_MONITOR-BUSINESSID . + FIELD ZREST_MONITOR-BUSINESSID . - FIELD ZREST_MONITOR-MAIL_SENT . + FIELD ZREST_MONITOR-MAIL_SENT . - FIELD ZREST_MONITOR-ZDELETE . + FIELD ZREST_MONITOR-ZDELETE . - FIELD ZREST_MONITOR-DELETEUSER . + FIELD ZREST_MONITOR-DELETEUSER . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREST_MONITOR-ZMESSAGEID . + FIELD ZREST_MONITOR-ZMESSAGEID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 -
@@ -1357,7 +1271,6 @@ TCTRL_ZREST_CONFIG TEXT *ZREST_CONFIG-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -1374,7 +1287,6 @@ TCTRL_ZREST_CONFIG TEXT *ZREST_CONFIG-DESTINATION - RFC_Destination_________________________ 001 002 040 @@ -1443,19 +1355,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREST_CONFIG CURSOR NEXTLINE. + TCTRL_ZREST_CONFIG CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -1464,80 +1376,54 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREST_CONFIG-INTERFACE_ID . + FIELD ZREST_CONFIG-INTERFACE_ID . - FIELD ZREST_CONFIG-DESTINATION . + FIELD ZREST_CONFIG-DESTINATION . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREST_CONFIG-INTERFACE_ID . + FIELD ZREST_CONFIG-INTERFACE_ID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 -
@@ -1647,7 +1533,6 @@ TCTRL_ZREST_CONF_MISC TEXT *ZREST_CONF_MISC-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -1664,7 +1549,6 @@ TCTRL_ZREST_CONF_MISC TEXT *ZREST_CONF_MISC-METHOD - Method__________________________________ 001 002 040 @@ -1681,7 +1565,6 @@ TCTRL_ZREST_CONF_MISC TEXT *ZREST_CONF_MISC-MAX_RETRY - Counter_________________________________ 001 003 040 @@ -1698,7 +1581,6 @@ TCTRL_ZREST_CONF_MISC TEXT *ZREST_CONF_MISC-EMAIL_ID - E-Mail_Address__________________________ 001 004 040 @@ -1715,7 +1597,6 @@ TCTRL_ZREST_CONF_MISC TEXT *ZREST_CONF_MISC-MAIL_BODY_TXT - Text_Name_______________________________ 001 005 040 @@ -1732,7 +1613,6 @@ TCTRL_ZREST_CONF_MISC TEXT *ZREST_CONF_MISC-RETRY_METHOD - Retry_Freq______________________________ 001 006 040 @@ -1871,19 +1751,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREST_CONF_MISC CURSOR NEXTLINE. + TCTRL_ZREST_CONF_MISC CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -1892,96 +1772,66 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREST_CONF_MISC-INTERFACE_ID . + FIELD ZREST_CONF_MISC-INTERFACE_ID . - FIELD ZREST_CONF_MISC-METHOD . + FIELD ZREST_CONF_MISC-METHOD . - FIELD ZREST_CONF_MISC-MAX_RETRY . + FIELD ZREST_CONF_MISC-MAX_RETRY . - FIELD ZREST_CONF_MISC-EMAIL_ID . + FIELD ZREST_CONF_MISC-EMAIL_ID . - FIELD ZREST_CONF_MISC-MAIL_BODY_TXT . + FIELD ZREST_CONF_MISC-MAIL_BODY_TXT . - FIELD ZREST_CONF_MISC-RETRY_METHOD . + FIELD ZREST_CONF_MISC-RETRY_METHOD . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREST_CONF_MISC-INTERFACE_ID . + FIELD ZREST_CONF_MISC-INTERFACE_ID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 -
@@ -2091,7 +1941,6 @@ TCTRL_ZREST_GLOBAL TEXT *ZREST_GLOBAL-MESSAGE_RETENTION - Msg_Rtn_________________________________ 001 001 040 @@ -2108,7 +1957,6 @@ TCTRL_ZREST_GLOBAL TEXT *ZREST_GLOBAL-LINEAR_RETRY_DURATION - Retry___________________________________ 001 002 040 @@ -2176,19 +2024,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREST_GLOBAL CURSOR NEXTLINE. + TCTRL_ZREST_GLOBAL CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -2197,84 +2045,57 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREST_GLOBAL-MESSAGE_RETENTION . + FIELD ZREST_GLOBAL-MESSAGE_RETENTION . - FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . + FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREST_GLOBAL-MESSAGE_RETENTION . + FIELD ZREST_GLOBAL-MESSAGE_RETENTION . - FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . + FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 4 - 3 - 1 - 1 -
@@ -2384,7 +2205,6 @@ TCTRL_ZREST_CONF_HEAD TEXT *ZREST_CONF_HEAD-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -2401,7 +2221,6 @@ TCTRL_ZREST_CONF_HEAD TEXT *ZREST_CONF_HEAD-NAME - Name____________________________________ 001 002 040 @@ -2418,7 +2237,6 @@ TCTRL_ZREST_CONF_HEAD TEXT *ZREST_CONF_HEAD-VALUE - Value___________________________________ 001 003 040 @@ -2506,19 +2324,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREST_CONF_HEAD CURSOR NEXTLINE. + TCTRL_ZREST_CONF_HEAD CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -2527,88 +2345,60 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREST_CONF_HEAD-INTERFACE_ID . + FIELD ZREST_CONF_HEAD-INTERFACE_ID . - FIELD ZREST_CONF_HEAD-NAME . + FIELD ZREST_CONF_HEAD-NAME . - FIELD ZREST_CONF_HEAD-VALUE . + FIELD ZREST_CONF_HEAD-VALUE . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREST_CONF_HEAD-INTERFACE_ID . + FIELD ZREST_CONF_HEAD-INTERFACE_ID . - FIELD ZREST_CONF_HEAD-NAME . + FIELD ZREST_CONF_HEAD-NAME . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 4 - 3 - 1 - 1 -
@@ -2718,7 +2508,6 @@ TCTRL_ZREST_CONFIG TEXT *ZREST_CONFIG-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -2735,7 +2524,6 @@ TCTRL_ZREST_CONFIG TEXT *ZREST_CONFIG-DESTINATION - RFC_Destination_________________________ 001 002 040 @@ -2752,7 +2540,6 @@ TCTRL_ZREST_CONFIG TEXT *ZREST_CONFIG-SENSITIVE_FLAG - Sens.Flag_______________________________ 001 003 040 @@ -2769,7 +2556,6 @@ TCTRL_ZREST_CONFIG TEXT *ZREST_CONFIG-SENSITIVE_GROUP - Sensitive_Group_________________________ 001 004 040 @@ -2874,19 +2660,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREST_CONFIG CURSOR NEXTLINE. + TCTRL_ZREST_CONFIG CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -2895,88 +2681,60 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREST_CONFIG-INTERFACE_ID . + FIELD ZREST_CONFIG-INTERFACE_ID . - FIELD ZREST_CONFIG-DESTINATION . + FIELD ZREST_CONFIG-DESTINATION . - FIELD ZREST_CONFIG-SENSITIVE_FLAG . + FIELD ZREST_CONFIG-SENSITIVE_FLAG . - FIELD ZREST_CONFIG-SENSITIVE_GROUP . + FIELD ZREST_CONFIG-SENSITIVE_GROUP . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREST_CONFIG-INTERFACE_ID . + FIELD ZREST_CONFIG-INTERFACE_ID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 3 - 1 - 1 -
@@ -3001,7 +2759,6 @@ SCREEN TEXT ZREST_CONFIG-INTERFACE_ID - Inter_ID__ 001 001 010 @@ -3018,7 +2775,6 @@ SCREEN TEMPLATE ZREST_CONFIG-INTERFACE_ID - __________ 001 012 010 @@ -3051,7 +2807,6 @@ SCREEN TEXT ZREST_CONFIG-DESTINATION - Destination 004 002 011 @@ -3068,7 +2823,6 @@ SCREEN TEMPLATE ZREST_CONFIG-DESTINATION - ________________________________ 004 023 032 @@ -3086,7 +2840,6 @@ SCREEN CHECK ZREST_CONFIG-SENSITIVE_FLAG - Sensitive_Flag______ 005 002 022 @@ -3104,7 +2857,6 @@ SCREEN TEXT ZREST_CONFIG-SENSITIVE_GROUP - Sensitive_Group_____ 006 002 020 @@ -3121,7 +2873,6 @@ SCREEN TEMPLATE ZREST_CONFIG-SENSITIVE_GROUP - ____________ 006 023 012 @@ -3151,7 +2902,7 @@ PROCESS BEFORE OUTPUT. - MODULE detail_init. + MODULE detail_init. * @@ -3160,64 +2911,45 @@ PROCESS AFTER INPUT. - MODULE DETAIL_EXIT_COMMAND AT EXIT-COMMAND. + MODULE DETAIL_EXIT_COMMAND AT EXIT-COMMAND. - MODULE DETAIL_SET_PFSTATUS. + MODULE DETAIL_SET_PFSTATUS. - CHAIN. + CHAIN. - FIELD ZREST_CONFIG-INTERFACE_ID . + FIELD ZREST_CONFIG-INTERFACE_ID . - FIELD ZREST_CONFIG-DESTINATION . + FIELD ZREST_CONFIG-DESTINATION . - FIELD ZREST_CONFIG-SENSITIVE_FLAG . + FIELD ZREST_CONFIG-SENSITIVE_FLAG . - FIELD ZREST_CONFIG-SENSITIVE_GROUP . + FIELD ZREST_CONFIG-SENSITIVE_GROUP . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - endchain. + endchain. - chain. + chain. - FIELD ZREST_CONFIG-INTERFACE_ID . + FIELD ZREST_CONFIG-INTERFACE_ID . - module detail_pai. + module detail_pai. - endchain. + endchain. - - 0 - 1 - 0 - 0 - 1 - 1 - 1 - 4 - 4 - 4 - 4 - 2 - 1 - 1 - 4 - 2 - 1 -
@@ -3327,7 +3059,6 @@ TCTRL_ZOBFUSCATE TEXT *ZOBFUSCATE-INETRFACE - Inter_ID________________________________ 001 001 040 @@ -3344,7 +3075,6 @@ TCTRL_ZOBFUSCATE TEXT *ZOBFUSCATE-FIELDTAG - ORGINAL_________________________________ 001 002 040 @@ -3361,7 +3091,6 @@ TCTRL_ZOBFUSCATE TEXT *ZOBFUSCATE-LENGTH - Number__________________________________ 001 003 040 @@ -3448,19 +3177,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZOBFUSCATE CURSOR NEXTLINE. + TCTRL_ZOBFUSCATE CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -3469,88 +3198,60 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZOBFUSCATE-INETRFACE . + FIELD ZOBFUSCATE-INETRFACE . - FIELD ZOBFUSCATE-FIELDTAG . + FIELD ZOBFUSCATE-FIELDTAG . - FIELD ZOBFUSCATE-LENGTH . + FIELD ZOBFUSCATE-LENGTH . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZOBFUSCATE-INETRFACE . + FIELD ZOBFUSCATE-INETRFACE . - FIELD ZOBFUSCATE-FIELDTAG . + FIELD ZOBFUSCATE-FIELDTAG . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 4 - 3 - 1 - 1 -
@@ -3660,7 +3361,6 @@ TCTRL_ZREST_GLOBAL TEXT *ZREST_GLOBAL-MESSAGE_RETENTION - Msg_Rtn_________________________________ 001 001 040 @@ -3677,7 +3377,6 @@ TCTRL_ZREST_GLOBAL TEXT *ZREST_GLOBAL-LINEAR_RETRY_DURATION - Retry___________________________________ 001 002 040 @@ -3745,19 +3444,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREST_GLOBAL CURSOR NEXTLINE. + TCTRL_ZREST_GLOBAL CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -3766,84 +3465,57 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREST_GLOBAL-MESSAGE_RETENTION . + FIELD ZREST_GLOBAL-MESSAGE_RETENTION . - FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . + FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREST_GLOBAL-MESSAGE_RETENTION . + FIELD ZREST_GLOBAL-MESSAGE_RETENTION . - FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . + FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 4 - 3 - 1 - 1 -
@@ -3868,7 +3540,6 @@ SCREEN TEXT ZREST_GLOBAL-MESSAGE_RETENTION - Message_Retention 001 001 017 @@ -3885,7 +3556,6 @@ SCREEN TEMPLATE ZREST_GLOBAL-MESSAGE_RETENTION - __ 001 022 002 @@ -3902,7 +3572,6 @@ SCREEN TEXT ZREST_GLOBAL-LINEAR_RETRY_DURATION - Linear_Retry_Duratio 002 001 020 @@ -3919,7 +3588,6 @@ SCREEN TEMPLATE ZREST_GLOBAL-LINEAR_RETRY_DURATION - __ 002 022 002 @@ -3949,7 +3617,7 @@ PROCESS BEFORE OUTPUT. - MODULE detail_init. + MODULE detail_init. * @@ -3958,60 +3626,42 @@ PROCESS AFTER INPUT. - MODULE DETAIL_EXIT_COMMAND AT EXIT-COMMAND. + MODULE DETAIL_EXIT_COMMAND AT EXIT-COMMAND. - MODULE DETAIL_SET_PFSTATUS. + MODULE DETAIL_SET_PFSTATUS. - CHAIN. + CHAIN. - FIELD ZREST_GLOBAL-MESSAGE_RETENTION . + FIELD ZREST_GLOBAL-MESSAGE_RETENTION . - FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . + FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - endchain. + endchain. - chain. + chain. - FIELD ZREST_GLOBAL-MESSAGE_RETENTION . + FIELD ZREST_GLOBAL-MESSAGE_RETENTION . - FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . + FIELD ZREST_GLOBAL-LINEAR_RETRY_DURATION . - module detail_pai. + module detail_pai. - endchain. + endchain. - - 0 - 1 - 0 - 0 - 1 - 1 - 1 - 4 - 4 - 2 - 1 - 1 - 4 - 4 - 2 - 1 - diff --git a/src/zrest/zrest_applog_message.tabl.xml b/src/zrest/zrest_applog_message.tabl.xml index 66df9c9..d1cc9ff 100644 --- a/src/zrest/zrest_applog_message.tabl.xml +++ b/src/zrest/zrest_applog_message.tabl.xml @@ -10,57 +10,43 @@ - ZREST_APPLOG_MESSAGE ZMSGTY - 0001 SYMSGTY 0 E - ZREST_APPLOG_MESSAGE ZMSGV1 - 0002 SYMSGV 0 E - ZREST_APPLOG_MESSAGE ZMSGV2 - 0003 SYMSGV 0 E - ZREST_APPLOG_MESSAGE ZMSGV3 - 0004 SYMSGV 0 E - ZREST_APPLOG_MESSAGE ZMSGV4 - 0005 SYMSGV 0 E - ZREST_APPLOG_MESSAGE ZMSGID - 0006 SYMSGID 0 E - ZREST_APPLOG_MESSAGE ZMSGNO - 0007 SYMSGNO 0 E diff --git a/src/zrest/zrest_conf_head.tabl.xml b/src/zrest/zrest_conf_head.tabl.xml index f53b343..8d0c599 100644 --- a/src/zrest/zrest_conf_head.tabl.xml +++ b/src/zrest/zrest_conf_head.tabl.xml @@ -21,9 +21,7 @@ - ZREST_CONF_HEAD MANDT - 0001 X MANDT 0 @@ -31,9 +29,7 @@ E - ZREST_CONF_HEAD INTERFACE_ID - 0002 X ZINTERFACE_ID 0 @@ -41,9 +37,7 @@ E - ZREST_CONF_HEAD NAME - 0003 X ZIHTTPNAM 0 @@ -51,14 +45,18 @@ E - ZREST_CONF_HEAD VALUE - 0004 ZIHTTPVAL 0 E + + + ZREST_CONF_HEAD + ZRES + + diff --git a/src/zrest/zrest_conf_heads.tobj.xml b/src/zrest/zrest_conf_heads.tobj.xml index e56f552..724531d 100644 --- a/src/zrest/zrest_conf_heads.tobj.xml +++ b/src/zrest/zrest_conf_heads.tobj.xml @@ -33,7 +33,6 @@ ZREST_CONF_HEAD ZREST - ZREST 1 9004 X diff --git a/src/zrest/zrest_conf_misc.tabl.xml b/src/zrest/zrest_conf_misc.tabl.xml index 5879f60..0c4e798 100644 --- a/src/zrest/zrest_conf_misc.tabl.xml +++ b/src/zrest/zrest_conf_misc.tabl.xml @@ -21,9 +21,7 @@ - ZREST_CONF_MISC MANDT - 0001 X MANDT 0 @@ -31,9 +29,7 @@ E - ZREST_CONF_MISC INTERFACE_ID - 0002 X ZINTERFACE_ID 0 @@ -41,41 +37,31 @@ E - ZREST_CONF_MISC METHOD - 0003 ZINTERFACE_METHOD 0 E - ZREST_CONF_MISC MAX_RETRY - 0004 ZQ_COUNTE 0 E - ZREST_CONF_MISC EMAIL_ID - 0005 AD_SMTPADR 0 E - ZREST_CONF_MISC MAIL_BODY_TXT - 0006 TDOBNAME 0 E - ZREST_CONF_MISC RETRY_METHOD - 0007 ZRETRY_METHOD 0 X @@ -83,6 +69,12 @@ E + + + ZREST_CONF_MISC + ZRES + + diff --git a/src/zrest/zrest_conf_miscs.tobj.xml b/src/zrest/zrest_conf_miscs.tobj.xml index 11f2de8..6a9a7f5 100644 --- a/src/zrest/zrest_conf_miscs.tobj.xml +++ b/src/zrest/zrest_conf_miscs.tobj.xml @@ -33,7 +33,6 @@ ZREST_CONF_MISC ZREST - ZREST 1 9002 X diff --git a/src/zrest/zrest_global.tabl.xml b/src/zrest/zrest_global.tabl.xml index 089ab7c..b4bc9d8 100644 --- a/src/zrest/zrest_global.tabl.xml +++ b/src/zrest/zrest_global.tabl.xml @@ -19,9 +19,7 @@ - ZREST_GLOBAL MESSAGE_RETENTION - 0001 X ZMESSAGE_RETENTION 0 @@ -29,9 +27,7 @@ E - ZREST_GLOBAL LINEAR_RETRY_DURATION - 0002 X ZLINEAR_RETRY_DURATION 0 @@ -39,6 +35,12 @@ E + + + ZREST_GLOBAL + ZRES + + diff --git a/src/zrest/zrest_globals.tobj.xml b/src/zrest/zrest_globals.tobj.xml index 7632eaf..51e453d 100644 --- a/src/zrest/zrest_globals.tobj.xml +++ b/src/zrest/zrest_globals.tobj.xml @@ -32,7 +32,6 @@ ZREST_GLOBAL ZREST - ZREST 2 9089 9090 diff --git a/src/zrest/zrest_mo_payload.tabl.xml b/src/zrest/zrest_mo_payload.tabl.xml index c2d9cdd..1c9daec 100644 --- a/src/zrest/zrest_mo_payload.tabl.xml +++ b/src/zrest/zrest_mo_payload.tabl.xml @@ -20,9 +20,7 @@ - ZREST_MO_PAYLOAD MANDT - 0001 X MANDT 0 @@ -30,9 +28,7 @@ E - ZREST_MO_PAYLOAD MESSAGEID - 0002 X ZMID 0 @@ -40,9 +36,7 @@ E - ZREST_MO_PAYLOAD STATUS - 0003 X INT4 0 @@ -50,9 +44,7 @@ E - ZREST_MO_PAYLOAD RETRY_NUM - 0004 X ZQ_COUNTE 0 @@ -60,89 +52,67 @@ E - ZREST_MO_PAYLOAD CONTENT_TYPE_REQ - 0005 CHAR100 0 E - ZREST_MO_PAYLOAD CONTENT_TYPE_RES - 0006 CHAR100 0 E - ZREST_MO_PAYLOAD INTERFACE_ID - 0007 ZINTERFACE_ID 0 E - ZREST_MO_PAYLOAD URI - 0008 ZURI 0 E - ZREST_MO_PAYLOAD METHOD - 0009 CHAR20 0 E - ZREST_MO_PAYLOAD BUSINESSID - 0010 ZBUSINESSID 0 E - ZREST_MO_PAYLOAD FIRST_ATTEMPT - 0011 TIMESTAMP 0 E - ZREST_MO_PAYLOAD PAYLOAD - 0012 HTTPBODY 0 E - ZREST_MO_PAYLOAD RESPONSE - 0013 HTTPBODY 0 E - ZREST_MO_PAYLOAD HEADERS - 0014 HTTPBODY 0 E - ZREST_MO_PAYLOAD PROGRAMHEADERS - 0015 HTTPBODY 0 E diff --git a/src/zrest/zrest_mon_header.tabl.xml b/src/zrest/zrest_mon_header.tabl.xml index eed1eea..6b8689b 100644 --- a/src/zrest/zrest_mon_header.tabl.xml +++ b/src/zrest/zrest_mon_header.tabl.xml @@ -20,9 +20,7 @@ - ZREST_MON_HEADER MANDT - 0001 X MANDT 0 @@ -30,9 +28,7 @@ E - ZREST_MON_HEADER MESSAGEID - 0002 X ZMID 0 @@ -40,9 +36,7 @@ E - ZREST_MON_HEADER TYPE - 0003 X CHAR20 0 @@ -50,9 +44,7 @@ E - ZREST_MON_HEADER NAME - 0004 X ZHEADERPARAM 0 @@ -60,25 +52,19 @@ E - ZREST_MON_HEADER VALUE - 0005 ZHEADERPARAM 0 E - ZREST_MON_HEADER REQUEST - 0006 HTTPBODY 0 E - ZREST_MON_HEADER RESPONSE - 0007 HTTPBODY 0 E diff --git a/src/zrest/zrest_mon_trace.tabl.xml b/src/zrest/zrest_mon_trace.tabl.xml index 96fbd8c..94be8f0 100644 --- a/src/zrest/zrest_mon_trace.tabl.xml +++ b/src/zrest/zrest_mon_trace.tabl.xml @@ -20,9 +20,7 @@ - ZREST_MON_TRACE MANDT - 0001 X MANDT 0 @@ -30,9 +28,7 @@ E - ZREST_MON_TRACE ZMESSAGEID - 0002 X ZMID 0 @@ -40,52 +36,40 @@ E - ZREST_MON_TRACE ZCLASSNAME - 0003 ZCLASSNAME 0 E - ZREST_MON_TRACE ZMETHODNAME - 0004 ZMETHODNAME 0 E - ZREST_MON_TRACE ZEXEDATE - 0005 ZEXEDATE 0 T E - ZREST_MON_TRACE ZEXETIME - 0006 ZEXETIME 0 T E - ZREST_MON_TRACE ZCOMPDATE - 0007 ZCOMDATE 0 T E - ZREST_MON_TRACE ZCOMPTIME - 0008 ZCOMTIME 0 T diff --git a/src/zrest/zrest_monitor.tabl.xml b/src/zrest/zrest_monitor.tabl.xml index 9c4c349..7989b05 100644 --- a/src/zrest/zrest_monitor.tabl.xml +++ b/src/zrest/zrest_monitor.tabl.xml @@ -21,9 +21,7 @@ - ZREST_MONITOR MANDT - 0001 X MANDT 0 @@ -31,9 +29,7 @@ E - ZREST_MONITOR ZMESSAGEID - 0002 X ZMID 0 @@ -41,88 +37,67 @@ E - ZREST_MONITOR ZUSER - 0003 ZUSRNAME 0 E - ZREST_MONITOR ZEXEDATE - 0004 ZEXEDATE 0 T E - ZREST_MONITOR ZEXETIME - 0005 ZEXETIME 0 T E - ZREST_MONITOR ZCOMPDATE - 0006 ZCOMDATE 0 T E - ZREST_MONITOR ZCOMPTIME - 0007 ZCOMTIME 0 T E - ZREST_MONITOR ZDURATION - 0008 TZNTSTMPL 0 E - ZREST_MONITOR RERTYNUM - 0009 ZQ_COUNTE 0 E - ZREST_MONITOR ZRETRYDATE - 0010 ZRETRYDATE 0 T E - ZREST_MONITOR ZRETRYTIME - 0011 ZRETRYTIME 0 T E - ZREST_MONITOR SUBMIT_DATE - E - 0012 0 D 000016 @@ -133,10 +108,7 @@ T - ZREST_MONITOR SUBMIT_TIME - E - 0013 0 T 000012 @@ -147,122 +119,91 @@ T - ZREST_MONITOR ZMESSAGENUM - 0014 ZMESSAGENUM 0 E - ZREST_MONITOR STATUS - 0015 CHAR255 0 E - ZREST_MONITOR REASON - 0016 CHAR255 0 E - ZREST_MONITOR METHOD - 0017 CHAR20 0 E - ZREST_MONITOR HTTPSTATUS - 0018 INT4 0 E - ZREST_MONITOR DESTINATION - 0019 CHAR80 0 E - ZREST_MONITOR HOST - 0020 CHAR255 0 E - ZREST_MONITOR URI - 0021 ZURI 0 E - ZREST_MONITOR INTERFACE_ID - 0022 ZINTERFACE_ID 0 E - ZREST_MONITOR CALLING_PROGRAM - 0023 ZCLASSNAME 0 E - ZREST_MONITOR CALLING_METHOD - 0024 ZMETHODNAME 0 E - ZREST_MONITOR BUSINESSID - 0025 ZBUSINESSID 0 E - ZREST_MONITOR MAIL_SENT - 0026 CHAR1 0 E - ZREST_MONITOR ZDELETE - 0027 CHAR1 0 E - ZREST_MONITOR DELETEUSER - E - 0028 0 C 000024 @@ -272,10 +213,7 @@ Deleted by Username - ZREST_MONITOR DELETEDATE - E - 0029 0 D 000016 @@ -286,10 +224,7 @@ T - ZREST_MONITOR DELETETIME - E - 0030 0 T 000012 diff --git a/src/zrest/zrest_monitorlog.tabl.xml b/src/zrest/zrest_monitorlog.tabl.xml index a807f8c..54b6f1a 100644 --- a/src/zrest/zrest_monitorlog.tabl.xml +++ b/src/zrest/zrest_monitorlog.tabl.xml @@ -20,9 +20,7 @@ - ZREST_MONITORLOG MANDT - 0001 X MANDT 0 @@ -30,9 +28,7 @@ E - ZREST_MONITORLOG ZMESSAGEID - 0002 X ZMID 0 @@ -40,9 +36,7 @@ E - ZREST_MONITORLOG RETRY_NUM - 0003 X INT4 0 @@ -50,9 +44,7 @@ E - ZREST_MONITORLOG REPONSE - 0004 EFG_DTE_ASCIILINE 0 E diff --git a/src/zrest/zrest_retries.tabl.xml b/src/zrest/zrest_retries.tabl.xml index aa42750..8d20277 100644 --- a/src/zrest/zrest_retries.tabl.xml +++ b/src/zrest/zrest_retries.tabl.xml @@ -20,9 +20,7 @@ - ZREST_RETRIES MANDT - 0001 X MANDT 0 @@ -30,9 +28,7 @@ E - ZREST_RETRIES ZMESSAGEID - 0002 X ZMID 0 @@ -40,9 +36,7 @@ E - ZREST_RETRIES RETRY_NUM - 0003 X INT4 0 @@ -50,18 +44,14 @@ E - ZREST_RETRIES RETRYDATE - 0004 ZRETRYDATE 0 T E - ZREST_RETRIES RETRYTIME - 0005 ZRETRYTIME 0 T diff --git a/src/zrest/zrest_retry_limi.tabl.xml b/src/zrest/zrest_retry_limi.tabl.xml index 67a88a7..5941c5f 100644 --- a/src/zrest/zrest_retry_limi.tabl.xml +++ b/src/zrest/zrest_retry_limi.tabl.xml @@ -10,75 +10,57 @@ - ZREST_RETRY_LIMI INTERFACE_ID - 0001 ZINTERFACE_ID 0 E - ZREST_RETRY_LIMI METHOD - 0002 ZINTERFACE_METHOD 0 E - ZREST_RETRY_LIMI MAX_RETRY - 0003 ZQ_COUNTE 0 E - ZREST_RETRY_LIMI ZMESSAGEID - 0004 ZMID 0 E - ZREST_RETRY_LIMI ZUSER - 0005 ZREST_UNAME 0 E - ZREST_RETRY_LIMI ZEXEDATE - 0006 ZEXEDATE 0 T E - ZREST_RETRY_LIMI ZEXETIME - 0007 ZEXETIME 0 T E - ZREST_RETRY_LIMI DESTINATION - 0008 CHAR80 0 E - ZREST_RETRY_LIMI MESSAGE - 0009 BAPI_MSG 0 E diff --git a/src/zrest/zrest_srtuct_config.tabl.xml b/src/zrest/zrest_srtuct_config.tabl.xml index 8dd7d1b..586ca8d 100644 --- a/src/zrest/zrest_srtuct_config.tabl.xml +++ b/src/zrest/zrest_srtuct_config.tabl.xml @@ -10,34 +10,26 @@ - ZREST_SRTUCT_CONFIG INTERFACE_ID - 0001 ZINTERFACE_ID 0 E - ZREST_SRTUCT_CONFIG METHOD - 0002 ZINTERFACE_METHOD 0 E - ZREST_SRTUCT_CONFIG DESTINATION - 0003 RFCDEST 0 D E - ZREST_SRTUCT_CONFIG MAX_RETRY - 0004 ZQ_COUNTE 0 E diff --git a/src/zrest/zretry_method.doma.xml b/src/zrest/zretry_method.doma.xml index b35dc9e..d2e28c8 100644 --- a/src/zrest/zretry_method.doma.xml +++ b/src/zrest/zretry_method.doma.xml @@ -13,14 +13,12 @@ - ZRETRY_METHOD 0001 E 0 Regular - ZRETRY_METHOD 0002 E 1 diff --git a/src/zrest/zts_interface_id.tabl.xml b/src/zrest/zts_interface_id.tabl.xml index f0f20c5..8424f29 100644 --- a/src/zrest/zts_interface_id.tabl.xml +++ b/src/zrest/zts_interface_id.tabl.xml @@ -10,9 +10,7 @@ - ZTS_INTERFACE_ID INTERFACE_ID - 0001 ZINTERFACE_ID 0 E diff --git a/src/zssf_con/z_register.fugr.lz_registerf00.abap b/src/zssf_con/z_register.fugr.lz_registerf00.abap index 4e12b58..722fe1a 100644 --- a/src/zssf_con/z_register.fugr.lz_registerf00.abap +++ b/src/zssf_con/z_register.fugr.lz_registerf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 10/13/2017 at 02:23:03 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zssf_con/z_register.fugr.lz_registeri00.abap b/src/zssf_con/z_register.fugr.lz_registeri00.abap index 785bed8..c265046 100644 --- a/src/zssf_con/z_register.fugr.lz_registeri00.abap +++ b/src/zssf_con/z_register.fugr.lz_registeri00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 10/09/2017 at 02:31:43 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zssf_con/z_register.fugr.lz_registert00.abap b/src/zssf_con/z_register.fugr.lz_registert00.abap index 3bb5e1a..43df0c3 100644 --- a/src/zssf_con/z_register.fugr.lz_registert00.abap +++ b/src/zssf_con/z_register.fugr.lz_registert00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 10/09/2017 at 02:31:43 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZREGISTER.......................................* DATA: BEGIN OF STATUS_ZREGISTER . "state vector diff --git a/src/zssf_con/z_register.fugr.lz_registertop.abap b/src/zssf_con/z_register.fugr.lz_registertop.abap index 29c8fcc..6fd20ea 100644 --- a/src/zssf_con/z_register.fugr.lz_registertop.abap +++ b/src/zssf_con/z_register.fugr.lz_registertop.abap @@ -1,4 +1,3 @@ -* regenerated at 10/09/2017 02:31:43 FUNCTION-POOL Z_REGISTER MESSAGE-ID SV. * INCLUDE LZ_REGISTERD... " Local class definition diff --git a/src/zssf_con/z_register.fugr.saplz_register.abap b/src/zssf_con/z_register.fugr.saplz_register.abap index 7647bd5..4bc829b 100644 --- a/src/zssf_con/z_register.fugr.saplz_register.abap +++ b/src/zssf_con/z_register.fugr.saplz_register.abap @@ -1,4 +1,3 @@ -* regenerated at 10/09/2017 02:31:43 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zssf_con/z_register.fugr.tableframe_z_register.abap b/src/zssf_con/z_register.fugr.tableframe_z_register.abap index 1d7ddfd..f60134a 100644 --- a/src/zssf_con/z_register.fugr.tableframe_z_register.abap +++ b/src/zssf_con/z_register.fugr.tableframe_z_register.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_Z_REGISTER -* generation date: 10/09/2017 at 02:31:43 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_Z_REGISTER . diff --git a/src/zssf_con/z_register.fugr.tableproc_z_register.abap b/src/zssf_con/z_register.fugr.tableproc_z_register.abap index 53ad884..ce800df 100644 --- a/src/zssf_con/z_register.fugr.tableproc_z_register.abap +++ b/src/zssf_con/z_register.fugr.tableproc_z_register.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_Z_REGISTER -* generation date: 10/09/2017 at 02:31:43 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_Z_REGISTER . diff --git a/src/zssf_con/z_register.fugr.xml b/src/zssf_con/z_register.fugr.xml index 12dea54..6a45a6e 100644 --- a/src/zssf_con/z_register.fugr.xml +++ b/src/zssf_con/z_register.fugr.xml @@ -6,8 +6,8 @@ LZ_REGISTERF00 LZ_REGISTERI00 - LZ_REGISTERTOP LZ_REGISTERT00 + LZ_REGISTERTOP SAPLZ_REGISTER @@ -61,55 +61,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -192,103 +183,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -402,7 +376,6 @@ TCTRL_ZREGISTER TEXT *ZREGISTER-OBJNAM - Object_Name_____________________________ 001 001 040 @@ -419,7 +392,6 @@ TCTRL_ZREGISTER TEXT *ZREGISTER-INTERFACE_ID - Inter_ID________________________________ 001 002 040 @@ -487,19 +459,19 @@ PROCESS BEFORE OUTPUT. - MODULE LISTE_INITIALISIEREN. + MODULE LISTE_INITIALISIEREN. - LOOP AT EXTRACT WITH CONTROL + LOOP AT EXTRACT WITH CONTROL - TCTRL_ZREGISTER CURSOR NEXTLINE. + TCTRL_ZREGISTER CURSOR NEXTLINE. - MODULE LISTE_SHOW_LISTE. + MODULE LISTE_SHOW_LISTE. - ENDLOOP. + ENDLOOP. * @@ -508,84 +480,57 @@ PROCESS AFTER INPUT. - MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. + MODULE LISTE_EXIT_COMMAND AT EXIT-COMMAND. - MODULE LISTE_BEFORE_LOOP. + MODULE LISTE_BEFORE_LOOP. - LOOP AT EXTRACT. + LOOP AT EXTRACT. - MODULE LISTE_INIT_WORKAREA. + MODULE LISTE_INIT_WORKAREA. - CHAIN. + CHAIN. - FIELD ZREGISTER-OBJNAM . + FIELD ZREGISTER-OBJNAM . - FIELD ZREGISTER-INTERFACE_ID . + FIELD ZREGISTER-INTERFACE_ID . - MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. + MODULE SET_UPDATE_FLAG ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. + FIELD VIM_MARKED MODULE LISTE_MARK_CHECKBOX. - CHAIN. + CHAIN. - FIELD ZREGISTER-OBJNAM . + FIELD ZREGISTER-OBJNAM . - FIELD ZREGISTER-INTERFACE_ID . + FIELD ZREGISTER-INTERFACE_ID . - MODULE LISTE_UPDATE_LISTE. + MODULE LISTE_UPDATE_LISTE. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE LISTE_AFTER_LOOP. + MODULE LISTE_AFTER_LOOP. - - 0 - 1 - 1 - 2 - 3 - 1 - 0 - 0 - 1 - 1 - 1 - 3 - 3 - 4 - 4 - 4 - 3 - 3 - 3 - 4 - 4 - 4 - 3 - 1 - 1 - diff --git a/src/zssf_con/zcl_ssf_utility.clas.xml b/src/zssf_con/zcl_ssf_utility.clas.xml index 762961f..f830a46 100644 --- a/src/zssf_con/zcl_ssf_utility.clas.xml +++ b/src/zssf_con/zcl_ssf_utility.clas.xml @@ -13,115 +13,96 @@ - ZCL_SSF_UTILITY DECODE_SIGN E Decrypt key with SSL Cllient ID - ZCL_SSF_UTILITY GC_PRIMARY_APPLIC E SSL Client Identity - ZCL_SSF_UTILITY GC_SECONDARY_APPLIC E SSL Client Identity - ZCL_SSF_UTILITY GET_APPLIC_FROM_ZTVARVC E Get Default Applic Name from ZTVARVC - SSL_CLIENT_ID - ZCL_SSF_UTILITY GO_ACCESS_KEY E ADF : Manage Access Key/Secret - ZCL_SSF_UTILITY GS_ADF_CONFIG E SAP-Azure Data Framework Configurations - ZCL_SSF_UTILITY GS_SSF_DATA E Configure Interface URI Destination - ZCL_SSF_UTILITY GV_APPLIC E SSL Client Identity - ZCL_SSF_UTILITY GV_INTERFACE_ID E Interface ID - ZCL_SSF_UTILITY GV_NEW E Boolean Variable (X=true, -=false, space=unknown) - ZCL_SSF_UTILITY INSERT_KEY E Insert the Key/Secret - ZCL_SSF_UTILITY INSERT_KEY_WITH_DEFAULT_PSE E Insert Key with Default PSE - ZCL_SSF_UTILITY INSERT_KEY_WITH_PRIMARY E Insert Key Using Primary Cert - ZCL_SSF_UTILITY INSERT_KEY_WITH_SECONDARY E Insert Key Using Secondary Cert - ZCL_SSF_UTILITY READ_KEY E Read the Key/Secret - ZCL_SSF_UTILITY READ_KEY_WITH_DEFAULT_PSE E Read the Key with Default PSE - ZCL_SSF_UTILITY READ_KEY_WITH_PRIMARY E Read Key using Primary Cert - ZCL_SSF_UTILITY READ_KEY_WITH_SECONDARY E Read Key using Secondary Cert - ZCL_SSF_UTILITY SET_GLOBAL_PARAMETERS E Set Global Parameters diff --git a/src/zssf_con/zcx_ssf_utility.clas.xml b/src/zssf_con/zcx_ssf_utility.clas.xml index f26101f..a2be6e4 100644 --- a/src/zssf_con/zcx_ssf_utility.clas.xml +++ b/src/zssf_con/zcx_ssf_utility.clas.xml @@ -15,324 +15,443 @@
- 000D3A043FF51ED7ABFF68746B1400D0 + 000D3A0176021EDA958F19932839A14F E 1 CA==
- 000D3A043FF51ED7ABFF68746B1400D0 + 000D3A0176021EDA958F19932839A14F E 0001 X R 255 - Error in retrieving attributes of certificate for interface ID &INTERFACE_ID& + Import of Encrypted data failed for Interface ID : &INTERFACE_ID&
- 000D3A043FF51ED7ABFF6B03822860D0 + 000D3A0176021EDA958F19932839C14F E 1 CA==
- 000D3A043FF51ED7ABFF6B03822860D0 + 000D3A0176021EDA958F19932839C14F E 0001 X R 255 - Error in conversion of Key string for interface ID &INTERFACE_ID& + SSF Config Not Found for Interface Id : &INTERFACE_ID&
- 000D3A043FF51ED7ABFF68746B1420D0 + 000D3A0176021EDA958F19932839E14F E 1 CA==
- 000D3A043FF51ED7ABFF68746B1420D0 + 000D3A0176021EDA958F19932839E14F E 0001 X R 255 - Error in decoding of key for interface ID &INTERFACE_ID& + Update in cluster table failed for key encryption
- 000D3A043FF51ED7ABFF68746B13E0D0 + 000D3A0176021EDA958F1993283A014F E 1 CA==
- 000D3A043FF51ED7ABFF68746B13E0D0 + 000D3A0176021EDA958F1993283A014F E 0001 X R 255 - Error in getting instance of certificate for interface ID &INTERFACE_ID& + &TEXT&
- 000D3A043FF51ED7ABFF719B9870C0D0 + 000D3A043FF51ED7ABFF6218D13E80D0 E 1 CA==
- 000D3A043FF51ED7ABFF719B9870C0D0 + 000D3A043FF51ED7ABFF6218D13E80D0 E 0001 X R 255 - Error in importing encoded Key value for interface ID &INTERFACE_ID& + Program not authorized to decode for interface ID &INTERFACE_ID&
- 000D3A043FF51ED7ABFF67B5151F40D0 + 000D3A043FF51ED7ABFF67B5151F20D0 E 1 CA==
- 000D3A043FF51ED7ABFF67B5151F40D0 + 000D3A043FF51ED7ABFF67B5151F20D0 E 0001 X R 255 - Error in Key encryption for interface ID &INTERFACE_ID& + Key not Maintained for interface ID &INTERFACE_ID&
- 000D3A043FF51ED7ABFF697040EBE0D0 + 000D3A043FF51ED7ABFF67B5151F40D0 E 1 CA==
- 000D3A043FF51ED7ABFF697040EBE0D0 + 000D3A043FF51ED7ABFF67B5151F40D0 E 0001 X R 255 - Error in retrieving encoded Key for interface ID &INTERFACE_ID& + Error in Key encryption for interface ID &INTERFACE_ID&
- AC162D8534601ED797AC1D7511E39453 + 000D3A043FF51ED7ABFF67B5151F60D0 E 1 CA==
- AC162D8534601ED797AC1D7511E39453 + 000D3A043FF51ED7ABFF67B5151F60D0 E 0001 X R 255 - Execution process terminated + Error in getting PSE filename for interface ID &INTERFACE_ID&
- 000D3A043FF51ED7ABFF67B5151F20D0 + 000D3A043FF51ED7ABFF68746B13E0D0 E 1 CA==
- 000D3A043FF51ED7ABFF67B5151F20D0 + 000D3A043FF51ED7ABFF68746B13E0D0 E 0001 X R 255 - Key not Maintained for interface ID &INTERFACE_ID& + Error in getting instance of certificate for interface ID &INTERFACE_ID&
- 000D3A043FF51ED7ABFF6218D13E80D0 + 000D3A043FF51ED7ABFF68746B1400D0 E 1 CA==
- 000D3A043FF51ED7ABFF6218D13E80D0 + 000D3A043FF51ED7ABFF68746B1400D0 E 0001 X R 255 - Program not authorized to decode for interface ID &INTERFACE_ID& + Error in retrieving attributes of certificate for interface ID &INTERFACE_ID&
- 000D3A043FF51ED7ABFF67B5151F60D0 + 000D3A043FF51ED7ABFF68746B1420D0 E 1 CA==
- 000D3A043FF51ED7ABFF67B5151F60D0 + 000D3A043FF51ED7ABFF68746B1420D0 E 0001 X R 255 - Error in getting PSE filename for interface ID &INTERFACE_ID& + Error in decoding of key for interface ID &INTERFACE_ID&
- 000D3A043FF51ED7ABFF70080EFC60D0 + 000D3A043FF51ED7ABFF697040EBE0D0 E 1 CA==
- 000D3A043FF51ED7ABFF70080EFC60D0 + 000D3A043FF51ED7ABFF697040EBE0D0 E 0001 X R 255 - SSL client ID not maintained for interface ID &INTERFACE_ID& + Error in retrieving encoded Key for interface ID &INTERFACE_ID&
- 000D3A0176021EDA958F1993283A014F + 000D3A043FF51ED7ABFF6B03822860D0 E 1 CA==
- 000D3A0176021EDA958F1993283A014F + 000D3A043FF51ED7ABFF6B03822860D0 E 0001 X R 255 - &TEXT& + Error in conversion of Key string for interface ID &INTERFACE_ID&
- 000D3A0176021EDA958F19932839C14F + 000D3A043FF51ED7ABFF70080EFC60D0 E 1 CA==
- 000D3A0176021EDA958F19932839C14F + 000D3A043FF51ED7ABFF70080EFC60D0 E 0001 X R 255 - SSF Config Not Found for Interface Id : &INTERFACE_ID& + SSL client ID not maintained for interface ID &INTERFACE_ID&
- 000D3A0176021EDA958F19932839E14F + 000D3A043FF51ED7ABFF719B9870C0D0 E 1 CA==
- 000D3A0176021EDA958F19932839E14F + 000D3A043FF51ED7ABFF719B9870C0D0 E 0001 X R 255 - Update in cluster table failed for key encryption + Error in importing encoded Key value for interface ID &INTERFACE_ID&
- 000D3A0176021EDA958F19932839A14F + AC162D8534601ED797AC1D7511E39453 E 1 CA==
- 000D3A0176021EDA958F19932839A14F + AC162D8534601ED797AC1D7511E39453 E 0001 X R 255 - Import of Encrypted data failed for Interface ID : &INTERFACE_ID& + Execution process terminated
+ + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A0176021EDA958F19932839A14F + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A0176021EDA958F19932839C14F + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A0176021EDA958F19932839E14F + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A0176021EDA958F1993283A014F + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF6218D13E80D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF67B5151F20D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF67B5151F40D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF67B5151F60D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF68746B13E0D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF68746B1400D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF68746B1420D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF697040EBE0D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF6B03822860D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF70080EFC60D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + 000D3A043FF51ED7ABFF719B9870C0D0 + 0001 + + + LIMU + CPUB + ZCX_SSF_UTILITY + AC162D8534601ED797AC1D7511E39453 + 0001 + + + + + LIMU + CPUB + ZCX_SSF_UTILITY + 0001 + + - ZCX_SSF_UTILITY CONSTRUCTOR E CONSTRUCTOR - ZCX_SSF_UTILITY INTERFACE_ID E Interface ID - ZCX_SSF_UTILITY TEXT E Manage Key Exceptions diff --git a/src/zssf_con/zregister s.tobj.xml b/src/zssf_con/zregister s.tobj.xml index 22a1865..09b82e2 100644 --- a/src/zssf_con/zregister s.tobj.xml +++ b/src/zssf_con/zregister s.tobj.xml @@ -5,6 +5,7 @@ ZREGISTER S + X CUSY 2 3 @@ -32,7 +33,6 @@ ZREGISTER Z_REGISTER - ZSSF_CON 1 0001 X diff --git a/src/zssf_con/zssf_con_indx.tabl.xml b/src/zssf_con/zssf_con_indx.tabl.xml index 33f6b39..d08769f 100644 --- a/src/zssf_con/zssf_con_indx.tabl.xml +++ b/src/zssf_con/zssf_con_indx.tabl.xml @@ -19,9 +19,7 @@ - ZSSF_CON_INDX MANDT - 0001 X MANDT 0 @@ -29,9 +27,7 @@ E - ZSSF_CON_INDX RELID - 0002 X INDX_RELID 0 @@ -39,9 +35,7 @@ E - ZSSF_CON_INDX SRTFD - 0003 X INDX_SRTFD 0 @@ -49,9 +43,7 @@ E - ZSSF_CON_INDX SRTF2 - 0004 X INDX_SRTF2 0 @@ -59,50 +51,38 @@ E - ZSSF_CON_INDX ZDEL_IND - 0005 SYCHAR01 0 E - ZSSF_CON_INDX AEDAT - 0006 SYDATS 0 T E - ZSSF_CON_INDX USERA - 0007 USERNAME 0 E - ZSSF_CON_INDX PGMID - 0008 PROGNAME 0 E - ZSSF_CON_INDX CLUSTR - 0009 INDX_CLSTR 0 E - ZSSF_CON_INDX CLUSTD - 0010 INDX_CLUST 0 E diff --git a/src/zssf_con/zssf_data s.tobj.xml b/src/zssf_con/zssf_data s.tobj.xml index 876143f..e5588f7 100644 --- a/src/zssf_con/zssf_data s.tobj.xml +++ b/src/zssf_con/zssf_data s.tobj.xml @@ -32,7 +32,6 @@ ZSSF_DATA ZSSF_FG - ZSSF_CON 1 0001 X diff --git a/src/zssf_con/zssf_data.tabl.xml b/src/zssf_con/zssf_data.tabl.xml index 244804c..3be5a2b 100644 --- a/src/zssf_con/zssf_data.tabl.xml +++ b/src/zssf_con/zssf_data.tabl.xml @@ -21,9 +21,7 @@ - ZSSF_DATA MANDT - 0001 X MANDT 0 @@ -31,9 +29,7 @@ E - ZSSF_DATA INTERFACE_ID - 0002 X ZINTERFACE_ID 0 @@ -41,14 +37,18 @@ E - ZSSF_DATA ZKEY - 0003 ZSSF_KEY 0 E + + + ZSSF_DATA + ZSSF + + diff --git a/src/zssf_con/zssf_fg.fugr.lzssf_fgf00.abap b/src/zssf_con/zssf_fg.fugr.lzssf_fgf00.abap index 6d5bd44..722fe1a 100644 --- a/src/zssf_con/zssf_fg.fugr.lzssf_fgf00.abap +++ b/src/zssf_con/zssf_fg.fugr.lzssf_fgf00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related FORM routines -* generation date: 04/20/2022 at 04:41:32 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* * base table related FORM-routines............. diff --git a/src/zssf_con/zssf_fg.fugr.lzssf_fgi00.abap b/src/zssf_con/zssf_fg.fugr.lzssf_fgi00.abap index e95d8e6..c265046 100644 --- a/src/zssf_con/zssf_fg.fugr.lzssf_fgi00.abap +++ b/src/zssf_con/zssf_fg.fugr.lzssf_fgi00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related PAI modules -* generation date: 04/20/2022 at 04:41:32 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* INCLUDE LSVIMITX . "base table related PAI modules diff --git a/src/zssf_con/zssf_fg.fugr.lzssf_fgt00.abap b/src/zssf_con/zssf_fg.fugr.lzssf_fgt00.abap index 0dbe51d..5cefd90 100644 --- a/src/zssf_con/zssf_fg.fugr.lzssf_fgt00.abap +++ b/src/zssf_con/zssf_fg.fugr.lzssf_fgt00.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * view related data declarations -* generation date: 19.03.2018 at 12:06:49 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* *...processing: ZSSF_DATA.......................................* DATA: BEGIN OF STATUS_ZSSF_DATA . "state vector diff --git a/src/zssf_con/zssf_fg.fugr.lzssf_fgtop.abap b/src/zssf_con/zssf_fg.fugr.lzssf_fgtop.abap index a6946ac..7367add 100644 --- a/src/zssf_con/zssf_fg.fugr.lzssf_fgtop.abap +++ b/src/zssf_con/zssf_fg.fugr.lzssf_fgtop.abap @@ -1,4 +1,3 @@ -* regenerated at 19.03.2018 12:05:53 FUNCTION-POOL ZSSF_FG MESSAGE-ID SV. * INCLUDE LZSSF_FGD... " Local class definition diff --git a/src/zssf_con/zssf_fg.fugr.saplzssf_fg.abap b/src/zssf_con/zssf_fg.fugr.saplzssf_fg.abap index 1b24e1b..5ee08d0 100644 --- a/src/zssf_con/zssf_fg.fugr.saplzssf_fg.abap +++ b/src/zssf_con/zssf_fg.fugr.saplzssf_fg.abap @@ -1,4 +1,3 @@ -* regenerated at 19.03.2018 12:05:53 ******************************************************************* * System-defined Include-files. * ******************************************************************* diff --git a/src/zssf_con/zssf_fg.fugr.tableframe_zssf_fg.abap b/src/zssf_con/zssf_fg.fugr.tableframe_zssf_fg.abap index 7511f37..d985bcd 100644 --- a/src/zssf_con/zssf_fg.fugr.tableframe_zssf_fg.abap +++ b/src/zssf_con/zssf_fg.fugr.tableframe_zssf_fg.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEFRAME_ZSSF_FG -* generation date: 19.03.2018 at 12:06:49 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEFRAME_ZSSF_FG . diff --git a/src/zssf_con/zssf_fg.fugr.tableproc_zssf_fg.abap b/src/zssf_con/zssf_fg.fugr.tableproc_zssf_fg.abap index c769c55..74d6630 100644 --- a/src/zssf_con/zssf_fg.fugr.tableproc_zssf_fg.abap +++ b/src/zssf_con/zssf_fg.fugr.tableproc_zssf_fg.abap @@ -1,7 +1,5 @@ *---------------------------------------------------------------------* * program for: TABLEPROC_ZSSF_FG -* generation date: 19.03.2018 at 12:06:49 -* view maintenance generator version: #001407# *---------------------------------------------------------------------* FUNCTION TABLEPROC_ZSSF_FG . diff --git a/src/zssf_con/zssf_fg.fugr.xml b/src/zssf_con/zssf_fg.fugr.xml index e719273..e5823e6 100644 --- a/src/zssf_con/zssf_fg.fugr.xml +++ b/src/zssf_con/zssf_fg.fugr.xml @@ -9,8 +9,8 @@ LZSSF_FGI00 LZSSF_FGI01 LZSSF_FGO01 - LZSSF_FGTOP LZSSF_FGT00 + LZSSF_FGTOP SAPLZSSF_FG @@ -64,55 +64,46 @@ VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 001 VIEW_NAME P Name der Tabelle - 002 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 003 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 004 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 005 EXCL_CUA_FUNCT P Tabelle mit dynam. zu deaktivierenden CUA-Funkt. - 006 X_HEADER P Kontrollblocktabelle für die Tabelle - 007 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 008 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 009 @@ -195,103 +186,86 @@ FCODE P gewünschte Funktion des Bausteins - 001 VIEW_ACTION P Aktion mit Tabelle: anz./änd./transp. (S/U/T) - 002 VIEW_NAME P Name der Tabelle - 003 CORR_NUMBER P Korrekturnummer für durchgeführte Änderungen - 004 LAST_ACT_ENTRY P Index der Cursorposition in der Anzeigetabelle - 005 UCOMM P letztes User-command innerhalb der Viewpflege - 006 UPDATE_REQUIRED P Flag: Einträge verändert, Sichern erforderlich - 007 CORR_KEYTAB P Tabelle mit den Keys der zu transport. Einträge - 008 DBA_SELLIST P Selektionsbedingungen für den DB-Zugriff - 009 DPL_SELLIST P Selektionsbedingungen für die Anzeige - 010 EXCL_CUA_FUNCT P Tab. der nicht zu aktivierenden CUA-Funktionen - 011 EXTRACT P Tab. der gerade sichtbaren Daten (Anzeigetabelle - 012 TOTAL P Tabelle, mit allen von der DB gelesenen Daten - 013 X_HEADER P Kontrollblocktabelle für die Tabelle - 014 X_NAMTAB P Kontrollblocktabelle für die Tabellen-Felder - 015 MISSING_CORR_NUMBER X Korrekturnummer fehlt - 016 SAVING_CORRECTION_FAILED X Fehler beim Sichern der Korrektureinträge - 017 @@ -405,7 +379,6 @@ TCTRL_ZSSF_DATA TEXT *ZSSF_DATA-INTERFACE_ID - Inter_ID________________________________ 001 001 040 @@ -422,7 +395,6 @@ TCTRL_ZSSF_DATA TEXT *ZSSF_DATA-ZKEY - Key_Value_______________________________ 001 002 040 @@ -491,22 +463,22 @@ PROCESS BEFORE OUTPUT. - MODULE liste_initialisieren. + MODULE liste_initialisieren. - LOOP AT extract WITH CONTROL + LOOP AT extract WITH CONTROL - tctrl_zssf_data CURSOR nextline. + tctrl_zssf_data CURSOR nextline. - MODULE liste_show_liste. + MODULE liste_show_liste. - MODULE screen_change_pwd. + MODULE screen_change_pwd. - ENDLOOP. + ENDLOOP. * @@ -515,98 +487,66 @@ PROCESS AFTER INPUT. - MODULE liste_exit_command AT EXIT-COMMAND. + MODULE liste_exit_command AT EXIT-COMMAND. - MODULE liste_before_loop. + MODULE liste_before_loop. - LOOP AT extract. + LOOP AT extract. - MODULE liste_init_workarea. + MODULE liste_init_workarea. - CHAIN. + CHAIN. - FIELD zssf_data-interface_id . + FIELD zssf_data-interface_id . - FIELD zssf_data-zkey . + FIELD zssf_data-zkey . - MODULE set_update_flag ON CHAIN-REQUEST. + MODULE set_update_flag ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - FIELD vim_marked MODULE liste_mark_checkbox. + FIELD vim_marked MODULE liste_mark_checkbox. - CHAIN. + CHAIN. - FIELD zssf_data-interface_id . + FIELD zssf_data-interface_id . - MODULE liste_update_liste. + MODULE liste_update_liste. - ENDCHAIN. + ENDCHAIN. - CHAIN. + CHAIN. - FIELD zssf_data-zkey. + FIELD zssf_data-zkey. - MODULE validate_key ON CHAIN-REQUEST. + MODULE validate_key ON CHAIN-REQUEST. - ENDCHAIN. + ENDCHAIN. - ENDLOOP. + ENDLOOP. - MODULE liste_after_loop. + MODULE liste_after_loop. - - 0 - 0 - 2 - 2 - 3 - 4 - 4 - 2 - 0 - 0 - 2 - 2 - 2 - 4 - 4 - 6 - 6 - 6 - 4 - 4 - 4 - 6 - 6 - 4 - 4 - 6 - 6 - 4 - 2 - 2 -