ABAP Select data from SAP table BBPC_CTRL_PAR 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 BBPC_CTRL_PAR 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 BBPC_CTRL_PAR. 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 BBPC_CTRL_PAR 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_BBPC_CTRL_PAR TYPE STANDARD TABLE OF BBPC_CTRL_PAR,
      WA_BBPC_CTRL_PAR TYPE BBPC_CTRL_PAR,
      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: <BBPC_CTRL_PAR> TYPE BBPC_CTRL_PAR.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<BBPC_CTRL_PAR>-CLIENT = 1.
<BBPC_CTRL_PAR>-PROCESS_TYPE = 1.
<BBPC_CTRL_PAR>-BID_TYPE = 1.
<BBPC_CTRL_PAR>-USE_CONDITIONS = 1.
<BBPC_CTRL_PAR>-QUAN_CONTROL = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_BBPC_CTRL_PAR-ADD_ITEMS_IND, sy-vline,
  WA_BBPC_CTRL_PAR-SHOW_WEIGHIN_IND, sy-vline,
  WA_BBPC_CTRL_PAR-BID_ALL_ITMS_IND, sy-vline,
  WA_BBPC_CTRL_PAR-BID_VALIDATION, sy-vline,
  WA_BBPC_CTRL_PAR-DECR_TYPE, sy-vline,
  WA_BBPC_CTRL_PAR-BID_CHG_ALLOWED, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_BBPC_CTRL_PAR 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_BBPC_CTRL_PAR 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_BBPC_CTRL_PAR INTO WA_BBPC_CTRL_PAR.


*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_BBPC_CTRL_PAR_STR, 
CLIENT TYPE STRING,
PROCESS_TYPE TYPE STRING,
BID_TYPE TYPE STRING,
USE_CONDITIONS TYPE STRING,
QUAN_CONTROL TYPE STRING,
ADD_ITEMS_IND TYPE STRING,
SHOW_WEIGHIN_IND TYPE STRING,
BID_ALL_ITMS_IND TYPE STRING,
BID_VALIDATION TYPE STRING,
DECR_TYPE TYPE STRING,
BID_CHG_ALLOWED TYPE STRING,
COMP_MULTI_BID TYPE STRING,
FULL_QTY_IND TYPE STRING,
INRPRC TYPE STRING,
INRANK TYPE STRING,
INCRNK TYPE STRING,
INBSBD TYPE STRING,
INCBSB TYPE STRING,
INNXBD TYPE STRING,
INFRST TYPE STRING,
INHUFB TYPE STRING,
INCOMP TYPE STRING,
INBIDN TYPE STRING,
INBDPR TYPE STRING,
INAEXT TYPE STRING,
INNMBD TYPE STRING,
SNDCHT TYPE STRING,
INCBID TYPE STRING,
CTBDNR TYPE STRING,
CTBDVL TYPE STRING,
CTBDBS TYPE STRING,
RNOTIE TYPE STRING,
RWTTIE TYPE STRING,
INCLPR TYPE STRING,
ALLOW_TEAM_PURCH TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
TP_CRSORG_ASSGMT TYPE STRING,
OFFLINE_IND TYPE STRING,
BIDDING_SYSTEM TYPE STRING,
LIMIT_CTRL_FLAG TYPE STRING,
BBP_MENV_SCHEMA TYPE STRING,END OF T_EKKO_STR.
DATA: WA_BBPC_CTRL_PAR_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_BBPC_CTRL_PAR_STR-CLIENT sy-vline 
WA_BBPC_CTRL_PAR_STR-PROCESS_TYPE sy-vline 
WA_BBPC_CTRL_PAR_STR-BID_TYPE sy-vline 
WA_BBPC_CTRL_PAR_STR-USE_CONDITIONS sy-vline 
WA_BBPC_CTRL_PAR_STR-QUAN_CONTROL sy-vline 
WA_BBPC_CTRL_PAR_STR-ADD_ITEMS_IND sy-vline 
WA_BBPC_CTRL_PAR_STR-SHOW_WEIGHIN_IND sy-vline 
WA_BBPC_CTRL_PAR_STR-BID_ALL_ITMS_IND sy-vline 
WA_BBPC_CTRL_PAR_STR-BID_VALIDATION sy-vline 
WA_BBPC_CTRL_PAR_STR-DECR_TYPE sy-vline 
WA_BBPC_CTRL_PAR_STR-BID_CHG_ALLOWED sy-vline 
WA_BBPC_CTRL_PAR_STR-COMP_MULTI_BID sy-vline 
WA_BBPC_CTRL_PAR_STR-FULL_QTY_IND sy-vline 
WA_BBPC_CTRL_PAR_STR-INRPRC sy-vline 
WA_BBPC_CTRL_PAR_STR-INRANK sy-vline 
WA_BBPC_CTRL_PAR_STR-INCRNK sy-vline 
WA_BBPC_CTRL_PAR_STR-INBSBD sy-vline 
WA_BBPC_CTRL_PAR_STR-INCBSB sy-vline 
WA_BBPC_CTRL_PAR_STR-INNXBD sy-vline 
WA_BBPC_CTRL_PAR_STR-INFRST sy-vline 
WA_BBPC_CTRL_PAR_STR-INHUFB sy-vline 
WA_BBPC_CTRL_PAR_STR-INCOMP sy-vline 
WA_BBPC_CTRL_PAR_STR-INBIDN sy-vline 
WA_BBPC_CTRL_PAR_STR-INBDPR sy-vline 
WA_BBPC_CTRL_PAR_STR-INAEXT sy-vline 
WA_BBPC_CTRL_PAR_STR-INNMBD sy-vline 
WA_BBPC_CTRL_PAR_STR-SNDCHT sy-vline 
WA_BBPC_CTRL_PAR_STR-INCBID sy-vline 
WA_BBPC_CTRL_PAR_STR-CTBDNR sy-vline 
WA_BBPC_CTRL_PAR_STR-CTBDVL sy-vline 
WA_BBPC_CTRL_PAR_STR-CTBDBS sy-vline 
WA_BBPC_CTRL_PAR_STR-RNOTIE sy-vline 
WA_BBPC_CTRL_PAR_STR-RWTTIE sy-vline 
WA_BBPC_CTRL_PAR_STR-INCLPR sy-vline 
WA_BBPC_CTRL_PAR_STR-ALLOW_TEAM_PURCH sy-vline 
WA_BBPC_CTRL_PAR_STR-BEGDA sy-vline 
WA_BBPC_CTRL_PAR_STR-ENDDA sy-vline 
WA_BBPC_CTRL_PAR_STR-TP_CRSORG_ASSGMT sy-vline 
WA_BBPC_CTRL_PAR_STR-OFFLINE_IND sy-vline 
WA_BBPC_CTRL_PAR_STR-BIDDING_SYSTEM sy-vline 
WA_BBPC_CTRL_PAR_STR-LIMIT_CTRL_FLAG sy-vline 
WA_BBPC_CTRL_PAR_STR-BBP_MENV_SCHEMA sy-vline      INTO ld_text SEPARATED BY SPACE.

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