Skip to content

Claude/refactor samples 020 030 #599

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
oblomov-dev merged 3 commits into from
Apr 9, 2026
Merged

Claude/refactor samples 020 030 #599

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
3 commits
Select commit Hold shift + click to select a range
defffbf
Refactor samples 011-020 to app guidelines
claude Apr 8, 2026
e36c879
Refactor samples 021-030 per app guidelines
claude Apr 9, 2026
500f6e9
Merge branch 'standard' into claude/refactor-samples-011-020-MB716
oblomov-dev Apr 9, 2026
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
104 changes: 38 additions & 66 deletions src/z2ui5_cl_demo_app_021.clas.abap
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,88 +1,60 @@
CLASS z2ui5_cl_demo_app_021 DEFINITION PUBLIC CREATE PUBLIC.
CLASS z2ui5_cl_demo_app_021 DEFINITION PUBLIC.

PUBLIC SECTION.

INTERFACES z2ui5_if_app.
DATA mv_textarea TYPE string.

PROTECTED SECTION.

DATA client TYPE REF TO z2ui5_if_client.

DATA textarea TYPE string.

METHODS z2ui5_set_data.
METHODS display_view
IMPORTING
client TYPE REF TO z2ui5_if_client.
METHODS on_event
IMPORTING
client TYPE REF TO z2ui5_if_client.
PROTECTED SECTION.
DATA client TYPE REF TO z2ui5_if_client.

PRIVATE SECTION.

ENDCLASS.



CLASS z2ui5_cl_demo_app_021 IMPLEMENTATION.


METHOD display_view.

DATA(page) = z2ui5_cl_xml_view=>factory( )->shell(
)->page(
title = 'abap2UI5 - Text Area Example'
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = client->check_app_prev_stack( ) ).

DATA(layout) = page->vertical_layout( class = `sapUiContentPadding`
width = `100%` ).
layout->label( 'text area'
)->text_area(
valueliveupdate = abap_true
value = client->_bind_edit( mv_textarea )
growing = abap_true
growingmaxlines = '7'
width = '100%'
)->button( text = `OK`
press = client->_event( `POST` ) ).

client->view_display( page->stringify( ) ).

ENDMETHOD.


METHOD on_event.

IF client->check_on_event( 'POST' ).
client->message_box_display( 'success - values send to the server' ).
ENDIF.

ENDMETHOD.


METHOD z2ui5_if_app~main.

me->client = client.

IF client->check_on_init( ).
display_view( client ).
z2ui5_set_data( ).
ENDIF.

on_event( client ).
textarea = `Lorem ipsum dolor st amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magn` &&
`a aliquyam erat, sed diam voluptua. At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd` &&
` gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam n ` &&
` onumy eirmod tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. Lorem ipsum dolor sit am ` &&
` et, consetetur sadipscing elitr, sed diam nonumy eirm sed diam voluptua. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam no ` &&
`numy eirmod tempor invidunt ut labore et dolore magna aliquyam erat.`.

DATA(view) = z2ui5_cl_xml_view=>factory( ).
DATA(page) = view->shell(
)->page(
title = `abap2UI5 - Text Area Example`
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = client->check_app_prev_stack( ) ).

DATA(layout) = page->vertical_layout(
class = `sapUiContentPadding`
width = `100%` ).

layout->label( `text area`
)->text_area(
valueliveupdate = abap_true
value = client->_bind_edit( textarea )
growing = abap_true
growingmaxlines = `7`
width = `100%`
)->button(
text = `OK`
press = client->_event( `POST` ) ).

client->view_display( view->stringify( ) ).

ELSEIF client->check_on_event( `POST` ).
client->message_box_display( `success - values send to the server` ).
ENDIF.

ENDMETHOD.


METHOD z2ui5_set_data.

mv_textarea = `Lorem ipsum dolor st amet, consetetur sadipscing elitr, sed diam nonumy eirmod tempor invidunt ut labore et dolore magn` &&
`a aliquyam erat, sed diam voluptua. At vero eos et accusam et justo duo dolores et ea rebum. Stet clita kasd` &&
` gubergren, no sea takimata sanctus est Lorem ipsum dolor sit amet. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam n ` &&
` onumy eirmod tempor invidunt ut labore et dolore magna aliquyam erat, sed diam voluptua. Lorem ipsum dolor sit am ` &&
` et, consetetur sadipscing elitr, sed diam nonumy eirm sed diam voluptua. Lorem ipsum dolor sit amet, consetetur sadipscing elitr, sed diam no ` &&
`numy eirmod tempor invidunt ut labore et dolore magna aliquyam erat.`.

