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

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

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

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


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/SAPAPO/PMON_APPL_IO ASSIGNING </SAPAPO/PMON_APPL_IO>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
</SAPAPO/PMON_APPL_IO>-SCID = 1.
</SAPAPO/PMON_APPL_IO>-SCTYPE = 1.
</SAPAPO/PMON_APPL_IO>-SCNAME = 1.
</SAPAPO/PMON_APPL_IO>-SCDESCR = 1.
</SAPAPO/PMON_APPL_IO>-SCHIST = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/SAPAPO/PMON_APPL_IO-SCMODE, sy-vline,
WA_/SAPAPO/PMON_APPL_IO-GRIDCOLOR, sy-vline,
WA_/SAPAPO/PMON_APPL_IO-DIAGDETAIL, sy-vline,
WA_/SAPAPO/PMON_APPL_IO-DIAGLABEL, sy-vline,
WA_/SAPAPO/PMON_APPL_IO-DIAGVALUE, sy-vline,
WA_/SAPAPO/PMON_APPL_IO-SCEXTTIME, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/SAPAPO/PMON_APPL_IO 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_/SAPAPO/PMON_APPL_IO 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_/SAPAPO/PMON_APPL_IO INTO WA_/SAPAPO/PMON_APPL_IO. *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 UNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/SAPAPO/PMON_APPL_IO-UNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SAPAPO/PMON_APPL_IO-UNIT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field UNIT1 CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/SAPAPO/PMON_APPL_IO-UNIT1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SAPAPO/PMON_APPL_IO-UNIT1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field UNIT2 CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/SAPAPO/PMON_APPL_IO-UNIT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SAPAPO/PMON_APPL_IO-UNIT2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field CREATEDTST CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT' EXPORTING input = WA_/SAPAPO/PMON_APPL_IO-CREATEDTST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SAPAPO/PMON_APPL_IO-CREATEDTST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TSTPS, internal->external for field MODIFIEDTST CALL FUNCTION 'CONVERSION_EXIT_TSTPS_OUTPUT' EXPORTING input = WA_/SAPAPO/PMON_APPL_IO-MODIFIEDTST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SAPAPO/PMON_APPL_IO-MODIFIEDTST.
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_/SAPAPO/PMON_APPL_IO_STR,
SCID TYPE STRING,
SCTYPE TYPE STRING,
SCNAME TYPE STRING,
SCDESCR TYPE STRING,
SCHIST TYPE STRING,
SCMODE TYPE STRING,
GRIDCOLOR TYPE STRING,
DIAGDETAIL TYPE STRING,
DIAGLABEL TYPE STRING,
DIAGVALUE TYPE STRING,
SCEXTTIME TYPE STRING,
SCEXTVERS TYPE STRING,
SCEXTOBJ TYPE STRING,
TIMESETNAME TYPE STRING,
TYPESIMPLE TYPE STRING,
TYPEVERS TYPE STRING,
TYPETIME TYPE STRING,
TYPEVAR TYPE STRING,
NEWSCID TYPE STRING,
NEWSCTYPE TYPE STRING,
NEWSCNAME TYPE STRING,
NEWSCDESCR TYPE STRING,
NEWTIMESETNAME TYPE STRING,
NEWTYPESIMPLE TYPE STRING,
NEWTYPEVERS TYPE STRING,
NEWTYPETIME TYPE STRING,
TIMEINTID TYPE STRING,
TSTFR TYPE STRING,
DATEFR TYPE STRING,
TIMEFR TYPE STRING,
TSTTO TYPE STRING,
DATETO TYPE STRING,
TIMETO TYPE STRING,
TFRABS_FLG TYPE STRING,
ABSDATEFR TYPE STRING,
ABSTIMEFR TYPE STRING,
TFRREL_FLG TYPE STRING,
DELTATFR_NMONTHS TYPE STRING,
DELTATFR_NWEEKS TYPE STRING,
DELTATFR_NDAYS TYPE STRING,
DELTATFR_NHOURS TYPE STRING,
DELTATFR_INTFLG TYPE STRING,
DELTATFR_MFLG TYPE STRING,
DELTATFR_WFLG TYPE STRING,
DELTATFR_DFLG TYPE STRING,
DELTATFR_HFLG TYPE STRING,
TTOABS_FLG TYPE STRING,
ABSDATETO TYPE STRING,
ABSTIMETO TYPE STRING,
TTOREL_FLG TYPE STRING,
DELTATTO_NMONTHS TYPE STRING,
DELTATTO_NWEEKS TYPE STRING,
DELTATTO_NDAYS TYPE STRING,
DELTATTO_NHOURS TYPE STRING,
DELTATTO_INTFLG TYPE STRING,
DELTATTO_MFLG TYPE STRING,
DELTATTO_WFLG TYPE STRING,
DELTATTO_DFLG TYPE STRING,
DELTATTO_HFLG TYPE STRING,
DELTAT_FLG TYPE STRING,
DELTAT_NMONTHS TYPE STRING,
DELTAT_NWEEKS TYPE STRING,
DELTAT_NDAYS TYPE STRING,
DELTAT_NHOURS TYPE STRING,
DELTAT_INTFLG TYPE STRING,
DELTAT_MFLG TYPE STRING,
DELTAT_WFLG TYPE STRING,
DELTAT_DFLG TYPE STRING,
DELTAT_HFLG TYPE STRING,
TIMETXT TYPE STRING,
VARID TYPE STRING,
UNAME TYPE STRING,
VRTYPE TYPE STRING,
VRNAME TYPE STRING,
VRDESCR TYPE STRING,
PIND TYPE STRING,
VRAGGRMODE TYPE STRING,
VRSCOREMODE TYPE STRING,
UNIT TYPE STRING,
UNIT1 TYPE STRING,
UNIT2 TYPE STRING,
TIMESETID TYPE STRING,
EXTTIME TYPE STRING,
VERSETID TYPE STRING,
EXTVERS TYPE STRING,
OBJSETID TYPE STRING,
EXTOBJ TYPE STRING,
VRMULTI TYPE STRING,
OBJSHOW TYPE STRING,
EXPAND TYPE STRING,
SHOW TYPE STRING,
SEQU TYPE STRING,
PINAME TYPE STRING,
PIDESCR TYPE STRING,
TYPE TYPE STRING,
DIMID TYPE STRING,
DIMID1 TYPE STRING,
DIMID2 TYPE STRING,
UNITFIELDNM TYPE STRING,
UNITFIELDNMF1 TYPE STRING,
UNITFIELDNMF2 TYPE STRING,
IND1 TYPE STRING,
IND2 TYPE STRING,
IND3 TYPE STRING,
IND4 TYPE STRING,
IND5 TYPE STRING,
ATTR1 TYPE STRING,
ATTR2 TYPE STRING,
ATTR3 TYPE STRING,
CREATEDBY TYPE STRING,
CREATEDTST TYPE STRING,
MODIFIEDBY TYPE STRING,
MODIFIEDTST TYPE STRING,END OF T_EKKO_STR. DATA: WA_/SAPAPO/PMON_APPL_IO_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_/SAPAPO/PMON_APPL_IO_STR-SCID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCTYPE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCNAME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCDESCR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCHIST sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCMODE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-GRIDCOLOR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DIAGDETAIL sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DIAGLABEL sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DIAGVALUE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCEXTTIME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCEXTVERS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SCEXTOBJ sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TIMESETNAME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TYPESIMPLE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TYPEVERS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TYPETIME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TYPEVAR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWSCID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWSCTYPE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWSCNAME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWSCDESCR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWTIMESETNAME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWTYPESIMPLE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWTYPEVERS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-NEWTYPETIME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TIMEINTID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TSTFR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DATEFR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TIMEFR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TSTTO sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DATETO sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TIMETO sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TFRABS_FLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-ABSDATEFR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-ABSTIMEFR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TFRREL_FLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_NMONTHS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_NWEEKS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_NDAYS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_NHOURS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_INTFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_MFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_WFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_DFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATFR_HFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TTOABS_FLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-ABSDATETO sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-ABSTIMETO sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TTOREL_FLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_NMONTHS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_NWEEKS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_NDAYS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_NHOURS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_INTFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_MFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_WFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_DFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTATTO_HFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_FLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_NMONTHS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_NWEEKS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_NDAYS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_NHOURS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_INTFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_MFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_WFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_DFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DELTAT_HFLG sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TIMETXT sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VARID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-UNAME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VRTYPE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VRNAME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VRDESCR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-PIND sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VRAGGRMODE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VRSCOREMODE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-UNIT sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-UNIT1 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-UNIT2 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TIMESETID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-EXTTIME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VERSETID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-EXTVERS sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-OBJSETID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-EXTOBJ sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-VRMULTI sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-OBJSHOW sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-EXPAND sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SHOW sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-SEQU sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-PINAME sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-PIDESCR sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-TYPE sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DIMID sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DIMID1 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-DIMID2 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-UNITFIELDNM sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-UNITFIELDNMF1 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-UNITFIELDNMF2 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-IND1 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-IND2 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-IND3 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-IND4 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-IND5 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-ATTR1 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-ATTR2 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-ATTR3 sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-CREATEDBY sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-CREATEDTST sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-MODIFIEDBY sy-vline
WA_/SAPAPO/PMON_APPL_IO_STR-MODIFIEDTST sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.