ABAP by Ajay

Report REPORT  zab_rp_progress_bar . DATA :  lv_vbeln  TYPE  vbeln_va . SELECT-OPTIONS  :   s_vbeln  FOR  lv_vbeln . IF   s_vbeln  IS  INITIAL .    MESSAGE  ' Pls give sale order number '  TYPE  'E' . ELSE .    CALL  FUNCTION  ' SAPGUI_PROGRESS_INDICATOR '      EXPORTING       percentage  =  ' 10 '        text        =  ' Reading records started ' .    WAIT  UP  TO  5  SECONDS .    SELECT  *  FROM  vbak      INTO  TABLE  @DATA ( lt_vbak )      WHERE  vbeln  IN  @s_vbeln .    CALL  FUNCTION  ' SAPGUI_PROGRESS_INDICATOR '      EXPORTING       percentage  =  ' 50 '        text        =  ' Reading records finished  ' .    WAIT  UP  TO  5  SECONDS .    CALL  FUNCTION  ' SAPGUI_PROGRESS_INDICATOR '      EXPORTING       percentage  =  ' 80 '        text        =  ' Preparing final result data ' .    WAIT  UP  TO  5  SECONDS .    CALL  FUNCTION  ' REUSE_ALV_GRID_DISPLAY '      EXPORTING       i_call

     *  Previously , if we want to fetch the data of all columns of a table, we cannot use * for that particular table in the join.     *    In SAP ABAP new syntax, we can use * to fetch the data of all columns of a particular  table in the join. Report REPORT  zab_rp_join_improve . DATA :   lv_matnr  TYPE  matnr . TYPES :   BEGIN  OF  ls_data ,          matnr  TYPE  matnr ,          meins  TYPE  meins ,          spras  TYPE  spras ,          maktx  TYPE  maktx ,          maktg  TYPE  maktg ,         END  OF  ls_data . DATA :   lt_data  TYPE  TABLE   OF  ls_data ,       lr_data  TYPE  ls_data . SELECT-OPTIONS  :   s_matnr  FOR  lv_matnr . IF  s_matnr  IS  NOT  INITIAL .    SELECT  a ~ matnr a ~ meins b ~ spras b ~ maktx b ~ maktg      FROM  mara  AS  a  JOIN  makt  AS  b      ON   a ~ matnr  =  b ~ matnr      INTO  TABLE  lt_data      WHERE  a ~ matnr  IN  s_matnr  AND  b ~ spras  =  sy - langu . ENDIF . IF   lt_data  IS  NOT  INITIAL .    LOOP  AT   lt_data  INTO  lr_data .      W

                                      Refer -  Introduction to filter in ABAP Report-Normal REPORT  zab_rp_filter_table_new . TABLES :   vbak . TYPES :   BEGIN  OF  ls_vbak ,          vbeln  TYPE  vbeln_va ,          vbtyp  TYPE  vbtypl ,         END  OF  ls_vbak . TYPES :   BEGIN  OF  ls_filter ,          vbtyp  TYPE  vbtypl ,         END  OF  ls_filter . DATA :   lt_vbak       TYPE  SORTED  TABLE  OF  ls_vbak  WITH  NON-UNIQUE  KEY  vbtyp ,       lt_filter     TYPE  SORTED  TABLE  OF  ls_filter  WITH  UNIQUE  KEY  vbtyp ,       lt_temp_data  TYPE  TABLE  OF  ls_vbak . SELECT-OPTIONS  :   s_vbeln  FOR  vbak - vbeln . IF   s_vbeln  IS  NOT  INITIAL .    SELECT  vbeln vbtyp      FROM  vbak      INTO  TABLE  lt_vbak      WHERE  vbeln  IN  s_vbeln . ENDIF . lt_filter  =  VALUE  # (  (  vbtyp  =  'A'  )  (  vbtyp  =  'C'  )  ) . lt_temp_data  =  FILTER # (  lt_vbak  IN  lt_filter  WHERE  vbtyp  =  vbtyp  ) . cl_demo_output => display (  lt_temp_data  ) . Input Output Re