diff --git a/src/objects/zcl_abapgit_object_form.clas.abap b/src/objects/zcl_abapgit_object_form.clas.abap index 1b971431e..4be92bf02 100644 --- a/src/objects/zcl_abapgit_object_form.clas.abap +++ b/src/objects/zcl_abapgit_object_form.clas.abap @@ -27,23 +27,23 @@ CLASS zcl_abapgit_object_form DEFINITION PUBLIC INHERITING FROM zcl_abapgit_obje tys_text_header TYPE LINE OF tyt_text_header, tyt_lines TYPE tline_tab. - METHODS _get_last_changes + METHODS get_last_changes IMPORTING iv_form_name TYPE zif_abapgit_definitions=>ty_item-obj_name RETURNING - VALUE(es_last_changed) TYPE tys_form_header. + VALUE(rs_last_changed) TYPE tys_form_header. - METHODS _build_extra_from_header + METHODS build_extra_from_header IMPORTING - ls_header TYPE tys_form_header + is_header TYPE tys_form_header RETURNING - VALUE(r_result) TYPE string. + VALUE(rv_result) TYPE string. - METHODS _build_extra_from_header_old + METHODS build_extra_from_header_old IMPORTING - ls_header TYPE tys_form_header + is_header TYPE tys_form_header RETURNING - VALUE(r_result) TYPE string. + VALUE(rv_result) TYPE string. METHODS _save_form IMPORTING @@ -51,11 +51,11 @@ CLASS zcl_abapgit_object_form DEFINITION PUBLIC INHERITING FROM zcl_abapgit_obje CHANGING cs_form_data TYPE zcl_abapgit_object_form=>tys_form_data. - METHODS _extract_tdlines + METHODS extract_tdlines IMPORTING is_form_data TYPE zcl_abapgit_object_form=>tys_form_data RETURNING - VALUE(et_lines) TYPE zcl_abapgit_object_form=>tyt_lines + VALUE(rt_lines) TYPE zcl_abapgit_object_form=>tyt_lines RAISING zcx_abapgit_exception. @@ -63,18 +63,18 @@ CLASS zcl_abapgit_object_form DEFINITION PUBLIC INHERITING FROM zcl_abapgit_obje CHANGING cs_form_data TYPE zcl_abapgit_object_form=>tys_form_data. - METHODS _compress_lines + METHODS compress_lines IMPORTING is_form_data TYPE zcl_abapgit_object_form=>tys_form_data it_lines TYPE zcl_abapgit_object_form=>tyt_lines RAISING zcx_abapgit_exception. - METHODS _find_form + METHODS find_form IMPORTING iv_object_name TYPE zif_abapgit_definitions=>ty_item-obj_name RETURNING - VALUE(et_text_header) TYPE zcl_abapgit_object_form=>tyt_text_header. + VALUE(rt_text_header) TYPE zcl_abapgit_object_form=>tyt_text_header. METHODS _read_form IMPORTING @@ -93,7 +93,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. DATA: ls_last_changed TYPE tys_form_header. DATA: lv_last_changed_ts TYPE timestamp. - ls_last_changed = _get_last_changes( ms_item-obj_name ). + ls_last_changed = get_last_changes( ms_item-obj_name ). CONVERT DATE ls_last_changed-tdldate TIME ls_last_changed-tdltime INTO TIME STAMP lv_last_changed_ts TIME ZONE sy-zonlo. @@ -106,7 +106,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. DATA: ls_last_changed TYPE tys_form_header. - ls_last_changed = _get_last_changes( ms_item-obj_name ). + ls_last_changed = get_last_changes( ms_item-obj_name ). IF ls_last_changed-tdluser IS NOT INITIAL. rv_user = ls_last_changed-tdluser. @@ -193,7 +193,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. DATA: lv_form_found TYPE flag. FIELD-SYMBOLS: LIKE LINE OF lt_text_header. - lt_text_header = _find_form( ms_item-obj_name ). + lt_text_header = find_form( ms_item-obj_name ). LOOP AT lt_text_header ASSIGNING . CLEAR lt_lines. @@ -209,7 +209,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. _clear_changed_fields( CHANGING cs_form_data = ls_form_data ). - _compress_lines( is_form_data = ls_form_data + compress_lines( is_form_data = ls_form_data it_lines = lt_lines ). INSERT ls_form_data INTO TABLE lt_form_data. @@ -238,7 +238,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. LOOP AT lt_form_data ASSIGNING . - lt_lines = _extract_tdlines( ). + lt_lines = extract_tdlines( ). _save_form( EXPORTING it_lines = lt_lines CHANGING cs_form_data = ). @@ -259,29 +259,29 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. CREATE OBJECT ro_comparison_result TYPE zcl_abapgit_comparison_null. ENDMETHOD. - METHOD _build_extra_from_header. + METHOD build_extra_from_header. - DATA: lv_tdspras type laiso. + DATA: lv_tdspras TYPE laiso. CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING - input = ls_header-tdspras + input = is_header-tdspras IMPORTING output = lv_tdspras. - r_result = c_objectname_tdlines && '_' && lv_tdspras. + rv_result = c_objectname_tdlines && '_' && lv_tdspras. ENDMETHOD. - METHOD _build_extra_from_header_old. - r_result = c_objectname_tdlines && '_' && ls_header-tdspras. + METHOD build_extra_from_header_old. + rv_result = c_objectname_tdlines && '_' && is_header-tdspras. ENDMETHOD. - METHOD _get_last_changes. + METHOD get_last_changes. DATA: lv_form_name TYPE thead-tdform. - CLEAR es_last_changed. + CLEAR rs_last_changed. lv_form_name = iv_form_name. @@ -290,7 +290,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. form = lv_form_name read_only_header = abap_true IMPORTING - form_header = es_last_changed. + form_header = rs_last_changed. ENDMETHOD. @@ -322,26 +322,26 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. ENDMETHOD. - METHOD _extract_tdlines. + METHOD extract_tdlines. DATA lv_string TYPE string. DATA lo_xml TYPE REF TO zcl_abapgit_xml_input. TRY. lv_string = mo_files->read_string( iv_extra = - _build_extra_from_header( is_form_data-form_header ) + build_extra_from_header( is_form_data-form_header ) iv_ext = c_extension_xml ). CATCH zcx_abapgit_exception. lv_string = mo_files->read_string( iv_extra = - _build_extra_from_header_old( is_form_data-form_header ) + build_extra_from_header_old( is_form_data-form_header ) iv_ext = c_extension_xml ). ENDTRY. CREATE OBJECT lo_xml EXPORTING iv_xml = lv_string. lo_xml->read( EXPORTING iv_name = c_objectname_tdlines - CHANGING cg_data = et_lines ). + CHANGING cg_data = rt_lines ). ENDMETHOD. @@ -368,7 +368,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. ENDMETHOD. - METHOD _compress_lines. + METHOD compress_lines. DATA lv_string TYPE string. DATA lo_xml TYPE REF TO zcl_abapgit_xml_output. @@ -379,7 +379,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. lv_string = lo_xml->render( ). IF lv_string IS NOT INITIAL. mo_files->add_string( iv_extra = - _build_extra_from_header( is_form_data-form_header ) + build_extra_from_header( is_form_data-form_header ) iv_ext = c_extension_xml iv_string = lv_string ). ENDIF. @@ -387,7 +387,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. ENDMETHOD. - METHOD _find_form. + METHOD find_form. DATA: lv_text_name TYPE thead-tdname. @@ -401,7 +401,7 @@ CLASS zcl_abapgit_object_form IMPLEMENTATION. name = lv_text_name object = c_objectname_form TABLES - selections = et_text_header + selections = rt_text_header EXCEPTIONS OTHERS = 1 ##fm_subrc_ok ##NO_TEXT. "#EC CI_SUBRC