ABAP Select data from SAP table ESCHD 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 ESCHD 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 ESCHD. 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 ESCHD 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_ESCHD TYPE STANDARD TABLE OF ESCHD, WA_ESCHD TYPE ESCHD, 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: <ESCHD> TYPE ESCHD. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_ESCHD. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM ESCHD INTO TABLE IT_ESCHD. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM ESCHD * INTO TABLE @DATA(IT_ESCHD2). *--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_ESCHD INDEX 1 INTO DATA(WA_ESCHD2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_ESCHD ASSIGNING <ESCHD>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<ESCHD>-MANDT = 1.
<ESCHD>-SCHEMANR = 1.
<ESCHD>-SNO = 1.
<ESCHD>-SPARTE = 1.
<ESCHD>-AKLASSE = 1.
ENDLOOP. LOOP AT IT_ESCHD INTO WA_ESCHD. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_ESCHD-DYNPERSCHEMA, sy-vline,
WA_ESCHD-PEBRATE, sy-vline,
WA_ESCHD-BB_SCHEMA, sy-vline,
WA_ESCHD-CONDBILLPROG, sy-vline,
WA_ESCHD-ABRSPERRDT, sy-vline,
WA_ESCHD-MARK, sy-vline.
ENDLOOP. *Add any further fields from structure WA_ESCHD 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_ESCHD 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_ESCHD INTO WA_ESCHD. *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_ESCHD_STR,
MANDT TYPE STRING,
SCHEMANR TYPE STRING,
SNO TYPE STRING,
SPARTE TYPE STRING,
AKLASSE TYPE STRING,
DYNPERSCHEMA TYPE STRING,
PEBRATE TYPE STRING,
BB_SCHEMA TYPE STRING,
CONDBILLPROG TYPE STRING,
ABRSPERRDT TYPE STRING,
MARK TYPE STRING,
V_SCHEMANR TYPE STRING,
SCHEMABEZ TYPE STRING,
AKLASSBEZ TYPE STRING,
SPARTENBEZ TYPE STRING,
LRATESTEP TYPE STRING,
VIS_PROG TYPE STRING,
STEPNOTES TYPE STRING,
TARIFNR TYPE STRING,
TARLFDNR TYPE STRING,
OPTIONAL TYPE STRING,
TIMECONTRL TYPE STRING,
STTARIF TYPE STRING,
S_TVORG TYPE STRING,
H_TVORG TYPE STRING,
S_ABSTVORG TYPE STRING,
H_ABSTVORG TYPE STRING,
CHNG_SIGN TYPE STRING,
KONZIGR TYPE STRING,
SAISON TYPE STRING,
PROGRAMM TYPE STRING,
EIN01 TYPE STRING,
EIN02 TYPE STRING,
EIN03 TYPE STRING,
EIN04 TYPE STRING,
EIN05 TYPE STRING,
EIN06 TYPE STRING,
EIN07 TYPE STRING,
EIN08 TYPE STRING,
EIN09 TYPE STRING,
EIN10 TYPE STRING,
AUS01 TYPE STRING,
AUS02 TYPE STRING,
AUS03 TYPE STRING,
AUS04 TYPE STRING,
AUS05 TYPE STRING,
VARCONT1 TYPE STRING,
VARCONT2 TYPE STRING,
VARCONT3 TYPE STRING,
VARCONT4 TYPE STRING,
VARCONT5 TYPE STRING,
BELZART1 TYPE STRING,
BELZART2 TYPE STRING,
BELZART3 TYPE STRING,
BELZART4 TYPE STRING,
BELZART5 TYPE STRING,
STEPINACT TYPE STRING,
BUCHREL TYPE STRING,
BETRSTREL TYPE STRING,
MENGESTREL TYPE STRING,
STGRAMT TYPE STRING,
STGRQNT TYPE STRING,
ERCHV_BW_REL TYPE STRING,
DISCON_FREE TYPE STRING,
PREISZUS TYPE STRING,
GROSSGROUP TYPE STRING,
GROSSPRICE TYPE STRING,
BRUTTOZEILE TYPE STRING,
TAXGROUP TYPE STRING,
LINE_CLASS TYPE STRING,
LINESORT1 TYPE STRING,
LINESORT2 TYPE STRING,
LINESORT3 TYPE STRING,
LINESORT4 TYPE STRING,
LINESORT5 TYPE STRING,
BACKSTART TYPE STRING,
BACKONLY TYPE STRING,
BACKEXEC01 TYPE STRING,
BACKEXEC02 TYPE STRING,
BACKEXEC03 TYPE STRING,
BACKEXEC04 TYPE STRING,
BACKEXEC05 TYPE STRING,
BACKCANC01 TYPE STRING,
BACKCANC02 TYPE STRING,
BACKCANC03 TYPE STRING,
BACKCANC04 TYPE STRING,
BACKCANC05 TYPE STRING,
DYNSTART TYPE STRING,
DYNEXEC01 TYPE STRING,
DYNEXEC02 TYPE STRING,
DYNEXEC03 TYPE STRING,
DYNEXEC04 TYPE STRING,
DYNEXEC05 TYPE STRING,
DYNCANC01 TYPE STRING,
DYNCANC02 TYPE STRING,
DYNCANC03 TYPE STRING,
DYNCANC04 TYPE STRING,
DYNCANC05 TYPE STRING,
TIMESLICEGEN TYPE STRING,
BBINFOLINES TYPE STRING,
DELOPERAND TYPE STRING,
ADVCONTROL TYPE STRING,END OF T_EKKO_STR. DATA: WA_ESCHD_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_ESCHD_STR-MANDT sy-vline
WA_ESCHD_STR-SCHEMANR sy-vline
WA_ESCHD_STR-SNO sy-vline
WA_ESCHD_STR-SPARTE sy-vline
WA_ESCHD_STR-AKLASSE sy-vline
WA_ESCHD_STR-DYNPERSCHEMA sy-vline
WA_ESCHD_STR-PEBRATE sy-vline
WA_ESCHD_STR-BB_SCHEMA sy-vline
WA_ESCHD_STR-CONDBILLPROG sy-vline
WA_ESCHD_STR-ABRSPERRDT sy-vline
WA_ESCHD_STR-MARK sy-vline
WA_ESCHD_STR-V_SCHEMANR sy-vline
WA_ESCHD_STR-SCHEMABEZ sy-vline
WA_ESCHD_STR-AKLASSBEZ sy-vline
WA_ESCHD_STR-SPARTENBEZ sy-vline
WA_ESCHD_STR-LRATESTEP sy-vline
WA_ESCHD_STR-VIS_PROG sy-vline
WA_ESCHD_STR-STEPNOTES sy-vline
WA_ESCHD_STR-TARIFNR sy-vline
WA_ESCHD_STR-TARLFDNR sy-vline
WA_ESCHD_STR-OPTIONAL sy-vline
WA_ESCHD_STR-TIMECONTRL sy-vline
WA_ESCHD_STR-STTARIF sy-vline
WA_ESCHD_STR-S_TVORG sy-vline
WA_ESCHD_STR-H_TVORG sy-vline
WA_ESCHD_STR-S_ABSTVORG sy-vline
WA_ESCHD_STR-H_ABSTVORG sy-vline
WA_ESCHD_STR-CHNG_SIGN sy-vline
WA_ESCHD_STR-KONZIGR sy-vline
WA_ESCHD_STR-SAISON sy-vline
WA_ESCHD_STR-PROGRAMM sy-vline
WA_ESCHD_STR-EIN01 sy-vline
WA_ESCHD_STR-EIN02 sy-vline
WA_ESCHD_STR-EIN03 sy-vline
WA_ESCHD_STR-EIN04 sy-vline
WA_ESCHD_STR-EIN05 sy-vline
WA_ESCHD_STR-EIN06 sy-vline
WA_ESCHD_STR-EIN07 sy-vline
WA_ESCHD_STR-EIN08 sy-vline
WA_ESCHD_STR-EIN09 sy-vline
WA_ESCHD_STR-EIN10 sy-vline
WA_ESCHD_STR-AUS01 sy-vline
WA_ESCHD_STR-AUS02 sy-vline
WA_ESCHD_STR-AUS03 sy-vline
WA_ESCHD_STR-AUS04 sy-vline
WA_ESCHD_STR-AUS05 sy-vline
WA_ESCHD_STR-VARCONT1 sy-vline
WA_ESCHD_STR-VARCONT2 sy-vline
WA_ESCHD_STR-VARCONT3 sy-vline
WA_ESCHD_STR-VARCONT4 sy-vline
WA_ESCHD_STR-VARCONT5 sy-vline
WA_ESCHD_STR-BELZART1 sy-vline
WA_ESCHD_STR-BELZART2 sy-vline
WA_ESCHD_STR-BELZART3 sy-vline
WA_ESCHD_STR-BELZART4 sy-vline
WA_ESCHD_STR-BELZART5 sy-vline
WA_ESCHD_STR-STEPINACT sy-vline
WA_ESCHD_STR-BUCHREL sy-vline
WA_ESCHD_STR-BETRSTREL sy-vline
WA_ESCHD_STR-MENGESTREL sy-vline
WA_ESCHD_STR-STGRAMT sy-vline
WA_ESCHD_STR-STGRQNT sy-vline
WA_ESCHD_STR-ERCHV_BW_REL sy-vline
WA_ESCHD_STR-DISCON_FREE sy-vline
WA_ESCHD_STR-PREISZUS sy-vline
WA_ESCHD_STR-GROSSGROUP sy-vline
WA_ESCHD_STR-GROSSPRICE sy-vline
WA_ESCHD_STR-BRUTTOZEILE sy-vline
WA_ESCHD_STR-TAXGROUP sy-vline
WA_ESCHD_STR-LINE_CLASS sy-vline
WA_ESCHD_STR-LINESORT1 sy-vline
WA_ESCHD_STR-LINESORT2 sy-vline
WA_ESCHD_STR-LINESORT3 sy-vline
WA_ESCHD_STR-LINESORT4 sy-vline
WA_ESCHD_STR-LINESORT5 sy-vline
WA_ESCHD_STR-BACKSTART sy-vline
WA_ESCHD_STR-BACKONLY sy-vline
WA_ESCHD_STR-BACKEXEC01 sy-vline
WA_ESCHD_STR-BACKEXEC02 sy-vline
WA_ESCHD_STR-BACKEXEC03 sy-vline
WA_ESCHD_STR-BACKEXEC04 sy-vline
WA_ESCHD_STR-BACKEXEC05 sy-vline
WA_ESCHD_STR-BACKCANC01 sy-vline
WA_ESCHD_STR-BACKCANC02 sy-vline
WA_ESCHD_STR-BACKCANC03 sy-vline
WA_ESCHD_STR-BACKCANC04 sy-vline
WA_ESCHD_STR-BACKCANC05 sy-vline
WA_ESCHD_STR-DYNSTART sy-vline
WA_ESCHD_STR-DYNEXEC01 sy-vline
WA_ESCHD_STR-DYNEXEC02 sy-vline
WA_ESCHD_STR-DYNEXEC03 sy-vline
WA_ESCHD_STR-DYNEXEC04 sy-vline
WA_ESCHD_STR-DYNEXEC05 sy-vline
WA_ESCHD_STR-DYNCANC01 sy-vline
WA_ESCHD_STR-DYNCANC02 sy-vline
WA_ESCHD_STR-DYNCANC03 sy-vline
WA_ESCHD_STR-DYNCANC04 sy-vline
WA_ESCHD_STR-DYNCANC05 sy-vline
WA_ESCHD_STR-TIMESLICEGEN sy-vline
WA_ESCHD_STR-BBINFOLINES sy-vline
WA_ESCHD_STR-DELOPERAND sy-vline
WA_ESCHD_STR-ADVCONTROL sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.