ABAP Select data from SAP table P06DAT_ACCIDENT 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 P06DAT_ACCIDENT 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 P06DAT_ACCIDENT. 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 P06DAT_ACCIDENT 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_P06DAT_ACCIDENT TYPE STANDARD TABLE OF P06DAT_ACCIDENT,
      WA_P06DAT_ACCIDENT TYPE P06DAT_ACCIDENT,
      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: <P06DAT_ACCIDENT> TYPE P06DAT_ACCIDENT.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<P06DAT_ACCIDENT>-IDENF = 1.
<P06DAT_ACCIDENT>-ADATE = 1.
<P06DAT_ACCIDENT>-HEURE = 1.
<P06DAT_ACCIDENT>-AVICT = 1.
<P06DAT_ACCIDENT>-CIRC = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_P06DAT_ACCIDENT-LIEU, sy-vline,
  WA_P06DAT_ACCIDENT-PTREM, sy-vline,
  WA_P06DAT_ACCIDENT-COMPL, sy-vline,
  WA_P06DAT_ACCIDENT-NOMVO, sy-vline,
  WA_P06DAT_ACCIDENT-MENTI, sy-vline,
  WA_P06DAT_ACCIDENT-LOCAL, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_P06DAT_ACCIDENT 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_P06DAT_ACCIDENT 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_P06DAT_ACCIDENT INTO WA_P06DAT_ACCIDENT.


