ABAP Select data from SAP table RECD_CONDITION_ADDITIONAL 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 RECD_CONDITION_ADDITIONAL 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 RECD_CONDITION_ADDITIONAL. 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 RECD_CONDITION_ADDITIONAL 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_RECD_CONDITION_ADDITIONAL TYPE STANDARD TABLE OF RECD_CONDITION_ADDITIONAL,
      WA_RECD_CONDITION_ADDITIONAL TYPE RECD_CONDITION_ADDITIONAL,
      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: <RECD_CONDITION_ADDITIONAL> TYPE RECD_CONDITION_ADDITIONAL.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RECD_CONDITION_ADDITIONAL
*  INTO TABLE @DATA(IT_RECD_CONDITION_ADDITIONAL2).
*--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_RECD_CONDITION_ADDITIONAL INDEX 1 INTO DATA(WA_RECD_CONDITION_ADDITIONAL2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RECD_CONDITION_ADDITIONAL ASSIGNING <RECD_CONDITION_ADDITIONAL>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RECD_CONDITION_ADDITIONAL>-XMCALCRULE = 1.
<RECD_CONDITION_ADDITIONAL>-XMDISTRULE = 1.
<RECD_CONDITION_ADDITIONAL>-CALCVALUEUNIT = 1.
<RECD_CONDITION_ADDITIONAL>-UNITPRICEUNIT = 1.
<RECD_CONDITION_ADDITIONAL>-OBJTXTCALC = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RECD_CONDITION_ADDITIONAL-OBJIDCALC, sy-vline,
WA_RECD_CONDITION_ADDITIONAL-OBJIDENTCALC, sy-vline,
WA_RECD_CONDITION_ADDITIONAL-OBJTYPECALC, sy-vline,
WA_RECD_CONDITION_ADDITIONAL-CALCRULEPARA1DES, sy-vline,
WA_RECD_CONDITION_ADDITIONAL-CALCRULEPARA2DES, sy-vline,
WA_RECD_CONDITION_ADDITIONAL-CALCRULEPARA1INF, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RECD_CONDITION_ADDITIONAL 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_RECD_CONDITION_ADDITIONAL 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_RECD_CONDITION_ADDITIONAL INTO WA_RECD_CONDITION_ADDITIONAL. *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 PARTNER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RECD_CONDITION_ADDITIONAL-PARTNER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RECD_CONDITION_ADDITIONAL-PARTNER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field FIXPER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RECD_CONDITION_ADDITIONAL-FIXPER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RECD_CONDITION_ADDITIONAL-FIXPER.
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_RECD_CONDITION_ADDITIONAL_STR,
XMCALCRULE TYPE STRING,
XMDISTRULE TYPE STRING,
CALCVALUEUNIT TYPE STRING,
UNITPRICEUNIT TYPE STRING,
OBJTXTCALC TYPE STRING,
OBJIDCALC TYPE STRING,
OBJIDENTCALC TYPE STRING,
OBJTYPECALC TYPE STRING,
CALCRULEPARA1DES TYPE STRING,
CALCRULEPARA2DES TYPE STRING,
CALCRULEPARA1INF TYPE STRING,
CALCRULEPARA2INF TYPE STRING,
OBJTXTDIST TYPE STRING,
OBJIDDIST TYPE STRING,
OBJIDENTDIST TYPE STRING,
OBJTYPEDIST TYPE STRING,
DISTRULEPARA1DES TYPE STRING,
DISTRULEPARA2DES TYPE STRING,
DISTRULEPARA1INF TYPE STRING,
DISTRULEPARA2INF TYPE STRING,
CONDNUMBER TYPE STRING,
XCONDITION TYPE STRING,
XMCONDPURPOSEEXT TYPE STRING,
XCONDCURR TYPE STRING,
XTERMTYPEPY TYPE STRING,
XTERMPY TYPE STRING,
XTERMTYPERH TYPE STRING,
XTERMRH TYPE STRING,
XTERMTYPEAJ TYPE STRING,
XTERMAJ TYPE STRING,
XTERMTYPEOA TYPE STRING,
XTERMOA TYPE STRING,
XTERMTYPESR TYPE STRING,
XTERMSR TYPE STRING,
XTERMTYPEMR TYPE STRING,
XTERMMR TYPE STRING,
XTERMTYPEWT TYPE STRING,
XTERMWT TYPE STRING,
XTERMTYPEPYSCS TYPE STRING,
XTERMPYSCS TYPE STRING,
XTAXTYPE TYPE STRING,
XTAXGROUP TYPE STRING,
COMPARENRCALC TYPE STRING,
COMPARENRDIST TYPE STRING,
ADVANCEPAYMENT TYPE STRING,
SCSRELATED TYPE STRING,
FLATRATE TYPE STRING,
BOOKFROM_PAY TYPE STRING,
BOOKTO_PAY TYPE STRING,
BOOKED_PAY TYPE STRING,
BOOKFROM_OBJ TYPE STRING,
BOOKTO_OBJ TYPE STRING,
BOOKED_OBJ TYPE STRING,
PARTNER TYPE STRING,
PARTNEROBJNR TYPE STRING,
TAXTYPE TYPE STRING,
TAXGROUP TYPE STRING,
TAXCOUNTRY TYPE STRING,
ISGROSS TYPE STRING,
TXJCD TYPE STRING,
FREQUENCY TYPE STRING,
FREQUENCYUNIT TYPE STRING,
WEEKFROM TYPE STRING,
MONTHFROM TYPE STRING,
CONDVALUEREFER TYPE STRING,
CONDVALUEREFDIF TYPE STRING,
PRORATE TYPE STRING,
CALCMETHPER TYPE STRING,
PAYMENTFORM TYPE STRING,
ORDERDISPLAY TYPE STRING,
CONDVALIDFROMFIRST TYPE STRING,
XCHGREASON TYPE STRING,
CALCDUEDATEUC TYPE STRING,
CALCRULEINT TYPE STRING,
ISCASHFLOWRELEVANT TYPE STRING,
CONDABSENDDATE TYPE STRING,
CONDABSBEGDATE TYPE STRING,
FLEXIBLEFROM TYPE STRING,
FLEXIBLETO TYPE STRING,
ISFLEXIBLE TYPE STRING,
FIXPER TYPE STRING,END OF T_EKKO_STR. DATA: WA_RECD_CONDITION_ADDITIONAL_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_RECD_CONDITION_ADDITIONAL_STR-XMCALCRULE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XMDISTRULE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCVALUEUNIT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-UNITPRICEUNIT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJTXTCALC sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJIDCALC sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJIDENTCALC sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJTYPECALC sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCRULEPARA1DES sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCRULEPARA2DES sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCRULEPARA1INF sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCRULEPARA2INF sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJTXTDIST sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJIDDIST sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJIDENTDIST sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-OBJTYPEDIST sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-DISTRULEPARA1DES sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-DISTRULEPARA2DES sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-DISTRULEPARA1INF sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-DISTRULEPARA2INF sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CONDNUMBER sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XCONDITION sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XMCONDPURPOSEEXT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XCONDCURR sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPEPY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMPY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPERH sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMRH sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPEAJ sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMAJ sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPEOA sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMOA sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPESR sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMSR sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPEMR sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMMR sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPEWT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMWT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMTYPEPYSCS sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTERMPYSCS sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTAXTYPE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XTAXGROUP sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-COMPARENRCALC sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-COMPARENRDIST sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-ADVANCEPAYMENT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-SCSRELATED sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-FLATRATE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-BOOKFROM_PAY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-BOOKTO_PAY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-BOOKED_PAY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-BOOKFROM_OBJ sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-BOOKTO_OBJ sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-BOOKED_OBJ sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-PARTNER sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-PARTNEROBJNR sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-TAXTYPE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-TAXGROUP sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-TAXCOUNTRY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-ISGROSS sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-TXJCD sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-FREQUENCY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-FREQUENCYUNIT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-WEEKFROM sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-MONTHFROM sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CONDVALUEREFER sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CONDVALUEREFDIF sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-PRORATE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCMETHPER sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-PAYMENTFORM sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-ORDERDISPLAY sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CONDVALIDFROMFIRST sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-XCHGREASON sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCDUEDATEUC sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CALCRULEINT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-ISCASHFLOWRELEVANT sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CONDABSENDDATE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-CONDABSBEGDATE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-FLEXIBLEFROM sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-FLEXIBLETO sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-ISFLEXIBLE sy-vline
WA_RECD_CONDITION_ADDITIONAL_STR-FIXPER sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.