ABAP Select data from SAP table FCLM_BAM_S_AMD_EXT 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 FCLM_BAM_S_AMD_EXT 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 FCLM_BAM_S_AMD_EXT. 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 FCLM_BAM_S_AMD_EXT 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_FCLM_BAM_S_AMD_EXT TYPE STANDARD TABLE OF FCLM_BAM_S_AMD_EXT,
      WA_FCLM_BAM_S_AMD_EXT TYPE FCLM_BAM_S_AMD_EXT,
      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: <FCLM_BAM_S_AMD_EXT> TYPE FCLM_BAM_S_AMD_EXT.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FCLM_BAM_S_AMD_EXT
*  INTO TABLE @DATA(IT_FCLM_BAM_S_AMD_EXT2).
*--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_FCLM_BAM_S_AMD_EXT INDEX 1 INTO DATA(WA_FCLM_BAM_S_AMD_EXT2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<FCLM_BAM_S_AMD_EXT>-BANKACCOUNTINTERNALID = 1.
<FCLM_BAM_S_AMD_EXT>-BANKACCOUNTREVISION = 1.
<FCLM_BAM_S_AMD_EXT>-HOUSEBANK = 1.
<FCLM_BAM_S_AMD_EXT>-HOUSEBANKACCOUNT = 1.
<FCLM_BAM_S_AMD_EXT>-ARCHOBJECTNUMBER = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FCLM_BAM_S_AMD_EXT-COMPANYCODE, sy-vline,
  WA_FCLM_BAM_S_AMD_EXT-BANKACCOUNTCURRENCY, sy-vline,
  WA_FCLM_BAM_S_AMD_EXT-BANKACCOUNTDESCRIPTION, sy-vline,
  WA_FCLM_BAM_S_AMD_EXT-BANKCOUNTRY, sy-vline,
  WA_FCLM_BAM_S_AMD_EXT-COUNTRYNAME, sy-vline,
  WA_FCLM_BAM_S_AMD_EXT-BANK, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_FCLM_BAM_S_AMD_EXT 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_FCLM_BAM_S_AMD_EXT 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_FCLM_BAM_S_AMD_EXT INTO WA_FCLM_BAM_S_AMD_EXT.


*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 ADDRESSID
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_FCLM_BAM_S_AMD_EXT-ADDRESSID
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FCLM_BAM_S_AMD_EXT-ADDRESSID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit AU132, internal->external for field DIFFERENCEAMOUNT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_FCLM_BAM_S_AMD_EXT-DIFFERENCEAMOUNT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_FCLM_BAM_S_AMD_EXT-DIFFERENCEAMOUNT.
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_FCLM_BAM_S_AMD_EXT_STR, 
BANKACCOUNTINTERNALID TYPE STRING,
BANKACCOUNTREVISION TYPE STRING,
HOUSEBANK TYPE STRING,
HOUSEBANKACCOUNT TYPE STRING,
ARCHOBJECTNUMBER TYPE STRING,
COMPANYCODE TYPE STRING,
BANKACCOUNTCURRENCY TYPE STRING,
BANKACCOUNTDESCRIPTION TYPE STRING,
BANKCOUNTRY TYPE STRING,
COUNTRYNAME TYPE STRING,
BANK TYPE STRING,
BANKNUMBER TYPE STRING,
BANKNAME TYPE STRING,
REGION TYPE STRING,
BRANCH TYPE STRING,
CITYNAME TYPE STRING,
STREETNAME TYPE STRING,
ADDRESSID TYPE STRING,
POSTALCODE TYPE STRING,
POBOX TYPE STRING,
HOUSENUMBER TYPE STRING,
SWIFTCODE TYPE STRING,
BANKACCOUNT TYPE STRING,
BANKACCOUNTTYPE TYPE STRING,
VALIDITYSTARTDATE TYPE STRING,
VALIDITYENDDATE TYPE STRING,
IBAN TYPE STRING,
BANKACCOUNTSTATUS TYPE STRING,
BANKACCOUNTREVISIONSTATUS TYPE STRING,
COMPANYCODENAME TYPE STRING,
COMPANYCODECOUNTRY TYPE STRING,
PROFITCENTER TYPE STRING,
CONTROLLINGAREA TYPE STRING,
BUSINESSAREA TYPE STRING,
SEGMENT TYPE STRING,
BANKACCOUNTHOLDERNAME TYPE STRING,
BANKCONTACTPERSON TYPE STRING,
BANKRELATIONSHIPMANAGER TYPE STRING,
COMPANYCONTACTPERSON TYPE STRING,
BANKACCOUNTSUPERVISOR TYPE STRING,
CREATEDBYUSER TYPE STRING,
OPENEDBYUSER TYPE STRING,
LASTCHANGEDBYUSER TYPE STRING,
REVIEWEDBYUSER TYPE STRING,
CLOSEDBYUSER TYPE STRING,
ISMARKEDFORDELETION TYPE STRING,
DOMESTICCUTOFFTIME TYPE STRING,
CROSSBORDERCUTOFFTIME TYPE STRING,
PLANNEDCLOSINGDATE TYPE STRING,
CREATIONDATE TYPE STRING,
CREATIONTIME TYPE STRING,
OPENEDDATE TYPE STRING,
OPENEDTIME TYPE STRING,
LASTCHANGEDATE TYPE STRING,
LASTCHANGETIME TYPE STRING,
CLOSEDDATE TYPE STRING,
CLOSEDTIME TYPE STRING,
BANKCONTROLKEY TYPE STRING,
IBANVALIDITYSTARTDATE TYPE STRING,
BANKSTATEMENTCHECKTIME TYPE STRING,
BANKSTATEMENTIMPORTMETHOD TYPE STRING,
INTRADAYBANKSTATEIMPORTMETHOD TYPE STRING,
BANKSTATEMENTIMPORTCHANNEL TYPE STRING,
ISUPLOADOFINTRADAYSTATEMENT TYPE STRING,
PAYMENTTRANSACTIONTYPEGROUP TYPE STRING,
PROCESSINGSTATUS TYPE STRING,
DIFFERENCESTATUS TYPE STRING,
SERIALNUMBERSTATUS TYPE STRING,
RECONCILIATIONSTATUS TYPE STRING,
EXPECTEDINTERVAL TYPE STRING,
CONTROLFREQUENCY TYPE STRING,
FACTORYCALENDAR TYPE STRING,
DISPLAYITEM TYPE STRING,
DIFFERENCEAMOUNT TYPE STRING,
LEADINGCASHPOOLID TYPE STRING,
LEADINGCASHPOOLTYPE TYPE STRING,
LEADINGCASHPOOLSRVCPRVDR TYPE STRING,
LEADINGCASHPOOLDESC TYPE STRING,
PARTICIPANTCASHPOOLID TYPE STRING,
MAXTARGETAMOUNT TYPE STRING,
MINTARGETAMOUNT TYPE STRING,
MINTRANSFERAMOUNT TYPE STRING,
PARTICIPANTCASHPOOLTYPE TYPE STRING,
PARTICIPANTCASHPOOLSRVCPRVDR TYPE STRING,
PARTICIPANTCASHPOOLDESC TYPE STRING,
LEADINGPAYMENTMETHOD TYPE STRING,
PARTICIPANTPAYMENTMETHOD TYPE STRING,
PAYMENTSERVICEPROVIDER TYPE STRING,
CASHTOLERANCEGROUP TYPE STRING,
INTRADAYISRECONCILED TYPE STRING,
WITHTOBEACTIVATEDREVISION TYPE STRING,
INWORKFLOWPROCESS TYPE STRING,
CASHPOOLCURRENCY TYPE STRING,
BANKACCOUNTACTION TYPE STRING,
DUMMY_FCLM_BAM_AMD_INCL_EEW_PS TYPE STRING,END OF T_EKKO_STR.
DATA: WA_FCLM_BAM_S_AMD_EXT_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_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTINTERNALID sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTREVISION sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-HOUSEBANK sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-HOUSEBANKACCOUNT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-ARCHOBJECTNUMBER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-COMPANYCODE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTCURRENCY sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTDESCRIPTION sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKCOUNTRY sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-COUNTRYNAME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANK sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKNUMBER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKNAME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-REGION sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BRANCH sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CITYNAME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-STREETNAME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-ADDRESSID sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-POSTALCODE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-POBOX sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-HOUSENUMBER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-SWIFTCODE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTTYPE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-VALIDITYSTARTDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-VALIDITYENDDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-IBAN sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTSTATUS sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTREVISIONSTATUS sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-COMPANYCODENAME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-COMPANYCODECOUNTRY sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PROFITCENTER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CONTROLLINGAREA sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BUSINESSAREA sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-SEGMENT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTHOLDERNAME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKCONTACTPERSON sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKRELATIONSHIPMANAGER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-COMPANYCONTACTPERSON sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTSUPERVISOR sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CREATEDBYUSER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-OPENEDBYUSER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LASTCHANGEDBYUSER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-REVIEWEDBYUSER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CLOSEDBYUSER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-ISMARKEDFORDELETION sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-DOMESTICCUTOFFTIME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CROSSBORDERCUTOFFTIME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PLANNEDCLOSINGDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CREATIONDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CREATIONTIME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-OPENEDDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-OPENEDTIME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LASTCHANGEDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LASTCHANGETIME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CLOSEDDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CLOSEDTIME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKCONTROLKEY sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-IBANVALIDITYSTARTDATE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKSTATEMENTCHECKTIME sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKSTATEMENTIMPORTMETHOD sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-INTRADAYBANKSTATEIMPORTMETHOD sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKSTATEMENTIMPORTCHANNEL sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-ISUPLOADOFINTRADAYSTATEMENT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PAYMENTTRANSACTIONTYPEGROUP sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PROCESSINGSTATUS sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-DIFFERENCESTATUS sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-SERIALNUMBERSTATUS sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-RECONCILIATIONSTATUS sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-EXPECTEDINTERVAL sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CONTROLFREQUENCY sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-FACTORYCALENDAR sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-DISPLAYITEM sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-DIFFERENCEAMOUNT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LEADINGCASHPOOLID sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LEADINGCASHPOOLTYPE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LEADINGCASHPOOLSRVCPRVDR sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LEADINGCASHPOOLDESC sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PARTICIPANTCASHPOOLID sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-MAXTARGETAMOUNT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-MINTARGETAMOUNT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-MINTRANSFERAMOUNT sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PARTICIPANTCASHPOOLTYPE sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PARTICIPANTCASHPOOLSRVCPRVDR sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PARTICIPANTCASHPOOLDESC sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-LEADINGPAYMENTMETHOD sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PARTICIPANTPAYMENTMETHOD sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-PAYMENTSERVICEPROVIDER sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CASHTOLERANCEGROUP sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-INTRADAYISRECONCILED sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-WITHTOBEACTIVATEDREVISION sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-INWORKFLOWPROCESS sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-CASHPOOLCURRENCY sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-BANKACCOUNTACTION sy-vline 
WA_FCLM_BAM_S_AMD_EXT_STR-DUMMY_FCLM_BAM_AMD_INCL_EEW_PS sy-vline      INTO ld_text SEPARATED BY SPACE.

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