ENDMETHOD.
ENDCLASS.
70 changes: 23 additions & 47 deletions src/z2ui5_cl_demo_app_022.clas.abap
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,67 +1,43 @@
CLASS z2ui5_cl_demo_app_022 DEFINITION PUBLIC.

PUBLIC SECTION.

INTERFACES z2ui5_if_app.

DATA:
BEGIN OF screen,
progress_value TYPE string VALUE '3',
END OF screen.


DATA progress_value TYPE string.

PROTECTED SECTION.

METHODS display_view
IMPORTING
client TYPE REF TO z2ui5_if_client.

METHODS on_event
IMPORTING
client TYPE REF TO z2ui5_if_client.

PRIVATE SECTION.
ENDCLASS.



CLASS z2ui5_cl_demo_app_022 IMPLEMENTATION.


METHOD display_view.

DATA(page) = z2ui5_cl_xml_view=>factory( )->shell(
)->page(
title = 'abap2UI5 - Progress Indicator Example'
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = client->check_app_prev_stack( ) ).

DATA(layout) = page->vertical_layout( class = `sapUiContentPadding`
width = `100%` ).
layout->label( 'ProgressIndicator'
)->progress_indicator(
percentvalue = screen-progress_value
displayvalue = '0,44GB of 32GB used'
showvalue = abap_true
state = 'Success' ).

client->view_display( page->stringify( ) ).

ENDMETHOD.


METHOD on_event.
ENDMETHOD.


METHOD z2ui5_if_app~main.

IF client->check_on_init( ).
display_view( client ).
ENDIF.

on_event( client ).
progress_value = `3`.

DATA(view) = z2ui5_cl_xml_view=>factory( ).
view->shell(
)->page(
title = `abap2UI5 - Progress Indicator Example`
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = client->check_app_prev_stack( )
)->vertical_layout(
class = `sapUiContentPadding`
width = `100%`
)->label( `ProgressIndicator`
)->progress_indicator(
percentvalue = client->_bind( progress_value )
displayvalue = `0,44GB of 32GB used`
showvalue = abap_true
state = `Success` ).

client->view_display( view->stringify( ) ).

ENDIF.

ENDMETHOD.

ENDCLASS.
132 changes: 77 additions & 55 deletions src/z2ui5_cl_demo_app_024.clas.abap
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -1,89 +1,111 @@
CLASS z2ui5_cl_demo_app_024 DEFINITION PUBLIC.

PUBLIC SECTION.

INTERFACES z2ui5_if_app.

DATA mv_input TYPE string.
DATA mv_input2 TYPE string.
DATA mv_backend_event TYPE string.
DATA input TYPE string.
DATA input2 TYPE string.
DATA backend_event TYPE string.

PROTECTED SECTION.
DATA client TYPE REF TO z2ui5_if_client.

METHODS display_view
IMPORTING
client TYPE REF TO z2ui5_if_client.
METHODS on_event.
METHODS view_display.

PRIVATE SECTION.
ENDCLASS.



CLASS z2ui5_cl_demo_app_024 IMPLEMENTATION.

METHOD z2ui5_if_app~main.

METHOD display_view.
me->client = client.

DATA(view) = z2ui5_cl_xml_view=>factory( ).
view->shell(
)->page( title = 'abap2UI5 - flow logic - APP 01'
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = client->check_app_prev_stack( )
)->grid( 'L6 M12 S12' )->content( 'layout'
)->simple_form( 'Controller' )->content( 'form'
)->label( 'Demo'
)->button( text = 'call new app (first View)'
press = client->_event( 'CALL_NEW_APP' )
)->label( 'Demo'
)->button( text = 'call new app (second View)'
press = client->_event( 'CALL_NEW_APP_VIEW' )
)->label( 'Demo'
)->button( text = 'call new app (set Event)'
press = client->_event( 'CALL_NEW_APP_EVENT' )
)->label( 'Demo'
)->input( client->_bind_edit( mv_input )
)->button( text = 'call new app (set data)'
press = client->_event( 'CALL_NEW_APP_READ' )
)->label( 'some data, you can read in the next app'
)->input( client->_bind_edit( mv_input2 ) ).
IF client->check_on_init( ).
view_display( ).

