ABAP On HANA

*&---------------------------------------------------------------------* *& Report z_table_expression *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT z_table_expression. *1. Segment read with index *(a)Simple read with index *(b)Read index with table expression *(c)table expression without try catch  using value  operator *(d)table expression with assign fs *2. Read using a without key and table key *(a)Simple read with condition *(b)Read with table expression *3.Check for line exist *4.Get table index *5.Performance comparision CLASS demo DEFINITION.   PUBLIC SECTION.     CLASS-METHODS main. ENDCLASS. CLASS demo IMPLEMENTATION.   METHOD main.     TYPES: BEGIN OF helper_type,              vbeln TYPE vbak-vbeln,              vkorg TYPE vbak-vkorg,  ...

*&---------------------------------------------------------------------* *& Report z_tab_expre_performance *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT z_tab_expre_performance. *-----------------------------------------------------------------------* CLASS lcl_demo DEFINITION . *-----------------------------------------------------------------------*   PUBLIC SECTION.     CLASS-METHODS main.   PRIVATE SECTION.     TYPES: BEGIN OF ty_struct,              id  TYPE i,              val TYPE i,            END OF ty_struct.     TYPES ty_itab TYPE SORTED TABLE OF ty_struct WITH UNIQUE KEY id.     DATA it_rand_no TYPE ty_itab.     TYPES:BEGIN OF ty_final,             text TY...

*&---------------------------------------------------------------------* *& Report zr_opensql_23_widow_expression *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT zr_opensql_23_widow_expression. SELECT  FROM vbak  FIELDS vbeln AS so,         kunnr AS cust_id,         waerk AS curre,         netwr AS net_amt,         SUM( netwr ) OVER(                          PARTITION BY kunnr                          ORDER BY netwr *ROWS BETWEEN UNBOUNDED PRECEDING AND CURRENT ROW * ROWS BETWEEN UNBOUNDED PRECEDING AND UNBOUNDED FOLLOWING  ROWS BETWEEN 2 PRECEDING AND 2 FOLLOWING                       ...

*&---------------------------------------------------------------------* *& Report zr_opensql_16_host_expre_where *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT zr_opensql_16_host_expre_where. CLASS demo DEFINITION.   PUBLIC SECTION.     CLASS-METHODS class_constructor.     CLASS-METHODS main.   PRIVATE SECTION.     CLASS-DATA: it_scarr TYPE STANDARD TABLE OF scarr. ENDCLASS. CLASS demo IMPLEMENTATION.   METHOD class_constructor.     SELECT *      FROM scarr      INTO TABLE @it_scarr.   ENDMETHOD.   METHOD main.     DATA : lv_carrame TYPE scarr-carrname VALUE 'American Airlines'.     cl_demo_input=>request(       CHANGING         field       =  lv_carrame     ).    ...

*&---------------------------------------------------------------------* *& Report zr_opensql_15_client_handlin_t *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT zr_opensql_15_client_handlin_t. CLASS demo DEFINITION.   PUBLIC SECTION.     CLASS-METHODS main. ENDCLASS. CLASS demo IMPLEMENTATION.   METHOD main.     SELECT      FROM vbak AS so      INNER JOIN vbap AS item      ON  so~mandt = item~mandt      AND so~vbeln = item~vbeln      CLIENT SPECIFIED      FIELDS so~vbeln, so~vkorg, so~vkgrp,             item~posnr, item~matnr      WHERE so~mandt = '800'      INTO TABLE @DATA(it_result)      .     IF sy-subrc IS INITIAL.       cl_demo_outpu...

*&---------------------------------------------------------------------* *& Report zr_opensql_20_unioon_grp_by *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT zr_opensql_20_unioon_grp_by. *Use case only n select list *Use case in select list and grp by *Chaining operator *demo_sql_expr_with_group_by SELECT  FROM vbak AS so  INNER JOIN kna1 AS cust  ON so~kunnr = cust~kunnr  FIELDS so~kunnr AS cust_id,         cust~name1 AS customer,         so~waerk AS curre,         SUM( so~netwr ) AS tot_netprice, *        AVG( so~netwr ) AS net, *        MAX( so~netwr ) AS max, *        MIN( so~netwr  ) AS min,         COUNT( so~netwr ) AS count,       CASE          WHEN so...

*&---------------------------------------------------------------------* *& Report zr_opensql_14_join_t *&---------------------------------------------------------------------* *& *&---------------------------------------------------------------------* REPORT zr_opensql_14_join_t. CLASS demo DEFINITION.   PUBLIC SECTION.     CLASS-METHODS main. ENDCLASS. CLASS demo IMPLEMENTATION.   METHOD main.     SELECT      FROM vbak AS so      RIGHT OUTER JOIN kna1 AS cust      ON so~kunnr = cust~kunnr      FIELDS cust~kunnr,             so~vbeln,             so~netwr      INTO TABLE @DATA(it_result).     IF sy-subrc IS INITIAL.       cl_demo_output=>write( it_result  ).     ENDIF.     TYPES: BEGIN OF helper_type.     TYPES   clnt TYPE t000-mand...