From 1f81fd9effa35458ee5b282ba27b02df49f22c34 Mon Sep 17 00:00:00 2001 From: Johannes Konings Date: Sat, 7 Jul 2018 18:03:50 +0200 Subject: [PATCH] Expressions ALPHA to CONVERSION_EXIT_ALPHA_OUTPUT https://github.com/larshp/abapGit/issues/1586 --- .../zcl_abapgit_gui_page_code_insp.clas.abap | 86 ++++++++++--------- 1 file changed, 46 insertions(+), 40 deletions(-) diff --git a/src/ui/zcl_abapgit_gui_page_code_insp.clas.abap b/src/ui/zcl_abapgit_gui_page_code_insp.clas.abap index f28b7a014..b6750eb1b 100644 --- a/src/ui/zcl_abapgit_gui_page_code_insp.clas.abap +++ b/src/ui/zcl_abapgit_gui_page_code_insp.clas.abap @@ -61,7 +61,7 @@ ENDCLASS. -CLASS zcl_abapgit_gui_page_code_insp IMPLEMENTATION. +CLASS ZCL_ABAPGIT_GUI_PAGE_CODE_INSP IMPLEMENTATION. METHOD build_menu. @@ -126,10 +126,47 @@ CLASS zcl_abapgit_gui_page_code_insp IMPLEMENTATION. ENDMETHOD. + METHOD jump. + + DATA: lo_test TYPE REF TO cl_ci_test_root, + li_code_inspector TYPE REF TO zif_abapgit_code_inspector, + ls_info TYPE scir_rest, + lo_result TYPE REF TO cl_ci_result_root, + lv_check_variant_name TYPE sci_chkv, + lv_package TYPE devclass. + + FIELD-SYMBOLS: TYPE scir_alvlist. + + READ TABLE mt_result WITH KEY objtype = is_item-obj_type + objname = is_item-obj_name + ASSIGNING . + ASSERT sy-subrc = 0. + + lv_package = mo_repo->get_package( ). + lv_check_variant_name = mo_repo->get_local_settings( )-code_inspector_check_variant. + + li_code_inspector = zcl_abapgit_factory=>get_code_inspector( + iv_package = lv_package + iv_check_variant_name = lv_check_variant_name ). + + " see SCI_LCL_DYNP_530 / HANDLE_DOUBLE_CLICK + + MOVE-CORRESPONDING TO ls_info. + + lo_test = cl_ci_tests=>get_test_ref( -test ). + lo_result = lo_test->get_result_node( -kind ). + + lo_result->set_info( ls_info ). + lo_result->if_ci_test~navigate( ). + + ENDMETHOD. + + METHOD render_content. DATA: lv_check_variant TYPE sci_chkv, - lv_class TYPE string. + lv_class TYPE string, + lv_line TYPE string. FIELD-SYMBOLS: TYPE scir_alvlist. CREATE OBJECT ro_html. @@ -170,7 +207,13 @@ CLASS zcl_abapgit_gui_page_code_insp IMPLEMENTATION. lv_class = 'grey'. ENDCASE. - ro_html->add( |
Line { -line ALPHA = OUT }: { -text }

| ). + CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' + EXPORTING + input = -line + IMPORTING + output = lv_line. + + ro_html->add( |
Line { lv_line }: { -text }

| ). ENDLOOP. ro_html->add( '' ). @@ -257,41 +300,4 @@ CLASS zcl_abapgit_gui_page_code_insp IMPLEMENTATION. ro_html = super->zif_abapgit_gui_page~render( ). ENDMETHOD. - - - METHOD jump. - - DATA: lo_test TYPE REF TO cl_ci_test_root, - li_code_inspector TYPE REF TO zif_abapgit_code_inspector, - ls_info TYPE scir_rest, - lo_result TYPE REF TO cl_ci_result_root, - lv_check_variant_name TYPE sci_chkv, - lv_package TYPE devclass. - - FIELD-SYMBOLS: TYPE scir_alvlist. - - READ TABLE mt_result WITH KEY objtype = is_item-obj_type - objname = is_item-obj_name - ASSIGNING . - ASSERT sy-subrc = 0. - - lv_package = mo_repo->get_package( ). - lv_check_variant_name = mo_repo->get_local_settings( )-code_inspector_check_variant. - - li_code_inspector = zcl_abapgit_factory=>get_code_inspector( - iv_package = lv_package - iv_check_variant_name = lv_check_variant_name ). - - " see SCI_LCL_DYNP_530 / HANDLE_DOUBLE_CLICK - - MOVE-CORRESPONDING TO ls_info. - - lo_test = cl_ci_tests=>get_test_ref( -test ). - lo_result = lo_test->get_result_node( -kind ). - - lo_result->set_info( ls_info ). - lo_result->if_ci_test~navigate( ). - - ENDMETHOD. - ENDCLASS.