ABAP Select data from SAP table PJP_EAD_FD_375_BADI 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 PJP_EAD_FD_375_BADI 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 PJP_EAD_FD_375_BADI. 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 PJP_EAD_FD_375_BADI 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_PJP_EAD_FD_375_BADI TYPE STANDARD TABLE OF PJP_EAD_FD_375_BADI,
      WA_PJP_EAD_FD_375_BADI TYPE PJP_EAD_FD_375_BADI,
      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: <PJP_EAD_FD_375_BADI> TYPE PJP_EAD_FD_375_BADI.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PJP_EAD_FD_375_BADI
*  INTO TABLE @DATA(IT_PJP_EAD_FD_375_BADI2).
*--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_PJP_EAD_FD_375_BADI INDEX 1 INTO DATA(WA_PJP_EAD_FD_375_BADI2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PJP_EAD_FD_375_BADI>-L_SPECIAL_KEY = 1.
<PJP_EAD_FD_375_BADI>-FORM_ID = 1.
<PJP_EAD_FD_375_BADI>-TXI1D = 1.
<PJP_EAD_FD_375_BADI>-BOFID = 1.
<PJP_EAD_FD_375_BADI>-CMPADR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PJP_EAD_FD_375_BADI-CMPNAM, sy-vline,
  WA_PJP_EAD_FD_375_BADI-TELNR, sy-vline,
  WA_PJP_EAD_FD_375_BADI-TXI2D, sy-vline,
  WA_PJP_EAD_FD_375_BADI-SUBADR, sy-vline,
  WA_PJP_EAD_FD_375_BADI-SUBNAM, sy-vline,
  WA_PJP_EAD_FD_375_BADI-CHANGE_ID, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PJP_EAD_FD_375_BADI 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_PJP_EAD_FD_375_BADI 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_PJP_EAD_FD_375_BADI INTO WA_PJP_EAD_FD_375_BADI.


*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_PJP_EAD_FD_375_BADI_STR, 
L_SPECIAL_KEY TYPE STRING,
FORM_ID TYPE STRING,
TXI1D TYPE STRING,
BOFID TYPE STRING,
CMPADR TYPE STRING,
CMPNAM TYPE STRING,
TELNR TYPE STRING,
TXI2D TYPE STRING,
SUBADR TYPE STRING,
SUBNAM TYPE STRING,
CHANGE_ID TYPE STRING,
PAY_YR TYPE STRING,
ADDR TYPE STRING,
NONRES_ID TYPE STRING,
NAME TYPE STRING,
PLANS_TEXT TYPE STRING,
INC_ID TYPE STRING,
INCOME TYPE STRING,
NOTPAYED TYPE STRING,
TTIPRE TYPE STRING,
TOTDED TYPE STRING,
DEFTAX TYPE STRING,
NOTWIT TYPE STRING,
SPOUSE TYPE STRING,
SUPOLD TYPE STRING,
DESPOU TYPE STRING,
NUMSPO TYPE STRING,
NUMSPO2 TYPE STRING,
NUMOLD TYPE STRING,
NUMDOL TYPE STRING,
NUMOLD2 TYPE STRING,
NUMGEN TYPE STRING,
NUMGEN2 TYPE STRING,
NUMSER TYPE STRING,
NUMSDW TYPE STRING,
NUMDIS TYPE STRING,
SITOT TYPE STRING,
SKK TYPE STRING,
DEDLIF TYPE STRING,
DEDNON TYPE STRING,
DEDHUS TYPE STRING,
PERPEN TYPE STRING,
SUPINC TYPE STRING,
NLINSL TYPE STRING,
PER_ID TYPE STRING,
YARBTH TYPE STRING,
MONBTH TYPE STRING,
DAYBTH TYPE STRING,
HUSBAN TYPE STRING,
MINOR TYPE STRING,
OTURAN TYPE STRING,
INDDIS TYPE STRING,
INDELS TYPE STRING,
INDOLD TYPE STRING,
INDWID TYPE STRING,
PRSKAO TYPE STRING,
INDSTU TYPE STRING,
RETDIE TYPE STRING,
INDSAI TYPE STRING,
INDGAI TYPE STRING,
FLG_HIFI TYPE STRING,
YEAST1 TYPE STRING,
MONST1 TYPE STRING,
DAYST1 TYPE STRING,
PRVADR TYPE STRING,
PRVIND TYPE STRING,
PRVNAM TYPE STRING,
PRVINC TYPE STRING,
PRVWIT TYPE STRING,
PRVSIP TYPE STRING,
CRDDIS TYPE STRING,
PRVRET_YY TYPE STRING,
PRVRET_MM TYPE STRING,
PRVRET_DD TYPE STRING,
HOUSTA_YY TYPE STRING,
HOUSTA_MM TYPE STRING,
HOUSTA_DD TYPE STRING,
HOUSNUM TYPE STRING,
HOUSDED TYPE STRING,
HOUSTY1 TYPE STRING,
HOUSLOAN1 TYPE STRING,
HOUSTA_YY2 TYPE STRING,
HOUSTA_MM2 TYPE STRING,
HOUSTA_DD2 TYPE STRING,
HOUSTY2 TYPE STRING,
HOUSLOAN2 TYPE STRING,
DETAIL TYPE STRING,
NLTOT TYPE STRING,
CLTOT TYPE STRING,
NSTOT TYPE STRING,
NPTOT TYPE STRING,
NUMU16 TYPE STRING,
NATPEN TYPE STRING,
DEP_NRSNO TYPE STRING,
CORPN TYPE STRING,
INDNR TYPE STRING,
SPO_KANA TYPE STRING,
SPO_KANJI TYPE STRING,
SPO_NONRE TYPE STRING,
SPO_INDNR TYPE STRING,
DEP_KANA1 TYPE STRING,
DEP_KANJI1 TYPE STRING,
DEP_NONRE1 TYPE STRING,
DEP_INDNR1 TYPE STRING,
DEP_KANA2 TYPE STRING,
DEP_KANJI2 TYPE STRING,
DEP_NONRE2 TYPE STRING,
DEP_INDNR2 TYPE STRING,
DEP_KANA3 TYPE STRING,
DEP_KANJI3 TYPE STRING,
DEP_NONRE3 TYPE STRING,
DEP_INDNR3 TYPE STRING,
DEP_KANA4 TYPE STRING,
DEP_KANJI4 TYPE STRING,
DEP_NONRE4 TYPE STRING,
DEP_INDNR4 TYPE STRING,
DEP_JU_KANA1 TYPE STRING,
DEP_JU_KANJI1 TYPE STRING,
DEP_JU_NONRE1 TYPE STRING,
DEP_JU_KANA2 TYPE STRING,
DEP_JU_KANJI2 TYPE STRING,
DEP_JU_NONRE2 TYPE STRING,
DEP_JU_KANA3 TYPE STRING,
DEP_JU_KANJI3 TYPE STRING,
DEP_JU_NONRE3 TYPE STRING,
DEP_JU_KANA4 TYPE STRING,
DEP_JU_KANJI4 TYPE STRING,
DEP_JU_NONRE4 TYPE STRING,
DEP_BIKO TYPE STRING,
BASDED TYPE STRING,
ADJDED TYPE STRING,
PARENT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PJP_EAD_FD_375_BADI_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_PJP_EAD_FD_375_BADI_STR-L_SPECIAL_KEY sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-FORM_ID sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-TXI1D sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-BOFID sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-CMPADR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-CMPNAM sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-TELNR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-TXI2D sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SUBADR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SUBNAM sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-CHANGE_ID sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PAY_YR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-ADDR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NONRES_ID sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NAME sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PLANS_TEXT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INC_ID sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INCOME sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NOTPAYED sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-TTIPRE sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-TOTDED sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEFTAX sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NOTWIT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SPOUSE sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SUPOLD sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DESPOU sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMSPO sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMSPO2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMOLD sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMDOL sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMOLD2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMGEN sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMGEN2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMSER sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMSDW sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMDIS sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SITOT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SKK sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEDLIF sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEDNON sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEDHUS sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PERPEN sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SUPINC sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NLINSL sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PER_ID sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-YARBTH sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-MONBTH sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DAYBTH sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HUSBAN sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-MINOR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-OTURAN sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDDIS sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDELS sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDOLD sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDWID sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRSKAO sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDSTU sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-RETDIE sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDSAI sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDGAI sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-FLG_HIFI sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-YEAST1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-MONST1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DAYST1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVADR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVIND sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVNAM sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVINC sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVWIT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVSIP sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-CRDDIS sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVRET_YY sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVRET_MM sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PRVRET_DD sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTA_YY sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTA_MM sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTA_DD sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSNUM sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSDED sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTY1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSLOAN1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTA_YY2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTA_MM2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTA_DD2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSTY2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-HOUSLOAN2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DETAIL sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NLTOT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-CLTOT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NSTOT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NPTOT sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NUMU16 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-NATPEN sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_NRSNO sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-CORPN sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-INDNR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SPO_KANA sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SPO_KANJI sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SPO_NONRE sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-SPO_INDNR sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANA1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANJI1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_NONRE1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_INDNR1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANA2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANJI2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_NONRE2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_INDNR2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANA3 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANJI3 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_NONRE3 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_INDNR3 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANA4 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_KANJI4 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_NONRE4 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_INDNR4 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANA1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANJI1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_NONRE1 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANA2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANJI2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_NONRE2 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANA3 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANJI3 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_NONRE3 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANA4 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_KANJI4 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_JU_NONRE4 sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-DEP_BIKO sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-BASDED sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-ADJDED sy-vline 
WA_PJP_EAD_FD_375_BADI_STR-PARENT sy-vline      INTO ld_text SEPARATED BY SPACE.

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