Type
"! Type - type TYPE ty_field_type, - "!Name/Value
- "! Name/Value - name TYPE string, + type TYPE ty_field_type, + "!Name
+ "! Name + name TYPE string, + "!Value
+ "! Value + value TYPE string, END OF ty_field_to_check, "!Fields To Check
"! Fields to check diff --git a/src/zif_aff_aifp_v1.intf.abap b/src/zif_aff_aifp_v1.intf.abap index 5fb6fec..244c05b 100644 --- a/src/zif_aff_aifp_v1.intf.abap +++ b/src/zif_aff_aifp_v1.intf.abap @@ -13,28 +13,50 @@ INTERFACE zif_aff_aifp_v1 "! $values { @link zif_aff_aifp_v1.data:co_database_check_type } "! $default { @link zif_aff_aifp_v1.data:co_database_check_type.check_existence } ty_database_check_type TYPE c LENGTH 1. + TYPES: + "! $values { @link zif_aff_aifp_v1.data:co_field_type } + "! $default { @link zif_aff_aifp_v1.data:co_field_type.pattern } + ty_field_type TYPE c LENGTH 7. + TYPES: + "! $values { @link zif_aff_aifp_v1.data:co_variable_type } + "! $default { @link zif_aff_aifp_v1.data:co_variable_type.defined_field } + ty_variable_type TYPE c LENGTH 5. + TYPES: + "!Variable List
+ "! Variable list + BEGIN OF ty_variable, + "!Number
+ "! Number + "! $minimum 1 + "! $maximum 4 + number TYPE i, + "!Type
+ "! Type + type TYPE ty_variable_type, + "!Field
+ "! Field + field TYPE string, + "!Value
+ "! Value + value TYPE string, + END OF ty_variable. + TYPES: + "!Variable Details
+ "! Variable details + ty_variables TYPE STANDARD TABLE OF ty_variable WITH DEFAULT KEY. TYPES: "!Check Message
"! Check Message BEGIN OF ty_message, "!Message Class
"! Message class - message_class TYPE c LENGTH 20, + message_class TYPE c LENGTH 20, "!Message Number
"! Message number - message_number TYPE c LENGTH 3, - "!Message Variable 1
- "! Message variable 1 - message_variable_1 TYPE string, - "!Message Variable 2
- "! Message variable 2 - message_variable_2 TYPE string, - "!Message Variable 3
- "! Message variable 3 - message_variable_3 TYPE string, - "!Message Variable 4
- "! Message variable 4 - message_variable_4 TYPE string, + message_number TYPE c LENGTH 3, + "!Message Variable Assignments
+ "! Message variable assignments + variable_assignments TYPE ty_variables, END OF ty_message. TYPES: "!Field Check
@@ -46,9 +68,15 @@ INTERFACE zif_aff_aifp_v1 "!Operator
"! Operator for field check operator TYPE zif_aff_types_v1=>ty_option, - "!Pattern
- "! Pattern for Field Check - pattern TYPE c LENGTH 60, + "!Field Type
+ "! Field type + field_type TYPE ty_field_type, + "!Field
+ "! Field + field TYPE c LENGTH 60, + "!Value
+ "! Value or pattern for Field Check + value TYPE c LENGTH 60, END OF ty_field_check. TYPES: "!Database Check
@@ -69,9 +97,15 @@ INTERFACE zif_aff_aifp_v1 "!Operator
"! Operator for database check operator TYPE zif_aff_types_v1=>ty_option, - "!Pattern
- "! Pattern for database check - pattern TYPE c LENGTH 60, + "!Field Type
+ "! Field type + field_type TYPE ty_field_type, + "!Field
+ "! Field + field TYPE c LENGTH 60, + "!Value
+ "! Value or pattern for database check + value TYPE c LENGTH 60, END OF ty_database_check. TYPES: "!Custom Implementation
@@ -81,17 +115,19 @@ INTERFACE zif_aff_aifp_v1 "! Class name for check class TYPE zif_aff_types_v1=>ty_object_name_30, END OF ty_custom_implementation. + TYPES: - "!Check Details
- "! Check details + "!Single Check
+ "! Single check BEGIN OF ty_single_check, - "!Number
- "! Number - "! $required - number TYPE n LENGTH 3, "!Description
"! Description + "! $required description TYPE c LENGTH 120, + "!ID
+ "! ID + "! $required + id TYPE n LENGTH 3, "!Scenario
"! Scenario scenario TYPE ty_check_scenario, @@ -130,22 +166,22 @@ INTERFACE zif_aff_aifp_v1 "! Check BEGIN OF ty_main, "! $required - format_version TYPE zif_aff_types_v1=>ty_format_version, + format_version TYPE zif_aff_types_v1=>ty_format_version, "!Header
"! Header "! $required - header TYPE zif_aff_types_v1=>ty_header_60_cloud, + header TYPE zif_aff_types_v1=>ty_header_60_cloud, "!General Information
"! General information "! $required - general_information TYPE ty_general_information, + general_information TYPE ty_general_information, "!Error Message
"! Error message - error_message TYPE ty_message, - "!Check Assignments
- "! Check assignments + error_message TYPE ty_message, + "!Single Check Assignments
+ "! Single check assignments "! $required - check_assignments TYPE ty_single_checks, + single_check_assignments TYPE ty_single_checks, END OF ty_main. CONSTANTS: @@ -220,4 +256,34 @@ INTERFACE zif_aff_aifp_v1 "! Compare compare TYPE ty_database_check_type VALUE '3', END OF co_database_check_type. + CONSTANTS: + BEGIN OF co_field_type, + "!Defined Field
+ "! Defined field in the check assignment + defined_field TYPE ty_field_type VALUE 'DEF_FLD', + "!Pattern
+ "! Pattern + pattern TYPE ty_field_type VALUE 'STRING', + "!System Field
+ "! System field + system_field TYPE ty_field_type VALUE 'SYS_FLD', + END OF co_field_type. + CONSTANTS: + BEGIN OF co_variable_type, +* "!Source Structure
+* "! Source structure +* source_structure TYPE ty_variable_type VALUE 'SRC_S', +* "!Destination Structure
+* "! Destination structure +* destination_structure TYPE ty_variable_type VALUE 'DST_S', + "!Constant
+ "! Constant value + constant TYPE ty_variable_type VALUE 'CONST', + "!System Field
+ "! System field + system_field TYPE ty_variable_type VALUE 'SYSTF', + "!Defined Field
+ "! Defined field in the check assignment + defined_field TYPE ty_variable_type VALUE 'D_FLD', + END OF co_variable_type. ENDINTERFACE.