ABAP Select data from SAP table PIQ_OFFER_LIST into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP PIQ_OFFER_LIST 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 PIQ_OFFER_LIST. 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 PIQ_OFFER_LIST 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_PIQ_OFFER_LIST TYPE STANDARD TABLE OF PIQ_OFFER_LIST,
      WA_PIQ_OFFER_LIST TYPE PIQ_OFFER_LIST,
      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: <PIQ_OFFER_LIST> TYPE PIQ_OFFER_LIST.

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

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

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


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PIQ_OFFER_LIST ASSIGNING <PIQ_OFFER_LIST>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PIQ_OFFER_LIST>-OFFER_AVAILABLE = 1.
<PIQ_OFFER_LIST>-OFFER_FREESEATS = 1.
<PIQ_OFFER_LIST>-WAITL_CAPACITY = 1.
<PIQ_OFFER_LIST>-MINIMUM = 1.
<PIQ_OFFER_LIST>-OPTIMUM = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PIQ_OFFER_LIST-MAXIMUM, sy-vline,
WA_PIQ_OFFER_LIST-RESERVED, sy-vline,
WA_PIQ_OFFER_LIST-BOOKED, sy-vline,
WA_PIQ_OFFER_LIST-SE_OBJID, sy-vline,
WA_PIQ_OFFER_LIST-SE_SHORT, sy-vline,
WA_PIQ_OFFER_LIST-SE_STEXT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PIQ_OFFER_LIST 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_PIQ_OFFER_LIST 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_PIQ_OFFER_LIST INTO WA_PIQ_OFFER_LIST. *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 CUNIT, internal->external for field CP_UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_PIQ_OFFER_LIST-CP_UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PIQ_OFFER_LIST-CP_UNIT.
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_PIQ_OFFER_LIST_STR,
OFFER_AVAILABLE TYPE STRING,
OFFER_FREESEATS TYPE STRING,
WAITL_CAPACITY TYPE STRING,
MINIMUM TYPE STRING,
OPTIMUM TYPE STRING,
MAXIMUM TYPE STRING,
RESERVED TYPE STRING,
BOOKED TYPE STRING,
SE_OBJID TYPE STRING,
SE_SHORT TYPE STRING,
SE_STEXT TYPE STRING,
SE_DESCR TYPE STRING,
SE_F_SHORT TYPE STRING,
SE_F_STEXT TYPE STRING,
SE_OFFERPATTERNT TYPE STRING,
SE_CAP_MIN TYPE STRING,
SE_CAP_OPT TYPE STRING,
SE_CAP_MAX TYPE STRING,
SECCAT1T TYPE STRING,
LFEECATT TYPE STRING,
DDSCHEDT TYPE STRING,
SE_RULE_FLAG TYPE STRING,
SM_OBJID TYPE STRING,
SM_SHORT TYPE STRING,
SM_STEXT TYPE STRING,
SM_DESCTYP TYPE STRING,
SM_DESCR TYPE STRING,
SM_CAP_MIN TYPE STRING,
SM_CAP_OPT TYPE STRING,
SM_CAP_MAX TYPE STRING,
OFFERPATTERNT TYPE STRING,
WAITL_LEVEL TYPE STRING,
WAITL_STDPERCT TYPE STRING,
WAITL_STDLEVEL TYPE STRING,
SEVERITYT TYPE STRING,
CATEGORYT TYPE STRING,
MODREPEATTYPET TYPE STRING,
PROGC_VART TYPE STRING,
CMSMCATT TYPE STRING,
CMLEVCATT TYPE STRING,
CMREFTYPT TYPE STRING,
CMSCDDSHEDT TYPE STRING,
SCALEID TYPE STRING,
SCALEIDT TYPE STRING,
SCALEID_PF TYPE STRING,
SCALEID_PFT TYPE STRING,
ELEMENTSCT TYPE STRING,
ELEMENTCGT TYPE STRING,
DISCIPST TYPE STRING,
OFFEREDT TYPE STRING,
CP_TEXT TYPE STRING,
CPMIN TYPE STRING,
CPOPT TYPE STRING,
CPMAX TYPE STRING,
CP_UNIT TYPE STRING,
CP_UNITT TYPE STRING,
REFERENCET TYPE STRING,
PRE_REQUISITET TYPE STRING,
CO_REQUISITET TYPE STRING,
SM_RULE_FLAG TYPE STRING,
SPCATG_TEXT TYPE STRING,
MULT_SEC_ENABLED TYPE STRING,
EVENTS_OTJID TYPE STRING,
EVENTS_TEXT TYPE STRING,
D_OTJID TYPE STRING,
D_TEXT TYPE STRING,
LOCATION_TEXT TYPE STRING,
BUILDING_TEXT TYPE STRING,
ROOM_TEXT TYPE STRING,
INSTR_TEXT TYPE STRING,
SCHEDULE_TEXT TYPE STRING,
D_CATEGORY_TEXT TYPE STRING,
D_TEACHMETHOD_TEXT TYPE STRING,
SCHEDCATEG_TEXT TYPE STRING,
EVENTS_BEGDA TYPE STRING,
EVENTS_ENDDA TYPE STRING,
D_DELMODE_TEXT TYPE STRING,
INSTR_OTYPE TYPE STRING,
INSTR_OBJID TYPE STRING,
REG_IND TYPE STRING,
WAITL_POSITION TYPE STRING,END OF T_EKKO_STR. DATA: WA_PIQ_OFFER_LIST_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_PIQ_OFFER_LIST_STR-OFFER_AVAILABLE sy-vline
WA_PIQ_OFFER_LIST_STR-OFFER_FREESEATS sy-vline
WA_PIQ_OFFER_LIST_STR-WAITL_CAPACITY sy-vline
WA_PIQ_OFFER_LIST_STR-MINIMUM sy-vline
WA_PIQ_OFFER_LIST_STR-OPTIMUM sy-vline
WA_PIQ_OFFER_LIST_STR-MAXIMUM sy-vline
WA_PIQ_OFFER_LIST_STR-RESERVED sy-vline
WA_PIQ_OFFER_LIST_STR-BOOKED sy-vline
WA_PIQ_OFFER_LIST_STR-SE_OBJID sy-vline
WA_PIQ_OFFER_LIST_STR-SE_SHORT sy-vline
WA_PIQ_OFFER_LIST_STR-SE_STEXT sy-vline
WA_PIQ_OFFER_LIST_STR-SE_DESCR sy-vline
WA_PIQ_OFFER_LIST_STR-SE_F_SHORT sy-vline
WA_PIQ_OFFER_LIST_STR-SE_F_STEXT sy-vline
WA_PIQ_OFFER_LIST_STR-SE_OFFERPATTERNT sy-vline
WA_PIQ_OFFER_LIST_STR-SE_CAP_MIN sy-vline
WA_PIQ_OFFER_LIST_STR-SE_CAP_OPT sy-vline
WA_PIQ_OFFER_LIST_STR-SE_CAP_MAX sy-vline
WA_PIQ_OFFER_LIST_STR-SECCAT1T sy-vline
WA_PIQ_OFFER_LIST_STR-LFEECATT sy-vline
WA_PIQ_OFFER_LIST_STR-DDSCHEDT sy-vline
WA_PIQ_OFFER_LIST_STR-SE_RULE_FLAG sy-vline
WA_PIQ_OFFER_LIST_STR-SM_OBJID sy-vline
WA_PIQ_OFFER_LIST_STR-SM_SHORT sy-vline
WA_PIQ_OFFER_LIST_STR-SM_STEXT sy-vline
WA_PIQ_OFFER_LIST_STR-SM_DESCTYP sy-vline
WA_PIQ_OFFER_LIST_STR-SM_DESCR sy-vline
WA_PIQ_OFFER_LIST_STR-SM_CAP_MIN sy-vline
WA_PIQ_OFFER_LIST_STR-SM_CAP_OPT sy-vline
WA_PIQ_OFFER_LIST_STR-SM_CAP_MAX sy-vline
WA_PIQ_OFFER_LIST_STR-OFFERPATTERNT sy-vline
WA_PIQ_OFFER_LIST_STR-WAITL_LEVEL sy-vline
WA_PIQ_OFFER_LIST_STR-WAITL_STDPERCT sy-vline
WA_PIQ_OFFER_LIST_STR-WAITL_STDLEVEL sy-vline
WA_PIQ_OFFER_LIST_STR-SEVERITYT sy-vline
WA_PIQ_OFFER_LIST_STR-CATEGORYT sy-vline
WA_PIQ_OFFER_LIST_STR-MODREPEATTYPET sy-vline
WA_PIQ_OFFER_LIST_STR-PROGC_VART sy-vline
WA_PIQ_OFFER_LIST_STR-CMSMCATT sy-vline
WA_PIQ_OFFER_LIST_STR-CMLEVCATT sy-vline
WA_PIQ_OFFER_LIST_STR-CMREFTYPT sy-vline
WA_PIQ_OFFER_LIST_STR-CMSCDDSHEDT sy-vline
WA_PIQ_OFFER_LIST_STR-SCALEID sy-vline
WA_PIQ_OFFER_LIST_STR-SCALEIDT sy-vline
WA_PIQ_OFFER_LIST_STR-SCALEID_PF sy-vline
WA_PIQ_OFFER_LIST_STR-SCALEID_PFT sy-vline
WA_PIQ_OFFER_LIST_STR-ELEMENTSCT sy-vline
WA_PIQ_OFFER_LIST_STR-ELEMENTCGT sy-vline
WA_PIQ_OFFER_LIST_STR-DISCIPST sy-vline
WA_PIQ_OFFER_LIST_STR-OFFEREDT sy-vline
WA_PIQ_OFFER_LIST_STR-CP_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-CPMIN sy-vline
WA_PIQ_OFFER_LIST_STR-CPOPT sy-vline
WA_PIQ_OFFER_LIST_STR-CPMAX sy-vline
WA_PIQ_OFFER_LIST_STR-CP_UNIT sy-vline
WA_PIQ_OFFER_LIST_STR-CP_UNITT sy-vline
WA_PIQ_OFFER_LIST_STR-REFERENCET sy-vline
WA_PIQ_OFFER_LIST_STR-PRE_REQUISITET sy-vline
WA_PIQ_OFFER_LIST_STR-CO_REQUISITET sy-vline
WA_PIQ_OFFER_LIST_STR-SM_RULE_FLAG sy-vline
WA_PIQ_OFFER_LIST_STR-SPCATG_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-MULT_SEC_ENABLED sy-vline
WA_PIQ_OFFER_LIST_STR-EVENTS_OTJID sy-vline
WA_PIQ_OFFER_LIST_STR-EVENTS_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-D_OTJID sy-vline
WA_PIQ_OFFER_LIST_STR-D_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-LOCATION_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-BUILDING_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-ROOM_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-INSTR_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-SCHEDULE_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-D_CATEGORY_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-D_TEACHMETHOD_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-SCHEDCATEG_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-EVENTS_BEGDA sy-vline
WA_PIQ_OFFER_LIST_STR-EVENTS_ENDDA sy-vline
WA_PIQ_OFFER_LIST_STR-D_DELMODE_TEXT sy-vline
WA_PIQ_OFFER_LIST_STR-INSTR_OTYPE sy-vline
WA_PIQ_OFFER_LIST_STR-INSTR_OBJID sy-vline
WA_PIQ_OFFER_LIST_STR-REG_IND sy-vline
WA_PIQ_OFFER_LIST_STR-WAITL_POSITION sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.