UTILIZACION DE OBJETOS un objeto existe mientras se este usando en el programa, lo que quiere decier que existe siempre que al menos una referencia apunte hacia el, o al menos un metodo del objeto este registrado como metodo manejador de eventos. Creacion de mi primer programa orientado a objetos. 1- SE DEFNE LA CLASE CON LOS METODOS Y ATRIBUTOS. CLASS contador DEFINITION. PUBLIC SECTION. METHODS: set IMPORTING value(set_value) TYPE i, incrementar_contador, get EXPORTING value(get_value) TYPE i. PRIVATE SECTION. DATA count TYPE i. ENDCLASS. "contador DEFINITION 2- SE CREA LA IMPLEMENTACION DE LA CLASE CLASS contador IMPLEMENTATION. METHOD set. count = set_value. ENDMETHOD. "set METHOD incrementar_contador. ADD 1 TO count. ENDMETHOD. "incrementar_contador METHOD get. get_value = count. ENDMETHOD. "get ENDCLASS. "contador IMPLEMENTATION 3- DECLARAMOS LAS VARIABLES. DATA number TYPE i VALUE 5. DATA cnt TYPE REF TO contador. START-OF-SELECTION. CREATE OBJECT cnt. CALL METHOD cnt->set EXPORTING set_value = number. DO 3 TIMES. CALL METHOD cnt->incrementar_contador. ENDDO. CALL METHOD cnt->get IMPORTING get_value = number. WRITE number.