*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_P06DAT_ACCIDENT_STR, 
IDENF TYPE STRING,
ADATE TYPE STRING,
HEURE TYPE STRING,
AVICT TYPE STRING,
CIRC TYPE STRING,
LIEU TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
TRAP TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
LIGN TYPE STRING,
TYPE TYPE STRING,
ATYPE TYPE STRING,
HORA TYPE STRING,
LESI TYPE STRING,
CONS TYPE STRING,
IDENF TYPE STRING,
CONST TYPE STRING,
DECRI TYPE STRING,
MODEC TYPE STRING,
TEMPS TYPE STRING,
ENREG TYPE STRING,
CONSE TYPE STRING,
DECES TYPE STRING,
VICT TYPE STRING,
EMBAU TYPE STRING,
CANCI TYPE STRING,
PPH2 TYPE STRING,
IDE3 TYPE STRING,
ADR2 TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
NATI TYPE STRING,
NOM2 TYPE STRING,
USANO TYPE STRING,
PRENO TYPE STRING,
FAMNO TYPE STRING,
SEXE TYPE STRING,
CSEXE TYPE STRING,
NAIS TYPE STRING,
DNAIS TYPE STRING,
EMPI TYPE STRING,
APRO TYPE STRING,
APR2 TYPE STRING,
CONT TYPE STRING,
NATUR TYPE STRING,
EMPL TYPE STRING,
PMO1 TYPE STRING,
ADR3 TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
TEL2 TYPE STRING,
RSOC TYPE STRING,
RSOCI TYPE STRING,
ETAB TYPE STRING,
CRISQ TYPE STRING,
PMO2 TYPE STRING,
IDE4 TYPE STRING,
ADR4 TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
TEL3 TYPE STRING,
GEST TYPE STRING,
IDE5 TYPE STRING,
ENTR TYPE STRING,
CRISQ TYPE STRING,
PMO3 TYPE STRING,
IDE6 TYPE STRING,
ADR5 TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
TEL4 TYPE STRING,
RSO2 TYPE STRING,
RSOCI TYPE STRING,
TIER TYPE STRING,
PMO4 TYPE STRING,
ADR6 TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
RSO3 TYPE STRING,
RSOCI TYPE STRING,
PPH3 TYPE STRING,
ADR7 TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
NOM3 TYPE STRING,
USANO TYPE STRING,
PRENO TYPE STRING,
CONA TYPE STRING,
IDENF TYPE STRING,
ASSU TYPE STRING,
PMO5 TYPE STRING,
IDE7 TYPE STRING,
ADR8 TYPE STRING,
PTREM TYPE STRING,
COMPL TYPE STRING,
NOMVO TYPE STRING,
MENTI TYPE STRING,
LOCAL TYPE STRING,
DPAYS TYPE STRING,
RSO4 TYPE STRING,
RSOCI TYPE STRING,
TEMO TYPE STRING,
UNIT TYPE STRING,
PMO6 TYPE STRING,
RSOCI TYPE STRING,
CIR2 TYPE STRING,END OF T_EKKO_STR.
DATA: WA_P06DAT_ACCIDENT_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_P06DAT_ACCIDENT_STR-IDENF sy-vline 
WA_P06DAT_ACCIDENT_STR-ADATE sy-vline 
WA_P06DAT_ACCIDENT_STR-HEURE sy-vline 
WA_P06DAT_ACCIDENT_STR-AVICT sy-vline 
WA_P06DAT_ACCIDENT_STR-CIRC sy-vline 
WA_P06DAT_ACCIDENT_STR-LIEU sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-TRAP sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-LIGN sy-vline 
WA_P06DAT_ACCIDENT_STR-TYPE sy-vline 
WA_P06DAT_ACCIDENT_STR-ATYPE sy-vline 
WA_P06DAT_ACCIDENT_STR-HORA sy-vline 
WA_P06DAT_ACCIDENT_STR-LESI sy-vline 
WA_P06DAT_ACCIDENT_STR-CONS sy-vline 
WA_P06DAT_ACCIDENT_STR-IDENF sy-vline 
WA_P06DAT_ACCIDENT_STR-CONST sy-vline 
WA_P06DAT_ACCIDENT_STR-DECRI sy-vline 
WA_P06DAT_ACCIDENT_STR-MODEC sy-vline 
WA_P06DAT_ACCIDENT_STR-TEMPS sy-vline 
WA_P06DAT_ACCIDENT_STR-ENREG sy-vline 
WA_P06DAT_ACCIDENT_STR-CONSE sy-vline 
WA_P06DAT_ACCIDENT_STR-DECES sy-vline 
WA_P06DAT_ACCIDENT_STR-VICT sy-vline 
WA_P06DAT_ACCIDENT_STR-EMBAU sy-vline 
WA_P06DAT_ACCIDENT_STR-CANCI sy-vline 
WA_P06DAT_ACCIDENT_STR-PPH2 sy-vline 
WA_P06DAT_ACCIDENT_STR-IDE3 sy-vline 
WA_P06DAT_ACCIDENT_STR-ADR2 sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-NATI sy-vline 
WA_P06DAT_ACCIDENT_STR-NOM2 sy-vline 
WA_P06DAT_ACCIDENT_STR-USANO sy-vline 
WA_P06DAT_ACCIDENT_STR-PRENO sy-vline 
WA_P06DAT_ACCIDENT_STR-FAMNO sy-vline 
WA_P06DAT_ACCIDENT_STR-SEXE sy-vline 
WA_P06DAT_ACCIDENT_STR-CSEXE sy-vline 
WA_P06DAT_ACCIDENT_STR-NAIS sy-vline 
WA_P06DAT_ACCIDENT_STR-DNAIS sy-vline 
WA_P06DAT_ACCIDENT_STR-EMPI sy-vline 
WA_P06DAT_ACCIDENT_STR-APRO sy-vline 
WA_P06DAT_ACCIDENT_STR-APR2 sy-vline 
WA_P06DAT_ACCIDENT_STR-CONT sy-vline 
WA_P06DAT_ACCIDENT_STR-NATUR sy-vline 
WA_P06DAT_ACCIDENT_STR-EMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-PMO1 sy-vline 
WA_P06DAT_ACCIDENT_STR-ADR3 sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-TEL2 sy-vline 
WA_P06DAT_ACCIDENT_STR-RSOC sy-vline 
WA_P06DAT_ACCIDENT_STR-RSOCI sy-vline 
WA_P06DAT_ACCIDENT_STR-ETAB sy-vline 
WA_P06DAT_ACCIDENT_STR-CRISQ sy-vline 
WA_P06DAT_ACCIDENT_STR-PMO2 sy-vline 
WA_P06DAT_ACCIDENT_STR-IDE4 sy-vline 
WA_P06DAT_ACCIDENT_STR-ADR4 sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-TEL3 sy-vline 
WA_P06DAT_ACCIDENT_STR-GEST sy-vline 
WA_P06DAT_ACCIDENT_STR-IDE5 sy-vline 
WA_P06DAT_ACCIDENT_STR-ENTR sy-vline 
WA_P06DAT_ACCIDENT_STR-CRISQ sy-vline 
WA_P06DAT_ACCIDENT_STR-PMO3 sy-vline 
WA_P06DAT_ACCIDENT_STR-IDE6 sy-vline 
WA_P06DAT_ACCIDENT_STR-ADR5 sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-TEL4 sy-vline 
WA_P06DAT_ACCIDENT_STR-RSO2 sy-vline 
WA_P06DAT_ACCIDENT_STR-RSOCI sy-vline 
WA_P06DAT_ACCIDENT_STR-TIER sy-vline 
WA_P06DAT_ACCIDENT_STR-PMO4 sy-vline 
WA_P06DAT_ACCIDENT_STR-ADR6 sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-RSO3 sy-vline 
WA_P06DAT_ACCIDENT_STR-RSOCI sy-vline 
WA_P06DAT_ACCIDENT_STR-PPH3 sy-vline 
WA_P06DAT_ACCIDENT_STR-ADR7 sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-NOM3 sy-vline 
WA_P06DAT_ACCIDENT_STR-USANO sy-vline 
WA_P06DAT_ACCIDENT_STR-PRENO sy-vline 
WA_P06DAT_ACCIDENT_STR-CONA sy-vline 
WA_P06DAT_ACCIDENT_STR-IDENF sy-vline 
WA_P06DAT_ACCIDENT_STR-ASSU sy-vline 
WA_P06DAT_ACCIDENT_STR-PMO5 sy-vline 
WA_P06DAT_ACCIDENT_STR-IDE7 sy-vline 
WA_P06DAT_ACCIDENT_STR-ADR8 sy-vline 
WA_P06DAT_ACCIDENT_STR-PTREM sy-vline 
WA_P06DAT_ACCIDENT_STR-COMPL sy-vline 
WA_P06DAT_ACCIDENT_STR-NOMVO sy-vline 
WA_P06DAT_ACCIDENT_STR-MENTI sy-vline 
WA_P06DAT_ACCIDENT_STR-LOCAL sy-vline 
WA_P06DAT_ACCIDENT_STR-DPAYS sy-vline 
WA_P06DAT_ACCIDENT_STR-RSO4 sy-vline 
WA_P06DAT_ACCIDENT_STR-RSOCI sy-vline 
WA_P06DAT_ACCIDENT_STR-TEMO sy-vline 
WA_P06DAT_ACCIDENT_STR-UNIT sy-vline 
WA_P06DAT_ACCIDENT_STR-PMO6 sy-vline 
WA_P06DAT_ACCIDENT_STR-RSOCI sy-vline 
WA_P06DAT_ACCIDENT_STR-CIR2 sy-vline      INTO ld_text SEPARATED BY SPACE.

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