Skip to content

Commit 8cd1bd9

Browse files
committed
Add Domain with Conversion Exit
1 parent 28360ff commit 8cd1bd9

8 files changed

+189
-0
lines changed

Diff for: src/zag_doma_exit.doma.xml

+16
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_DOMA" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<DD01V>
6+
<DOMNAME>ZAG_DOMA_EXIT</DOMNAME>
7+
<DDLANGUAGE>E</DDLANGUAGE>
8+
<DATATYPE>NUMC</DATATYPE>
9+
<LENG>000010</LENG>
10+
<OUTPUTLEN>000010</OUTPUTLEN>
11+
<CONVEXIT>ZAGIT</CONVEXIT>
12+
<DDTEXT>Domain with Conversion Exit</DDTEXT>
13+
</DD01V>
14+
</asx:values>
15+
</asx:abap>
16+
</abapGit>
+15
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
FUNCTION conversion_exit_zagit_input.
2+
*"----------------------------------------------------------------------
3+
*"*"Local Interface:
4+
*" IMPORTING
5+
*" REFERENCE(INPUT) TYPE CLIKE
6+
*" EXPORTING
7+
*" REFERENCE(OUTPUT) TYPE CLIKE
8+
*" EXCEPTIONS
9+
*" INVALID_INPUT
10+
*"----------------------------------------------------------------------
11+
12+
" Dummy
13+
output = input.
14+
15+
ENDFUNCTION.
+15
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
FUNCTION conversion_exit_zagit_output.
2+
*"----------------------------------------------------------------------
3+
*"*"Local Interface:
4+
*" IMPORTING
5+
*" REFERENCE(INPUT) TYPE CLIKE
6+
*" EXPORTING
7+
*" REFERENCE(OUTPUT) TYPE CLIKE
8+
*" EXCEPTIONS
9+
*" INVALID_INPUT
10+
*"----------------------------------------------------------------------
11+
12+
" Dummy
13+
output = input.
14+
15+
ENDFUNCTION.

Diff for: src/zag_fugr_exit.fugr.lzag_fugr_exittop.abap

+3
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,3 @@
1+
FUNCTION-POOL zag_fugr_exit. "MESSAGE-ID ..
2+
3+
* INCLUDE LZAG_FUGR_EXITD... " Local class definition

Diff for: src/zag_fugr_exit.fugr.lzag_fugr_exittop.xml

+17
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,17 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<PROGDIR>
6+
<NAME>LZAG_FUGR_EXITTOP</NAME>
7+
<DBAPL>S</DBAPL>
8+
<DBNA>D$</DBNA>
9+
<SUBC>I</SUBC>
10+
<APPL>S</APPL>
11+
<FIXPT>X</FIXPT>
12+
<LDBNAME>D$S</LDBNAME>
13+
<UCCHECK>X</UCCHECK>
14+
</PROGDIR>
15+
</asx:values>
16+
</asx:abap>
17+
</abapGit>

Diff for: src/zag_fugr_exit.fugr.saplzag_fugr_exit.abap

+15
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,15 @@
1+
*******************************************************************
2+
* System-defined Include-files. *
3+
*******************************************************************
4+
INCLUDE LZAG_FUGR_EXITTOP. " Global Declarations
5+
INCLUDE LZAG_FUGR_EXITUXX. " Function Modules
6+
7+
*******************************************************************
8+
* User-defined Include-files (if necessary). *
9+
*******************************************************************
10+
* INCLUDE LZAG_FUGR_EXITF... " Subroutines
11+
* INCLUDE LZAG_FUGR_EXITO... " PBO-Modules
12+
* INCLUDE LZAG_FUGR_EXITI... " PAI-Modules
13+
* INCLUDE LZAG_FUGR_EXITE... " Events
14+
* INCLUDE LZAG_FUGR_EXITP... " Local class implement.
15+
* INCLUDE LZAG_FUGR_EXITT99. " ABAP Unit tests

Diff for: src/zag_fugr_exit.fugr.saplzag_fugr_exit.xml

+18
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,18 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<PROGDIR>
6+
<NAME>SAPLZAG_FUGR_EXIT</NAME>
7+
<DBAPL>S</DBAPL>
8+
<DBNA>D$</DBNA>
9+
<SUBC>F</SUBC>
10+
<APPL>S</APPL>
11+
<RLOAD>E</RLOAD>
12+
<FIXPT>X</FIXPT>
13+
<LDBNAME>D$S</LDBNAME>
14+
<UCCHECK>X</UCCHECK>
15+
</PROGDIR>
16+
</asx:values>
17+
</asx:abap>
18+
</abapGit>

