mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
abaplint fixes
This commit is contained in:
parent
75c2c07095
commit
7bc2e16260
|
@ -307,7 +307,7 @@ CLASS lcl_http_digest IMPLEMENTATION.
|
||||||
internal_error = 3
|
internal_error = 3
|
||||||
OTHERS = 4.
|
OTHERS = 4.
|
||||||
IF sy-subrc <> 0.
|
IF sy-subrc <> 0.
|
||||||
BREAK-POINT.
|
|
||||||
ENDIF.
|
ENDIF.
|
||||||
|
|
||||||
rv_hash = lv_hash.
|
rv_hash = lv_hash.
|
||||||
|
|
|
@ -379,31 +379,31 @@ CLASS lcl_object_tabl IMPLEMENTATION.
|
||||||
ENDMETHOD. "deserialize
|
ENDMETHOD. "deserialize
|
||||||
|
|
||||||
METHOD lif_object~compare_to_remote_version.
|
METHOD lif_object~compare_to_remote_version.
|
||||||
DATA: lo_table_validation TYPE REF TO lcl_object_tabl_validation,
|
DATA: lo_table_validation TYPE REF TO lcl_object_tabl_validation,
|
||||||
lo_local_version_output TYPE REF TO lcl_xml_output,
|
lo_local_version_output TYPE REF TO lcl_xml_output,
|
||||||
lo_local_version_input TYPE REF TO lcl_xml_input,
|
lo_local_version_input TYPE REF TO lcl_xml_input,
|
||||||
lv_validation_text TYPE string.
|
lv_validation_text TYPE string.
|
||||||
|
|
||||||
CREATE OBJECT lo_local_version_output.
|
CREATE OBJECT lo_local_version_output.
|
||||||
me->lif_object~serialize( lo_local_version_output ).
|
me->lif_object~serialize( lo_local_version_output ).
|
||||||
|
|
||||||
CREATE OBJECT lo_local_version_input
|
CREATE OBJECT lo_local_version_input
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_xml = lo_local_version_output->render( ).
|
iv_xml = lo_local_version_output->render( ).
|
||||||
|
|
||||||
CREATE OBJECT lo_table_validation.
|
CREATE OBJECT lo_table_validation.
|
||||||
|
|
||||||
lv_validation_text = lo_table_validation->validate(
|
lv_validation_text = lo_table_validation->validate(
|
||||||
io_remote_version = io_remote_version_xml
|
io_remote_version = io_remote_version_xml
|
||||||
io_local_version = lo_local_version_input ).
|
io_local_version = lo_local_version_input ).
|
||||||
IF lv_validation_text IS NOT INITIAL.
|
IF lv_validation_text IS NOT INITIAL.
|
||||||
lv_validation_text = |Database Table { ms_item-obj_name }: { lv_validation_text }|.
|
lv_validation_text = |Database Table { ms_item-obj_name }: { lv_validation_text }|.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_tabl_validation_dialog
|
CREATE OBJECT ro_comparison_result TYPE lcl_tabl_validation_dialog
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_message = lv_validation_text.
|
iv_message = lv_validation_text.
|
||||||
ELSE.
|
ELSE.
|
||||||
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
CREATE OBJECT ro_comparison_result TYPE lcl_null_comparison_result.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDMETHOD.
|
ENDMETHOD.
|
||||||
|
|
||||||
ENDCLASS. "lcl_object_TABL IMPLEMENTATION
|
ENDCLASS. "lcl_object_TABL IMPLEMENTATION
|
|
@ -655,25 +655,24 @@ CLASS lcl_objects IMPLEMENTATION.
|
||||||
iv_language = io_repo->get_master_language( )
|
iv_language = io_repo->get_master_language( )
|
||||||
is_metadata = lo_xml->get_metadata( ) ).
|
is_metadata = lo_xml->get_metadata( ) ).
|
||||||
|
|
||||||
break copat.
|
|
||||||
READ TABLE lt_remote WITH KEY filename = <ls_result>-filename INTO ls_remote_file.
|
READ TABLE lt_remote WITH KEY filename = <ls_result>-filename INTO ls_remote_file.
|
||||||
IF ls_remote_file-filename NS '.abap'.
|
IF ls_remote_file-filename NS '.abap'.
|
||||||
|
|
||||||
"if file does not exist in remote, we don't need to validate
|
"if file does not exist in remote, we don't need to validate
|
||||||
IF sy-subrc = 0.
|
IF sy-subrc = 0.
|
||||||
CREATE OBJECT lo_current_version
|
CREATE OBJECT lo_current_version
|
||||||
EXPORTING
|
|
||||||
iv_xml = lcl_convert=>xstring_to_string_utf8( ls_remote_file-data ).
|
|
||||||
lo_comparison_result = li_obj->compare_to_remote_version( lo_current_version ).
|
|
||||||
lo_comparison_result->show_confirmation_dialog( ).
|
|
||||||
|
|
||||||
IF lo_comparison_result->is_result_complete_halt( ) = abap_true.
|
|
||||||
RAISE EXCEPTION TYPE lcx_exception
|
|
||||||
EXPORTING
|
EXPORTING
|
||||||
iv_text = 'Deserialization aborted by user'.
|
iv_xml = lcl_convert=>xstring_to_string_utf8( ls_remote_file-data ).
|
||||||
|
lo_comparison_result = li_obj->compare_to_remote_version( lo_current_version ).
|
||||||
|
lo_comparison_result->show_confirmation_dialog( ).
|
||||||
|
|
||||||
|
IF lo_comparison_result->is_result_complete_halt( ) = abap_true.
|
||||||
|
RAISE EXCEPTION TYPE lcx_exception
|
||||||
|
EXPORTING
|
||||||
|
iv_text = 'Deserialization aborted by user'.
|
||||||
|
ENDIF.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
ENDIF.
|
ENDIF.
|
||||||
endif.
|
|
||||||
|
|
||||||
li_obj->mo_files = lo_files.
|
li_obj->mo_files = lo_files.
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user