ABAP Select data from SAP table BAL_S_SHOW into internal table
Get Example source ABAP code based on a different SAP table
Below is a number of ABAP code snippets to demonstrate how to select data from SAP BAL_S_SHOW table and store it within an internal table, including using the newer @DATA inline declaration methods. It also shows you various ways to process this data using ABAP work area, inline declaration or field symbols including executing all the relevant CONVERSION_EXIT routines specific to BAL_S_SHOW. See here for more generic Select statement tips.
Sometimes data within SAP is stored within the database table in a different format to what it is displayed to the user. These input/output conversation FM routines are what translates the data between the two formats.
There is also a full declaration of the BAL_S_SHOW table where each field has a char/string type for you to simply copy and paste. This allows you to use processing that is only available to these field types such as the CONCATENATE statement.
DATA: IT_BAL_S_SHOW TYPE STANDARD TABLE OF BAL_S_SHOW, WA_BAL_S_SHOW TYPE BAL_S_SHOW, GD_STR TYPE STRING. DATA: lo_typedescr type REF TO cl_abap_typedescr. DATA: lv_fieldname type fieldname. FIELD-SYMBOLS: <FIELD> TYPE any. FIELD-SYMBOLS: <BAL_S_SHOW> TYPE BAL_S_SHOW. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_BAL_S_SHOW. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM BAL_S_SHOW INTO TABLE IT_BAL_S_SHOW. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM BAL_S_SHOW * INTO TABLE @DATA(IT_BAL_S_SHOW2). *--Further methods of using ABAP code to select data from SAP database tables *You can also declare the header/work area using the in-line DATA declaration method READ TABLE IT_BAL_S_SHOW INDEX 1 INTO DATA(WA_BAL_S_SHOW2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_BAL_S_SHOW ASSIGNING <BAL_S_SHOW>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<BAL_S_SHOW>-LOGNUMBER = 1.
<BAL_S_SHOW>-LOG_HANDLE = 1.
<BAL_S_SHOW>-OBJECT = 1.
<BAL_S_SHOW>-SUBOBJECT = 1.
<BAL_S_SHOW>-EXTNUMBER = 1.
ENDLOOP. LOOP AT IT_BAL_S_SHOW INTO WA_BAL_S_SHOW. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_BAL_S_SHOW-ALDATE, sy-vline,
WA_BAL_S_SHOW-ALTIME, sy-vline,
WA_BAL_S_SHOW-ALUSER, sy-vline,
WA_BAL_S_SHOW-ALTCODE, sy-vline,
WA_BAL_S_SHOW-ALPROG, sy-vline,
WA_BAL_S_SHOW-ALMODE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_BAL_S_SHOW you want to display... WRITE:/ sy-uline. * Aternatively use generic code to Write field values (and NAME) to screen report DO. ASSIGN COMPONENT sy-index OF STRUCTURE wa_BAL_S_SHOW TO <field>. IF sy-subrc <> 0. EXIT. ENDIF. WRITE:/ 'Field Value', <field>, sy-vline. gd_str = <field> . lo_typedescr ?= CL_ABAP_DATADESCR=>DESCRIBE_BY_DATA( <field> ). lv_fieldname = lo_typedescr->GET_RELATIVE_NAME( ). WRITE:/ 'Field Name', lv_fieldname. ENDDO. *Redo loop but convert all fields from internal to out value LOOP AT IT_BAL_S_SHOW INTO WA_BAL_S_SHOW. *Write horizonal line to screen report. WRITE:/ sy-uline. *Convert all fields to display/output versions using conversion routines PERFORM convert_all_field_values CHANGING wa_EKKO. ENDLOOP. *&---------------------------------------------------------------------* *& Form convert_all_field_values *&---------------------------------------------------------------------* FORM convert_all_field_values CHANGING p_EKKO LIKE wa_EKKO. DATA: ld_input(1000) TYPE c, ld_output(1000) TYPE C.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_BAL_S_SHOW_STR,
LOGNUMBER TYPE STRING,
LOG_HANDLE TYPE STRING,
OBJECT TYPE STRING,
SUBOBJECT TYPE STRING,
EXTNUMBER TYPE STRING,
ALDATE TYPE STRING,
ALTIME TYPE STRING,
ALUSER TYPE STRING,
ALTCODE TYPE STRING,
ALPROG TYPE STRING,
ALMODE TYPE STRING,
PROBCLASSH TYPE STRING,
ALCHDATE TYPE STRING,
ALCHTIME TYPE STRING,
ALCHUSER TYPE STRING,
ALDATE_DEL TYPE STRING,
DEL_BEFORE TYPE STRING,
ALSTATE TYPE STRING,
T_OBJECT TYPE STRING,
T_SUBOBJ TYPE STRING,
T_ALTCODE TYPE STRING,
T_ALMODE TYPE STRING,
T_PROBCLSH TYPE STRING,
T_ALSTATE TYPE STRING,
T_DEL_BEF TYPE STRING,
MSGNUMBER TYPE STRING,
MSGTY TYPE STRING,
MSGID TYPE STRING,
MSGNO TYPE STRING,
MSGV1 TYPE STRING,
MSGV2 TYPE STRING,
MSGV3 TYPE STRING,
MSGV4 TYPE STRING,
DETLEVEL TYPE STRING,
PROBCLASS TYPE STRING,
ALSORT TYPE STRING,
MSG_COUNT TYPE STRING,
TIME_STMP TYPE STRING,
MSG_DATE TYPE STRING,
MSG_TIME TYPE STRING,
MSG_STMP TYPE STRING,
T_MSG TYPE STRING,
T_MSGTY TYPE STRING,
T_MSGID TYPE STRING,
T_DETLEVEL TYPE STRING,
T_PROBCLSS TYPE STRING,
SEQ_NO TYPE STRING,
ICON_MSGTY TYPE STRING,
ICON_PAR TYPE STRING,
ICON_LNG TYPE STRING,
EXCLS TYPE STRING,
EXTXT TYPE STRING,END OF T_EKKO_STR. DATA: WA_BAL_S_SHOW_STR type T_EKKO_STR. DATA: ld_text TYPE string. LOOP AT IT_EKKO INTO WA_EKKO. MOVE-CORRESPONDING wa_EKKO TO WA_EKKO_STR. CONCATENATE: sy-vline
WA_BAL_S_SHOW_STR-LOGNUMBER sy-vline
WA_BAL_S_SHOW_STR-LOG_HANDLE sy-vline
WA_BAL_S_SHOW_STR-OBJECT sy-vline
WA_BAL_S_SHOW_STR-SUBOBJECT sy-vline
WA_BAL_S_SHOW_STR-EXTNUMBER sy-vline
WA_BAL_S_SHOW_STR-ALDATE sy-vline
WA_BAL_S_SHOW_STR-ALTIME sy-vline
WA_BAL_S_SHOW_STR-ALUSER sy-vline
WA_BAL_S_SHOW_STR-ALTCODE sy-vline
WA_BAL_S_SHOW_STR-ALPROG sy-vline
WA_BAL_S_SHOW_STR-ALMODE sy-vline
WA_BAL_S_SHOW_STR-PROBCLASSH sy-vline
WA_BAL_S_SHOW_STR-ALCHDATE sy-vline
WA_BAL_S_SHOW_STR-ALCHTIME sy-vline
WA_BAL_S_SHOW_STR-ALCHUSER sy-vline
WA_BAL_S_SHOW_STR-ALDATE_DEL sy-vline
WA_BAL_S_SHOW_STR-DEL_BEFORE sy-vline
WA_BAL_S_SHOW_STR-ALSTATE sy-vline
WA_BAL_S_SHOW_STR-T_OBJECT sy-vline
WA_BAL_S_SHOW_STR-T_SUBOBJ sy-vline
WA_BAL_S_SHOW_STR-T_ALTCODE sy-vline
WA_BAL_S_SHOW_STR-T_ALMODE sy-vline
WA_BAL_S_SHOW_STR-T_PROBCLSH sy-vline
WA_BAL_S_SHOW_STR-T_ALSTATE sy-vline
WA_BAL_S_SHOW_STR-T_DEL_BEF sy-vline
WA_BAL_S_SHOW_STR-MSGNUMBER sy-vline
WA_BAL_S_SHOW_STR-MSGTY sy-vline
WA_BAL_S_SHOW_STR-MSGID sy-vline
WA_BAL_S_SHOW_STR-MSGNO sy-vline
WA_BAL_S_SHOW_STR-MSGV1 sy-vline
WA_BAL_S_SHOW_STR-MSGV2 sy-vline
WA_BAL_S_SHOW_STR-MSGV3 sy-vline
WA_BAL_S_SHOW_STR-MSGV4 sy-vline
WA_BAL_S_SHOW_STR-DETLEVEL sy-vline
WA_BAL_S_SHOW_STR-PROBCLASS sy-vline
WA_BAL_S_SHOW_STR-ALSORT sy-vline
WA_BAL_S_SHOW_STR-MSG_COUNT sy-vline
WA_BAL_S_SHOW_STR-TIME_STMP sy-vline
WA_BAL_S_SHOW_STR-MSG_DATE sy-vline
WA_BAL_S_SHOW_STR-MSG_TIME sy-vline
WA_BAL_S_SHOW_STR-MSG_STMP sy-vline
WA_BAL_S_SHOW_STR-T_MSG sy-vline
WA_BAL_S_SHOW_STR-T_MSGTY sy-vline
WA_BAL_S_SHOW_STR-T_MSGID sy-vline
WA_BAL_S_SHOW_STR-T_DETLEVEL sy-vline
WA_BAL_S_SHOW_STR-T_PROBCLSS sy-vline
WA_BAL_S_SHOW_STR-SEQ_NO sy-vline
WA_BAL_S_SHOW_STR-ICON_MSGTY sy-vline
WA_BAL_S_SHOW_STR-ICON_PAR sy-vline
WA_BAL_S_SHOW_STR-ICON_LNG sy-vline
WA_BAL_S_SHOW_STR-EXCLS sy-vline
WA_BAL_S_SHOW_STR-EXTXT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.