ABAP Select data from SAP table MIG_BUS_EI_BUPA_CENTRAL 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 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. 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 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 TYPE STANDARD TABLE OF MIG_BUS_EI_BUPA_CENTRAL,
      WA_MIG_BUS_EI_BUPA_CENTRAL TYPE MIG_BUS_EI_BUPA_CENTRAL,
      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> TYPE MIG_BUS_EI_BUPA_CENTRAL.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<MIG_BUS_EI_BUPA_CENTRAL>-CATEGORYMN = 1.
<MIG_BUS_EI_BUPA_CENTRAL>-GROUPINGMN = 1.
<MIG_BUS_EI_BUPA_CENTRAL>-SEARCHTERM1CTR = 1.
<MIG_BUS_EI_BUPA_CENTRAL>-SEARCHTERM2CTR = 1.
<MIG_BUS_EI_BUPA_CENTRAL>-PARTNERTYPECTR = 1.

ENDLOOP.

LOOP AT IT_MIG_BUS_EI_BUPA_CENTRAL INTO WA_MIG_BUS_EI_BUPA_CENTRAL.
*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-AUTHORIZATIONGROUPCTR, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL-PARTNERLANGUAGECTR, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL-PARTNERLANGUAGEISOCTR, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL-DATAORIGINTYPECTR, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL-CENTRALARCHIVINGFLAGCTR, sy-vline,
  WA_MIG_BUS_EI_BUPA_CENTRAL-CENTRALBLOCKCTR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_MIG_BUS_EI_BUPA_CENTRAL 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 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 INTO WA_MIG_BUS_EI_BUPA_CENTRAL.


*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 PARTNERLANGUAGECTR
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_MIG_BUS_EI_BUPA_CENTRAL-PARTNERLANGUAGECTR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MIG_BUS_EI_BUPA_CENTRAL-PARTNERLANGUAGECTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field CORRESPONDLANGUAGEPRS
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_MIG_BUS_EI_BUPA_CENTRAL-CORRESPONDLANGUAGEPRS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_MIG_BUS_EI_BUPA_CENTRAL-CORRESPONDLANGUAGEPRS.
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_STR, 
CATEGORYMN TYPE STRING,
GROUPINGMN TYPE STRING,
SEARCHTERM1CTR TYPE STRING,
SEARCHTERM2CTR TYPE STRING,
PARTNERTYPECTR TYPE STRING,
AUTHORIZATIONGROUPCTR TYPE STRING,
PARTNERLANGUAGECTR TYPE STRING,
PARTNERLANGUAGEISOCTR TYPE STRING,
DATAORIGINTYPECTR TYPE STRING,
CENTRALARCHIVINGFLAGCTR TYPE STRING,
CENTRALBLOCKCTR TYPE STRING,
TITLE_KEYCTR TYPE STRING,
CONTACTALLOWANCECTR TYPE STRING,
PARTNEREXTERNALCTR TYPE STRING,
TITLELETTERCTR TYPE STRING,
NOTRELEASEDCTR TYPE STRING,
COMM_TYPECTR TYPE STRING,
PRINT_MODECTR TYPE STRING,
FIRSTNAMEPRS TYPE STRING,
LASTNAMEPRS TYPE STRING,
BIRTHNAMEPRS TYPE STRING,
MIDDLENAMEPRS TYPE STRING,
SECONDNAMEPRS TYPE STRING,
TITLE_ACA1PRS TYPE STRING,
TITLE_ACA2PRS TYPE STRING,
TITLE_SPPLPRS TYPE STRING,
PREFIX1PRS TYPE STRING,
PREFIX2PRS TYPE STRING,
NICKNAMEPRS TYPE STRING,
INITIALSPRS TYPE STRING,
NAMEFORMATPRS TYPE STRING,
NAMCOUNTRYPRS TYPE STRING,
NAMCOUNTRYISOPRS TYPE STRING,
SEXPRS TYPE STRING,
BIRTHPLACEPRS TYPE STRING,
BIRTHDATEPRS TYPE STRING,
DEATHDATEPRS TYPE STRING,
MARITALSTATUSPRS TYPE STRING,
CORRESPONDLANGUAGEPRS TYPE STRING,
CORRESPONDLANGUAGEISOPRS TYPE STRING,
FULLNAMEPRS TYPE STRING,
EMPLOYERPRS TYPE STRING,
OCCUPATIONPRS TYPE STRING,
NATIONALITYPRS TYPE STRING,
NATIONALITYISOPRS TYPE STRING,
COUNTRYORIGINPRS TYPE STRING,
BIRTHDT_STATUSPRS TYPE STRING,
GENDERPRS TYPE STRING,
FULLNAME_MANPRS TYPE STRING,
NAME1ORG TYPE STRING,
NAME2ORG TYPE STRING,
NAME3ORG TYPE STRING,
NAME4ORG TYPE STRING,
LEGALFORMORG TYPE STRING,
INDUSTRYSECTORORG TYPE STRING,
FOUNDATIONDATEORG TYPE STRING,
LIQUIDATIONDATEORG TYPE STRING,
LOC_NO_1ORG TYPE STRING,
LOC_NO_2ORG TYPE STRING,
CHK_DIGITORG TYPE STRING,
LEGALORGORG TYPE STRING,
NAMEGROUP1GRP TYPE STRING,
NAMEGROUP2GRP TYPE STRING,
GROUPTYPEGRP TYPE STRING,
TIME_DEPENDENT_DATA TYPE STRING,END OF T_EKKO_STR.
DATA: WA_MIG_BUS_EI_BUPA_CENTRAL_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_STR-CATEGORYMN sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-GROUPINGMN sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-SEARCHTERM1CTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-SEARCHTERM2CTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-PARTNERTYPECTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-AUTHORIZATIONGROUPCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-PARTNERLANGUAGECTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-PARTNERLANGUAGEISOCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-DATAORIGINTYPECTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-CENTRALARCHIVINGFLAGCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-CENTRALBLOCKCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-TITLE_KEYCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-CONTACTALLOWANCECTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-PARTNEREXTERNALCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-TITLELETTERCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NOTRELEASEDCTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-COMM_TYPECTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-PRINT_MODECTR sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-FIRSTNAMEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-LASTNAMEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-BIRTHNAMEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-MIDDLENAMEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-SECONDNAMEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-TITLE_ACA1PRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-TITLE_ACA2PRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-TITLE_SPPLPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-PREFIX1PRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-PREFIX2PRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NICKNAMEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-INITIALSPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAMEFORMATPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAMCOUNTRYPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAMCOUNTRYISOPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-SEXPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-BIRTHPLACEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-BIRTHDATEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-DEATHDATEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-MARITALSTATUSPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-CORRESPONDLANGUAGEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-CORRESPONDLANGUAGEISOPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-FULLNAMEPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-EMPLOYERPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-OCCUPATIONPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NATIONALITYPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NATIONALITYISOPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-COUNTRYORIGINPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-BIRTHDT_STATUSPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-GENDERPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-FULLNAME_MANPRS sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAME1ORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAME2ORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAME3ORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAME4ORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-LEGALFORMORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-INDUSTRYSECTORORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-FOUNDATIONDATEORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-LIQUIDATIONDATEORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-LOC_NO_1ORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-LOC_NO_2ORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-CHK_DIGITORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-LEGALORGORG sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAMEGROUP1GRP sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-NAMEGROUP2GRP sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-GROUPTYPEGRP sy-vline 
WA_MIG_BUS_EI_BUPA_CENTRAL_STR-TIME_DEPENDENT_DATA sy-vline      INTO ld_text SEPARATED BY SPACE.

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