mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-03 13:26:12 +08:00
50 lines
1.1 KiB
ABAP
50 lines
1.1 KiB
ABAP
*"* use this source file for your ABAP unit test classes
|
|
CLASS ltcl_normalize_program_name DEFINITION FINAL FOR TESTING
|
|
DURATION SHORT
|
|
RISK LEVEL HARMLESS.
|
|
|
|
PRIVATE SECTION.
|
|
DATA:
|
|
mo_chunk_lib TYPE REF TO zcl_abapgit_gui_chunk_lib.
|
|
|
|
METHODS:
|
|
setup,
|
|
class FOR TESTING RAISING cx_static_check,
|
|
program FOR TESTING RAISING cx_static_check.
|
|
|
|
ENDCLASS.
|
|
|
|
CLASS zcl_abapgit_gui_chunk_lib DEFINITION LOCAL FRIENDS ltcl_normalize_program_name.
|
|
|
|
CLASS ltcl_normalize_program_name IMPLEMENTATION.
|
|
|
|
METHOD setup.
|
|
|
|
CREATE OBJECT mo_chunk_lib.
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD class.
|
|
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = mo_chunk_lib->normalize_program_name( 'ZCL_ABAPGIT_FRONTEND_SERVICES=CP' )
|
|
exp = `ZCL_ABAPGIT_FRONTEND_SERVICES` ).
|
|
|
|
ENDMETHOD.
|
|
|
|
|
|
METHOD program.
|
|
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = mo_chunk_lib->normalize_program_name( 'ZABAPGIT_FULL' )
|
|
exp = `ZABAPGIT_FULL` ).
|
|
|
|
cl_abap_unit_assert=>assert_equals(
|
|
act = mo_chunk_lib->normalize_program_name( 'ZSOME_PROG_ENDING_WITH_CP' )
|
|
exp = `ZSOME_PROG_ENDING_WITH_CP` ).
|
|
|
|
ENDMETHOD.
|
|
|
|
ENDCLASS.
|