ABAP Select data from SAP table ADFSH_FLGTDET 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 ADFSH_FLGTDET 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 ADFSH_FLGTDET. 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 ADFSH_FLGTDET 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_ADFSH_FLGTDET TYPE STANDARD TABLE OF ADFSH_FLGTDET,
      WA_ADFSH_FLGTDET TYPE ADFSH_FLGTDET,
      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: <ADFSH_FLGTDET> TYPE ADFSH_FLGTDET.

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

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

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


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<ADFSH_FLGTDET>-MANDT = 1.
<ADFSH_FLGTDET>-AIRLN = 1.
<ADFSH_FLGTDET>-FLTNR = 1.
<ADFSH_FLGTDET>-SECNR = 1.
<ADFSH_FLGTDET>-ACDATE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_ADFSH_FLGTDET-DELFLG, sy-vline,
  WA_ADFSH_FLGTDET-FLTYP, sy-vline,
  WA_ADFSH_FLGTDET-FLPAX, sy-vline,
  WA_ADFSH_FLGTDET-ACFTYP, sy-vline,
  WA_ADFSH_FLGTDET-STACD, sy-vline,
  WA_ADFSH_FLGTDET-TPLNR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_ADFSH_FLGTDET 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_ADFSH_FLGTDET 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_ADFSH_FLGTDET INTO WA_ADFSH_FLGTDET.


*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 TPLNR, internal->external for field TPLNR
CALL FUNCTION 'CONVERSION_EXIT_TPLNR_OUTPUT'
  EXPORTING
    input =                      WA_ADFSH_FLGTDET-TPLNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ADFSH_FLGTDET-TPLNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TIMLO, internal->external for field PLDPTM
CALL FUNCTION 'CONVERSION_EXIT_TIMLO_OUTPUT'
  EXPORTING
    input =                      WA_ADFSH_FLGTDET-PLDPTM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ADFSH_FLGTDET-PLDPTM.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit TIMLO, internal->external for field RVDPTM
CALL FUNCTION 'CONVERSION_EXIT_TIMLO_OUTPUT'
  EXPORTING
    input =                      WA_ADFSH_FLGTDET-RVDPTM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ADFSH_FLGTDET-RVDPTM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TIMLO, internal->external for field ESDPTM
CALL FUNCTION 'CONVERSION_EXIT_TIMLO_OUTPUT'
  EXPORTING
    input =                      WA_ADFSH_FLGTDET-ESDPTM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ADFSH_FLGTDET-ESDPTM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TIMLO, internal->external for field LTDPTM
CALL FUNCTION 'CONVERSION_EXIT_TIMLO_OUTPUT'
  EXPORTING
    input =                      WA_ADFSH_FLGTDET-LTDPTM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ADFSH_FLGTDET-LTDPTM.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TIMLO, internal->external for field ACDPTM
