SAP/abapGit
1
0
Fork 0
mirror of https://github.com/abapGit/abapGit.git synced 2025-05-01 04:08:27 +08:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

ZCL_ABAPGIT_SERVICES_GIT: Add method checkout_commit_build_list to build the popup selection table for commits (#4070)

Browse Source 
* Implementation

* abapLint: Omit exporting and avoid void types

* Clear all exporting parameters first

* Remove unrelated pretty printer changes
This commit is contained in:
mariusraht2 2020-10-27 16:05:04 +01:00 committed by GitHub
parent 761bbe51af
commit 5aebc0c88e
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 56 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

56
src/ui/zcl_abapgit_services_git.clas.abap
View File

@ -69,6 +69,15 @@ CLASS zcl_abapgit_services_git DEFINITION
RAISING
zcx_abapgit_exception .
PRIVATE SECTION.
CLASS-METHODS checkout_commit_build_list
IMPORTING
iv_url TYPE string
iv_branch_name TYPE string
EXPORTING
et_value_tab TYPE ty_commit_value_tab_tt
et_commits TYPE zif_abapgit_definitions=>ty_commit_tt
RAISING
zcx_abapgit_exception .
CLASS-METHODS checkout_commit_build_popup
IMPORTING
!it_commits TYPE zif_abapgit_definitions=>ty_commit_tt
@ -85,6 +94,53 @@ ENDCLASS.
CLASS zcl_abapgit_services_git IMPLEMENTATION.
METHOD checkout_commit_build_list.
DATA: lv_unix_time TYPE zcl_abapgit_time=>ty_unixtime,
lv_date TYPE sy-datum,
lv_date_string TYPE c LENGTH 12,
lv_time TYPE sy-uzeit,
lv_time_string TYPE c LENGTH 10,
ls_pull_result TYPE zcl_abapgit_git_commit=>ty_pull_result.
FIELD-SYMBOLS: <ls_commit> TYPE zif_abapgit_definitions=>ty_commit,
<ls_value_tab> TYPE ty_commit_value_tab.
CLEAR: et_commits, et_value_tab.
ls_pull_result = zcl_abapgit_git_commit=>get_by_branch( iv_branch_name = iv_branch_name
iv_repo_url = iv_url
iv_deepen_level = 99 ).
et_commits = ls_pull_result-commits.
DELETE et_commits WHERE sha1 = ls_pull_result-commit.
SORT et_commits BY time DESCENDING.
IF et_commits IS INITIAL.
zcx_abapgit_exception=>raise( |No commits are available in this branch.| ).
ENDIF.
LOOP AT et_commits ASSIGNING <ls_commit>.
APPEND INITIAL LINE TO et_value_tab ASSIGNING <ls_value_tab>.
<ls_value_tab>-sha1 = <ls_commit>-sha1.
<ls_value_tab>-message = <ls_commit>-message.
lv_unix_time = <ls_commit>-time.
zcl_abapgit_time=>get_utc(
EXPORTING
iv_unix = lv_unix_time
IMPORTING
ev_time = lv_time
ev_date = lv_date ).
WRITE: lv_date TO lv_date_string,
lv_time TO lv_time_string.
<ls_value_tab>-datetime = |{ lv_date_string }, | &&
|{ lv_time_string }|.
ENDLOOP.
ENDMETHOD.
METHOD checkout_commit_build_popup.