abapGit/src/objects/zcl_abapgit_oo_factory.clas.abap
Lars Hvam 59c1f277ab
more renaming #1132 (#1212)
* more renaming #1132

* fix indentation
2018-02-18 10:04:26 +01:00

32 lines
833 B
ABAP

CLASS zcl_abapgit_oo_factory DEFINITION PUBLIC.
PUBLIC SECTION.
CLASS-METHODS:
make
IMPORTING
iv_object_type TYPE tadir-object
RETURNING
VALUE(ro_object_oriented_object) TYPE REF TO zif_abapgit_oo_object_fnc.
PRIVATE SECTION.
CLASS-DATA gi_object_oriented_object TYPE REF TO zif_abapgit_oo_object_fnc .
ENDCLASS.
CLASS ZCL_ABAPGIT_OO_FACTORY IMPLEMENTATION.
METHOD make.
IF gi_object_oriented_object IS BOUND.
ro_object_oriented_object = gi_object_oriented_object.
RETURN.
ENDIF.
IF iv_object_type = 'CLAS'.
CREATE OBJECT ro_object_oriented_object TYPE zcl_abapgit_oo_class.
ELSEIF iv_object_type = 'INTF'.
CREATE OBJECT ro_object_oriented_object TYPE zcl_abapgit_oo_interface.
ENDIF.
ENDMETHOD.
ENDCLASS.