ABAP Select data from SAP table MIG_BUS_EI_BUPA_CENTRAL_DATA 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 MIG_BUS_EI_BUPA_CENTRAL_DATA 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 MIG_BUS_EI_BUPA_CENTRAL_DATA. 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 MIG_BUS_EI_BUPA_CENTRAL_DATA 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_MIG_BUS_EI_BUPA_CENTRAL_DATA TYPE STANDARD TABLE OF MIG_BUS_EI_BUPA_CENTRAL_DATA,
      WA_MIG_BUS_EI_BUPA_CENTRAL_DATA TYPE MIG_BUS_EI_BUPA_CENTRAL_DATA,
      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: <MIG_BUS_EI_BUPA_CENTRAL_DATA> TYPE MIG_BUS_EI_BUPA_CENTRAL_DATA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM MIG_BUS_EI_BUPA_CENTRAL_DATA
*  INTO TABLE @DATA(IT_MIG_BUS_EI_BUPA_CENTRAL_DATA2).
*--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_MIG_BUS_EI_BUPA_CENTRAL_DATA INDEX 1 INTO DATA(WA_MIG_BUS_EI_BUPA_CENTRAL_DATA2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<MIG_BUS_EI_BUPA_CENTRAL_DATA>-DATA_KEY = 1.
<MIG_BUS_EI_BUPA_CENTRAL_DATA>-BP_CONTROLDAT = 1.
<MIG_BUS_EI_BUPA_CENTRAL_DATA>-CATEGORYDAT = 1.
<MIG_BUS_EI_BUPA_CENTRAL_DATA>-GROUPINGDAT = 1.
<MIG_BUS_EI_BUPA_CENTRAL_DATA>-BP_CENTRALDATADAT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-SEARCHTERM1DAT, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-SEARCHTERM2DAT, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-PARTNERTYPEDAT, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-AUTHORIZATIONGROUPDAT, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-PARTNERLANGUAGEDAT, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-PARTNERLANGUAGEISODAT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_MIG_BUS_EI_BUPA_CENTRAL_DATA 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_MIG_BUS_EI_BUPA_CENTRAL_DATA 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_MIG_BUS_EI_BUPA_CENTRAL_DATA INTO WA_MIG_BUS_EI_BUPA_CENTRAL_DATA.


*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 ISOLA, internal->external for field PARTNERLANGUAGEDAT
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-PARTNERLANGUAGEDAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-PARTNERLANGUAGEDAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field CORRESPONDLANGUAGEDAT
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-CORRESPONDLANGUAGEDAT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MIG_BUS_EI_BUPA_CENTRAL_DATA-CORRESPONDLANGUAGEDAT.
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_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR, 
DATA_KEY TYPE STRING,
BP_CONTROLDAT TYPE STRING,
CATEGORYDAT TYPE STRING,
GROUPINGDAT TYPE STRING,
BP_CENTRALDATADAT TYPE STRING,
SEARCHTERM1DAT TYPE STRING,
SEARCHTERM2DAT TYPE STRING,
PARTNERTYPEDAT TYPE STRING,
AUTHORIZATIONGROUPDAT TYPE STRING,
PARTNERLANGUAGEDAT TYPE STRING,
PARTNERLANGUAGEISODAT TYPE STRING,
DATAORIGINTYPEDAT TYPE STRING,
CENTRALARCHIVINGFLAGDAT TYPE STRING,
CENTRALBLOCKDAT TYPE STRING,
TITLE_KEYDAT TYPE STRING,
CONTACTALLOWANCEDAT TYPE STRING,
PARTNEREXTERNALDAT TYPE STRING,
TITLELETTERDAT TYPE STRING,
NOTRELEASEDDAT TYPE STRING,
COMM_TYPEDAT TYPE STRING,
PRINT_MODEDAT TYPE STRING,
BP_PERSONDAT TYPE STRING,
FIRSTNAMEDAT TYPE STRING,
LASTNAMEDAT TYPE STRING,
BIRTHNAMEDAT TYPE STRING,
MIDDLENAMEDAT TYPE STRING,
SECONDNAMEDAT TYPE STRING,
TITLE_ACA1DAT TYPE STRING,
TITLE_ACA2DAT TYPE STRING,
TITLE_SPPLDAT TYPE STRING,
PREFIX1DAT TYPE STRING,
PREFIX2DAT TYPE STRING,
NICKNAMEDAT TYPE STRING,
INITIALSDAT TYPE STRING,
NAMEFORMATDAT TYPE STRING,
NAMCOUNTRYDAT TYPE STRING,
NAMCOUNTRYISODAT TYPE STRING,
SEXDAT TYPE STRING,
BIRTHPLACEDAT TYPE STRING,
BIRTHDATEDAT TYPE STRING,
DEATHDATEDAT TYPE STRING,
MARITALSTATUSDAT TYPE STRING,
CORRESPONDLANGUAGEDAT TYPE STRING,
CORRESPONDLANGUAGEISODAT TYPE STRING,
FULLNAMEDAT TYPE STRING,
EMPLOYERDAT TYPE STRING,
OCCUPATIONDAT TYPE STRING,
NATIONALITYDAT TYPE STRING,
NATIONALITYISODAT TYPE STRING,
COUNTRYORIGINDAT TYPE STRING,
BIRTHDT_STATUSDAT TYPE STRING,
GENDERDAT TYPE STRING,
FULLNAME_MANDAT TYPE STRING,
BP_ORGANIZATIONDAT TYPE STRING,
NAME1DAT TYPE STRING,
NAME2DAT TYPE STRING,
NAME3DAT TYPE STRING,
NAME4DAT TYPE STRING,
LEGALFORMDAT TYPE STRING,
INDUSTRYSECTORDAT TYPE STRING,
FOUNDATIONDATEDAT TYPE STRING,
LIQUIDATIONDATEDAT TYPE STRING,
LOC_NO_1DAT TYPE STRING,
LOC_NO_2DAT TYPE STRING,
CHK_DIGITDAT TYPE STRING,
LEGALORGDAT TYPE STRING,
BP_GROUPDAT TYPE STRING,
NAMEGROUP1DAT TYPE STRING,
NAMEGROUP2DAT TYPE STRING,
GROUPTYPEDAT TYPE STRING,
BP_EEW_DUMMYDAT TYPE STRING,
VALID_FROM TYPE STRING,
VALID_FROM_X TYPE STRING,END OF T_EKKO_STR.
DATA: WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_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_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-DATA_KEY sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BP_CONTROLDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-CATEGORYDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-GROUPINGDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BP_CENTRALDATADAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-SEARCHTERM1DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-SEARCHTERM2DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-PARTNERTYPEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-AUTHORIZATIONGROUPDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-PARTNERLANGUAGEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-PARTNERLANGUAGEISODAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-DATAORIGINTYPEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-CENTRALARCHIVINGFLAGDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-CENTRALBLOCKDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-TITLE_KEYDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-CONTACTALLOWANCEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-PARTNEREXTERNALDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-TITLELETTERDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NOTRELEASEDDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-COMM_TYPEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-PRINT_MODEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BP_PERSONDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-FIRSTNAMEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-LASTNAMEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BIRTHNAMEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-MIDDLENAMEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-SECONDNAMEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-TITLE_ACA1DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-TITLE_ACA2DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-TITLE_SPPLDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-PREFIX1DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-PREFIX2DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NICKNAMEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-INITIALSDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAMEFORMATDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAMCOUNTRYDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAMCOUNTRYISODAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-SEXDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BIRTHPLACEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BIRTHDATEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-DEATHDATEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-MARITALSTATUSDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-CORRESPONDLANGUAGEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-CORRESPONDLANGUAGEISODAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-FULLNAMEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-EMPLOYERDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-OCCUPATIONDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NATIONALITYDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NATIONALITYISODAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-COUNTRYORIGINDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BIRTHDT_STATUSDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-GENDERDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-FULLNAME_MANDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BP_ORGANIZATIONDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAME1DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAME2DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAME3DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAME4DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-LEGALFORMDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-INDUSTRYSECTORDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-FOUNDATIONDATEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-LIQUIDATIONDATEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-LOC_NO_1DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-LOC_NO_2DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-CHK_DIGITDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-LEGALORGDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BP_GROUPDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAMEGROUP1DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-NAMEGROUP2DAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-GROUPTYPEDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-BP_EEW_DUMMYDAT sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-VALID_FROM sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_DATA_STR-VALID_FROM_X sy-vline      INTO ld_text SEPARATED BY SPACE.

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