ABAP Select data from SAP table FARVD_S_BSBO 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 FARVD_S_BSBO 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 FARVD_S_BSBO. 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 FARVD_S_BSBO 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_FARVD_S_BSBO TYPE STANDARD TABLE OF FARVD_S_BSBO,
      WA_FARVD_S_BSBO TYPE FARVD_S_BSBO,
      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: <FARVD_S_BSBO> TYPE FARVD_S_BSBO.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FARVD_S_BSBO
*  INTO TABLE @DATA(IT_FARVD_S_BSBO2).
*--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_FARVD_S_BSBO INDEX 1 INTO DATA(WA_FARVD_S_BSBO2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FARVD_S_BSBO ASSIGNING <FARVD_S_BSBO>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FARVD_S_BSBO>-KEY = 1.
<FARVD_S_BSBO>-PARENT_KEY = 1.
<FARVD_S_BSBO>-ROOT_KEY = 1.
<FARVD_S_BSBO>-ISLATESTBANKSTATEMENT = 1.
<FARVD_S_BSBO>-ISACTIVEENTITY = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FARVD_S_BSBO-HASACTIVEENTITY, sy-vline,
WA_FARVD_S_BSBO-HASDRAFTENTITY, sy-vline,
WA_FARVD_S_BSBO-BANKDATASTORAGEAPPLICATION, sy-vline,
WA_FARVD_S_BSBO-BANKACCOUNT, sy-vline,
WA_FARVD_S_BSBO-BANKACCOUNTADDITIONALNAME, sy-vline,
WA_FARVD_S_BSBO-BANKACCOUNTHOLDERNAME, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FARVD_S_BSBO 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_FARVD_S_BSBO 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_FARVD_S_BSBO INTO WA_FARVD_S_BSBO. *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 BANKSTATEMENT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FARVD_S_BSBO-BANKSTATEMENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARVD_S_BSBO-BANKSTATEMENT.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AU172, internal->external for field CLOSINGBALANCEAMTINTRANSCRCY CALL FUNCTION 'CONVERSION_EXIT_AU172_OUTPUT' EXPORTING input = WA_FARVD_S_BSBO-CLOSINGBALANCEAMTINTRANSCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARVD_S_BSBO-CLOSINGBALANCEAMTINTRANSCRCY.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AU172, internal->external for field OPENINGBALANCEAMTINTRANSCRCY CALL FUNCTION 'CONVERSION_EXIT_AU172_OUTPUT' EXPORTING input = WA_FARVD_S_BSBO-OPENINGBALANCEAMTINTRANSCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARVD_S_BSBO-OPENINGBALANCEAMTINTRANSCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU172, internal->external for field TOTALCREDITAMOUNTINTRANSCRCY CALL FUNCTION 'CONVERSION_EXIT_AU172_OUTPUT' EXPORTING input = WA_FARVD_S_BSBO-TOTALCREDITAMOUNTINTRANSCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARVD_S_BSBO-TOTALCREDITAMOUNTINTRANSCRCY.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU172, internal->external for field TOTALDEBITAMOUNTINTRANSCRCY CALL FUNCTION 'CONVERSION_EXIT_AU172_OUTPUT' EXPORTING input = WA_FARVD_S_BSBO-TOTALDEBITAMOUNTINTRANSCRCY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARVD_S_BSBO-TOTALDEBITAMOUNTINTRANSCRCY.
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_FARVD_S_BSBO_STR,
KEY TYPE STRING,
PARENT_KEY TYPE STRING,
ROOT_KEY TYPE STRING,
ISLATESTBANKSTATEMENT TYPE STRING,
ISACTIVEENTITY TYPE STRING,
HASACTIVEENTITY TYPE STRING,
HASDRAFTENTITY TYPE STRING,
BANKDATASTORAGEAPPLICATION TYPE STRING,
BANKACCOUNT TYPE STRING,
BANKACCOUNTADDITIONALNAME TYPE STRING,
BANKACCOUNTHOLDERNAME TYPE STRING,
BANKACCOUNTREFERENCETEXT TYPE STRING,
BANKACCOUNTTYPE TYPE STRING,
BANKCOUNTRY TYPE STRING,
BANKINTERNALID TYPE STRING,
BANKLEDGERISPOSTED TYPE STRING,
BANKNAME TYPE STRING,
BANKSTATEMENT TYPE STRING,
BANKSTATEMENTDATE TYPE STRING,
BANKSTATEMENTFORMAT TYPE STRING,
BANKSTATEMENTIMPORTDATE TYPE STRING,
BANKSTATEMENTIMPORTTIME TYPE STRING,
BANKSTATEMENTINTERNALID TYPE STRING,
BANKSTATEMENTISINTERPRETED TYPE STRING,
BANKSTATEMENTISMANUALLYCREATED TYPE STRING,
BANKSTATEMENTNUMBEROFITEMS TYPE STRING,
BANKSTATEMENTPAGENUMBER TYPE STRING,
BANKSTATEMENTSHORTID TYPE STRING,
BANKSTATEMENTSTATUS TYPE STRING,
CHARTOFACCOUNTS TYPE STRING,
CLOSINGBALANCEAMTINTRANSCRCY TYPE STRING,
CLOSINGBALANCEISINTERIM TYPE STRING,
COMPANYCODE TYPE STRING,
CREATEDBYUSER TYPE STRING,
CURRENCY TYPE STRING,
GLACCOUNT TYPE STRING,
BANKACCOUNTINTERNALID TYPE STRING,
BANKACCOUNTUUID TYPE STRING,
HOUSEBANK TYPE STRING,
HOUSEBANKACCOUNT TYPE STRING,
IBAN TYPE STRING,
INTERESTRATEINPERCENT TYPE STRING,
OPENINGBALANCEAMTINTRANSCRCY TYPE STRING,
OPENINGBALANCEISINTERIM TYPE STRING,
PAYMENTTRANSACTIONTYPEGROUP TYPE STRING,
POSTINGDATE TYPE STRING,
BANKSTATEMENTRECIPIENTREFID TYPE STRING,
SENDINGBANK TYPE STRING,
SUBLEDGERISPOSTEDSUCCESSFULLY TYPE STRING,
TOTALCREDITAMOUNTINTRANSCRCY TYPE STRING,
TOTALDEBITAMOUNTINTRANSCRCY TYPE STRING,
DUMMY_FEBKODRAFT TYPE STRING,END OF T_EKKO_STR. DATA: WA_FARVD_S_BSBO_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_FARVD_S_BSBO_STR-KEY sy-vline
WA_FARVD_S_BSBO_STR-PARENT_KEY sy-vline
WA_FARVD_S_BSBO_STR-ROOT_KEY sy-vline
WA_FARVD_S_BSBO_STR-ISLATESTBANKSTATEMENT sy-vline
WA_FARVD_S_BSBO_STR-ISACTIVEENTITY sy-vline
WA_FARVD_S_BSBO_STR-HASACTIVEENTITY sy-vline
WA_FARVD_S_BSBO_STR-HASDRAFTENTITY sy-vline
WA_FARVD_S_BSBO_STR-BANKDATASTORAGEAPPLICATION sy-vline
WA_FARVD_S_BSBO_STR-BANKACCOUNT sy-vline
WA_FARVD_S_BSBO_STR-BANKACCOUNTADDITIONALNAME sy-vline
WA_FARVD_S_BSBO_STR-BANKACCOUNTHOLDERNAME sy-vline
WA_FARVD_S_BSBO_STR-BANKACCOUNTREFERENCETEXT sy-vline
WA_FARVD_S_BSBO_STR-BANKACCOUNTTYPE sy-vline
WA_FARVD_S_BSBO_STR-BANKCOUNTRY sy-vline
WA_FARVD_S_BSBO_STR-BANKINTERNALID sy-vline
WA_FARVD_S_BSBO_STR-BANKLEDGERISPOSTED sy-vline
WA_FARVD_S_BSBO_STR-BANKNAME sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENT sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTDATE sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTFORMAT sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTIMPORTDATE sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTIMPORTTIME sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTINTERNALID sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTISINTERPRETED sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTISMANUALLYCREATED sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTNUMBEROFITEMS sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTPAGENUMBER sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTSHORTID sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTSTATUS sy-vline
WA_FARVD_S_BSBO_STR-CHARTOFACCOUNTS sy-vline
WA_FARVD_S_BSBO_STR-CLOSINGBALANCEAMTINTRANSCRCY sy-vline
WA_FARVD_S_BSBO_STR-CLOSINGBALANCEISINTERIM sy-vline
WA_FARVD_S_BSBO_STR-COMPANYCODE sy-vline
WA_FARVD_S_BSBO_STR-CREATEDBYUSER sy-vline
WA_FARVD_S_BSBO_STR-CURRENCY sy-vline
WA_FARVD_S_BSBO_STR-GLACCOUNT sy-vline
WA_FARVD_S_BSBO_STR-BANKACCOUNTINTERNALID sy-vline
WA_FARVD_S_BSBO_STR-BANKACCOUNTUUID sy-vline
WA_FARVD_S_BSBO_STR-HOUSEBANK sy-vline
WA_FARVD_S_BSBO_STR-HOUSEBANKACCOUNT sy-vline
WA_FARVD_S_BSBO_STR-IBAN sy-vline
WA_FARVD_S_BSBO_STR-INTERESTRATEINPERCENT sy-vline
WA_FARVD_S_BSBO_STR-OPENINGBALANCEAMTINTRANSCRCY sy-vline
WA_FARVD_S_BSBO_STR-OPENINGBALANCEISINTERIM sy-vline
WA_FARVD_S_BSBO_STR-PAYMENTTRANSACTIONTYPEGROUP sy-vline
WA_FARVD_S_BSBO_STR-POSTINGDATE sy-vline
WA_FARVD_S_BSBO_STR-BANKSTATEMENTRECIPIENTREFID sy-vline
WA_FARVD_S_BSBO_STR-SENDINGBANK sy-vline
WA_FARVD_S_BSBO_STR-SUBLEDGERISPOSTEDSUCCESSFULLY sy-vline
WA_FARVD_S_BSBO_STR-TOTALCREDITAMOUNTINTRANSCRCY sy-vline
WA_FARVD_S_BSBO_STR-TOTALDEBITAMOUNTINTRANSCRCY sy-vline
WA_FARVD_S_BSBO_STR-DUMMY_FEBKODRAFT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.