We are hiring and constantly growing! Have a look through our vacancies to find the right role for you!
DATA BEGIN OF COMMON PART $[name$].
DATA END OF COMMON PART $[name$].
This variant of the statement DATA with the additions BEGIN OF COMMON PART and END OF COMMON PART defines a global interface work area that can be used jointly by the programs of a program group. All data objects declared between these statements using DATA are part of this common area.
The addition COMMON PART can only be used in the global declaration part of an ABAP program. Multiple common data areas can be declared in a program, but they cannot be nested. Every common data area must be given a unique name using the name addition. The addition name can be omitted only if there is just one common data area in a program.
The following rules apply:
Declares a common data area struc in the include program part. By including the include program, the three programs param, sum and dis have shared access to the data area struc if they are part of a single program group. The latter is accomplished by loading the programs sum and disp into the program group of param using external subroutine calls. The subroutine display in the program disp outputs the input values to the program param and the result of the summation in the subroutine summing.
* INCLUDE part.
DATA: BEGIN OF COMMON PART struc,
f1 TYPE i,
f2 TYPE i,
s TYPE i,
END OF COMMON PART struc.
p1 TYPE i DEFAULT 20,
p2 TYPE i DEFAULT 90.
f1 = p1.
f2 = p2.
PERFORM summming IN PROGRAM sum.
s = f1 + f2.
PERFORM display IN PROGRAM disp.
WRITE: / f1, f2, s.