Exporting and Importing values in ABAP Objects example

*&---------------------------------------------------------------------*
*& Report Z_03
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT ZKRISH_OOPS_03.

*----------------------------------------------------------------------*
* CLASS c1 DEFINITION
*----------------------------------------------------------------------*
CLASS C1 DEFINITION.
PUBLIC SECTION.
METHODS: M1 IMPORTING A TYPE I
EXPORTING B TYPE I.
ENDCLASS. "c1 DEFINITION
.
*----------------------------------------------------------------------*
* CLASS c1 IMPLEMENTATION
*----------------------------------------------------------------------*
CLASS C1 IMPLEMENTATION.
METHOD: M1.
B = A * A.
ENDMETHOD. "M1
ENDCLASS. "c1 IMPLEMENTATION

DATA: O1 TYPE REF TO C1.
DATA: RESULT TYPE I.
START-OF-SELECTION.
CREATE OBJECT O1.
CALL METHOD O1->M1
EXPORTING
A = 4
IMPORTING
B = RESULT.
WRITE: RESULT.