SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-04-30 11:46:38 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

ecatt downport

Browse Source
This commit is contained in:
Christian Guenter 2018-08-06 11:21:43 +00:00 committed by Lars Hvam
parent 6ddd20e2b5
commit 6ef0357795
4 changed files with 58 additions and 43 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/objects/ecatt/zcl_abapgit_ecatt_val_obj_down.clas.abap
View File

@ -23,30 +23,6 @@ CLASS zcl_abapgit_ecatt_val_obj_down DEFINITION
download_data REDEFINITION.
PRIVATE SECTION.
" downport missing types
TYPES:
BEGIN OF ecvo_bus_msg.
INCLUDE TYPE etobj_key.
TYPES:
bus_msg_no TYPE etvo_msg_no,
arbgb TYPE arbgb,
msgnr TYPE msgnr,
bus_msg_text TYPE etvo_bus_msg_text,
otr_key TYPE sotr_conc,
msg_type TYPE etvo_msg_type,
END OF ecvo_bus_msg,
etvo_bus_msg_tabtype TYPE STANDARD TABLE OF ecvo_bus_msg,
etvo_invert_validation TYPE c LENGTH 1,
etvo_error_prio TYPE n LENGTH 1,
BEGIN OF etvoimpl_det,
impl_name TYPE c LENGTH 30, " etvo_impl_name
impl_type TYPE c LENGTH 1, " etvo_impl_type
impl_subtype TYPE c LENGTH 4, " etvo_impl_subtype
impl_package TYPE c LENGTH 255, " etvo_package
END OF etvoimpl_det.
DATA:
mv_xml_stream TYPE xstring,
mv_xml_stream_size TYPE int4.
@ -143,7 +119,7 @@ CLASS zcl_abapgit_ecatt_val_obj_down IMPLEMENTATION.
METHOD set_business_msgs.
DATA:
lt_buss_msg_ref TYPE etvo_bus_msg_tabtype,
lt_buss_msg_ref TYPE zif_abapgit_ecatt=>etvo_bus_msg_tabtype,
li_element TYPE REF TO if_ixml_element,
li_insert_objects TYPE REF TO if_ixml_element.
@ -181,8 +157,8 @@ CLASS zcl_abapgit_ecatt_val_obj_down IMPLEMENTATION.
METHOD set_ecatt_flags.
DATA:
lv_invert_validation TYPE etvo_invert_validation,
lv_error_prio TYPE etvo_error_prio,
lv_invert_validation TYPE zif_abapgit_ecatt=>etvo_invert_validation,
lv_error_prio TYPE zif_abapgit_ecatt=>etvo_error_prio,
li_element TYPE REF TO if_ixml_element,
li_insert_objects TYPE REF TO if_ixml_element.
@ -240,7 +216,7 @@ CLASS zcl_abapgit_ecatt_val_obj_down IMPLEMENTATION.
METHOD set_ecatt_impl_detail.
DATA:
ls_impl_details TYPE etvoimpl_det,
ls_impl_details TYPE zif_abapgit_ecatt=>etvoimpl_det,
li_element TYPE REF TO if_ixml_element,
li_insert_objects TYPE REF TO if_ixml_element.

19
src/objects/ecatt/zcl_abapgit_ecatt_val_obj_upl.clas.abap
View File

