Exporting Values in ABAP Objects

**Admin** Sun Apr 08, 2012 9:38 pm

*&---------------------------------------------------------------------*
*& Report Z_02
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*

REPORT ZKRISH_OOPS_02.

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

DATA: O1 TYPE REF TO C1.
START-OF-SELECTION.
CREATE OBJECT O1.
CALL METHOD O1->M1 EXPORTING a = 1010.