ABAP Select data from SAP table /MDGBPX/_S_BP_FP_BP_CUSGEN 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 /MDGBPX/_S_BP_FP_BP_CUSGEN 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 /MDGBPX/_S_BP_FP_BP_CUSGEN. 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 /MDGBPX/_S_BP_FP_BP_CUSGEN 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_/MDGBPX/_S_BP_FP_BP_CUSGEN TYPE STANDARD TABLE OF /MDGBPX/_S_BP_FP_BP_CUSGEN,
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN TYPE /MDGBPX/_S_BP_FP_BP_CUSGEN,
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: </MDGBPX/_S_BP_FP_BP_CUSGEN> TYPE /MDGBPX/_S_BP_FP_BP_CUSGEN.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_/MDGBPX/_S_BP_FP_BP_CUSGEN.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM /MDGBPX/_S_BP_FP_BP_CUSGEN
INTO TABLE IT_/MDGBPX/_S_BP_FP_BP_CUSGEN.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM /MDGBPX/_S_BP_FP_BP_CUSGEN
* INTO TABLE @DATA(IT_/MDGBPX/_S_BP_FP_BP_CUSGEN2).
*--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_/MDGBPX/_S_BP_FP_BP_CUSGEN INDEX 1 INTO DATA(WA_/MDGBPX/_S_BP_FP_BP_CUSGEN2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/MDGBPX/_S_BP_FP_BP_CUSGEN ASSIGNING </MDGBPX/_S_BP_FP_BP_CUSGEN>.
*To update a field value using a field symbol simply change the value via the field symbol pointer</MDGBPX/_S_BP_FP_BP_CUSGEN>-ASSGNM_ID = 1.
</MDGBPX/_S_BP_FP_BP_CUSGEN>-BP_HEADER = 1.
</MDGBPX/_S_BP_FP_BP_CUSGEN>-AUFSD = 1.
</MDGBPX/_S_BP_FP_BP_CUSGEN>-BAHNE = 1.
</MDGBPX/_S_BP_FP_BP_CUSGEN>-BEGRU = 1.
ENDLOOP. LOOP AT IT_/MDGBPX/_S_BP_FP_BP_CUSGEN INTO WA_/MDGBPX/_S_BP_FP_BP_CUSGEN. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/MDGBPX/_S_BP_FP_BP_CUSGEN-BRAN1, sy-vline,
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN-BRAN2, sy-vline,
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN-BRAN3, sy-vline,
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN-BRAN4, sy-vline,
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN-BRAN5, sy-vline,
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN-BROBJ, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/MDGBPX/_S_BP_FP_BP_CUSGEN 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_/MDGBPX/_S_BP_FP_BP_CUSGEN 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_/MDGBPX/_S_BP_FP_BP_CUSGEN INTO WA_/MDGBPX/_S_BP_FP_BP_CUSGEN. *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_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR,
ASSGNM_ID TYPE STRING,
BP_HEADER TYPE STRING,
AUFSD TYPE STRING,
BAHNE TYPE STRING,
BEGRU TYPE STRING,
BRAN1 TYPE STRING,
BRAN2 TYPE STRING,
BRAN3 TYPE STRING,
BRAN4 TYPE STRING,
BRAN5 TYPE STRING,
BROBJ TYPE STRING,
CASSD TYPE STRING,
CCC01 TYPE STRING,
CCC02 TYPE STRING,
CCC03 TYPE STRING,
CCC04 TYPE STRING,
CFOPC TYPE STRING,
CITYC TYPE STRING,
CIVVE TYPE STRING,
COUNC TYPE STRING,
COUNTRY TYPE STRING,
CUS_BAHNS TYPE STRING,
CUS_DTAMS TYPE STRING,
CUS_FISKN TYPE STRING,
CUS_KONZS TYPE STRING,
CUS_LANGU TYPE STRING,
CUS_LIFNR TYPE STRING,
CUS_LOEVM TYPE STRING,
CUS_NODEL TYPE STRING,
CUS_SPERR TYPE STRING,
CUS_STKZA TYPE STRING,
CUS_STKZU TYPE STRING,
CUS_VBUND TYPE STRING,
CUS_XZEMP TYPE STRING,
DTAWS TYPE STRING,
FAKSD TYPE STRING,
FITYP TYPE STRING,
JMJAH TYPE STRING,
JMZAH TYPE STRING,
J_1KFREPR TYPE STRING,
J_1KFTBUS TYPE STRING,
J_1KFTIND TYPE STRING,
KATR1 TYPE STRING,
KATR10 TYPE STRING,
KATR2 TYPE STRING,
KATR3 TYPE STRING,
KATR4 TYPE STRING,
KATR5 TYPE STRING,
KATR6 TYPE STRING,
KATR7 TYPE STRING,
KATR8 TYPE STRING,
KATR9 TYPE STRING,
KDKG1 TYPE STRING,
KDKG2 TYPE STRING,
KDKG3 TYPE STRING,
KDKG4 TYPE STRING,
KDKG5 TYPE STRING,
KNRZA TYPE STRING,
KTOKD TYPE STRING,
KUKLA TYPE STRING,
KUNNR TYPE STRING,
LAND1 TYPE STRING,
LIFSD TYPE STRING,
LOCCO TYPE STRING,
MILVE TYPE STRING,
NIELS TYPE STRING,
PERIV TYPE STRING,
PYMT_METH TYPE STRING,
REGION TYPE STRING,
UMJAH TYPE STRING,
UMSA1 TYPE STRING,
UWAER TYPE STRING,
XICMS TYPE STRING,
XSUBT TYPE STRING,
XXIPI TYPE STRING,END OF T_EKKO_STR. DATA: WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_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_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-ASSGNM_ID sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BP_HEADER sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-AUFSD sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BAHNE sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BEGRU sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BRAN1 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BRAN2 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BRAN3 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BRAN4 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BRAN5 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-BROBJ sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CASSD sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CCC01 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CCC02 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CCC03 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CCC04 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CFOPC sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CITYC sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CIVVE sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-COUNC sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-COUNTRY sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_BAHNS sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_DTAMS sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_FISKN sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_KONZS sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_LANGU sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_LIFNR sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_LOEVM sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_NODEL sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_SPERR sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_STKZA sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_STKZU sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_VBUND sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-CUS_XZEMP sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-DTAWS sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-FAKSD sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-FITYP sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-JMJAH sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-JMZAH sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-J_1KFREPR sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-J_1KFTBUS sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-J_1KFTIND sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR1 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR10 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR2 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR3 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR4 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR5 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR6 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR7 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR8 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KATR9 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KDKG1 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KDKG2 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KDKG3 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KDKG4 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KDKG5 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KNRZA sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KTOKD sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KUKLA sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-KUNNR sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-LAND1 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-LIFSD sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-LOCCO sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-MILVE sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-NIELS sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-PERIV sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-PYMT_METH sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-REGION sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-UMJAH sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-UMSA1 sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-UWAER sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-XICMS sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-XSUBT sy-vline
WA_/MDGBPX/_S_BP_FP_BP_CUSGEN_STR-XXIPI sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
