mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
60 lines
1.6 KiB
ABAP
60 lines
1.6 KiB
ABAP
*&---------------------------------------------------------------------*
|
|
*& Include ZABAPGIT_PAGE_SYNTAX_CHECK
|
|
*&---------------------------------------------------------------------*
|
|
|
|
*&---------------------------------------------------------------------*
|
|
*& Include ZABAPGIT_PAGE_REPO_SETTINGS
|
|
*&---------------------------------------------------------------------*
|
|
|
|
CLASS lcl_gui_page_syntax_check DEFINITION FINAL INHERITING FROM lcl_gui_page.
|
|
PUBLIC SECTION.
|
|
METHODS:
|
|
constructor
|
|
IMPORTING io_repo TYPE REF TO lcl_repo.
|
|
|
|
PROTECTED SECTION.
|
|
CONSTANTS:
|
|
BEGIN OF c_action,
|
|
back TYPE string VALUE 'back',
|
|
END OF c_action.
|
|
|
|
DATA: mo_repo TYPE REF TO lcl_repo.
|
|
|
|
METHODS:
|
|
render_content REDEFINITION.
|
|
|
|
ENDCLASS.
|
|
|
|
CLASS lcl_gui_page_syntax_check IMPLEMENTATION.
|
|
|
|
METHOD constructor.
|
|
super->constructor( ).
|
|
ms_control-page_title = 'SYNTAX CHECK'.
|
|
mo_repo = io_repo.
|
|
ENDMETHOD. " constructor.
|
|
|
|
METHOD render_content.
|
|
|
|
DATA: lt_result TYPE scit_alvlist,
|
|
ls_result LIKE LINE OF lt_result.
|
|
|
|
|
|
lt_result = zcl_abapgit_syntax_check=>run( mo_repo->get_package( ) ).
|
|
|
|
CREATE OBJECT ro_html.
|
|
ro_html->add( '<div class="toc">' ).
|
|
|
|
IF lines( lt_result ) = 0.
|
|
ro_html->add( 'No errors' ).
|
|
ENDIF.
|
|
|
|
LOOP AT lt_result INTO ls_result.
|
|
ro_html->add( |{ ls_result-objtype } { ls_result-objname } { ls_result-kind } { ls_result-text }<br>| ).
|
|
ENDLOOP.
|
|
|
|
ro_html->add( '</div>' ).
|
|
|
|
ENDMETHOD. "render_content
|
|
|
|
ENDCLASS. "lcl_gui_page_debuginfo
|