Skip to content

Commit 403015b

Browse files
larshplarshp
committed
update
1 parent 24cd0d1 commit 403015b

15 files changed

+540
-2
lines changed

‎src/cl_abap_behavior_handler.clas.abap‎

Lines changed: 26 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,31 @@
1-
CLASS cl_abap_behavior_handler DEFINITION PUBLIC.
1+
CLASS cl_abap_behavior_handler DEFINITION
2+
PUBLIC
3+
INHERITING FROM cl_abap_behv
4+
CREATE PUBLIC.
5+
26
PUBLIC SECTION.
7+
8+
CONSTANTS: BEGIN OF fc,
9+
unrestricted TYPE abp_behv_feature VALUE 0,
10+
mandatory TYPE abp_behv_feature VALUE 1,
11+
read_only TYPE abp_behv_feature VALUE 2,
12+
END OF fc.
13+
14+
CONSTANTS: BEGIN OF fco,
15+
disabled TYPE abp_behv_flag VALUE 0,
16+
enabled TYPE abp_behv_flag VALUE 1,
17+
END OF fco.
18+
PROTECTED SECTION.
19+
20+
TYPES:
21+
BEGIN OF t_std_param,
22+
r_failed TYPE REF TO data,
23+
r_mapped TYPE REF TO data,
24+
r_reported TYPE REF TO data,
25+
root TYPE abp_root_entity_name,
26+
r_image TYPE REF TO if_abap_behv=>t_image,
27+
END OF t_std_param.
328
ENDCLASS.
429

530
CLASS cl_abap_behavior_handler IMPLEMENTATION.
6-
731
ENDCLASS.

‎src/cl_abap_behv.clas.abap‎

Lines changed: 88 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,88 @@
1+
CLASS cl_abap_behv DEFINITION PUBLIC CREATE PROTECTED.
2+
3+
PUBLIC SECTION.
4+
TYPES t_cid TYPE abp_behv_cid.
5+
TYPES t_flag TYPE abp_behv_flag.
6+
TYPES t_pid TYPE abp_behv_pid.
7+
8+
CONSTANTS flag_null TYPE abp_behv_flag VALUE '00' ##NO_TEXT.
9+
CONSTANTS flag_changed TYPE abp_behv_flag VALUE '01' ##NO_TEXT.
10+
CONSTANTS flag_error TYPE abp_behv_flag VALUE '80' ##NO_TEXT.
11+
12+
CONSTANTS:
13+
BEGIN OF co_techfield_name,
14+
control TYPE c LENGTH 30 VALUE '%CONTROL',
15+
cid TYPE c LENGTH 30 VALUE '%CID',
16+
cid_ref TYPE c LENGTH 30 VALUE '%CID_REF',
17+
pre TYPE c LENGTH 30 VALUE '%PRE', " 778
18+
pid TYPE c LENGTH 30 VALUE '%PID',
19+
tmp TYPE c LENGTH 30 VALUE '%TMP',
20+
pky TYPE c LENGTH 30 VALUE '%PKY',
21+
tky TYPE c LENGTH 30 VALUE '%TKY',
22+
key TYPE c LENGTH 30 VALUE '%KEY',
23+
data TYPE c LENGTH 30 VALUE '%DATA',
24+
param TYPE c LENGTH 30 VALUE '%PARAM',
25+
target TYPE c LENGTH 30 VALUE '%TARGET',
26+
fail TYPE c LENGTH 30 VALUE '%FAIL',
27+
msg TYPE c LENGTH 30 VALUE '%MSG',
28+
other TYPE c LENGTH 30 VALUE '%OTHER',
29+
foreign TYPE c LENGTH 30 VALUE '%FOREIGN',
30+
element TYPE c LENGTH 30 VALUE '%ELEMENT',
31+
field TYPE c LENGTH 30 VALUE '%FIELD',
32+
create TYPE c LENGTH 30 VALUE '%CREATE',
33+
update TYPE c LENGTH 30 VALUE '%UPDATE',
34+
delete TYPE c LENGTH 30 VALUE '%DELETE',
35+
assoc TYPE c LENGTH 30 VALUE '%ASSOC',
36+
action TYPE c LENGTH 30 VALUE '%ACTION',
37+
op TYPE c LENGTH 30 VALUE '%OP',
38+
perm TYPE c LENGTH 30 VALUE '%PERM',
39+
path TYPE c LENGTH 30 VALUE '%PATH',
40+
is_draft TYPE c LENGTH 30 VALUE '%IS_DRAFT',
41+
link_src TYPE c LENGTH 30 VALUE 'SOURCE',
42+
link_trg TYPE c LENGTH 30 VALUE 'TARGET',
43+
state_area TYPE c LENGTH 30 VALUE '%STATE_AREA',
44+
msg_global TYPE c LENGTH 30 VALUE '%GLOBAL',
45+
instances TYPE c LENGTH 30 VALUE 'INSTANCES',
46+
global TYPE c LENGTH 30 VALUE 'GLOBAL',
47+
END OF co_techfield_name.
48+
49+
CONSTANTS:
50+
BEGIN OF co_key_name,
51+
draft TYPE c LENGTH 30 VALUE 'DRAFT',
52+
cid TYPE c LENGTH 30 VALUE 'CID',
53+
pid TYPE c LENGTH 30 VALUE 'PID',
54+
entity TYPE c LENGTH 30 VALUE 'ENTITY',
55+
END OF co_key_name.
56+
PROTECTED SECTION.
57+
58+
CONSTANTS ms LIKE if_abap_behv_message=>severity VALUE if_abap_behv_message=>severity ##NO_TEXT.
59+
CONSTANTS mc LIKE if_abap_behv=>cause VALUE if_abap_behv=>cause ##NO_TEXT.
60+
61+
METHODS new_message
62+
IMPORTING
63+
!id TYPE symsgid
64+
!number TYPE symsgno
65+
!severity TYPE if_abap_behv_message=>t_severity
66+
!v1 TYPE simple OPTIONAL
67+
!v2 TYPE simple OPTIONAL
68+
!v3 TYPE simple OPTIONAL
69+
!v4 TYPE simple OPTIONAL
70+
RETURNING
71+
VALUE(obj) TYPE REF TO if_abap_behv_message.
72+
METHODS new_message_with_text
73+
IMPORTING
74+
!severity TYPE if_abap_behv_message=>t_severity DEFAULT if_abap_behv_message=>severity-error
75+
!text TYPE csequence OPTIONAL
76+
RETURNING
77+
VALUE(obj) TYPE REF TO if_abap_behv_message.
78+
ENDCLASS.
79+
80+
CLASS cl_abap_behv IMPLEMENTATION.
81+
METHOD new_message.
82+
RETURN. " todo, implement method
83+
ENDMETHOD.
84+
85+
METHOD new_message_with_text.
86+
RETURN. " todo, implement method
87+
ENDMETHOD.
88+
ENDCLASS.

