ABAP Select data from SAP table /SAPSLL/AUSFUHR_ANTRAG 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 /SAPSLL/AUSFUHR_ANTRAG 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 /SAPSLL/AUSFUHR_ANTRAG. 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 /SAPSLL/AUSFUHR_ANTRAG 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_/SAPSLL/AUSFUHR_ANTRAG TYPE STANDARD TABLE OF /SAPSLL/AUSFUHR_ANTRAG,
WA_/SAPSLL/AUSFUHR_ANTRAG TYPE /SAPSLL/AUSFUHR_ANTRAG,
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: </SAPSLL/AUSFUHR_ANTRAG> TYPE /SAPSLL/AUSFUHR_ANTRAG.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_/SAPSLL/AUSFUHR_ANTRAG.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM /SAPSLL/AUSFUHR_ANTRAG
INTO TABLE IT_/SAPSLL/AUSFUHR_ANTRAG.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM /SAPSLL/AUSFUHR_ANTRAG
* INTO TABLE @DATA(IT_/SAPSLL/AUSFUHR_ANTRAG2).
*--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_/SAPSLL/AUSFUHR_ANTRAG INDEX 1 INTO DATA(WA_/SAPSLL/AUSFUHR_ANTRAG2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/SAPSLL/AUSFUHR_ANTRAG ASSIGNING </SAPSLL/AUSFUHR_ANTRAG>.
*To update a field value using a field symbol simply change the value via the field symbol pointer</SAPSLL/AUSFUHR_ANTRAG>-CONTROLLER = 1.
</SAPSLL/AUSFUHR_ANTRAG>-GRUNDDATEN = 1.
</SAPSLL/AUSFUHR_ANTRAG>-CONTROLLER = 1.
</SAPSLL/AUSFUHR_ANTRAG>-VORGANGSART = 1.
</SAPSLL/AUSFUHR_ANTRAG>-GENEHMIGUNGSART = 1.
ENDLOOP. LOOP AT IT_/SAPSLL/AUSFUHR_ANTRAG INTO WA_/SAPSLL/AUSFUHR_ANTRAG. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/SAPSLL/AUSFUHR_ANTRAG-AUSFUHRART, sy-vline,
WA_/SAPSLL/AUSFUHR_ANTRAG-MITGLIEDSLAND_GUETER, sy-vline,
WA_/SAPSLL/AUSFUHR_ANTRAG-MITGLIEDSLAND_AUSFUHRANMELDUNG, sy-vline,
WA_/SAPSLL/AUSFUHR_ANTRAG-VERTRAGSDATUM, sy-vline,
WA_/SAPSLL/AUSFUHR_ANTRAG-AKTENZEICHEN, sy-vline,
WA_/SAPSLL/AUSFUHR_ANTRAG-ENDVERWENDUNG, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/SAPSLL/AUSFUHR_ANTRAG 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_/SAPSLL/AUSFUHR_ANTRAG 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_/SAPSLL/AUSFUHR_ANTRAG INTO WA_/SAPSLL/AUSFUHR_ANTRAG. *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_/SAPSLL/AUSFUHR_ANTRAG_STR,
CONTROLLER TYPE STRING,
GRUNDDATEN TYPE STRING,
CONTROLLER TYPE STRING,
VORGANGSART TYPE STRING,
GENEHMIGUNGSART TYPE STRING,
AUSFUHRART TYPE STRING,
MITGLIEDSLAND_GUETER TYPE STRING,
MITGLIEDSLAND_AUSFUHRANMELDUNG TYPE STRING,
VERTRAGSDATUM TYPE STRING,
AKTENZEICHEN TYPE STRING,
ENDVERWENDUNG TYPE STRING,
VORGANGSNUMMER_IEB TYPE STRING,
LIEFERBEDINGUNGEN TYPE STRING,
TRANSITLAND TYPE STRING,
EMPFAENGER_LISTE TYPE STRING,
CONTROLLER TYPE STRING,
EMPFAENGER TYPE STRING,
GUETERMERKMALE TYPE STRING,
CONTROLLER TYPE STRING,
IST_ZWECKBESTIMMUNG_WAFFEN TYPE STRING,
CWUE_ID_NUMMER TYPE STRING,
CWUE_LIEFERDATUM TYPE STRING,
IST_MINDESTENS_EIN_GUT_GENEHMI TYPE STRING,
GUETER_LISTE TYPE STRING,
CONTROLLER TYPE STRING,
GUT TYPE STRING,
FIRMEN_LISTE TYPE STRING,
CONTROLLER TYPE STRING,
FIRMA TYPE STRING,
ZUSATZDATEN TYPE STRING,
CONTROLLER TYPE STRING,
ZUSATZKOSTEN TYPE STRING,
GESAMTWERT TYPE STRING,
WAEHRUNG TYPE STRING,
ZUSATZINFORMATIONEN TYPE STRING,
URSPRUNGSLAND TYPE STRING,
HERKUNFTSLAND TYPE STRING,
ERGAENZUNG_E1 TYPE STRING,
CONTROLLER TYPE STRING,
FRAGE36A_DIREKT_WEITER TYPE STRING,
FRAGE36A_SPAETER_WEITER TYPE STRING,
FRAGE36B_PROJEKT_ANLAGE TYPE STRING,
FRAGE36B_PROJEKTNAME_KURZBEZEI TYPE STRING,
FRAGE36B_VORGANGSNUMMERN TYPE STRING,
FRAGE36C_GLEICHER_ENDVERWENDER TYPE STRING,
FRAGE36C_GLEICHES_LAND_ENDVERW TYPE STRING,
FRAGE36C_VORGANGSNUMMERN TYPE STRING,
FRAGE36D_ANDERE_BESCHEIDE TYPE STRING,
FRAGE36D_VORGANGSNUMMERN TYPE STRING,
FRAGE36E_VORGANGSNUMMERN TYPE STRING,
FRAGE36F_LIEFERBEGINN TYPE STRING,
CHOICE TYPE STRING,
SELECTION TYPE STRING,
CONTROLLER TYPE STRING,
ERKLAERUNG_AVEIGENHAENDIG TYPE STRING,
ERKLAERUNG_AVBERECHTIGT TYPE STRING,
ANMERKUNGEN_BEMERKUNGEN TYPE STRING,
ERGAENZUNG_E2 TYPE STRING,
CONTROLLER TYPE STRING,
FRAGE39A_EINBAU_IN_GUETER TYPE STRING,
FRAGE39A_VERWENDUNG_ALS_AUSRUE TYPE STRING,
FRAGE39A_VERWENDUNG_ALS_UNFERT TYPE STRING,
FRAGE39B_KERNTECHNISCHE_ZWECKE TYPE STRING,
GUETER_ANLAGENBESCHREIBUNG TYPE STRING,
ANLAGEN_LISTE TYPE STRING,
CONTROLLER TYPE STRING,
ANLAGE TYPE STRING,END OF T_EKKO_STR. DATA: WA_/SAPSLL/AUSFUHR_ANTRAG_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_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-GRUNDDATEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-VORGANGSART sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-GENEHMIGUNGSART sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-AUSFUHRART sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-MITGLIEDSLAND_GUETER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-MITGLIEDSLAND_AUSFUHRANMELDUNG sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-VERTRAGSDATUM sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-AKTENZEICHEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ENDVERWENDUNG sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-VORGANGSNUMMER_IEB sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-LIEFERBEDINGUNGEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-TRANSITLAND sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-EMPFAENGER_LISTE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-EMPFAENGER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-GUETERMERKMALE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-IST_ZWECKBESTIMMUNG_WAFFEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CWUE_ID_NUMMER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CWUE_LIEFERDATUM sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-IST_MINDESTENS_EIN_GUT_GENEHMI sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-GUETER_LISTE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-GUT sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FIRMEN_LISTE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FIRMA sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ZUSATZDATEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ZUSATZKOSTEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-GESAMTWERT sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-WAEHRUNG sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ZUSATZINFORMATIONEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-URSPRUNGSLAND sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-HERKUNFTSLAND sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ERGAENZUNG_E1 sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36A_DIREKT_WEITER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36A_SPAETER_WEITER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36B_PROJEKT_ANLAGE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36B_PROJEKTNAME_KURZBEZEI sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36B_VORGANGSNUMMERN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36C_GLEICHER_ENDVERWENDER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36C_GLEICHES_LAND_ENDVERW sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36C_VORGANGSNUMMERN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36D_ANDERE_BESCHEIDE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36D_VORGANGSNUMMERN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36E_VORGANGSNUMMERN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE36F_LIEFERBEGINN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CHOICE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-SELECTION sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ERKLAERUNG_AVEIGENHAENDIG sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ERKLAERUNG_AVBERECHTIGT sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ANMERKUNGEN_BEMERKUNGEN sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ERGAENZUNG_E2 sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE39A_EINBAU_IN_GUETER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE39A_VERWENDUNG_ALS_AUSRUE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE39A_VERWENDUNG_ALS_UNFERT sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-FRAGE39B_KERNTECHNISCHE_ZWECKE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-GUETER_ANLAGENBESCHREIBUNG sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ANLAGEN_LISTE sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-CONTROLLER sy-vline
WA_/SAPSLL/AUSFUHR_ANTRAG_STR-ANLAGE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