client->view_display( view->stringify( ) ).
ELSEIF client->check_on_navigated( ).

ENDMETHOD.
IF backend_event = `CALL_PREVIOUS_APP_INPUT_RETURN`.

DATA(app_025) = CAST z2ui5_cl_demo_app_025( client->get_app_prev( ) ).
backend_event = VALUE #( ).
client->message_box_display( |Input made in the previous app: { app_025->input }| ).

METHOD z2ui5_if_app~main.

IF client->check_on_navigated( ).
display_view( client ).
IF mv_backend_event = 'CALL_PREVIOUS_APP_INPUT_RETURN'.
DATA(lo_called_app) = CAST z2ui5_cl_demo_app_025( client->get_app_prev( ) ).
CLEAR mv_backend_event.
client->message_box_display( `Input made in the previous app:` && lo_called_app->mv_input ).
ENDIF.
RETURN.

view_display( ).

ELSEIF client->check_on_event( ).
on_event( ).
ENDIF.

ENDMETHOD.


METHOD on_event.

CASE client->get( )-event.

WHEN 'CALL_NEW_APP'.
WHEN `CALL_NEW_APP`.
client->nav_app_call( NEW z2ui5_cl_demo_app_025( ) ).

WHEN 'CALL_NEW_APP_VIEW'.
DATA(lo_app) = NEW z2ui5_cl_demo_app_025( ).
lo_app->mv_show_view = 'SECOND'.
client->nav_app_call( lo_app ).
WHEN `CALL_NEW_APP_VIEW`.
DATA(app) = NEW z2ui5_cl_demo_app_025( ).
app->show_view = `SECOND`.
client->nav_app_call( app ).

WHEN 'CALL_NEW_APP_READ'.
DATA(lo_app_next) = NEW z2ui5_cl_demo_app_025( ).
lo_app_next->mv_input_previous_set = mv_input.
client->nav_app_call( lo_app_next ).
WHEN `CALL_NEW_APP_READ`.
DATA(app_next) = NEW z2ui5_cl_demo_app_025( ).
app_next->input_previous_set = input.
client->nav_app_call( app_next ).

WHEN `CALL_NEW_APP_EVENT`.
app_next = NEW z2ui5_cl_demo_app_025( ).
app_next->event_backend = `NEW_APP_EVENT`.
client->nav_app_call( app_next ).

WHEN 'CALL_NEW_APP_EVENT'.
lo_app_next = NEW z2ui5_cl_demo_app_025( ).
lo_app_next->mv_event_backend = 'NEW_APP_EVENT'.
client->nav_app_call( lo_app_next ).
ENDCASE.

ENDMETHOD.


METHOD view_display.

DATA(view) = z2ui5_cl_xml_view=>factory( ).
view->shell(
)->page(
title = `abap2UI5 - flow logic - APP 01`
navbuttonpress = client->_event_nav_app_leave( )
shownavbutton = client->check_app_prev_stack( )
)->grid( `L6 M12 S12`
)->content( `layout`
)->simple_form( `Controller`
)->content( `form`
)->label( `Demo`
)->button(
text = `call new app (first View)`
press = client->_event( `CALL_NEW_APP` )
)->label( `Demo`
)->button(
text = `call new app (second View)`
press = client->_event( `CALL_NEW_APP_VIEW` )
)->label( `Demo`
)->button(
text = `call new app (set Event)`
press = client->_event( `CALL_NEW_APP_EVENT` )
)->label( `Demo`
)->input( client->_bind_edit( input )
)->button(
text = `call new app (set data)`
press = client->_event( `CALL_NEW_APP_READ` )
)->label( `some data, you can read in the next app`
)->input( client->_bind_edit( input2 ) ).

client->view_display( view->stringify( ) ).

ENDMETHOD.

ENDCLASS.
Loading
Loading