Update content

src/zbp_demo_abap_rap_ro_u.clas.locals_imp.abap

@@ -510,7 +510,7 @@ CLASS lhc_root IMPLEMENTATION.
           "Filling the table for the RESULT parameter based on the FULL parameter
           "Note: If the FULL parameter is initial, only the LINK parameter should be provided
           IF result_requested = abap_true.
-            APPEND VALUE #( %tky   = <rba>-%tky
+            APPEND VALUE #( %tky   = CORRESPONDING #( <rba>-%tky )
                             key_ch = COND #( WHEN <rba>-%control-key_ch NE if_abap_behv=>mk-off
                                              THEN <ch>-instance-key_ch )
                             field_ch1 = COND #( WHEN <rba>-%control-field_ch1 NE if_abap_behv=>mk-off
@@ -967,7 +967,7 @@ CLASS lhc_child IMPLEMENTATION.
       AND line_exists( lcl_buffer=>child_buffer[ instance-key_field = <rba>-key_field instance-key_ch = <rba>-key_ch ] ).
 
         "Filling the LINK parameter
-        INSERT VALUE #( target-%tky = <rba>-%tky
+        INSERT VALUE #( target-%tky = CORRESPONDING #( <rba>-%tky )
                         source-%tky = VALUE #( key_field = <rba>-key_field
                                                 key_ch    = <rba>-key_ch )
                     ) INTO TABLE association_links.
@@ -979,7 +979,7 @@ CLASS lhc_child IMPLEMENTATION.
 
           IF sy-subrc = 0.
 
-            APPEND VALUE #( %tky   = <rba>-%tky
+            APPEND VALUE #( %tky   = CORRESPONDING #( <rba>-%tky )
                             field1 = COND #( WHEN <rba>-%control-field1 NE if_abap_behv=>mk-off
                                              THEN <fs_rp>-instance-field1 )
                             field2 = COND #( WHEN <rba>-%control-field2 NE if_abap_behv=>mk-off

src/zcl_demo_abap_amdp.clas.abap

@@ -194,7 +194,7 @@ CLASS zcl_demo_abap_amdp IMPLEMENTATION.
 
       CATCH cx_amdp_execution_error INTO DATA(error1).
 
-        out->write( error1->get_text( ) ).
+        output->display( error1->get_text( ) ).
 
     ENDTRY.
 

src/zcl_demo_abap_dynamic_prog.clas.locals_imp.abap

@@ -370,7 +370,7 @@ CLASS lcl_det_at_runtime IMPLEMENTATION.
     syntax_elements-rows = cl_abap_random_int=>create(
             seed = cl_abap_random=>seed( )
             min  = 2
-            max  = 6 )->get_next( ).
+            max  = 5 )->get_next( ).
 
   ENDMETHOD.
 

src/zcl_demo_abap_rap_ext_num_m.clas.abap

@@ -898,8 +898,8 @@ CLASS ZCL_DEMO_ABAP_RAP_EXT_NUM_M IMPLEMENTATION.
 
 **********************************************************************
 *
-* Excursion: Read and read-by-association operation using dynamic
-* EML statements
+* Excursion: Read and read-by-association operation using a dynamic
+* EML statement
 *
 **********************************************************************
 
@@ -932,14 +932,12 @@ CLASS ZCL_DEMO_ABAP_RAP_EXT_NUM_M IMPLEMENTATION.
 *    rba_dyn = VALUE #(
 *     ( %key-key_field = 1
 *       %control = VALUE #(
-*          key_field = if_abap_behv=>mk-on
 *          key_ch    = if_abap_behv=>mk-on
 *          field_ch1 = if_abap_behv=>mk-on
 *          field_ch2 = if_abap_behv=>mk-on ) )
 *      ( %key-key_field = 2
 *        %control = VALUE #(
-*          key_field = if_abap_behv=>mk-on
-*          key_ch    = if_abap_behv=>mk-on
+*          key_ch    = if_abap_behv=>mk-on  
 *          field_ch1 = if_abap_behv=>mk-on
 *          field_ch2 = if_abap_behv=>mk-on ) ) ).
 *

src/zcl_demo_abap_rap_ext_num_u.clas.abap

@@ -1020,13 +1020,11 @@ CLASS zcl_demo_abap_rap_ext_num_u IMPLEMENTATION.
 *    rba_dyn = VALUE #(
 *     ( %key-key_field = 1
 *       %control = VALUE #(
-*          key_field = if_abap_behv=>mk-on
 *          key_ch    = if_abap_behv=>mk-on
 *          field_ch1 = if_abap_behv=>mk-on
 *          field_ch2 = if_abap_behv=>mk-on ) )
 *      ( %key-key_field = 2
 *        %control = VALUE #(
-*          key_field = if_abap_behv=>mk-on
 *          key_ch    = if_abap_behv=>mk-on
 *          field_ch1 = if_abap_behv=>mk-on
 *          field_ch2 = if_abap_behv=>mk-on ) ) ).

src/zcl_demo_abap_sql.clas.abap

@@ -1,6 +1,6 @@
 ***********************************************************************
 *
-*              ABAP cheat sheet: ABAP SQL in Use
+*                   ABAP cheat sheet: ABAP SQL
 *
 * -------------------------- PURPOSE ----------------------------------
 * - Example to demonstrate various syntactical options for working with
@@ -72,7 +72,7 @@ CLASS zcl_demo_abap_sql IMPLEMENTATION.
 
     DATA(output) = NEW zcl_demo_abap_display( out ).
 
-    output->display( `ABAP Cheat Sheet Example: ABAP SQL in Use` ).
+    output->display( `ABAP Cheat Sheet Example: ABAP SQL` ).
     output->display( `Using SELECT for multiple purposes` ).
     output->display( `1) Reading a single row from database table ` &&
       `into a structure` ).

src/zdemo_abap_rap_draft_m.bdef.asbdef

@@ -22,6 +22,10 @@ late numbering
   determination det_modify on modify { field num1, num2, arithm_op; }
   draft action Resume;
   draft action Edit;
+  //As of release 2308: Draft action "Activate" should be defined as "optimized" 
+  //to enable optimized execution of determinations and validations.
+  //Comment in the following notation, comment out the one below.
+  //draft action Activate optimized;
   draft action Activate;
   draft action Discard;
   draft determine action Prepare