‎src/cl_abap_behv.clas.xml‎

Lines changed: 16 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,16 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_CLAS" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<VSEOCLASS>
6+
<CLSNAME>CL_ABAP_BEHV</CLSNAME>
7+
<LANGU>E</LANGU>
8+
<DESCRIPT>CL_ABAP_BEHV</DESCRIPT>
9+
<STATE>1</STATE>
10+
<CLSCCINCL>X</CLSCCINCL>
11+
<FIXPT>X</FIXPT>
12+
<UNICODE>X</UNICODE>
13+
</VSEOCLASS>
14+
</asx:values>
15+
</asx:abap>
16+
</abapGit>

‎src/ddic/abp_behv_cid.dtel.xml‎

Lines changed: 26 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,26 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DTEL" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD04V>
6+
<ROLLNAME>ABP_BEHV_CID</ROLLNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<DOMNAME></DOMNAME>
9+
<DATATYPE>STRING</DATATYPE>
10+
<HEADLEN>55</HEADLEN>
11+
<SCRLEN1>10</SCRLEN1>
12+
<SCRLEN2>20</SCRLEN2>
13+
<SCRLEN3>40</SCRLEN3>
14+
<DDTEXT>ABP_BEHV_CID</DDTEXT>
15+
<REPTEXT>ABP_BEHV_CID</REPTEXT>
16+
<SCRTEXT_S>ABP_BEHV_CID</SCRTEXT_S>
17+
<SCRTEXT_M>ABP_BEHV_CID</SCRTEXT_M>
18+
<SCRTEXT_L>ABP_BEHV_CID</SCRTEXT_L>
19+
<DTELMASTER>E</DTELMASTER>
20+
<LENG>000000</LENG>
21+
<DECIMALS>000000</DECIMALS>
22+
<REFKIND></REFKIND>
23+
</DD04V>
24+
</asx:values>
25+
</asx:abap>
26+
</abapGit>

