ABAP Scenarios

*--Project Checklist         LOOP AT <lfs_projects>-checklists INTO ls_checklist.           LOOP AT ls_checklist-checklistitems INTO ls_checklist_itm.             LOOP AT ls_checklist_itm-tasks ASSIGNING <lfs_tasks>.               PERFORM convert_unit CHANGING <lfs_tasks>-taskdata-duration_unit.               LOOP AT <lfs_tasks>-relationships ASSIGNING <lfs_rel>.                 PERFORM convert_unit CHANGING <lfs_rel>-lag_unit.               ENDLOOP.             ENDLOOP.     ...

    SELECT d~yysuperdesign d~matnr            c~matnr c~matkl c~yylaunch_id c~yymachine_type            d~mstae d~yycommunication            INTO TABLE gt_mara            FROM mara AS c            INNER JOIN mara AS d ON d~matnr  EQ c~yydesign            WHERE c~matnr IN s_cmatnr[]            AND   c~mtart = 'Z109'            AND   c~matkl IN s_cmatkl            AND   c~yylaunch_id IN s_launch            AND   c~lvorm EQ space  ...

***********************This is function module to restrict the select-options******************************* FORM select_options_restrict . * Define the object to be passed to the RESTRICTION   DATA:     l_restrict               TYPE sscr_restrict, * Auxiliary objects for filling RESTRICT     l_opt_list               TYPE sscr_opt_list,     l_ass                    TYPE sscr_ass.   MOVE 'JUST_EQ' TO l_opt_list-name.   MOVE 'X' TO l_opt_list-options-eq.   APPEND l_opt_list TO l_restrict-opt_list_tab.   MOVE: 'S'        TO l_ass-kind,         'S_STEQU'  TO l_ass-name,         '...

LOOP AT gt_mara ASSIGNING <gt_mara>.     CLEAR g_alv.     PERFORM alv_data_mara USING <gt_mara>                           CHANGING g_alv. *   Loop at equipments (Mould id)     READ TABLE gt_equz TRANSPORTING NO FIELDS WITH KEY submt = <gt_mara>-c_matnr.     IF sy-subrc = 0.       l_equz_tabix = sy-tabix.       LOOP AT gt_equz ASSIGNING <gt_equz> FROM l_equz_tabix.         IF <gt_equz>-submt <> <gt_mara>-c_matnr.           EXIT. "Exit EQUZ LOOP.         ENDIF.

**********************Creating hotspot using Factory ALV************************************ FORM set_hotspot  USING    p_columnname.   TRY.       r_column_table ?= r_columns->get_column( columnname = p_columnname ).       r_column_table->set_cell_type( if_salv_c_cell_type=>hotspot ).     CATCH cx_salv_not_found cx_salv_existing cx_salv_data_error. "#EC NO_HANDLER   ENDTRY. ENDFORM.                    " SET_HOTSPOT ***********************************Create checkbox using Factory ALV************************* *&---------------------------------------------------------------------* *&      Form  SET_CHECKBOX *&---------------------------------------------------------------------* FORM set_checkbox  USING    p_columnname.  ...

---------------------DECLARATION----------------------------------------------- TYPES : BEGIN OF ty_temp_st,             matnr TYPE mara-matnr,             yynewmat TYPE yeco-yynewmat,           END OF ty_temp_st.   DATA : lt_eco TYPE TABLE OF ty_temp_st,          lv_matnr type matnr,          lv_yynewmat TYPE char36.   FIELD-SYMBOLS <eco> TYPE ty_temp_st. ----------------------FETCHING DATA-------------------------------------------- SELECT matnr yynewmat     FROM yeco     INTO TABLE lt_eco. * HCL start of change.     CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'       EXPORTING         input  = <fs_mara>-matnr  ...

**********************************************Check for variant************************************************* FORM variant_f4 CHANGING  p_vari          TYPE disvariant-variant                           p_gs_disvariant TYPE disvariant.   DATA: lv_exit(1)    TYPE c,         ls_disvariant_out TYPE disvariant,         lv_save(1)    TYPE c.   CLEAR p_gs_disvariant.   lv_save = 'A'.   p_gs_disvariant-report     = sy-repid.   p_gs_disvariant-username   = sy-uname.   CALL FUNCTION 'LVC_VARIANT_F4'     EXPORTING       is_variant    = p_gs_disvariant       i_save   ...

form delete_selected_information.        data : i_lines type i.      *       Reading the index of the selected row in the ALV grid.   call method addressbook_grid->get_selected_rows        importing             et_index_rows = i_index_rows.      *       Check whether a row is selected or not. If not it popups a *       dialog box as warning to select a row.   describe table i_index_rows lines i_lines.        if i_lines = 0.     message i002.     exit.   endif.      *        Reads the selected rows into work area for display   loop at i_index_rows into i_selected_row.     if sy-tabix = 1.   ...

REPORT YJ_REP_BOM_SMARTFORM. PARAMETERS P_MATNR TYPE MATNR. CALL FUNCTION '/1BCDWB/SF00000128'   EXPORTING *   ARCHIVE_INDEX              = *   ARCHIVE_INDEX_TAB          = *   ARCHIVE_PARAMETERS         = *   CONTROL_PARAMETERS         = *   MAIL_APPL_OBJ              = *   MAIL_RECIPIENT             = *   MAIL_SENDER                =    OUTPUT_OPTIONS-TDDEST       = 'lp01' *   USER_SETTINGS              = 'X' ...

AT Selection-screen.  DATA ok_code type sy-ucomm.       ok_code = sy-ucomm. If ok_code = 'ONLI'. CALL FUNCTION 'POPUP_TO_CONFIRM'         EXPORTING           TITLEBAR              = TEXT-095           TEXT_QUESTION         = TEXT-096     " Performance-related text message           TEXT_BUTTON_1         = TEXT-097     " CONTINUE           TEXT_BUTTON_2         = TEXT-098     " CANCEL           DEFAULT_BUTTON        = '2' ...