Diff for: src/zag_fugr_exit.fugr.xml

+90
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,90 @@
1+
<?xml version="1.0" encoding="utf-8"?>
2+
<abapGit version="v1.0.0" serializer="LCL_OBJECT_FUGR" serializer_version="v1.0.0">
3+
<asx:abap xmlns:asx="http://www.sap.com/abapxml" version="1.0">
4+
<asx:values>
5+
<AREAT>Function Group for Conversion Exit</AREAT>
6+
<INCLUDES>
7+
<SOBJ_NAME>LZAG_FUGR_EXITTOP</SOBJ_NAME>
8+
<SOBJ_NAME>SAPLZAG_FUGR_EXIT</SOBJ_NAME>
9+
</INCLUDES>
10+
<FUNCTIONS>
11+
<item>
12+
<FUNCNAME>CONVERSION_EXIT_ZAGIT_INPUT</FUNCNAME>
13+
<SHORT_TEXT>Conversion Exit Input</SHORT_TEXT>
14+
<IMPORT>
15+
<RSIMP>
16+
<PARAMETER>INPUT</PARAMETER>
17+
<REFERENCE>X</REFERENCE>
18+
<TYP>CLIKE</TYP>
19+
</RSIMP>
20+
</IMPORT>
21+
<EXPORT>
22+
<RSEXP>
23+
<PARAMETER>OUTPUT</PARAMETER>
24+
<REFERENCE>X</REFERENCE>
25+
<TYP>CLIKE</TYP>
26+
</RSEXP>
27+
</EXPORT>
28+
<EXCEPTION>
29+
<RSEXC>
30+
<EXCEPTION>INVALID_INPUT</EXCEPTION>
31+
</RSEXC>
32+
</EXCEPTION>
33+
<DOCUMENTATION>
34+
<RSFDO>
35+
<PARAMETER>INPUT</PARAMETER>
36+
<KIND>P</KIND>
37+
</RSFDO>
38+
<RSFDO>
39+
<PARAMETER>OUTPUT</PARAMETER>
40+
<KIND>P</KIND>
41+
</RSFDO>
42+
<RSFDO>
43+
<PARAMETER>INVALID_INPUT</PARAMETER>
44+
<KIND>X</KIND>
45+
<STEXT>Invalid Input</STEXT>
46+
</RSFDO>
47+
</DOCUMENTATION>
48+
</item>
49+
<item>
50+
<FUNCNAME>CONVERSION_EXIT_ZAGIT_OUTPUT</FUNCNAME>
51+
<SHORT_TEXT>Conversion Exit Output</SHORT_TEXT>
52+
<IMPORT>
53+
<RSIMP>
54+
<PARAMETER>INPUT</PARAMETER>
55+
<REFERENCE>X</REFERENCE>
56+
<TYP>CLIKE</TYP>
57+
</RSIMP>
58+
</IMPORT>
59+
<EXPORT>
60+
<RSEXP>
61+
<PARAMETER>OUTPUT</PARAMETER>
62+
<REFERENCE>X</REFERENCE>
63+
<TYP>CLIKE</TYP>
64+
</RSEXP>
65+
</EXPORT>
66+
<EXCEPTION>
67+
<RSEXC>
68+
<EXCEPTION>INVALID_INPUT</EXCEPTION>
69+
</RSEXC>
70+
</EXCEPTION>
71+
<DOCUMENTATION>
72+
<RSFDO>
73+
<PARAMETER>INPUT</PARAMETER>
74+
<KIND>P</KIND>
75+
</RSFDO>
76+
<RSFDO>
77+
<PARAMETER>OUTPUT</PARAMETER>
78+
<KIND>P</KIND>
79+
</RSFDO>
80+
<RSFDO>
81+
<PARAMETER>INVALID_INPUT</PARAMETER>
82+
<KIND>X</KIND>
83+
<STEXT>Invalid Input</STEXT>
84+
</RSFDO>
85+
</DOCUMENTATION>
86+
</item>
87+
</FUNCTIONS>
88+
</asx:values>
89+
</asx:abap>
90+
</abapGit>

0 commit comments

Comments
 (0)