CALL FUNCTION 'CONVERSION_EXIT_TIMLO_OUTPUT'
  EXPORTING
    input =                      WA_ADFSH_FLGTDET-ACDPTM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_ADFSH_FLGTDET-ACDPTM.
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_ADFSH_FLGTDET_STR, 
MANDT TYPE STRING,
AIRLN TYPE STRING,
FLTNR TYPE STRING,
SECNR TYPE STRING,
ACDATE TYPE STRING,
DELFLG TYPE STRING,
FLTYP TYPE STRING,
FLPAX TYPE STRING,
ACFTYP TYPE STRING,
STACD TYPE STRING,
TPLNR TYPE STRING,
PLDPAPT TYPE STRING,
PLARAPT TYPE STRING,
PLDPTML TYPE STRING,
PLARTML TYPE STRING,
PLDPBAY TYPE STRING,
PLARBAY TYPE STRING,
PLDPTM TYPE STRING,
PLARTM TYPE STRING,
FLDUR TYPE STRING,
DURUT TYPE STRING,
FLDIS TYPE STRING,
DISUT TYPE STRING,
ACDPAPT TYPE STRING,
ACDPTML TYPE STRING,
ACDPBAY TYPE STRING,
ACBELT TYPE STRING,
RVDPTM TYPE STRING,
ESDPTM TYPE STRING,
LTDPTM TYPE STRING,
ACDPTM TYPE STRING,
ARBTM TYPE STRING,
ACARAPT TYPE STRING,
ACARTML TYPE STRING,
ACARBAY TYPE STRING,
OFPLARDT TYPE STRING,
RVARTM TYPE STRING,
OFRVARDT TYPE STRING,
ESARTM TYPE STRING,
OFESARDT TYPE STRING,
LTARTM TYPE STRING,
OFLTARDT TYPE STRING,
ACARTM TYPE STRING,
OFACARDT TYPE STRING,
LANTM TYPE STRING,
FMODE TYPE STRING,
AFSHP TYPE STRING,
AAUVI TYPE STRING,
ASPML TYPE STRING,
AMNML TYPE STRING,
ACDML TYPE STRING,
ABFST TYPE STRING,
ASNCK TYPE STRING,
ARMNT TYPE STRING,
AISDP TYPE STRING,
AHZRD TYPE STRING,
ACDST TYPE STRING,
ATOPS TYPE STRING,
APRTRN TYPE STRING,
AMNOR TYPE STRING,
ACRWT TYPE STRING,
CARUT TYPE STRING,
AWLCH TYPE STRING,
OBJNR TYPE STRING,
REVNR TYPE STRING,
CREATED_BY TYPE STRING,
CREATED_DT TYPE STRING,
LASTCHGDBY TYPE STRING,
LASTCHGDDT TYPE STRING,
FLGCON TYPE STRING,
PLDPDAT TYPE STRING,
ESDPDAT TYPE STRING,
RVDPDAT TYPE STRING,
LTDPDAT TYPE STRING,
ACDPDAT TYPE STRING,
ARBDAT TYPE STRING,
PLARDAT TYPE STRING,
ESARDAT TYPE STRING,
RVARDAT TYPE STRING,
LTARDAT TYPE STRING,
ACARDAT TYPE STRING,
LANDAT TYPE STRING,
ADBRKLDG TYPE STRING,
AUPLTLDG TYPE STRING,
NRMLDG TYPE STRING,
TOUCHNGO TYPE STRING,END OF T_EKKO_STR.
DATA: WA_ADFSH_FLGTDET_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_ADFSH_FLGTDET_STR-MANDT sy-vline 
WA_ADFSH_FLGTDET_STR-AIRLN sy-vline 
WA_ADFSH_FLGTDET_STR-FLTNR sy-vline 
WA_ADFSH_FLGTDET_STR-SECNR sy-vline 
WA_ADFSH_FLGTDET_STR-ACDATE sy-vline 
WA_ADFSH_FLGTDET_STR-DELFLG sy-vline 
WA_ADFSH_FLGTDET_STR-FLTYP sy-vline 
WA_ADFSH_FLGTDET_STR-FLPAX sy-vline 
WA_ADFSH_FLGTDET_STR-ACFTYP sy-vline 
WA_ADFSH_FLGTDET_STR-STACD sy-vline 
WA_ADFSH_FLGTDET_STR-TPLNR sy-vline 
WA_ADFSH_FLGTDET_STR-PLDPAPT sy-vline 
WA_ADFSH_FLGTDET_STR-PLARAPT sy-vline 
WA_ADFSH_FLGTDET_STR-PLDPTML sy-vline 
WA_ADFSH_FLGTDET_STR-PLARTML sy-vline 
WA_ADFSH_FLGTDET_STR-PLDPBAY sy-vline 
WA_ADFSH_FLGTDET_STR-PLARBAY sy-vline 
WA_ADFSH_FLGTDET_STR-PLDPTM sy-vline 
WA_ADFSH_FLGTDET_STR-PLARTM sy-vline 
WA_ADFSH_FLGTDET_STR-FLDUR sy-vline 
WA_ADFSH_FLGTDET_STR-DURUT sy-vline 
WA_ADFSH_FLGTDET_STR-FLDIS sy-vline 
WA_ADFSH_FLGTDET_STR-DISUT sy-vline 
WA_ADFSH_FLGTDET_STR-ACDPAPT sy-vline 
WA_ADFSH_FLGTDET_STR-ACDPTML sy-vline 
WA_ADFSH_FLGTDET_STR-ACDPBAY sy-vline 
WA_ADFSH_FLGTDET_STR-ACBELT sy-vline 
WA_ADFSH_FLGTDET_STR-RVDPTM sy-vline 
WA_ADFSH_FLGTDET_STR-ESDPTM sy-vline 
WA_ADFSH_FLGTDET_STR-LTDPTM sy-vline 
WA_ADFSH_FLGTDET_STR-ACDPTM sy-vline 
WA_ADFSH_FLGTDET_STR-ARBTM sy-vline 
WA_ADFSH_FLGTDET_STR-ACARAPT sy-vline 
WA_ADFSH_FLGTDET_STR-ACARTML sy-vline 
WA_ADFSH_FLGTDET_STR-ACARBAY sy-vline 
WA_ADFSH_FLGTDET_STR-OFPLARDT sy-vline 
WA_ADFSH_FLGTDET_STR-RVARTM sy-vline 
WA_ADFSH_FLGTDET_STR-OFRVARDT sy-vline 
WA_ADFSH_FLGTDET_STR-ESARTM sy-vline 
WA_ADFSH_FLGTDET_STR-OFESARDT sy-vline 
WA_ADFSH_FLGTDET_STR-LTARTM sy-vline 
WA_ADFSH_FLGTDET_STR-OFLTARDT sy-vline 
WA_ADFSH_FLGTDET_STR-ACARTM sy-vline 
WA_ADFSH_FLGTDET_STR-OFACARDT sy-vline 
WA_ADFSH_FLGTDET_STR-LANTM sy-vline 
WA_ADFSH_FLGTDET_STR-FMODE sy-vline 
WA_ADFSH_FLGTDET_STR-AFSHP sy-vline 
WA_ADFSH_FLGTDET_STR-AAUVI sy-vline 
WA_ADFSH_FLGTDET_STR-ASPML sy-vline 
WA_ADFSH_FLGTDET_STR-AMNML sy-vline 
WA_ADFSH_FLGTDET_STR-ACDML sy-vline 
WA_ADFSH_FLGTDET_STR-ABFST sy-vline 
WA_ADFSH_FLGTDET_STR-ASNCK sy-vline 
WA_ADFSH_FLGTDET_STR-ARMNT sy-vline 
WA_ADFSH_FLGTDET_STR-AISDP sy-vline 
WA_ADFSH_FLGTDET_STR-AHZRD sy-vline 
WA_ADFSH_FLGTDET_STR-ACDST sy-vline 
WA_ADFSH_FLGTDET_STR-ATOPS sy-vline 
WA_ADFSH_FLGTDET_STR-APRTRN sy-vline 
WA_ADFSH_FLGTDET_STR-AMNOR sy-vline 
WA_ADFSH_FLGTDET_STR-ACRWT sy-vline 
WA_ADFSH_FLGTDET_STR-CARUT sy-vline 
WA_ADFSH_FLGTDET_STR-AWLCH sy-vline 
WA_ADFSH_FLGTDET_STR-OBJNR sy-vline 
WA_ADFSH_FLGTDET_STR-REVNR sy-vline 
WA_ADFSH_FLGTDET_STR-CREATED_BY sy-vline 
WA_ADFSH_FLGTDET_STR-CREATED_DT sy-vline 
WA_ADFSH_FLGTDET_STR-LASTCHGDBY sy-vline 
WA_ADFSH_FLGTDET_STR-LASTCHGDDT sy-vline 
WA_ADFSH_FLGTDET_STR-FLGCON sy-vline 
WA_ADFSH_FLGTDET_STR-PLDPDAT sy-vline 
WA_ADFSH_FLGTDET_STR-ESDPDAT sy-vline 
WA_ADFSH_FLGTDET_STR-RVDPDAT sy-vline 
WA_ADFSH_FLGTDET_STR-LTDPDAT sy-vline 
WA_ADFSH_FLGTDET_STR-ACDPDAT sy-vline 
WA_ADFSH_FLGTDET_STR-ARBDAT sy-vline 
WA_ADFSH_FLGTDET_STR-PLARDAT sy-vline 
WA_ADFSH_FLGTDET_STR-ESARDAT sy-vline 
WA_ADFSH_FLGTDET_STR-RVARDAT sy-vline 
WA_ADFSH_FLGTDET_STR-LTARDAT sy-vline 
WA_ADFSH_FLGTDET_STR-ACARDAT sy-vline 
WA_ADFSH_FLGTDET_STR-LANDAT sy-vline 
WA_ADFSH_FLGTDET_STR-ADBRKLDG sy-vline 
WA_ADFSH_FLGTDET_STR-AUPLTLDG sy-vline 
WA_ADFSH_FLGTDET_STR-NRMLDG sy-vline 
WA_ADFSH_FLGTDET_STR-TOUCHNGO sy-vline      INTO ld_text SEPARATED BY SPACE.

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