‎src/ddic/abp_behv_feature.dtel.xml‎

Lines changed: 24 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,24 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DTEL" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD04V>
6+
<ROLLNAME>ABP_BEHV_FEATURE</ROLLNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<DATATYPE>RAW</DATATYPE>
9+
<HEADLEN>55</HEADLEN>
10+
<SCRLEN1>10</SCRLEN1>
11+
<SCRLEN2>20</SCRLEN2>
12+
<SCRLEN3>40</SCRLEN3>
13+
<DDTEXT>ABP_BEHV_FEATURE</DDTEXT>
14+
<REPTEXT>ABP_BEHV_FEATURE</REPTEXT>
15+
<SCRTEXT_S>ABP_BEHV_FEATURE</SCRTEXT_S>
16+
<SCRTEXT_M>ABP_BEHV_FEATURE</SCRTEXT_M>
17+
<SCRTEXT_L>ABP_BEHV_FEATURE</SCRTEXT_L>
18+
<DTELMASTER>E</DTELMASTER>
19+
<LENG>000001</LENG>
20+
<DECIMALS>000000</DECIMALS>
21+
</DD04V>
22+
</asx:values>
23+
</asx:abap>
24+
</abapGit>

‎src/ddic/abp_behv_features.tabl.xml‎

Lines changed: 58 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,58 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_TABL" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD02V>
6+
<TABNAME>ABP_BEHV_FEATURES</TABNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<TABCLASS>INTTAB</TABCLASS>
9+
<CLIDEP>X</CLIDEP>
10+
<DDTEXT>todo</DDTEXT>
11+
<CONTFLAG>A</CONTFLAG>
12+
<EXCLASS>1</EXCLASS>
13+
</DD02V>
14+
<DD03P_TABLE>
15+
<DD03P>
16+
<FIELDNAME>ENTITY_NAME</FIELDNAME>
17+
<ROLLNAME>ABP_ENTITY_NAME</ROLLNAME>
18+
<COMPTYPE>E</COMPTYPE>
19+
<DATATYPE></DATATYPE>
20+
<LENG></LENG>
21+
<DECIMALS></DECIMALS>
22+
<PRECFIELD></PRECFIELD>
23+
<REFTYPE></REFTYPE>
24+
</DD03P>
25+
<DD03P>
26+
<FIELDNAME>FEATURES</FIELDNAME>
27+
<ROLLNAME>DATA</ROLLNAME>
28+
<COMPTYPE>R</COMPTYPE>
29+
<DATATYPE></DATATYPE>
30+
<LENG></LENG>
31+
<DECIMALS></DECIMALS>
32+
<PRECFIELD></PRECFIELD>
33+
<REFTYPE></REFTYPE>
34+
</DD03P>
35+
<DD03P>
36+
<FIELDNAME>INSTANCES</FIELDNAME>
37+
<ROLLNAME>DATA</ROLLNAME>
38+
<COMPTYPE>R</COMPTYPE>
39+
<DATATYPE></DATATYPE>
40+
<LENG></LENG>
41+
<DECIMALS></DECIMALS>
42+
<PRECFIELD></PRECFIELD>
43+
<REFTYPE></REFTYPE>
44+
</DD03P>
45+
<DD03P>
46+
<FIELDNAME>RESULTS</FIELDNAME>
47+
<ROLLNAME>DATA</ROLLNAME>
48+
<COMPTYPE>R</COMPTYPE>
49+
<DATATYPE></DATATYPE>
50+
<LENG></LENG>
51+
<DECIMALS></DECIMALS>
52+
<PRECFIELD></PRECFIELD>
53+
<REFTYPE></REFTYPE>
54+
</DD03P>
55+
</DD03P_TABLE>
56+
</asx:values>
57+
</asx:abap>
58+
</abapGit>

‎src/ddic/abp_behv_flag.dtel.xml‎

