diff --git a/src/00/z2ui5_cl_app_demo_28.clas.abap b/src/00/z2ui5_cl_app_demo_28.clas.abap index 2e25f875..60e64ffa 100644 --- a/src/00/z2ui5_cl_app_demo_28.clas.abap +++ b/src/00/z2ui5_cl_app_demo_28.clas.abap @@ -4,13 +4,6 @@ CLASS z2ui5_cl_app_demo_28 DEFINITION PUBLIC. INTERFACES z2ui5_if_app. -* DATA product TYPE string. -* DATA quantity TYPE i. -* -* DATA input21 TYPE string. -* DATA input22 TYPE string. -* DATA input41 TYPE string. - DATA mt_draft TYPE REF TO data. DATA mv_test TYPE REF TO data. @@ -118,7 +111,9 @@ CLASS z2ui5_cl_app_demo_28 IMPLEMENTATION. CREATE DATA mv_test TYPE string. - mv_test->* = 'test'. + FIELD-SYMBOLS type string. + assign mv_test->* to . + = 'test'. CREATE DATA mt_draft TYPE STANDARD TABLE OF z2ui5_t_draft. @@ -129,7 +124,11 @@ CLASS z2ui5_cl_app_demo_28 IMPLEMENTATION. UP TO 10 ROWS . - mt_draft->* = CORRESPONDING #( lt_data ). + types ty_t_draft type STANDARD TABLE OF z2ui5_t_draft. + FIELD-SYMBOLS TYPE ty_t_draft. + + assign mt_draft->* to . + = CORRESPONDING #( lt_data ). app-next-s_timer-interval_ms = '2000'. app-next-s_timer-event_finished = 'TIMER_FINISHED'. @@ -153,16 +152,22 @@ CLASS z2ui5_cl_app_demo_28 IMPLEMENTATION. )->title( 'Input' )->label( 'quantity' ). - lo_view->input( client->_bind( val = mv_test->* check_gen_data = abap_true ) ). + + FIELD-SYMBOLS type string. + ASSIGN mv_test->* to . + + lo_view->input( client->_bind( val = check_gen_data = abap_true ) ). lo_view->button( text = 'post' press = client->_event( 'BUTTON_POST' ) ). +FIELD-SYMBOLS type STANDARD TABLE. + assign mt_draft->* to . DATA(tab) = lo_view->get_parent( )->get_parent( )->simple_form( title = 'Table' editable = abap_true )->content( 'form' )->table( - items = client->_bind( val = mt_draft->* check_gen_data = abap_true ) + items = client->_bind( val = check_gen_data = abap_true ) ). tab->columns( diff --git a/src/z2ui5_cl_http_handler.clas.locals_imp.abap b/src/z2ui5_cl_http_handler.clas.locals_imp.abap index 5494985d..bd0fa149 100644 --- a/src/z2ui5_cl_http_handler.clas.locals_imp.abap +++ b/src/z2ui5_cl_http_handler.clas.locals_imp.abap @@ -522,7 +522,9 @@ CLASS z2ui5_lcl_utility IMPLEMENTATION. ENDIF. ENDLOOP. - INSERT lr_row->* INTO TABLE ct_to. + FIELD-SYMBOLS type any. + ASSign lr_row->* to . + INSERT INTO TABLE ct_to. ENDLOOP. ENDMETHOD. @@ -1324,7 +1326,9 @@ CLASS z2ui5_lcl_db IMPLEMENTATION. DATA(lv_name) = 'LO_APP->' && to_upper( lr_attri->name ). ASSIGN (lv_name) TO . DATA(lr_ref2) = REF #( ). - CLEAR lr_ref2->*. + FIELD-SYMBOLS type any. + ASSign lr_ref2->* to . + CLEAR . ENDLOOP. @@ -1635,12 +1639,12 @@ CLASS z2ui5_lcl_system_runtime IMPLEMENTATION. ASSIGN (lv_name) TO . _=>raise( when = xsdbool( sy-subrc <> 0 ) v = `Attribute in App with name ` && lv_name && ` not found` ). - DATA(lr_ref2) = REF #( ). + data lr_ref2 type ref to data. + get reference of into lr_ref2. + " DATA(lr_ref2) = REF #( ). IF check_gen_data = abap_true. TRY. - " DATA(lo_refdescr) = CAST cl_abap_refdescr( cl_abap_datadescr=>describe_by_data( lr_ref2->* ) ). - " DATA lr_ref TYPE REF TO data. DATA(lr_ref) = CAST data( lr_ref2->* ). IF lr_attri->gen_type IS INITIAL. DATA(lo_datadescr) = cl_abap_datadescr=>describe_by_data( lr_ref->* ).