bb6b3d0480
* Create .abapgit.xml * Create package.devc.xml * Create package.devc.xml * Create zcl_anagram.clas.xml * Update .abapgit.xml * Add packages * Add classes * Update packages * Update abapGit.xml * Update XML objects * Fix EOF * Update EE * Update EOF * Change starting folder * Add execises * Update .abapgit.xml * Package description * Update xml * Update EOF Co-authored-by: Marc Bernard <marc@mail.marcbernardtools.com>
58 lines
1.4 KiB
ABAP
58 lines
1.4 KiB
ABAP
CLASS ltcl_raindrops DEFINITION FOR TESTING RISK LEVEL HARMLESS DURATION SHORT FINAL.
|
|
|
|
PRIVATE SECTION.
|
|
DATA cut TYPE REF TO zcl_raindrops.
|
|
METHODS setup.
|
|
METHODS test_number1 FOR TESTING RAISING cx_static_check.
|
|
METHODS test_number2 FOR TESTING RAISING cx_static_check.
|
|
METHODS test_pling FOR TESTING RAISING cx_static_check.
|
|
METHODS test_plang FOR TESTING RAISING cx_static_check.
|
|
METHODS test_plong FOR TESTING RAISING cx_static_check.
|
|
METHODS test_plingplang FOR TESTING RAISING cx_static_check.
|
|
|
|
ENDCLASS.
|
|
|
|
CLASS ltcl_raindrops IMPLEMENTATION.
|
|
|
|
METHOD setup.
|
|
cut = NEW zcl_raindrops( ).
|
|
ENDMETHOD.
|
|
|
|
METHOD test_number1.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = condense( cut->raindrops( 1 ) )
|
|
exp = '1' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD test_number2.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = condense( cut->raindrops( 307 ) )
|
|
exp = '307' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD test_pling.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = cut->raindrops( 303 )
|
|
exp = 'Pling' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD test_plang.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = cut->raindrops( 230 )
|
|
exp = 'Plang' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD test_plong.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = cut->raindrops( 679 )
|
|
exp = 'Plong' ).
|
|
ENDMETHOD.
|
|
|
|
METHOD test_plingplang.
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = cut->raindrops( 30 )
|
|
exp = 'PlingPlang' ).
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|