ABAP Select data from SAP table FKKBIBICADATA 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 FKKBIBICADATA 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 FKKBIBICADATA. 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 FKKBIBICADATA 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_FKKBIBICADATA TYPE STANDARD TABLE OF FKKBIBICADATA,
      WA_FKKBIBICADATA TYPE FKKBIBICADATA,
      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: <FKKBIBICADATA> TYPE FKKBIBICADATA.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FKKBIBICADATA
*  INTO TABLE @DATA(IT_FKKBIBICADATA2).
*--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_FKKBIBICADATA INDEX 1 INTO DATA(WA_FKKBIBICADATA2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FKKBIBICADATA ASSIGNING <FKKBIBICADATA>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FKKBIBICADATA>-FKKVKP = 1.
<FKKBIBICADATA>-MANDT = 1.
<FKKBIBICADATA>-VKONT = 1.
<FKKBIBICADATA>-GPART = 1.
<FKKBIBICADATA>-VKBEZ = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FKKBIBICADATA-ERDAT, sy-vline,
WA_FKKBIBICADATA-ERNAM, sy-vline,
WA_FKKBIBICADATA-AEDATP, sy-vline,
WA_FKKBIBICADATA-AENAMP, sy-vline,
WA_FKKBIBICADATA-FDZTG, sy-vline,
WA_FKKBIBICADATA-STOPD, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FKKBIBICADATA 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_FKKBIBICADATA 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_FKKBIBICADATA INTO WA_FKKBIBICADATA. *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 VKONT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FKKBIBICADATA-VKONT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKKBIBICADATA-VKONT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field CPERS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FKKBIBICADATA-CPERS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FKKBIBICADATA-CPERS.
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_FKKBIBICADATA_STR,
FKKVKP TYPE STRING,
MANDT TYPE STRING,
VKONT TYPE STRING,
GPART TYPE STRING,
VKBEZ TYPE STRING,
ERDAT TYPE STRING,
ERNAM TYPE STRING,
AEDATP TYPE STRING,
AENAMP TYPE STRING,
FDZTG TYPE STRING,
STOPD TYPE STRING,
QSZDT TYPE STRING,
GUID TYPE STRING,
DDLAM TYPE STRING,
DDLCU TYPE STRING,
DDLNM TYPE STRING,
INV_CYCLE_START TYPE STRING,
INV_CHGDISC_X TYPE STRING,
BPL_XPOCL TYPE STRING,
BPL_FDATE TYPE STRING,
BPL_TDATE TYPE STRING,
EXVKO TYPE STRING,
OPBUK TYPE STRING,
STDBK TYPE STRING,
ABWRE TYPE STRING,
ABWRA TYPE STRING,
ABWMA TYPE STRING,
EBVTY TYPE STRING,
ABVTY TYPE STRING,
EZAWE TYPE STRING,
EZASP TYPE STRING,
AZAWE TYPE STRING,
AZASP TYPE STRING,
EIGBV TYPE STRING,
VWNZA TYPE STRING,
LOEVM TYPE STRING,
ABWVK TYPE STRING,
IKEY TYPE STRING,
MAHNV TYPE STRING,
MANSP TYPE STRING,
MGRUP TYPE STRING,
FDGRP TYPE STRING,
VKPBZ TYPE STRING,
ADRNB TYPE STRING,
VKONV TYPE STRING,
GPARV TYPE STRING,
ADRRE TYPE STRING,
ADRRA TYPE STRING,
ADRMA TYPE STRING,
ABWRH TYPE STRING,
ADRRH TYPE STRING,
ADRJDC TYPE STRING,
BEGRU TYPE STRING,
TOGRU TYPE STRING,
STOPG TYPE STRING,
TXJCD TYPE STRING,
COPRC TYPE STRING,
VBUND TYPE STRING,
CCARD_ID TYPE STRING,
CCARD_OUT TYPE STRING,
UEBTR TYPE STRING,
DEF_REC TYPE STRING,
DEF_REC_IND TYPE STRING,
QSSKZ_A TYPE STRING,
QSSKZ_E TYPE STRING,
QSZNR TYPE STRING,
CORR_MAHNV TYPE STRING,
FITYP TYPE STRING,
PROVINCE TYPE STRING,
COUNTY TYPE STRING,
VERTYP TYPE STRING,
AUGRS_DEF TYPE STRING,
LANDL TYPE STRING,
BUPLA TYPE STRING,
BPTAXTYPE1 TYPE STRING,
BPTAXTYPE2 TYPE STRING,
PERSR TYPE STRING,
INV_CATEGORY TYPE STRING,
DDLXG TYPE STRING,
CMGRP TYPE STRING,
STRAT TYPE STRING,
CPERS TYPE STRING,
BPCL_SUCC TYPE STRING,
INV_SCHEDULE TYPE STRING,
INV_CYCLE TYPE STRING,
INV_CYCLE_RULE TYPE STRING,
INV_CYCLE_DAY TYPE STRING,
INV_CYCLE_MONTH TYPE STRING,
MNDID TYPE STRING,END OF T_EKKO_STR. DATA: WA_FKKBIBICADATA_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_FKKBIBICADATA_STR-FKKVKP sy-vline
WA_FKKBIBICADATA_STR-MANDT sy-vline
WA_FKKBIBICADATA_STR-VKONT sy-vline
WA_FKKBIBICADATA_STR-GPART sy-vline
WA_FKKBIBICADATA_STR-VKBEZ sy-vline
WA_FKKBIBICADATA_STR-ERDAT sy-vline
WA_FKKBIBICADATA_STR-ERNAM sy-vline
WA_FKKBIBICADATA_STR-AEDATP sy-vline
WA_FKKBIBICADATA_STR-AENAMP sy-vline
WA_FKKBIBICADATA_STR-FDZTG sy-vline
WA_FKKBIBICADATA_STR-STOPD sy-vline
WA_FKKBIBICADATA_STR-QSZDT sy-vline
WA_FKKBIBICADATA_STR-GUID sy-vline
WA_FKKBIBICADATA_STR-DDLAM sy-vline
WA_FKKBIBICADATA_STR-DDLCU sy-vline
WA_FKKBIBICADATA_STR-DDLNM sy-vline
WA_FKKBIBICADATA_STR-INV_CYCLE_START sy-vline
WA_FKKBIBICADATA_STR-INV_CHGDISC_X sy-vline
WA_FKKBIBICADATA_STR-BPL_XPOCL sy-vline
WA_FKKBIBICADATA_STR-BPL_FDATE sy-vline
WA_FKKBIBICADATA_STR-BPL_TDATE sy-vline
WA_FKKBIBICADATA_STR-EXVKO sy-vline
WA_FKKBIBICADATA_STR-OPBUK sy-vline
WA_FKKBIBICADATA_STR-STDBK sy-vline
WA_FKKBIBICADATA_STR-ABWRE sy-vline
WA_FKKBIBICADATA_STR-ABWRA sy-vline
WA_FKKBIBICADATA_STR-ABWMA sy-vline
WA_FKKBIBICADATA_STR-EBVTY sy-vline
WA_FKKBIBICADATA_STR-ABVTY sy-vline
WA_FKKBIBICADATA_STR-EZAWE sy-vline
WA_FKKBIBICADATA_STR-EZASP sy-vline
WA_FKKBIBICADATA_STR-AZAWE sy-vline
WA_FKKBIBICADATA_STR-AZASP sy-vline
WA_FKKBIBICADATA_STR-EIGBV sy-vline
WA_FKKBIBICADATA_STR-VWNZA sy-vline
WA_FKKBIBICADATA_STR-LOEVM sy-vline
WA_FKKBIBICADATA_STR-ABWVK sy-vline
WA_FKKBIBICADATA_STR-IKEY sy-vline
WA_FKKBIBICADATA_STR-MAHNV sy-vline
WA_FKKBIBICADATA_STR-MANSP sy-vline
WA_FKKBIBICADATA_STR-MGRUP sy-vline
WA_FKKBIBICADATA_STR-FDGRP sy-vline
WA_FKKBIBICADATA_STR-VKPBZ sy-vline
WA_FKKBIBICADATA_STR-ADRNB sy-vline
WA_FKKBIBICADATA_STR-VKONV sy-vline
WA_FKKBIBICADATA_STR-GPARV sy-vline
WA_FKKBIBICADATA_STR-ADRRE sy-vline
WA_FKKBIBICADATA_STR-ADRRA sy-vline
WA_FKKBIBICADATA_STR-ADRMA sy-vline
WA_FKKBIBICADATA_STR-ABWRH sy-vline
WA_FKKBIBICADATA_STR-ADRRH sy-vline
WA_FKKBIBICADATA_STR-ADRJDC sy-vline
WA_FKKBIBICADATA_STR-BEGRU sy-vline
WA_FKKBIBICADATA_STR-TOGRU sy-vline
WA_FKKBIBICADATA_STR-STOPG sy-vline
WA_FKKBIBICADATA_STR-TXJCD sy-vline
WA_FKKBIBICADATA_STR-COPRC sy-vline
WA_FKKBIBICADATA_STR-VBUND sy-vline
WA_FKKBIBICADATA_STR-CCARD_ID sy-vline
WA_FKKBIBICADATA_STR-CCARD_OUT sy-vline
WA_FKKBIBICADATA_STR-UEBTR sy-vline
WA_FKKBIBICADATA_STR-DEF_REC sy-vline
WA_FKKBIBICADATA_STR-DEF_REC_IND sy-vline
WA_FKKBIBICADATA_STR-QSSKZ_A sy-vline
WA_FKKBIBICADATA_STR-QSSKZ_E sy-vline
WA_FKKBIBICADATA_STR-QSZNR sy-vline
WA_FKKBIBICADATA_STR-CORR_MAHNV sy-vline
WA_FKKBIBICADATA_STR-FITYP sy-vline
WA_FKKBIBICADATA_STR-PROVINCE sy-vline
WA_FKKBIBICADATA_STR-COUNTY sy-vline
WA_FKKBIBICADATA_STR-VERTYP sy-vline
WA_FKKBIBICADATA_STR-AUGRS_DEF sy-vline
WA_FKKBIBICADATA_STR-LANDL sy-vline
WA_FKKBIBICADATA_STR-BUPLA sy-vline
WA_FKKBIBICADATA_STR-BPTAXTYPE1 sy-vline
WA_FKKBIBICADATA_STR-BPTAXTYPE2 sy-vline
WA_FKKBIBICADATA_STR-PERSR sy-vline
WA_FKKBIBICADATA_STR-INV_CATEGORY sy-vline
WA_FKKBIBICADATA_STR-DDLXG sy-vline
WA_FKKBIBICADATA_STR-CMGRP sy-vline
WA_FKKBIBICADATA_STR-STRAT sy-vline
WA_FKKBIBICADATA_STR-CPERS sy-vline
WA_FKKBIBICADATA_STR-BPCL_SUCC sy-vline
WA_FKKBIBICADATA_STR-INV_SCHEDULE sy-vline
WA_FKKBIBICADATA_STR-INV_CYCLE sy-vline
WA_FKKBIBICADATA_STR-INV_CYCLE_RULE sy-vline
WA_FKKBIBICADATA_STR-INV_CYCLE_DAY sy-vline
WA_FKKBIBICADATA_STR-INV_CYCLE_MONTH sy-vline
WA_FKKBIBICADATA_STR-MNDID sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.