mirror of
https://github.com/abapGit/abapGit.git
synced 2025-05-01 12:20:51 +08:00
Changed default text in branch popup (#2344)
* Changed default text in branch popup * Downgrade to Abap 7.02 syntax * Reduce line length of commit (for abaplint)
This commit is contained in:
parent
6cc064d794
commit
0467707a5b
|
@ -688,17 +688,30 @@ CLASS zcl_abapgit_popups IMPLEMENTATION.
|
||||||
METHOD zif_abapgit_popups~popup_to_create_transp_branch.
|
METHOD zif_abapgit_popups~popup_to_create_transp_branch.
|
||||||
DATA: lt_fields TYPE TABLE OF sval,
|
DATA: lt_fields TYPE TABLE OF sval,
|
||||||
lv_transports_as_text TYPE string,
|
lv_transports_as_text TYPE string,
|
||||||
|
lv_desc_as_text TYPE string,
|
||||||
ls_transport_header LIKE LINE OF it_transport_headers.
|
ls_transport_header LIKE LINE OF it_transport_headers.
|
||||||
DATA: lv_branch_name TYPE spo_value.
|
DATA: lv_branch_name TYPE spo_value.
|
||||||
DATA: lv_commit_text TYPE spo_value.
|
DATA: lv_commit_text TYPE spo_value.
|
||||||
|
|
||||||
CLEAR: rs_transport_branch-branch_name, rs_transport_branch-commit_text.
|
CLEAR: rs_transport_branch-branch_name, rs_transport_branch-commit_text.
|
||||||
|
|
||||||
lv_transports_as_text = 'Transport(s)'.
|
" If we only have one transport selected set branch name to Transport
|
||||||
LOOP AT it_transport_headers INTO ls_transport_header.
|
" name and commit description to transport description.
|
||||||
CONCATENATE lv_transports_as_text '_' ls_transport_header-trkorr INTO lv_transports_as_text.
|
IF lines( it_transport_headers ) = 1.
|
||||||
ENDLOOP.
|
READ TABLE it_transport_headers INDEX 1 INTO ls_transport_header.
|
||||||
|
lv_transports_as_text = ls_transport_header-trkorr.
|
||||||
|
SELECT SINGLE as4text FROM e07t INTO lv_desc_as_text WHERE
|
||||||
|
trkorr = ls_transport_header-trkorr AND
|
||||||
|
langu = sy-langu .
|
||||||
|
|
||||||
|
ELSE. " Else set branch name and commit message to 'Transport(s)_TRXXXXXX_TRXXXXX'
|
||||||
|
lv_transports_as_text = 'Transport(s)'.
|
||||||
|
LOOP AT it_transport_headers INTO ls_transport_header.
|
||||||
|
CONCATENATE lv_transports_as_text '_' ls_transport_header-trkorr INTO lv_transports_as_text.
|
||||||
|
ENDLOOP.
|
||||||
|
lv_desc_as_text = lv_transports_as_text.
|
||||||
|
|
||||||
|
ENDIF.
|
||||||
add_field( EXPORTING iv_tabname = 'TEXTL'
|
add_field( EXPORTING iv_tabname = 'TEXTL'
|
||||||
iv_fieldname = 'LINE'
|
iv_fieldname = 'LINE'
|
||||||
iv_fieldtext = 'Branch name'
|
iv_fieldtext = 'Branch name'
|
||||||
|
@ -708,7 +721,7 @@ CLASS zcl_abapgit_popups IMPLEMENTATION.
|
||||||
add_field( EXPORTING iv_tabname = 'ABAPTXT255'
|
add_field( EXPORTING iv_tabname = 'ABAPTXT255'
|
||||||
iv_fieldname = 'LINE'
|
iv_fieldname = 'LINE'
|
||||||
iv_fieldtext = 'Commit text'
|
iv_fieldtext = 'Commit text'
|
||||||
iv_value = lv_transports_as_text
|
iv_value = lv_desc_as_text
|
||||||
CHANGING ct_fields = lt_fields ).
|
CHANGING ct_fields = lt_fields ).
|
||||||
|
|
||||||
_popup_2_get_values( EXPORTING iv_popup_title = 'Transport to new Branch' "#EC NOTEXT
|
_popup_2_get_values( EXPORTING iv_popup_title = 'Transport to new Branch' "#EC NOTEXT
|
||||||
|
|
Loading…
Reference in New Issue
Block a user