ABAP Select data from SAP table EEWA_BULK_DATA 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 EEWA_BULK_DATA 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 EEWA_BULK_DATA. 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 EEWA_BULK_DATA 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_EEWA_BULK_DATA TYPE STANDARD TABLE OF EEWA_BULK_DATA, WA_EEWA_BULK_DATA TYPE EEWA_BULK_DATA, 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: <EEWA_BULK_DATA> TYPE EEWA_BULK_DATA. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_EEWA_BULK_DATA. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM EEWA_BULK_DATA INTO TABLE IT_EEWA_BULK_DATA. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM EEWA_BULK_DATA * INTO TABLE @DATA(IT_EEWA_BULK_DATA2). *--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_EEWA_BULK_DATA INDEX 1 INTO DATA(WA_EEWA_BULK_DATA2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_EEWA_BULK_DATA ASSIGNING <EEWA_BULK_DATA>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<EEWA_BULK_DATA>-MANDT = 1.
<EEWA_BULK_DATA>-VBELN = 1.
<EEWA_BULK_DATA>-VBPOS = 1.
<EEWA_BULK_DATA>-POBJNR = 1.
<EEWA_BULK_DATA>-PARTNER = 1.
ENDLOOP. LOOP AT IT_EEWA_BULK_DATA INTO WA_EEWA_BULK_DATA. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_EEWA_BULK_DATA-ABWRH, sy-vline,
WA_EEWA_BULK_DATA-KUNWE, sy-vline,
WA_EEWA_BULK_DATA-ADDRABH, sy-vline,
WA_EEWA_BULK_DATA-MATNR, sy-vline,
WA_EEWA_BULK_DATA-MENGE, sy-vline,
WA_EEWA_BULK_DATA-STPRS, sy-vline.
ENDLOOP. *Add any further fields from structure WA_EEWA_BULK_DATA 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_EEWA_BULK_DATA 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_EEWA_BULK_DATA INTO WA_EEWA_BULK_DATA. *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.
*Conversion exit ALPHA, internal->external for field VBELN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EEWA_BULK_DATA-VBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EEWA_BULK_DATA-VBELN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PARTNER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EEWA_BULK_DATA-PARTNER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EEWA_BULK_DATA-PARTNER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ABWRH CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EEWA_BULK_DATA-ABWRH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EEWA_BULK_DATA-ABWRH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KUNWE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EEWA_BULK_DATA-KUNWE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EEWA_BULK_DATA-KUNWE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ADDRABH CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_EEWA_BULK_DATA-ADDRABH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EEWA_BULK_DATA-ADDRABH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_EEWA_BULK_DATA-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_EEWA_BULK_DATA-MATNR.
WRITE:/ 'New Value:', ld_input.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_EEWA_BULK_DATA_STR,
MANDT TYPE STRING,
VBELN TYPE STRING,
VBPOS TYPE STRING,
POBJNR TYPE STRING,
PARTNER TYPE STRING,
ABWRH TYPE STRING,
KUNWE TYPE STRING,
ADDRABH TYPE STRING,
MATNR TYPE STRING,
MENGE TYPE STRING,
STPRS TYPE STRING,
KBETR TYPE STRING,
PREIS TYPE STRING,
VOLUM TYPE STRING,
M3_KZ TYPE STRING,
ERS00 TYPE STRING,
ERS01 TYPE STRING,
ERS02 TYPE STRING,
ERS03 TYPE STRING,
ERS04 TYPE STRING,
KSCHL4 TYPE STRING,
KBETR4C TYPE STRING,
ERS05 TYPE STRING,
KSCHL5 TYPE STRING,
KBETR5C TYPE STRING,
ERS06 TYPE STRING,
KSCHL6 TYPE STRING,
KBETR6C TYPE STRING,
ERS07 TYPE STRING,
KSCHL7 TYPE STRING,
KBETR7C TYPE STRING,
ERS08 TYPE STRING,
KSCHL8 TYPE STRING,
KBETR8C TYPE STRING,
ERS09 TYPE STRING,
KSCHL9 TYPE STRING,
KBETR9C TYPE STRING,
BARZAHLUNG TYPE STRING,
VORKASSE TYPE STRING,
NACHKASSE TYPE STRING,
GEBUEHR TYPE STRING,
KOSTENLOS TYPE STRING,
CAPA_VOL_SUM TYPE STRING,
CAPA_FIX TYPE STRING,
CAPA_VOL TYPE STRING,
EXPRESS TYPE STRING,
TERMIN TYPE STRING,
TIMEFRAME TYPE STRING,
START_TIME TYPE STRING,
END_TIME TYPE STRING,
PRODUCT_AREA TYPE STRING,
CAPAB TYPE STRING,
SPAUA TYPE STRING,END OF T_EKKO_STR. DATA: WA_EEWA_BULK_DATA_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_EEWA_BULK_DATA_STR-MANDT sy-vline
WA_EEWA_BULK_DATA_STR-VBELN sy-vline
WA_EEWA_BULK_DATA_STR-VBPOS sy-vline
WA_EEWA_BULK_DATA_STR-POBJNR sy-vline
WA_EEWA_BULK_DATA_STR-PARTNER sy-vline
WA_EEWA_BULK_DATA_STR-ABWRH sy-vline
WA_EEWA_BULK_DATA_STR-KUNWE sy-vline
WA_EEWA_BULK_DATA_STR-ADDRABH sy-vline
WA_EEWA_BULK_DATA_STR-MATNR sy-vline
WA_EEWA_BULK_DATA_STR-MENGE sy-vline
WA_EEWA_BULK_DATA_STR-STPRS sy-vline
WA_EEWA_BULK_DATA_STR-KBETR sy-vline
WA_EEWA_BULK_DATA_STR-PREIS sy-vline
WA_EEWA_BULK_DATA_STR-VOLUM sy-vline
WA_EEWA_BULK_DATA_STR-M3_KZ sy-vline
WA_EEWA_BULK_DATA_STR-ERS00 sy-vline
WA_EEWA_BULK_DATA_STR-ERS01 sy-vline
WA_EEWA_BULK_DATA_STR-ERS02 sy-vline
WA_EEWA_BULK_DATA_STR-ERS03 sy-vline
WA_EEWA_BULK_DATA_STR-ERS04 sy-vline
WA_EEWA_BULK_DATA_STR-KSCHL4 sy-vline
WA_EEWA_BULK_DATA_STR-KBETR4C sy-vline
WA_EEWA_BULK_DATA_STR-ERS05 sy-vline
WA_EEWA_BULK_DATA_STR-KSCHL5 sy-vline
WA_EEWA_BULK_DATA_STR-KBETR5C sy-vline
WA_EEWA_BULK_DATA_STR-ERS06 sy-vline
WA_EEWA_BULK_DATA_STR-KSCHL6 sy-vline
WA_EEWA_BULK_DATA_STR-KBETR6C sy-vline
WA_EEWA_BULK_DATA_STR-ERS07 sy-vline
WA_EEWA_BULK_DATA_STR-KSCHL7 sy-vline
WA_EEWA_BULK_DATA_STR-KBETR7C sy-vline
WA_EEWA_BULK_DATA_STR-ERS08 sy-vline
WA_EEWA_BULK_DATA_STR-KSCHL8 sy-vline
WA_EEWA_BULK_DATA_STR-KBETR8C sy-vline
WA_EEWA_BULK_DATA_STR-ERS09 sy-vline
WA_EEWA_BULK_DATA_STR-KSCHL9 sy-vline
WA_EEWA_BULK_DATA_STR-KBETR9C sy-vline
WA_EEWA_BULK_DATA_STR-BARZAHLUNG sy-vline
WA_EEWA_BULK_DATA_STR-VORKASSE sy-vline
WA_EEWA_BULK_DATA_STR-NACHKASSE sy-vline
WA_EEWA_BULK_DATA_STR-GEBUEHR sy-vline
WA_EEWA_BULK_DATA_STR-KOSTENLOS sy-vline
WA_EEWA_BULK_DATA_STR-CAPA_VOL_SUM sy-vline
WA_EEWA_BULK_DATA_STR-CAPA_FIX sy-vline
WA_EEWA_BULK_DATA_STR-CAPA_VOL sy-vline
WA_EEWA_BULK_DATA_STR-EXPRESS sy-vline
WA_EEWA_BULK_DATA_STR-TERMIN sy-vline
WA_EEWA_BULK_DATA_STR-TIMEFRAME sy-vline
WA_EEWA_BULK_DATA_STR-START_TIME sy-vline
WA_EEWA_BULK_DATA_STR-END_TIME sy-vline
WA_EEWA_BULK_DATA_STR-PRODUCT_AREA sy-vline
WA_EEWA_BULK_DATA_STR-CAPAB sy-vline
WA_EEWA_BULK_DATA_STR-SPAUA sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.