ABAP Unit - Beispiel
Verwendung
Definition einer Testklasse mytest mit einer Testmethode mytest , die nach Aufruf der Methode mymethod der Klasse myclass den Wert des Attributs text überprüft. In diesem Beispiel meldet ein ABAP-Unit-Test einen Fehler, da der Wert "X" statt "U" erwartet wird.
* Production classes
CLASS myclass DEFINITION.
PUBLIC SECTION.
CLASS-DATA text TYPE string READ-ONLY.
CLASS-METHODS set_text_to_x.
ENDCLASS.
CLASS myclass IMPLEMENTATION.
METHOD set_text_to_x.
text = 'U'.
ENDMETHOD.
ENDCLASS.
* Test classes
CLASS mytest DEFINITION FOR TESTING.
PRIVATE SECTION.
METHODS mytest FOR TESTING.
ENDCLASS.
CLASS mytest IMPLEMENTATION.
METHOD mytest.
myclass=>set_text_to_x( ).
cl_abap_unit_assert=>assert_equals( act = myclass=>text
exp = 'X' ).
ENDMETHOD.
ENDCLASS.