123TrucosSAP




Id Titulo Fecha
{{tabla.tabla }} {{tabla.desc }} {{tabla.modulo}}

ABAP POO Herencia de clases.

REPORT ZPO02.
CLASS PAPA DEFINITION.
PUBLIC SECTION.
METHODS: ESTADO.
PRIVATE SECTION.
DATA: VAR1 TYPE I VALUE 10.
ENDCLASS.
* Implementamos el método de la clase
CLASS PAPA IMPLEMENTATION.
METHOD ESTADO.
VAR1 = VAR1 + 2.
WRITE: / VAR1.
ENDMETHOD.
ENDCLASS.
* Creamos la clase HIJO que hereda de PAPA
CLASS HIJO DEFINITION INHERITING FROM PAPA.
ENDCLASS.
* Creamos la instancia de la clase
START-OF-SELECTION.
DATA: MYCLASE TYPE REF TO HIJO.
CREATE OBJECT MYCLASE.
CALL METHOD MYCLASE->ESTADO.
CALL METHOD MYCLASE->ESTADO.
END-OF-SELECTION.


Datos de Contacto

MSc Marlon Falcón Hernández
mfalcon@falconsolutions.cl
Chile

Si necesitas contratar algun trabajo no dudes en contactarme. Para cursos por ahora no. Saludos

Mis sitios

Contactar




Creado por: MARLONFALCON.CL