Lines changed: 24 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,24 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DTEL" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD04V>
6+
<ROLLNAME>ABP_BEHV_FLAG</ROLLNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<DATATYPE>RAW</DATATYPE>
9+
<HEADLEN>55</HEADLEN>
10+
<SCRLEN1>10</SCRLEN1>
11+
<SCRLEN2>20</SCRLEN2>
12+
<SCRLEN3>40</SCRLEN3>
13+
<DDTEXT>ABP_BEHV_FLAG</DDTEXT>
14+
<REPTEXT>ABP_BEHV_FLAG</REPTEXT>
15+
<SCRTEXT_S>ABP_BEHV_FLAG</SCRTEXT_S>
16+
<SCRTEXT_M>ABP_BEHV_FLAG</SCRTEXT_M>
17+
<SCRTEXT_L>ABP_BEHV_FLAG</SCRTEXT_L>
18+
<DTELMASTER>E</DTELMASTER>
19+
<LENG>000001</LENG>
20+
<DECIMALS>000000</DECIMALS>
21+
</DD04V>
22+
</asx:values>
23+
</asx:abap>
24+
</abapGit>

‎src/ddic/abp_behv_pid.dtel.xml‎

Lines changed: 26 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,26 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DTEL" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD04V>
6+
<ROLLNAME>ABP_BEHV_PID</ROLLNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<DOMNAME>XSDUUID_RAW</DOMNAME>
9+
<DATATYPE>RAW</DATATYPE>
10+
<HEADLEN>55</HEADLEN>
11+
<SCRLEN1>10</SCRLEN1>
12+
<SCRLEN2>20</SCRLEN2>
13+
<SCRLEN3>40</SCRLEN3>
14+
<DDTEXT>ABP_BEHV_PID</DDTEXT>
15+
<REPTEXT>ABP_BEHV_PID</REPTEXT>
16+
<SCRTEXT_S>ABP_BEHV_PID</SCRTEXT_S>
17+
<SCRTEXT_M>ABP_BEHV_PID</SCRTEXT_M>
18+
<SCRTEXT_L>ABP_BEHV_PID</SCRTEXT_L>
19+
<DTELMASTER>E</DTELMASTER>
20+
<LENG>000016</LENG>
21+
<DECIMALS>000000</DECIMALS>
22+
<REFKIND>D</REFKIND>
23+
</DD04V>
24+
</asx:values>
25+
</asx:abap>
26+
</abapGit>

‎src/ddic/abp_behv_typekind.dtel.xml‎

Lines changed: 24 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,24 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DTEL" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD04V>
6+
<ROLLNAME>ABP_BEHV_TYPEKIND</ROLLNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<DATATYPE>CHAR</DATATYPE>
9+
<HEADLEN>55</HEADLEN>
10+
<SCRLEN1>00</SCRLEN1>
11+
<SCRLEN2>00</SCRLEN2>
12+
<SCRLEN3>00</SCRLEN3>
13+
<DDTEXT></DDTEXT>
14+
<REPTEXT></REPTEXT>
15+
<SCRTEXT_S></SCRTEXT_S>
16+
<SCRTEXT_M></SCRTEXT_M>
17+
<SCRTEXT_L></SCRTEXT_L>
18+
<DTELMASTER>E</DTELMASTER>
19+
<LENG>000001</LENG>
20+
<DECIMALS>000000</DECIMALS>
21+
</DD04V>
22+
</asx:values>
23+
</asx:abap>
24+
</abapGit>

‎src/ddic/abp_entity_name.dtel.xml‎

Lines changed: 24 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,24 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_DTEL" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD04V>
6+
<ROLLNAME>ABP_ENTITY_NAME</ROLLNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<DATATYPE>CHAR</DATATYPE>
9+
<HEADLEN>55</HEADLEN>
10+
<SCRLEN1>10</SCRLEN1>
11+
<SCRLEN2>20</SCRLEN2>
12+
<SCRLEN3>40</SCRLEN3>
13+
<DDTEXT>ABP_ENTITY_NAME</DDTEXT>
14+
<REPTEXT>ABP_ENTITY_NAME</REPTEXT>
15+
<SCRTEXT_S>ABP_ENTITY_NAME</SCRTEXT_S>
16+
<SCRTEXT_M>ABP_ENTITY_NAME</SCRTEXT_M>
17+
<SCRTEXT_L>ABP_ENTITY_NAME</SCRTEXT_L>
18+
<DTELMASTER>E</DTELMASTER>
19+
<LENG>000030</LENG>
20+
<DECIMALS>000000</DECIMALS>
21+
</DD04V>
22+
</asx:values>
23+
</asx:abap>
24+
</abapGit>

0 commit comments

Comments
 (0)