ABAP Select data from SAP table RJSEPAWUL_SDAUF 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 RJSEPAWUL_SDAUF 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 RJSEPAWUL_SDAUF. 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 RJSEPAWUL_SDAUF 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_RJSEPAWUL_SDAUF TYPE STANDARD TABLE OF RJSEPAWUL_SDAUF,
      WA_RJSEPAWUL_SDAUF TYPE RJSEPAWUL_SDAUF,
      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: <RJSEPAWUL_SDAUF> TYPE RJSEPAWUL_SDAUF.

*Process all fields in table header/work area as string values
  PERFORM process_as_string_field_values CHANGING wa_RJSEPAWUL_SDAUF.

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM RJSEPAWUL_SDAUF
  INTO TABLE IT_RJSEPAWUL_SDAUF.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RJSEPAWUL_SDAUF
*  INTO TABLE @DATA(IT_RJSEPAWUL_SDAUF2).
*--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_RJSEPAWUL_SDAUF INDEX 1 INTO DATA(WA_RJSEPAWUL_SDAUF2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RJSEPAWUL_SDAUF ASSIGNING <RJSEPAWUL_SDAUF>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RJSEPAWUL_SDAUF>-PARNR = 1.
<RJSEPAWUL_SDAUF>-ISMADDRESS = 1.
<RJSEPAWUL_SDAUF>-VBELN = 1.
<RJSEPAWUL_SDAUF>-POSNR = 1.
<RJSEPAWUL_SDAUF>-VKORG = 1.
ENDLOOP.

LOOP AT IT_RJSEPAWUL_SDAUF INTO WA_RJSEPAWUL_SDAUF.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RJSEPAWUL_SDAUF-VTWEG, sy-vline,
WA_RJSEPAWUL_SDAUF-SPART, sy-vline,
WA_RJSEPAWUL_SDAUF-MATNR, sy-vline,
WA_RJSEPAWUL_SDAUF-VDATU, sy-vline,
WA_RJSEPAWUL_SDAUF-BUKRS, sy-vline,
WA_RJSEPAWUL_SDAUF-MNDID, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RJSEPAWUL_SDAUF 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_RJSEPAWUL_SDAUF 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_RJSEPAWUL_SDAUF INTO WA_RJSEPAWUL_SDAUF. *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_RJSEPAWUL_SDAUF-VBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RJSEPAWUL_SDAUF-VBELN.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_RJSEPAWUL_SDAUF-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RJSEPAWUL_SDAUF-MATNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field SND_LANGUAGE CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_RJSEPAWUL_SDAUF-SND_LANGUAGE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RJSEPAWUL_SDAUF-SND_LANGUAGE.
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_RJSEPAWUL_SDAUF_STR,
PARNR TYPE STRING,
ISMADDRESS TYPE STRING,
VBELN TYPE STRING,
POSNR TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
MATNR TYPE STRING,
VDATU TYPE STRING,
BUKRS TYPE STRING,
MNDID TYPE STRING,
MVERS TYPE STRING,
SIGN_CITY TYPE STRING,
SIGN_DATE TYPE STRING,
PAY_TYPE TYPE STRING,
VAL_FROM_DATE TYPE STRING,
VAL_TO_DATE TYPE STRING,
STATUS TYPE STRING,
B2B TYPE STRING,
REASON_CODE TYPE STRING,
ERNAM TYPE STRING,
ERDAT TYPE STRING,
ERTIM TYPE STRING,
CHG_REASON TYPE STRING,
ORIGIN TYPE STRING,
ORIGIN_REC_CRDID TYPE STRING,
ORIGIN_MNDID TYPE STRING,
GLOCK TYPE STRING,
GLOCK_VAL_FROM TYPE STRING,
GLOCK_VAL_TO TYPE STRING,
ANWND TYPE STRING,
ORI_ERNAM TYPE STRING,
ORI_ERDAT TYPE STRING,
ORI_ERTIM TYPE STRING,
REF_TYPE TYPE STRING,
REF_ID TYPE STRING,
REF_DESC TYPE STRING,
SND_TYPE TYPE STRING,
SND_ID TYPE STRING,
SND_NAME1 TYPE STRING,
SND_NAME2 TYPE STRING,
SND_STREET TYPE STRING,
SND_HOUSENUM TYPE STRING,
SND_POSTAL TYPE STRING,
SND_CITY TYPE STRING,
SND_COUNTRY TYPE STRING,
SND_IBAN TYPE STRING,
SND_BIC TYPE STRING,
SND_DIR_NAME TYPE STRING,
SND_LANGUAGE TYPE STRING,
SND_DIR_ID TYPE STRING,
SND_DEBTOR_ID TYPE STRING,
REC_TYPE TYPE STRING,
REC_ID TYPE STRING,
REC_NAME1 TYPE STRING,
REC_NAME2 TYPE STRING,
REC_CRDID TYPE STRING,
REC_STREET TYPE STRING,
REC_HOUSENUM TYPE STRING,
REC_POSTAL TYPE STRING,
REC_CITY TYPE STRING,
REC_COUNTRY TYPE STRING,
REC_DIR_NAME TYPE STRING,
REC_DIR_ID TYPE STRING,
FIRSTUSE_DATE TYPE STRING,
FIRSTUSE_DOCTYPE TYPE STRING,
FIRSTUSE_DOCID TYPE STRING,
LASTUSE_DATE TYPE STRING,
LASTUSE_DOCTYPE TYPE STRING,
LASTUSE_DOCID TYPE STRING,
FIRSTUSE_PAYRUN TYPE STRING,
ORGF1 TYPE STRING,
ORGF2 TYPE STRING,
ORGF3 TYPE STRING,
ORGF4 TYPE STRING,
ALVSTYLE TYPE STRING,END OF T_EKKO_STR. DATA: WA_RJSEPAWUL_SDAUF_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_RJSEPAWUL_SDAUF_STR-PARNR sy-vline
WA_RJSEPAWUL_SDAUF_STR-ISMADDRESS sy-vline
WA_RJSEPAWUL_SDAUF_STR-VBELN sy-vline
WA_RJSEPAWUL_SDAUF_STR-POSNR sy-vline
WA_RJSEPAWUL_SDAUF_STR-VKORG sy-vline
WA_RJSEPAWUL_SDAUF_STR-VTWEG sy-vline
WA_RJSEPAWUL_SDAUF_STR-SPART sy-vline
WA_RJSEPAWUL_SDAUF_STR-MATNR sy-vline
WA_RJSEPAWUL_SDAUF_STR-VDATU sy-vline
WA_RJSEPAWUL_SDAUF_STR-BUKRS sy-vline
WA_RJSEPAWUL_SDAUF_STR-MNDID sy-vline
WA_RJSEPAWUL_SDAUF_STR-MVERS sy-vline
WA_RJSEPAWUL_SDAUF_STR-SIGN_CITY sy-vline
WA_RJSEPAWUL_SDAUF_STR-SIGN_DATE sy-vline
WA_RJSEPAWUL_SDAUF_STR-PAY_TYPE sy-vline
WA_RJSEPAWUL_SDAUF_STR-VAL_FROM_DATE sy-vline
WA_RJSEPAWUL_SDAUF_STR-VAL_TO_DATE sy-vline
WA_RJSEPAWUL_SDAUF_STR-STATUS sy-vline
WA_RJSEPAWUL_SDAUF_STR-B2B sy-vline
WA_RJSEPAWUL_SDAUF_STR-REASON_CODE sy-vline
WA_RJSEPAWUL_SDAUF_STR-ERNAM sy-vline
WA_RJSEPAWUL_SDAUF_STR-ERDAT sy-vline
WA_RJSEPAWUL_SDAUF_STR-ERTIM sy-vline
WA_RJSEPAWUL_SDAUF_STR-CHG_REASON sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORIGIN sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORIGIN_REC_CRDID sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORIGIN_MNDID sy-vline
WA_RJSEPAWUL_SDAUF_STR-GLOCK sy-vline
WA_RJSEPAWUL_SDAUF_STR-GLOCK_VAL_FROM sy-vline
WA_RJSEPAWUL_SDAUF_STR-GLOCK_VAL_TO sy-vline
WA_RJSEPAWUL_SDAUF_STR-ANWND sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORI_ERNAM sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORI_ERDAT sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORI_ERTIM sy-vline
WA_RJSEPAWUL_SDAUF_STR-REF_TYPE sy-vline
WA_RJSEPAWUL_SDAUF_STR-REF_ID sy-vline
WA_RJSEPAWUL_SDAUF_STR-REF_DESC sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_TYPE sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_ID sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_NAME1 sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_NAME2 sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_STREET sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_HOUSENUM sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_POSTAL sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_CITY sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_COUNTRY sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_IBAN sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_BIC sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_DIR_NAME sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_LANGUAGE sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_DIR_ID sy-vline
WA_RJSEPAWUL_SDAUF_STR-SND_DEBTOR_ID sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_TYPE sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_ID sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_NAME1 sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_NAME2 sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_CRDID sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_STREET sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_HOUSENUM sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_POSTAL sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_CITY sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_COUNTRY sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_DIR_NAME sy-vline
WA_RJSEPAWUL_SDAUF_STR-REC_DIR_ID sy-vline
WA_RJSEPAWUL_SDAUF_STR-FIRSTUSE_DATE sy-vline
WA_RJSEPAWUL_SDAUF_STR-FIRSTUSE_DOCTYPE sy-vline
WA_RJSEPAWUL_SDAUF_STR-FIRSTUSE_DOCID sy-vline
WA_RJSEPAWUL_SDAUF_STR-LASTUSE_DATE sy-vline
WA_RJSEPAWUL_SDAUF_STR-LASTUSE_DOCTYPE sy-vline
WA_RJSEPAWUL_SDAUF_STR-LASTUSE_DOCID sy-vline
WA_RJSEPAWUL_SDAUF_STR-FIRSTUSE_PAYRUN sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORGF1 sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORGF2 sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORGF3 sy-vline
WA_RJSEPAWUL_SDAUF_STR-ORGF4 sy-vline
WA_RJSEPAWUL_SDAUF_STR-ALVSTYLE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.