ABAP Select data from SAP table BAPIOILSDITM_TSW_FC 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 BAPIOILSDITM_TSW_FC 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 BAPIOILSDITM_TSW_FC. 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 BAPIOILSDITM_TSW_FC 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_BAPIOILSDITM_TSW_FC TYPE STANDARD TABLE OF BAPIOILSDITM_TSW_FC, WA_BAPIOILSDITM_TSW_FC TYPE BAPIOILSDITM_TSW_FC, 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: <BAPIOILSDITM_TSW_FC> TYPE BAPIOILSDITM_TSW_FC. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_BAPIOILSDITM_TSW_FC. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM BAPIOILSDITM_TSW_FC INTO TABLE IT_BAPIOILSDITM_TSW_FC. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM BAPIOILSDITM_TSW_FC * INTO TABLE @DATA(IT_BAPIOILSDITM_TSW_FC2). *--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_BAPIOILSDITM_TSW_FC INDEX 1 INTO DATA(WA_BAPIOILSDITM_TSW_FC2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_BAPIOILSDITM_TSW_FC ASSIGNING <BAPIOILSDITM_TSW_FC>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<BAPIOILSDITM_TSW_FC>-ITM_NUMBER = 1.
<BAPIOILSDITM_TSW_FC>-DOCUMENTTYPE = 1.
<BAPIOILSDITM_TSW_FC>-SINGLEVOYAGE = 1.
<BAPIOILSDITM_TSW_FC>-VEHICLE = 1.
<BAPIOILSDITM_TSW_FC>-VEHICLETYPE = 1.
ENDLOOP. LOOP AT IT_BAPIOILSDITM_TSW_FC INTO WA_BAPIOILSDITM_TSW_FC. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_BAPIOILSDITM_TSW_FC-LAYDAYS_START, sy-vline,
WA_BAPIOILSDITM_TSW_FC-LAYDAYS_END, sy-vline,
WA_BAPIOILSDITM_TSW_FC-REDELIVERY_START, sy-vline,
WA_BAPIOILSDITM_TSW_FC-REDELIVERY_END, sy-vline,
WA_BAPIOILSDITM_TSW_FC-NUMBERGRADES, sy-vline,
WA_BAPIOILSDITM_TSW_FC-ROUTE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_BAPIOILSDITM_TSW_FC 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_BAPIOILSDITM_TSW_FC 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_BAPIOILSDITM_TSW_FC INTO WA_BAPIOILSDITM_TSW_FC. *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 VEHICLE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-VEHICLE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-VEHICLE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field SPEEDUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-SPEEDUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-SPEEDUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field QUANTITYUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-QUANTITYUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-QUANTITYUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field CAPACITYUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-CAPACITYUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-CAPACITYUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field PRESSUREUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-PRESSUREUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-PRESSUREUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field CONSQUANTITYUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-CONSQUANTITYUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-CONSQUANTITYUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field CONSTIMEUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-CONSTIMEUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-CONSTIMEUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field LAYTIMEUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-LAYTIMEUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-LAYTIMEUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field PERQUANTITYUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-PERQUANTITYUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-PERQUANTITYUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field MINTIMEUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-MINTIMEUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-MINTIMEUNIT_SAP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field TIMEBARUNIT_SAP CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_BAPIOILSDITM_TSW_FC-TIMEBARUNIT_SAP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_BAPIOILSDITM_TSW_FC-TIMEBARUNIT_SAP.
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_BAPIOILSDITM_TSW_FC_STR,
ITM_NUMBER TYPE STRING,
DOCUMENTTYPE TYPE STRING,
SINGLEVOYAGE TYPE STRING,
VEHICLE TYPE STRING,
VEHICLETYPE TYPE STRING,
LAYDAYS_START TYPE STRING,
LAYDAYS_END TYPE STRING,
REDELIVERY_START TYPE STRING,
REDELIVERY_END TYPE STRING,
NUMBERGRADES TYPE STRING,
ROUTE TYPE STRING,
SPEED TYPE STRING,
MIN_SPEED TYPE STRING,
MAX_SPEED TYPE STRING,
SPEEDUNIT_SAP TYPE STRING,
SPEEDUNIT_ISO TYPE STRING,
MIN_QUANTITY TYPE STRING,
QUANTITYUNIT_SAP TYPE STRING,
QUANTITYUNIT_ISO TYPE STRING,
CAPACITY TYPE STRING,
CAPACITYUNIT_SAP TYPE STRING,
CAPACITYUNIT_ISO TYPE STRING,
TOLERANCE_MIN TYPE STRING,
TOLERANCE_MAX TYPE STRING,
PRESSURE TYPE STRING,
PRESSUREUNIT_SAP TYPE STRING,
PRESSUREUNIT_ISO TYPE STRING,
BUNKERCONS_LADEN TYPE STRING,
CONSQUANTITYUNIT_SAP TYPE STRING,
CONSQUANTITYUNIT_ISO TYPE STRING,
CONSTIMEUNIT_SAP TYPE STRING,
CONSTIMEUNIT_ISO TYPE STRING,
BUNKERCONS_BALLAST TYPE STRING,
STANDBYFUELCONS TYPE STRING,
STANDBYDIESELCONS TYPE STRING,
FUELMATERIALGRP TYPE STRING,
DIESELMATERIALGRP TYPE STRING,
DECLARE_SHIP TYPE STRING,
DECLARE_QUANTITY TYPE STRING,
LOADPORTAGENT TYPE STRING,
DISCHARGEPORTAGENT TYPE STRING,
WINDOWPERIODEVENT TYPE STRING,
LIGHTERINGCOMMENCE TYPE STRING,
ALLOWEDLAYTIME TYPE STRING,
ALLOWEDDISCHARGETIME TYPE STRING,
LAYTIMEUNIT_SAP TYPE STRING,
LAYTIMEUNIT_ISO TYPE STRING,
PERQUANTITY TYPE STRING,
PERQUANTITYUNIT_SAP TYPE STRING,
PERQUANTITYUNIT_ISO TYPE STRING,
LAYTIME_MINIMUM TYPE STRING,
MINTIMEUNIT_SAP TYPE STRING,
MINTIMEUNIT_ISO TYPE STRING,
TIMEBAR TYPE STRING,
TIMEBARUNIT_SAP TYPE STRING,
TIMEBARUNIT_ISO TYPE STRING,
TIMEBAREVENT TYPE STRING,
DEMURRAGECONDITION TYPE STRING,
DESPATCHCONDITION TYPE STRING,
FACTORCONDITION TYPE STRING,
RATE_DATE TYPE STRING,
DOCUMENTTYPE_LONG TYPE STRING,END OF T_EKKO_STR. DATA: WA_BAPIOILSDITM_TSW_FC_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_BAPIOILSDITM_TSW_FC_STR-ITM_NUMBER sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DOCUMENTTYPE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-SINGLEVOYAGE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-VEHICLE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-VEHICLETYPE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-LAYDAYS_START sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-LAYDAYS_END sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-REDELIVERY_START sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-REDELIVERY_END sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-NUMBERGRADES sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-ROUTE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-SPEED sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-MIN_SPEED sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-MAX_SPEED sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-SPEEDUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-SPEEDUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-MIN_QUANTITY sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-QUANTITYUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-QUANTITYUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-CAPACITY sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-CAPACITYUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-CAPACITYUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-TOLERANCE_MIN sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-TOLERANCE_MAX sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-PRESSURE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-PRESSUREUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-PRESSUREUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-BUNKERCONS_LADEN sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-CONSQUANTITYUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-CONSQUANTITYUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-CONSTIMEUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-CONSTIMEUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-BUNKERCONS_BALLAST sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-STANDBYFUELCONS sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-STANDBYDIESELCONS sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-FUELMATERIALGRP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DIESELMATERIALGRP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DECLARE_SHIP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DECLARE_QUANTITY sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-LOADPORTAGENT sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DISCHARGEPORTAGENT sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-WINDOWPERIODEVENT sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-LIGHTERINGCOMMENCE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-ALLOWEDLAYTIME sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-ALLOWEDDISCHARGETIME sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-LAYTIMEUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-LAYTIMEUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-PERQUANTITY sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-PERQUANTITYUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-PERQUANTITYUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-LAYTIME_MINIMUM sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-MINTIMEUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-MINTIMEUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-TIMEBAR sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-TIMEBARUNIT_SAP sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-TIMEBARUNIT_ISO sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-TIMEBAREVENT sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DEMURRAGECONDITION sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DESPATCHCONDITION sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-FACTORCONDITION sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-RATE_DATE sy-vline
WA_BAPIOILSDITM_TSW_FC_STR-DOCUMENTTYPE_LONG sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.