ABAP Select data from SAP table J11DABE1 into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP J11DABE1 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 J11DABE1. 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 J11DABE1 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_J11DABE1 TYPE STANDARD TABLE OF J11DABE1,
      WA_J11DABE1 TYPE J11DABE1,
      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: <J11DABE1> TYPE J11DABE1.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J11DABE1
*  INTO TABLE @DATA(IT_J11DABE12).
*--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_J11DABE1 INDEX 1 INTO DATA(WA_J11DABE12).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_J11DABE1 ASSIGNING <J11DABE1>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J11DABE1>-ACTIO = 1.
<J11DABE1>-ARCHI = 1.
<J11DABE1>-AUGLZ = 1.
<J11DABE1>-AVERM = 1.
<J11DABE1>-BELNR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J11DABE1-BSAKN, sy-vline,
  WA_J11DABE1-BSZIN, sy-vline,
  WA_J11DABE1-BUDAT, sy-vline,
  WA_J11DABE1-BUKRS, sy-vline,
  WA_J11DABE1-BUPER, sy-vline,
  WA_J11DABE1-DATUM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J11DABE1 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_J11DABE1 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_J11DABE1 INTO WA_J11DABE1.


*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_J11DABE1_STR, 
ACTIO TYPE STRING,
ARCHI TYPE STRING,
AUGLZ TYPE STRING,
AVERM TYPE STRING,
BELNR TYPE STRING,
BSAKN TYPE STRING,
BSZIN TYPE STRING,
BUDAT TYPE STRING,
BUKRS TYPE STRING,
BUPER TYPE STRING,
DATUM TYPE STRING,
DIDAT TYPE STRING,
DMIHB TYPE STRING,
DMSHB TYPE STRING,
EBENE TYPE STRING,
FDUPD TYPE STRING,
GRUPP TYPE STRING,
HABEW TYPE STRING,
HABKO TYPE STRING,
IDENT TYPE STRING,
INHAB TYPE STRING,
INSTD TYPE STRING,
KENNR TYPE STRING,
KONID TYPE STRING,
KURSA TYPE STRING,
KURSB TYPE STRING,
KURSF TYPE STRING,
LFDNR TYPE STRING,
LFZ TYPE STRING,
MIGDATE TYPE STRING,
NUM_DMIHB TYPE STRING,
NUM_DMSHB TYPE STRING,
NUM_KURSA TYPE STRING,
NUM_KURSB TYPE STRING,
NUM_KURSF TYPE STRING,
NUM_W2SHB TYPE STRING,
NUM_WBEFW TYPE STRING,
NUM_WBEKU TYPE STRING,
NUM_WKURA TYPE STRING,
NUM_WNEST TYPE STRING,
NUM_WRIHB TYPE STRING,
NUM_WRSHB TYPE STRING,
NUM_ZIBAS TYPE STRING,
NUM_ZSAEF TYPE STRING,
NUM_ZSATZ TYPE STRING,
ONAEN TYPE STRING,
ONBUC TYPE STRING,
ORDAT TYPE STRING,
ORGRP TYPE STRING,
ORNUM TYPE STRING,
REFID TYPE STRING,
REQU0 TYPE STRING,
REQU1 TYPE STRING,
REQU3 TYPE STRING,
RESAL TYPE STRING,
RFDAT TYPE STRING,
RFTIM TYPE STRING,
SHKZG TYPE STRING,
SICHK TYPE STRING,
SOLKO TYPE STRING,
SPDAT TYPE STRING,
STATI TYPE STRING,
STUCK TYPE STRING,
STYPE TYPE STRING,
STZTG TYPE STRING,
SUMKZ TYPE STRING,
TXNAU TYPE STRING,
UDATA TYPE STRING,
UDATB TYPE STRING,
UMBWA TYPE STRING,
USERA TYPE STRING,
USERB TYPE STRING,
USERO TYPE STRING,
USTRU TYPE STRING,
UTIMA TYPE STRING,
VARAD TYPE STRING,
VARGD TYPE STRING,
VARID TYPE STRING,
VORGA TYPE STRING,
VOZIN TYPE STRING,
VTYPE TYPE STRING,
W2SHB TYPE STRING,
WAERR TYPE STRING,
WAERS TYPE STRING,
WBEFW TYPE STRING,
WBEKU TYPE STRING,
WKURA TYPE STRING,
WNEST TYPE STRING,
WRIHB TYPE STRING,
WRSHB TYPE STRING,
ZAHID TYPE STRING,
ZATAG TYPE STRING,
ZIBAS TYPE STRING,
ZISAL TYPE STRING,
ZIZPT TYPE STRING,
ZSAEF TYPE STRING,
ZSATZ TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J11DABE1_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_J11DABE1_STR-ACTIO sy-vline 
WA_J11DABE1_STR-ARCHI sy-vline 
WA_J11DABE1_STR-AUGLZ sy-vline 
WA_J11DABE1_STR-AVERM sy-vline 
WA_J11DABE1_STR-BELNR sy-vline 
WA_J11DABE1_STR-BSAKN sy-vline 
WA_J11DABE1_STR-BSZIN sy-vline 
WA_J11DABE1_STR-BUDAT sy-vline 
WA_J11DABE1_STR-BUKRS sy-vline 
WA_J11DABE1_STR-BUPER sy-vline 
WA_J11DABE1_STR-DATUM sy-vline 
WA_J11DABE1_STR-DIDAT sy-vline 
WA_J11DABE1_STR-DMIHB sy-vline 
WA_J11DABE1_STR-DMSHB sy-vline 
WA_J11DABE1_STR-EBENE sy-vline 
WA_J11DABE1_STR-FDUPD sy-vline 
WA_J11DABE1_STR-GRUPP sy-vline 
WA_J11DABE1_STR-HABEW sy-vline 
WA_J11DABE1_STR-HABKO sy-vline 
WA_J11DABE1_STR-IDENT sy-vline 
WA_J11DABE1_STR-INHAB sy-vline 
WA_J11DABE1_STR-INSTD sy-vline 
WA_J11DABE1_STR-KENNR sy-vline 
WA_J11DABE1_STR-KONID sy-vline 
WA_J11DABE1_STR-KURSA sy-vline 
WA_J11DABE1_STR-KURSB sy-vline 
WA_J11DABE1_STR-KURSF sy-vline 
WA_J11DABE1_STR-LFDNR sy-vline 
WA_J11DABE1_STR-LFZ sy-vline 
WA_J11DABE1_STR-MIGDATE sy-vline 
WA_J11DABE1_STR-NUM_DMIHB sy-vline 
WA_J11DABE1_STR-NUM_DMSHB sy-vline 
WA_J11DABE1_STR-NUM_KURSA sy-vline 
WA_J11DABE1_STR-NUM_KURSB sy-vline 
WA_J11DABE1_STR-NUM_KURSF sy-vline 
WA_J11DABE1_STR-NUM_W2SHB sy-vline 
WA_J11DABE1_STR-NUM_WBEFW sy-vline 
WA_J11DABE1_STR-NUM_WBEKU sy-vline 
WA_J11DABE1_STR-NUM_WKURA sy-vline 
WA_J11DABE1_STR-NUM_WNEST sy-vline 
WA_J11DABE1_STR-NUM_WRIHB sy-vline 
WA_J11DABE1_STR-NUM_WRSHB sy-vline 
WA_J11DABE1_STR-NUM_ZIBAS sy-vline 
WA_J11DABE1_STR-NUM_ZSAEF sy-vline 
WA_J11DABE1_STR-NUM_ZSATZ sy-vline 
WA_J11DABE1_STR-ONAEN sy-vline 
WA_J11DABE1_STR-ONBUC sy-vline 
WA_J11DABE1_STR-ORDAT sy-vline 
WA_J11DABE1_STR-ORGRP sy-vline 
WA_J11DABE1_STR-ORNUM sy-vline 
WA_J11DABE1_STR-REFID sy-vline 
WA_J11DABE1_STR-REQU0 sy-vline 
WA_J11DABE1_STR-REQU1 sy-vline 
WA_J11DABE1_STR-REQU3 sy-vline 
WA_J11DABE1_STR-RESAL sy-vline 
WA_J11DABE1_STR-RFDAT sy-vline 
WA_J11DABE1_STR-RFTIM sy-vline 
WA_J11DABE1_STR-SHKZG sy-vline 
WA_J11DABE1_STR-SICHK sy-vline 
WA_J11DABE1_STR-SOLKO sy-vline 
WA_J11DABE1_STR-SPDAT sy-vline 
WA_J11DABE1_STR-STATI sy-vline 
WA_J11DABE1_STR-STUCK sy-vline 
WA_J11DABE1_STR-STYPE sy-vline 
WA_J11DABE1_STR-STZTG sy-vline 
WA_J11DABE1_STR-SUMKZ sy-vline 
WA_J11DABE1_STR-TXNAU sy-vline 
WA_J11DABE1_STR-UDATA sy-vline 
WA_J11DABE1_STR-UDATB sy-vline 
WA_J11DABE1_STR-UMBWA sy-vline 
WA_J11DABE1_STR-USERA sy-vline 
WA_J11DABE1_STR-USERB sy-vline 
WA_J11DABE1_STR-USERO sy-vline 
WA_J11DABE1_STR-USTRU sy-vline 
WA_J11DABE1_STR-UTIMA sy-vline 
WA_J11DABE1_STR-VARAD sy-vline 
WA_J11DABE1_STR-VARGD sy-vline 
WA_J11DABE1_STR-VARID sy-vline 
WA_J11DABE1_STR-VORGA sy-vline 
WA_J11DABE1_STR-VOZIN sy-vline 
WA_J11DABE1_STR-VTYPE sy-vline 
WA_J11DABE1_STR-W2SHB sy-vline 
WA_J11DABE1_STR-WAERR sy-vline 
WA_J11DABE1_STR-WAERS sy-vline 
WA_J11DABE1_STR-WBEFW sy-vline 
WA_J11DABE1_STR-WBEKU sy-vline 
WA_J11DABE1_STR-WKURA sy-vline 
WA_J11DABE1_STR-WNEST sy-vline 
WA_J11DABE1_STR-WRIHB sy-vline 
WA_J11DABE1_STR-WRSHB sy-vline 
WA_J11DABE1_STR-ZAHID sy-vline 
WA_J11DABE1_STR-ZATAG sy-vline 
WA_J11DABE1_STR-ZIBAS sy-vline 
WA_J11DABE1_STR-ZISAL sy-vline 
WA_J11DABE1_STR-ZIZPT sy-vline 
WA_J11DABE1_STR-ZSAEF sy-vline 
WA_J11DABE1_STR-ZSATZ sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.