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

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

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

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


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/ISDFPS/LM_FPLAN_ALV ASSIGNING </ISDFPS/LM_FPLAN_ALV>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
</ISDFPS/LM_FPLAN_ALV>-AUFNR = 1.
</ISDFPS/LM_FPLAN_ALV>-ARM_SETUP = 1.
</ISDFPS/LM_FPLAN_ALV>-MODEL_ID = 1.
</ISDFPS/LM_FPLAN_ALV>-NUM_PERSONS = 1.
</ISDFPS/LM_FPLAN_ALV>-KRYPTOSTATUS = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/ISDFPS/LM_FPLAN_ALV-LANDING_LOC, sy-vline,
  WA_/ISDFPS/LM_FPLAN_ALV-CALL_SIGN, sy-vline,
  WA_/ISDFPS/LM_FPLAN_ALV-TIME_OVER_TARGET, sy-vline,
  WA_/ISDFPS/LM_FPLAN_ALV-TARGET_LOC, sy-vline,
  WA_/ISDFPS/LM_FPLAN_ALV-ZULU_TNZONE, sy-vline,
  WA_/ISDFPS/LM_FPLAN_ALV-START_TNZONE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_/ISDFPS/LM_FPLAN_ALV 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_/ISDFPS/LM_FPLAN_ALV 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_/ISDFPS/LM_FPLAN_ALV INTO WA_/ISDFPS/LM_FPLAN_ALV.


