Skip to content
Merged
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
32 changes: 21 additions & 11 deletions src/z2ui5_cl_pop_show_tr.clas.abap
Original file line number Diff line number Diff line change
Expand Up @@ -21,7 +21,6 @@
VALUE(result) TYPE REF TO z2ui5_cl_pop_show_tr.

PROTECTED SECTION.

METHODS on_init.
METHODS render_view.
METHODS on_event.
Expand Down Expand Up @@ -50,15 +49,13 @@

ENDMETHOD.



METHOD render_view.
DATA(popup) = z2ui5_cl_xml_view=>factory_popup( ).

popup->dialog( contentwidth = '40%'
afterclose = client->_event( 'CLOSE' )

title = z2ui5_cl_util=>rtti_get_data_element_texts( `SRET_TRORD` )-long
title = z2ui5_cl_util=>rtti_get_data_element_texts( `SRET_TRORD` )-long
)->table( mode = 'SingleSelectLeft'
items = client->_bind_edit( mt_data )
)->columns(
Expand All @@ -71,9 +68,12 @@
)->text( '{TRANSPORT}'
)->text( '{SHORT_DESCRIPTION}'
)->get_parent( )->get_parent( )->get_parent( )->get_parent(
)->buttons( )->button( text = 'Select'
press = client->_event( 'TRANSPORT_SELECT' )
type = 'Emphasized' ).
)->buttons( )->button( text = 'no transport'
press = client->_event( 'LOCL' )
type = 'Default'
)->button( text = 'Select'
press = client->_event( 'SELECT' )
type = 'Emphasized' ).

client->popup_display( popup->stringify( ) ).
ENDMETHOD.
Expand All @@ -87,7 +87,7 @@
client->popup_destroy( ).
client->nav_app_leave( client->get_app( client->get( )-s_draft-id_prev_app_stack ) ).

WHEN `TRANSPORT_SELECT`.
WHEN `SELECT`.

READ TABLE mt_data INTO DATA(line) WITH KEY selkz = abap_true.
IF sy-subrc = 0.
Expand All @@ -97,6 +97,13 @@
client->popup_destroy( ).
client->nav_app_leave( ).

WHEN 'LOCL'.

ms_transport-locl = abap_true.

Check failure on line 102 in src/z2ui5_cl_pop_show_tr.clas.abap

View check run for this annotation

abaplint / abaplint

Component "locl" not found in structure

https://rules.abaplint.org/check_syntax

client->popup_destroy( ).
client->nav_app_leave( ).

WHEN OTHERS.

ENDCASE.
Expand All @@ -108,11 +115,14 @@

METHOD add_data_to_tranport.

IF is_transport-locl = abap_true.

Check failure on line 118 in src/z2ui5_cl_pop_show_tr.clas.abap

View check run for this annotation

abaplint / abaplint

Component "locl" not found in structure

https://rules.abaplint.org/check_syntax
RETURN.
ENDIF.

z2ui5_cl_util=>bus_tr_add( ir_data = ir_data
iv_tabname = iv_tabname
is_transport = is_transport ).
iv_tabname = iv_tabname
is_transport = is_transport ).

ENDMETHOD.


ENDCLASS.