ABAP Select data from SAP table FPM_S_FLIGHT_BOOKING 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 FPM_S_FLIGHT_BOOKING 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 FPM_S_FLIGHT_BOOKING. 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 FPM_S_FLIGHT_BOOKING 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_FPM_S_FLIGHT_BOOKING TYPE STANDARD TABLE OF FPM_S_FLIGHT_BOOKING,
      WA_FPM_S_FLIGHT_BOOKING TYPE FPM_S_FLIGHT_BOOKING,
      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: <FPM_S_FLIGHT_BOOKING> TYPE FPM_S_FLIGHT_BOOKING.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FPM_S_FLIGHT_BOOKING
*  INTO TABLE @DATA(IT_FPM_S_FLIGHT_BOOKING2).
*--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_FPM_S_FLIGHT_BOOKING INDEX 1 INTO DATA(WA_FPM_S_FLIGHT_BOOKING2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FPM_S_FLIGHT_BOOKING>-TRIPID = 1.
<FPM_S_FLIGHT_BOOKING>-EMPLID = 1.
<FPM_S_FLIGHT_BOOKING>-FDATED = 1.
<FPM_S_FLIGHT_BOOKING>-FDATEA = 1.
<FPM_S_FLIGHT_BOOKING>-CITYFR = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FPM_S_FLIGHT_BOOKING-CTRYFR, sy-vline,
  WA_FPM_S_FLIGHT_BOOKING-CITYTO, sy-vline,
  WA_FPM_S_FLIGHT_BOOKING-CTRYTO, sy-vline,
  WA_FPM_S_FLIGHT_BOOKING-CARIDD, sy-vline,
  WA_FPM_S_FLIGHT_BOOKING-CONIDD, sy-vline,
  WA_FPM_S_FLIGHT_BOOKING-CARIDR, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FPM_S_FLIGHT_BOOKING 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_FPM_S_FLIGHT_BOOKING 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_FPM_S_FLIGHT_BOOKING INTO WA_FPM_S_FLIGHT_BOOKING.


*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_FPM_S_FLIGHT_BOOKING_STR, 
TRIPID TYPE STRING,
EMPLID TYPE STRING,
FDATED TYPE STRING,
FDATEA TYPE STRING,
CITYFR TYPE STRING,
CTRYFR TYPE STRING,
CITYTO TYPE STRING,
CTRYTO TYPE STRING,
CARIDD TYPE STRING,
CONIDD TYPE STRING,
CARIDR TYPE STRING,
CONIDR TYPE STRING,
CLASOB TYPE STRING,
SEATOB TYPE STRING,
SMOKEO TYPE STRING,
MEALOB TYPE STRING,
CLASRT TYPE STRING,
SEATRT TYPE STRING,
SMOKER TYPE STRING,
MEALRT TYPE STRING,
BUKIDD TYPE STRING,
BUKIDR TYPE STRING,
PAYOPT TYPE STRING,
CARDTY TYPE STRING,
CARDHN TYPE STRING,
CARDNU TYPE STRING,
CARDED TYPE STRING,
BANKNA TYPE STRING,
BANKAC TYPE STRING,
BANKHN TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FPM_S_FLIGHT_BOOKING_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_FPM_S_FLIGHT_BOOKING_STR-TRIPID sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-EMPLID sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-FDATED sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-FDATEA sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CITYFR sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CTRYFR sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CITYTO sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CTRYTO sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CARIDD sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CONIDD sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CARIDR sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CONIDR sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CLASOB sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-SEATOB sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-SMOKEO sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-MEALOB sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CLASRT sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-SEATRT sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-SMOKER sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-MEALRT sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-BUKIDD sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-BUKIDR sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-PAYOPT sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CARDTY sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CARDHN sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CARDNU sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-CARDED sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-BANKNA sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-BANKAC sy-vline 
WA_FPM_S_FLIGHT_BOOKING_STR-BANKHN sy-vline      INTO ld_text SEPARATED BY SPACE.

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