*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 ALPHA, internal->external for field AUFNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/ISDFPS/LM_FPLAN_ALV-AUFNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/LM_FPLAN_ALV-AUFNR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ABPSP, internal->external for field PSPEL
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_/ISDFPS/LM_FPLAN_ALV-PSPEL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/LM_FPLAN_ALV-PSPEL.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TPLNR, internal->external for field TPLNR
CALL FUNCTION 'CONVERSION_EXIT_TPLNR_OUTPUT'
  EXPORTING
    input =                      WA_/ISDFPS/LM_FPLAN_ALV-TPLNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/LM_FPLAN_ALV-TPLNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field EQUNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/ISDFPS/LM_FPLAN_ALV-EQUNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/LM_FPLAN_ALV-EQUNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field ME_LOGSYS
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/ISDFPS/LM_FPLAN_ALV-ME_LOGSYS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/LM_FPLAN_ALV-ME_LOGSYS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field KOSTV
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/ISDFPS/LM_FPLAN_ALV-KOSTV
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/LM_FPLAN_ALV-KOSTV.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field KOSTL
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_/ISDFPS/LM_FPLAN_ALV-KOSTL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/LM_FPLAN_ALV-KOSTL.
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_/ISDFPS/LM_FPLAN_ALV_STR, 
AUFNR TYPE STRING,
ARM_SETUP TYPE STRING,
MODEL_ID TYPE STRING,
NUM_PERSONS TYPE STRING,
KRYPTOSTATUS TYPE STRING,
LANDING_LOC TYPE STRING,
CALL_SIGN TYPE STRING,
TIME_OVER_TARGET TYPE STRING,
TARGET_LOC TYPE STRING,
ZULU_TNZONE TYPE STRING,
START_TNZONE TYPE STRING,
START_DATE TYPE STRING,
LANDING_TNZONE TYPE STRING,
LANDING_DATE TYPE STRING,
F_OBJNR TYPE STRING,
OPERATION_ID TYPE STRING,
OPERATION_CNT TYPE STRING,
MISSION TYPE STRING,
EXTERNAL_ID TYPE STRING,
LATEST_TAKE_OFF TYPE STRING,
LAUNCHING_PAD TYPE STRING,
FLIGHT_DURATION TYPE STRING,
UNIT_FL_DURATION TYPE STRING,
VARIANCE TYPE STRING,
REASON_VARIANCE TYPE STRING,
FLIGHT_STATUS TYPE STRING,
KTEXT TYPE STRING,
LTEXT TYPE STRING,
VAPLZ TYPE STRING,
WAWRK TYPE STRING,
PSPEL TYPE STRING,
TPLNR TYPE STRING,
PLTXT TYPE STRING,
EQUNR TYPE STRING,
SHTXT TYPE STRING,
STTXT TYPE STRING,
FOREIGN_OBJ TYPE STRING,
PRIO_TYPE TYPE STRING,
PRIO TYPE STRING,
OBJNR TYPE STRING,
D_OBJNR TYPE STRING,
T_OBJNR TYPE STRING,
MODEL_ID_EQUNR TYPE STRING,
DEVICE_ID TYPE STRING,
FORCE_ID TYPE STRING,
FORCE_DESCR TYPE STRING,
SITE_ID TYPE STRING,
SITE_DESCR TYPE STRING,
ME_USER TYPE STRING,
USER_DESCR TYPE STRING,
ME_OWNER TYPE STRING,
OWNER_DESCR TYPE STRING,
ME_LOGSYS TYPE STRING,
ME_PM_CP_ICON TYPE STRING,
TOP_SITE_ID TYPE STRING,
TOP_SITE_DESCR TYPE STRING,
SITE_TYPE TYPE STRING,
TEC_STATE TYPE STRING,
TEC_STATE_PROFILE TYPE STRING,
DEP_STATE TYPE STRING,
SETUP TYPE STRING,
REMARK TYPE STRING,
TEC_STATE_ICON TYPE STRING,
DEP_STATE_ICON TYPE STRING,
AUART TYPE STRING,
IWERK TYPE STRING,
BUKRS TYPE STRING,
KOKRS TYPE STRING,
KOSTV TYPE STRING,
KOSTL TYPE STRING,
AUFPL TYPE STRING,
WAERS TYPE STRING,
EINSATZ_STEXT TYPE STRING,
UPRIO_TEXT TYPE STRING,
LTEXT_ICON TYPE STRING,
MODEL_LENGTH TYPE STRING,
SETUP_POOL TYPE STRING,
SETUP_POOL_TXT TYPE STRING,
ICON_FLIGHTEVENT TYPE STRING,
VARIANCE_TXT TYPE STRING,
REASON_VARIANCE_TXT TYPE STRING,
SELBOX TYPE STRING,
XUPDATED TYPE STRING,
COLINFO TYPE STRING,END OF T_EKKO_STR.
DATA: WA_/ISDFPS/LM_FPLAN_ALV_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_/ISDFPS/LM_FPLAN_ALV_STR-AUFNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-ARM_SETUP sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-MODEL_ID sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-NUM_PERSONS sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-KRYPTOSTATUS sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-LANDING_LOC sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-CALL_SIGN sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TIME_OVER_TARGET sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TARGET_LOC sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-ZULU_TNZONE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-START_TNZONE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-START_DATE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-LANDING_TNZONE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-LANDING_DATE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-F_OBJNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-OPERATION_ID sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-OPERATION_CNT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-MISSION sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-EXTERNAL_ID sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-LATEST_TAKE_OFF sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-LAUNCHING_PAD sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-FLIGHT_DURATION sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-UNIT_FL_DURATION sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-VARIANCE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-REASON_VARIANCE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-FLIGHT_STATUS sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-KTEXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-LTEXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-VAPLZ sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-WAWRK sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-PSPEL sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TPLNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-PLTXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-EQUNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SHTXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-STTXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-FOREIGN_OBJ sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-PRIO_TYPE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-PRIO sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-OBJNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-D_OBJNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-T_OBJNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-MODEL_ID_EQUNR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-DEVICE_ID sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-FORCE_ID sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-FORCE_DESCR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SITE_ID sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SITE_DESCR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-ME_USER sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-USER_DESCR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-ME_OWNER sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-OWNER_DESCR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-ME_LOGSYS sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-ME_PM_CP_ICON sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TOP_SITE_ID sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TOP_SITE_DESCR sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SITE_TYPE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TEC_STATE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TEC_STATE_PROFILE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-DEP_STATE sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SETUP sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-REMARK sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-TEC_STATE_ICON sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-DEP_STATE_ICON sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-AUART sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-IWERK sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-BUKRS sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-KOKRS sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-KOSTV sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-KOSTL sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-AUFPL sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-WAERS sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-EINSATZ_STEXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-UPRIO_TEXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-LTEXT_ICON sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-MODEL_LENGTH sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SETUP_POOL sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SETUP_POOL_TXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-ICON_FLIGHTEVENT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-VARIANCE_TXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-REASON_VARIANCE_TXT sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-SELBOX sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-XUPDATED sy-vline 
WA_/ISDFPS/LM_FPLAN_ALV_STR-COLINFO sy-vline      INTO ld_text SEPARATED BY SPACE.

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