ABAP Select data from SAP table /BOFU/S_BCSR_RECIPIENT 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 /BOFU/S_BCSR_RECIPIENT 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 /BOFU/S_BCSR_RECIPIENT. 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 /BOFU/S_BCSR_RECIPIENT 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_/BOFU/S_BCSR_RECIPIENT TYPE STANDARD TABLE OF /BOFU/S_BCSR_RECIPIENT,
      WA_/BOFU/S_BCSR_RECIPIENT TYPE /BOFU/S_BCSR_RECIPIENT,
      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: </BOFU/S_BCSR_RECIPIENT> TYPE /BOFU/S_BCSR_RECIPIENT.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /BOFU/S_BCSR_RECIPIENT
  INTO TABLE IT_/BOFU/S_BCSR_RECIPIENT.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /BOFU/S_BCSR_RECIPIENT
*  INTO TABLE @DATA(IT_/BOFU/S_BCSR_RECIPIENT2).
*--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_/BOFU/S_BCSR_RECIPIENT INDEX 1 INTO DATA(WA_/BOFU/S_BCSR_RECIPIENT2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/BOFU/S_BCSR_RECIPIENT ASSIGNING </BOFU/S_BCSR_RECIPIENT>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
</BOFU/S_BCSR_RECIPIENT>-SEL = 1.
</BOFU/S_BCSR_RECIPIENT>-ACALL = 1.
</BOFU/S_BCSR_RECIPIENT>-ACDAT = 1.
</BOFU/S_BCSR_RECIPIENT>-ACONE = 1.
</BOFU/S_BCSR_RECIPIENT>-ACTIM = 1.

ENDLOOP.

LOOP AT IT_/BOFU/S_BCSR_RECIPIENT INTO WA_/BOFU/S_BCSR_RECIPIENT.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/BOFU/S_BCSR_RECIPIENT-BPTNO, sy-vline,
  WA_/BOFU/S_BCSR_RECIPIENT-BPTTP, sy-vline,
  WA_/BOFU/S_BCSR_RECIPIENT-BPTYR, sy-vline,
  WA_/BOFU/S_BCSR_RECIPIENT-DLINAM, sy-vline,
  WA_/BOFU/S_BCSR_RECIPIENT-FORFB, sy-vline,
  WA_/BOFU/S_BCSR_RECIPIENT-FORNAM, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/BOFU/S_BCSR_RECIPIENT 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_/BOFU/S_BCSR_RECIPIENT 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_/BOFU/S_BCSR_RECIPIENT INTO WA_/BOFU/S_BCSR_RECIPIENT.


*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 SXIDN, internal->external for field ADR_NAME
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_/BOFU/S_BCSR_RECIPIENT-ADR_NAME
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/BOFU/S_BCSR_RECIPIENT-ADR_NAME.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SXIDN, internal->external for field ADR_ADR
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_/BOFU/S_BCSR_RECIPIENT-ADR_ADR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/BOFU/S_BCSR_RECIPIENT-ADR_ADR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SXIDN, internal->external for field SORTFIELD
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_/BOFU/S_BCSR_RECIPIENT-SORTFIELD
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/BOFU/S_BCSR_RECIPIENT-SORTFIELD.
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_/BOFU/S_BCSR_RECIPIENT_STR, 
SEL TYPE STRING,
ACALL TYPE STRING,
ACDAT TYPE STRING,
ACONE TYPE STRING,
ACTIM TYPE STRING,
BPTNO TYPE STRING,
BPTTP TYPE STRING,
BPTYR TYPE STRING,
DLINAM TYPE STRING,
FORFB TYPE STRING,
FORNAM TYPE STRING,
LFDNR TYPE STRING,
NOTNO TYPE STRING,
NOTTP TYPE STRING,
NOTYR TYPE STRING,
OBJAC TYPE STRING,
OBJRN TYPE STRING,
OBJRR TYPE STRING,
PRIFB TYPE STRING,
RCDAT TYPE STRING,
RCTIM TYPE STRING,
RECESC TYPE STRING,
RECLAN TYPE STRING,
RECNAM TYPE STRING,
RECEXTNAM TYPE STRING,
RECNO TYPE STRING,
RECOWN TYPE STRING,
RECTEL TYPE STRING,
RECTP TYPE STRING,
RECYR TYPE STRING,
REPESC TYPE STRING,
REPNAM TYPE STRING,
REPEXTNAM TYPE STRING,
REPNO TYPE STRING,
REPOWN TYPE STRING,
REPTP TYPE STRING,
REPYR TYPE STRING,
RRDAT TYPE STRING,
RRTIM TYPE STRING,
RTDNAM TYPE STRING,
RTUNAM TYPE STRING,
SNDTP TYPE STRING,
SNDYR TYPE STRING,
SNDNO TYPE STRING,
SNDNAM TYPE STRING,
SNDART TYPE STRING,
SNDBC TYPE STRING,
SNDCP TYPE STRING,
SNDDR TYPE STRING,
SNDEX TYPE STRING,
SNDPRI TYPE STRING,
SNDSPO TYPE STRING,
RSDAT TYPE STRING,
RSTIM TYPE STRING,
RSSPA TYPE STRING,
RSFLG TYPE STRING,
RSTIME TYPE STRING,
RSDATE TYPE STRING,
RSDATB TYPE STRING,
RSTIMB TYPE STRING,
RSDAY TYPE STRING,
RSDATL TYPE STRING,
RSTIML TYPE STRING,
RSFLGL TYPE STRING,
FLAG1 TYPE STRING,
FLAG2 TYPE STRING,
RSRCODE TYPE STRING,
RECREM TYPE STRING,
SUBTP TYPE STRING,
SUBYR TYPE STRING,
SUBNO TYPE STRING,
RCODE TYPE STRING,
MSGID TYPE STRING,
MSGNO TYPE STRING,
MSGV1 TYPE STRING,
MSGV2 TYPE STRING,
MSGV3 TYPE STRING,
MSGV4 TYPE STRING,
DELIVER TYPE STRING,
NOT_DELI TYPE STRING,
READ TYPE STRING,
MAILSTATUS TYPE STRING,
ESC_DES TYPE STRING,
ADR_NAME TYPE STRING,
ADR_ADR TYPE STRING,
REC_FIX TYPE STRING,
ATT_FIX TYPE STRING,
RESEND TYPE STRING,
CHECKINBOX TYPE STRING,
OBJRS TYPE STRING,
SAP_BODY TYPE STRING,
SORTFIELD TYPE STRING,
SORTCLASS TYPE STRING,
AREPTP TYPE STRING,
AREPYR TYPE STRING,
AREPNO TYPE STRING,
NOTE_START TYPE STRING,
NOTE_NUM TYPE STRING,
SNDREQ TYPE STRING,
REC_UID TYPE STRING,
DIALOG_REC TYPE STRING,
/BOFU/CHG_MODE TYPE STRING,
RECIPIENT_NAME TYPE STRING,
RECIPIENT_TYPE TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/BOFU/S_BCSR_RECIPIENT_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_/BOFU/S_BCSR_RECIPIENT_STR-SEL sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ACALL sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ACDAT sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ACONE sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ACTIM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-BPTNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-BPTTP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-BPTYR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-DLINAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-FORFB sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-FORNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-LFDNR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-NOTNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-NOTTP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-NOTYR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-OBJAC sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-OBJRN sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-OBJRR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-PRIFB sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RCDAT sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RCTIM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECESC sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECLAN sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECEXTNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECOWN sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECTEL sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECTP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECYR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REPESC sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REPNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REPEXTNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REPNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REPOWN sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REPTP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REPYR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RRDAT sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RRTIM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RTDNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RTUNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDTP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDYR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDNAM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDART sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDBC sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDCP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDDR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDEX sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDPRI sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDSPO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSDAT sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSTIM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSSPA sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSFLG sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSTIME sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSDATE sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSDATB sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSTIMB sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSDAY sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSDATL sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSTIML sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSFLGL sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-FLAG1 sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-FLAG2 sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RSRCODE sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECREM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SUBTP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SUBYR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SUBNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RCODE sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-MSGID sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-MSGNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-MSGV1 sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-MSGV2 sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-MSGV3 sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-MSGV4 sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-DELIVER sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-NOT_DELI sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-READ sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-MAILSTATUS sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ESC_DES sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ADR_NAME sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ADR_ADR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REC_FIX sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-ATT_FIX sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RESEND sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-CHECKINBOX sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-OBJRS sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SAP_BODY sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SORTFIELD sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SORTCLASS sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-AREPTP sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-AREPYR sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-AREPNO sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-NOTE_START sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-NOTE_NUM sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-SNDREQ sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-REC_UID sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-DIALOG_REC sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-/BOFU/CHG_MODE sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECIPIENT_NAME sy-vline 
WA_/BOFU/S_BCSR_RECIPIENT_STR-RECIPIENT_TYPE sy-vline      INTO ld_text SEPARATED BY SPACE.

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