ABAP Select data from SAP table RJEP_CPERSON_GETLIST_SEL 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 RJEP_CPERSON_GETLIST_SEL 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 RJEP_CPERSON_GETLIST_SEL. 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 RJEP_CPERSON_GETLIST_SEL 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_RJEP_CPERSON_GETLIST_SEL TYPE STANDARD TABLE OF RJEP_CPERSON_GETLIST_SEL, WA_RJEP_CPERSON_GETLIST_SEL TYPE RJEP_CPERSON_GETLIST_SEL, 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: <RJEP_CPERSON_GETLIST_SEL> TYPE RJEP_CPERSON_GETLIST_SEL. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_RJEP_CPERSON_GETLIST_SEL. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM RJEP_CPERSON_GETLIST_SEL INTO TABLE IT_RJEP_CPERSON_GETLIST_SEL. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM RJEP_CPERSON_GETLIST_SEL * INTO TABLE @DATA(IT_RJEP_CPERSON_GETLIST_SEL2). *--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_RJEP_CPERSON_GETLIST_SEL INDEX 1 INTO DATA(WA_RJEP_CPERSON_GETLIST_SEL2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_RJEP_CPERSON_GETLIST_SEL ASSIGNING <RJEP_CPERSON_GETLIST_SEL>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<RJEP_CPERSON_GETLIST_SEL>-CP = 1.
<RJEP_CPERSON_GETLIST_SEL>-COMM = 1.
<RJEP_CPERSON_GETLIST_SEL>-TELEPHONE = 1.
<RJEP_CPERSON_GETLIST_SEL>-E_MAIL = 1.
<RJEP_CPERSON_GETLIST_SEL>-URL = 1.
ENDLOOP. LOOP AT IT_RJEP_CPERSON_GETLIST_SEL INTO WA_RJEP_CPERSON_GETLIST_SEL. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_RJEP_CPERSON_GETLIST_SEL-COUNTRY_FOR_TELEPHONE, sy-vline,
WA_RJEP_CPERSON_GETLIST_SEL-ADDRESS, sy-vline,
WA_RJEP_CPERSON_GETLIST_SEL-CITY1, sy-vline,
WA_RJEP_CPERSON_GETLIST_SEL-POSTL_COD1, sy-vline,
WA_RJEP_CPERSON_GETLIST_SEL-COUNTRY, sy-vline,
WA_RJEP_CPERSON_GETLIST_SEL-COUNTRYISO, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RJEP_CPERSON_GETLIST_SEL 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_RJEP_CPERSON_GETLIST_SEL 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_RJEP_CPERSON_GETLIST_SEL INTO WA_RJEP_CPERSON_GETLIST_SEL. *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 SXIDN, internal->external for field E_MAIL CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT' EXPORTING input = WA_RJEP_CPERSON_GETLIST_SEL-E_MAIL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RJEP_CPERSON_GETLIST_SEL-E_MAIL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PARTNER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RJEP_CPERSON_GETLIST_SEL-PARTNER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RJEP_CPERSON_GETLIST_SEL-PARTNER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PARTNER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RJEP_CPERSON_GETLIST_SEL-PARTNER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RJEP_CPERSON_GETLIST_SEL-PARTNER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field USAGE_TYPE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RJEP_CPERSON_GETLIST_SEL-USAGE_TYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RJEP_CPERSON_GETLIST_SEL-USAGE_TYPE.
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_RJEP_CPERSON_GETLIST_SEL_STR,
CP TYPE STRING,
COMM TYPE STRING,
TELEPHONE TYPE STRING,
E_MAIL TYPE STRING,
URL TYPE STRING,
COUNTRY_FOR_TELEPHONE TYPE STRING,
ADDRESS TYPE STRING,
CITY1 TYPE STRING,
POSTL_COD1 TYPE STRING,
COUNTRY TYPE STRING,
COUNTRYISO TYPE STRING,
REGION TYPE STRING,
STREET TYPE STRING,
HOUSE_NO TYPE STRING,
CITY2 TYPE STRING,
COUNTY TYPE STRING,
TOWNSHIP TYPE STRING,
CENTRAL TYPE STRING,
PARTNER TYPE STRING,
MC_NAME1 TYPE STRING,
MC_NAME2 TYPE STRING,
SEARCHTERM1 TYPE STRING,
SEARCHTERM2 TYPE STRING,
PARTNERCATEGORY TYPE STRING,
COMMON TYPE STRING,
SEARCHTERM1 TYPE STRING,
SEARCHTERM2 TYPE STRING,
RELATIONSHIP TYPE STRING,
FUNCTION TYPE STRING,
DEPARTMENT TYPE STRING,
ISMRELATIONSHIP TYPE STRING,
FUNCT_CODE TYPE STRING,
DEPARTMCOD TYPE STRING,
PRODHIER TYPE STRING,
PUBLICATION TYPE STRING,
EDITION TYPE STRING,
CAMPAIGN TYPE STRING,
RNG_BIRTHDATE TYPE STRING,
BP TYPE STRING,
ADDRESS TYPE STRING,
CITY1 TYPE STRING,
POSTL_COD1 TYPE STRING,
COUNTRY TYPE STRING,
COUNTRYISO TYPE STRING,
REGION TYPE STRING,
STREET TYPE STRING,
HOUSE_NO TYPE STRING,
CITY2 TYPE STRING,
COUNTY TYPE STRING,
TOWNSHIP TYPE STRING,
CENTRAL TYPE STRING,
PARTNER TYPE STRING,
MC_NAME1 TYPE STRING,
MC_NAME2 TYPE STRING,
SEARCHTERM1 TYPE STRING,
SEARCHTERM2 TYPE STRING,
PARTNERCATEGORY TYPE STRING,
PARTNERROLE TYPE STRING,
CUSTOMER TYPE STRING,
CLASSIFIC TYPE STRING,
INDUSTRY TYPE STRING,
IND_CODE TYPE STRING,
COMMON TYPE STRING,
SEARCHTERM1 TYPE STRING,
SEARCHTERM2 TYPE STRING,
USAGE TYPE STRING,
USAGE_TYPE TYPE STRING,
DOCUMENT_NUMBER TYPE STRING,
PRODHIER TYPE STRING,
BP_AGENCIES_ONLY TYPE STRING,
BP_RESPONSIBLEFOR TYPE STRING,
SALES_AREA TYPE STRING,
SALESORG TYPE STRING,
DISTR_CHAN TYPE STRING,
DIVISION TYPE STRING,
SALES_OFF TYPE STRING,
SALES_GRP TYPE STRING,
XCPACTIVE TYPE STRING,END OF T_EKKO_STR. DATA: WA_RJEP_CPERSON_GETLIST_SEL_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_RJEP_CPERSON_GETLIST_SEL_STR-CP sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COMM sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-TELEPHONE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-E_MAIL sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-URL sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COUNTRY_FOR_TELEPHONE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-ADDRESS sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CITY1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-POSTL_COD1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COUNTRY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COUNTRYISO sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-REGION sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-STREET sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-HOUSE_NO sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CITY2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COUNTY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-TOWNSHIP sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CENTRAL sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PARTNER sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-MC_NAME1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-MC_NAME2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PARTNERCATEGORY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COMMON sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-RELATIONSHIP sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-FUNCTION sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-DEPARTMENT sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-ISMRELATIONSHIP sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-FUNCT_CODE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-DEPARTMCOD sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PRODHIER sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PUBLICATION sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-EDITION sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CAMPAIGN sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-RNG_BIRTHDATE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-BP sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-ADDRESS sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CITY1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-POSTL_COD1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COUNTRY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COUNTRYISO sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-REGION sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-STREET sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-HOUSE_NO sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CITY2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COUNTY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-TOWNSHIP sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CENTRAL sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PARTNER sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-MC_NAME1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-MC_NAME2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PARTNERCATEGORY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PARTNERROLE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CUSTOMER sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-CLASSIFIC sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-INDUSTRY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-IND_CODE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-COMMON sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM1 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SEARCHTERM2 sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-USAGE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-USAGE_TYPE sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-DOCUMENT_NUMBER sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-PRODHIER sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-BP_AGENCIES_ONLY sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-BP_RESPONSIBLEFOR sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SALES_AREA sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SALESORG sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-DISTR_CHAN sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-DIVISION sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SALES_OFF sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-SALES_GRP sy-vline
WA_RJEP_CPERSON_GETLIST_SEL_STR-XCPACTIVE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.