@ -29,17 +29,6 @@ CLASS zcl_abapgit_ecatt_val_obj_upl DEFINITION
cx_ecatt_apl.
PRIVATE SECTION.
TYPES:
etvo_invert_validation TYPE c LENGTH 1,
etvo_error_prio TYPE n LENGTH 1,
etvo_bus_msg_tabtype TYPE STANDARD TABLE OF ecvo_bus_msg,
BEGIN OF etvoimpl_det,
impl_name TYPE etvo_impl_name,
impl_type TYPE etvo_impl_type,
impl_subtype TYPE etvo_impl_subtype,
impl_package TYPE etvo_package,
END OF etvoimpl_det.
DATA:
mv_external_xml TYPE xstring.
@ -55,7 +44,7 @@ CLASS zcl_abapgit_ecatt_val_obj_upl IMPLEMENTATION.
" downport from CL_APL_ECATT_VO_UPLOAD
DATA: li_section TYPE REF TO if_ixml_element,
lt_buss_msg_ref TYPE etvo_bus_msg_tabtype,
lt_buss_msg_ref TYPE zif_abapgit_ecatt=>etvo_bus_msg_tabtype,
lv_exception_occurred TYPE etonoff,
lo_ecatt_vo TYPE REF TO object.
@ -102,7 +91,7 @@ CLASS zcl_abapgit_ecatt_val_obj_upl IMPLEMENTATION.
" downport from CL_APL_ECATT_VO_UPLOAD
DATA: li_section TYPE REF TO if_ixml_element,
ls_impl_details TYPE etvoimpl_det,
ls_impl_details TYPE zif_abapgit_ecatt=>etvoimpl_det,
lv_exception_occurred TYPE etonoff,
lo_ecatt_vo TYPE REF TO object.
@ -149,8 +138,8 @@ CLASS zcl_abapgit_ecatt_val_obj_upl IMPLEMENTATION.
" downport from CL_APL_ECATT_VO_UPLOAD
DATA: li_section TYPE REF TO if_ixml_element,
lv_error_prio TYPE etvo_error_prio,
lv_invert_validation TYPE etvo_invert_validation,
lv_error_prio TYPE zif_abapgit_ecatt=>etvo_error_prio,
lv_invert_validation TYPE zif_abapgit_ecatt=>etvo_invert_validation,
lv_exception_occurred TYPE etonoff,
lo_ecatt_vo TYPE REF TO object.

34
src/zif_abapgit_ecatt.intf.abap Normal file
View File

@ -0,0 +1,34 @@
INTERFACE zif_abapgit_ecatt
PUBLIC .
" downport missing types
TYPES:
etvo_invert_validation TYPE c LENGTH 1,
etvo_error_prio TYPE n LENGTH 1,
etvo_impl_name TYPE c LENGTH 30,
etvo_impl_type TYPE c LENGTH 1,
etvo_impl_subtype TYPE c LENGTH 4,
etvo_package TYPE c LENGTH 255,
BEGIN OF etvoimpl_det,
impl_name TYPE etvo_impl_name,
impl_type TYPE etvo_impl_type,
impl_subtype TYPE etvo_impl_subtype,
impl_package TYPE etvo_package,
END OF etvoimpl_det.
TYPES:
BEGIN OF ecvo_bus_msg.
INCLUDE TYPE etobj_key.
TYPES:
bus_msg_no TYPE c LENGTH 1, " etvo_msg_no
arbgb TYPE arbgb,
msgnr TYPE msgnr,
bus_msg_text TYPE string, "etvo_bus_msg_text
otr_key TYPE sotr_conc,
msg_type TYPE c LENGTH 4, "etvo_msg_type
END OF ecvo_bus_msg,
etvo_bus_msg_tabtype TYPE STANDARD TABLE OF ecvo_bus_msg.
ENDINTERFACE.

16
src/zif_abapgit_ecatt.intf.xml Normal file
View File

@ -0,0 +1,16 @@
<?xml version="1.0" encoding="utf-8"?>
<abapGit version="v1.0.0" serializer="LCL_OBJECT_INTF" serializer_version="v1.0.0">
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
<asx:values>
<VSEOINTERF>
<CLSNAME>ZIF_ABAPGIT_ECATT</CLSNAME>
<VERSION>1</VERSION>
<LANGU>E</LANGU>
<DESCRIPT>ECATT constants</DESCRIPT>
<EXPOSURE>2</EXPOSURE>
<STATE>1</STATE>
<UNICODE>X</UNICODE>
</VSEOINTERF>
</asx:values>
</asx:abap>
</abapGit>