DATA: BEGIN OF VECTOR OCCURS 10,
X TYPE I,
Y TYPE I,
LENGTH TYPE I,
END OF VECTOR,
BEGIN OF CIRCLE OCCURS 10,
VOLUME TYPE P,
Y TYPE P,
RADIUS TYPE I,
X TYPE I,
END OF CIRCLE.
...
VECTOR-X = 2.
VECTOR-Y = 3.
APPEND VECTOR.
CIRCLE-X = 4.
CIRCLE-Y = 5.
APPEND CIRCLE.
ADD-CORRESPONDING VECTOR TO CIRCLE.
WRITE /.