ABAP Select data from SAP table RMCBC 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 RMCBC 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 RMCBC. 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 RMCBC 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_RMCBC TYPE STANDARD TABLE OF RMCBC,
      WA_RMCBC TYPE RMCBC,
      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: <RMCBC> TYPE RMCBC.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RMCBC
*  INTO TABLE @DATA(IT_RMCBC2).
*--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_RMCBC INDEX 1 INTO DATA(WA_RMCBC2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RMCBC ASSIGNING <RMCBC>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RMCBC>-KLART = 1.
<RMCBC>-ARTXT = 1.
<RMCBC>-OBJEK = 1.
<RMCBC>-OBTXT = 1.
<RMCBC>-CLASS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RMCBC-KLTXT, sy-vline,
WA_RMCBC-CLASN, sy-vline,
WA_RMCBC-KTEXT, sy-vline,
WA_RMCBC-CLINT, sy-vline,
WA_RMCBC-SPRAS, sy-vline,
WA_RMCBC-AENNR1, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RMCBC 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_RMCBC 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_RMCBC INTO WA_RMCBC. *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 ISOLA, internal->external for field SPRAS CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_RMCBC-SPRAS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-SPRAS.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_RMCBC-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-MATNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field MEINS CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_RMCBC-MEINS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-MEINS.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit OBKEY, internal->external for field OBJNR CALL FUNCTION 'CONVERSION_EXIT_OBKEY_OUTPUT' EXPORTING input = WA_RMCBC-OBJNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-OBJNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit MATN1, internal->external for field SATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_RMCBC-SATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-SATNR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_RMCBC-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-GJAHR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit FMCIS, internal->external for field FIPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_RMCBC-FIPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-FIPOS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIS, internal->external for field FICPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_RMCBC-FICPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-FICPOS.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit ATINN, internal->external for field ATINN CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT' EXPORTING input = WA_RMCBC-ATINN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-ATINN.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit PNUID, internal->external for field BPL_PNGUID CALL FUNCTION 'CONVERSION_EXIT_PNUID_OUTPUT' EXPORTING input = WA_RMCBC-BPL_PNGUID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-BPL_PNGUID.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit TPLNR, internal->external for field TPLNR CALL FUNCTION 'CONVERSION_EXIT_TPLNR_OUTPUT' EXPORTING input = WA_RMCBC-TPLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-TPLNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit POSID, internal->external for field POSID CALL FUNCTION 'CONVERSION_EXIT_POSID_OUTPUT' EXPORTING input = WA_RMCBC-POSID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-POSID.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit NUMCV, internal->external for field STLNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_RMCBC-STLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-STLNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit GJAHR, internal->external for field MJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_RMCBC-MJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-MJAHR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

*Conversion exit CVLID, internal->external for field LONGTEXT_ID CALL FUNCTION 'CONVERSION_EXIT_CVLID_OUTPUT' EXPORTING input = WA_RMCBC-LONGTEXT_ID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-LONGTEXT_ID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit FMCIL, internal->external for field FIPEX CALL FUNCTION 'CONVERSION_EXIT_FMCIL_OUTPUT' EXPORTING input = WA_RMCBC-FIPEX IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-FIPEX.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit MATN1, internal->external for field CU_ID CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_RMCBC-CU_ID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-CU_ID.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit CLAIM, internal->external for field CLAIM CALL FUNCTION 'CONVERSION_EXIT_CLAIM_OUTPUT' EXPORTING input = WA_RMCBC-CLAIM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-CLAIM.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit PNUID, internal->external for field PNGUID CALL FUNCTION 'CONVERSION_EXIT_PNUID_OUTPUT' EXPORTING input = WA_RMCBC-PNGUID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-PNGUID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PVUID, internal->external for field PVGUID CALL FUNCTION 'CONVERSION_EXIT_PVUID_OUTPUT' EXPORTING input = WA_RMCBC-PVGUID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-PVGUID.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ATINN, internal->external for field J_3GSTLNR CALL FUNCTION 'CONVERSION_EXIT_ATINN_OUTPUT' EXPORTING input = WA_RMCBC-J_3GSTLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-J_3GSTLNR.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit PRDID, internal->external for field MATID CALL FUNCTION 'CONVERSION_EXIT_PRDID_OUTPUT' EXPORTING input = WA_RMCBC-MATID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-MATID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ALPHA, internal->external for field INFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RMCBC-INFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RMCBC-INFNR.
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_RMCBC_STR,
KLART TYPE STRING,
ARTXT TYPE STRING,
OBJEK TYPE STRING,
OBTXT TYPE STRING,
CLASS TYPE STRING,
KLTXT TYPE STRING,
CLASN TYPE STRING,
KTEXT TYPE STRING,
CLINT TYPE STRING,
SPRAS TYPE STRING,
AENNR1 TYPE STRING,
DATUV1 TYPE STRING,
ATNAM TYPE STRING,
GUID32 TYPE STRING,
MATNR TYPE STRING,
MEINS TYPE STRING,
DOKNR TYPE STRING,
DOKAR TYPE STRING,
DOKTL TYPE STRING,
DOKVR TYPE STRING,
KNNAM TYPE STRING,
WERKS TYPE STRING,
ARBPL TYPE STRING,
OBJNR TYPE STRING,
LIFNR TYPE STRING,
KUNNR TYPE STRING,
NETNR TYPE STRING,
CHARG TYPE STRING,
KSCHL TYPE STRING,
AENNR TYPE STRING,
KLART_CUVT TYPE STRING,
CLASS_CUVT TYPE STRING,
LNPOS TYPE STRING,
BSSTR TYPE STRING,
WGHIE TYPE STRING,
WARGR TYPE STRING,
WGHIE1 TYPE STRING,
SATNR TYPE STRING,
KOKRS TYPE STRING,
PRZNR TYPE STRING,
DATBI TYPE STRING,
FRGGR TYPE STRING,
GJAHR TYPE STRING,
RSNUM TYPE STRING,
RSPOS TYPE STRING,
RSART TYPE STRING,
ASNUM TYPE STRING,
FIKRS TYPE STRING,
FIPOS TYPE STRING,
FINCODE TYPE STRING,
FICPOS TYPE STRING,
VBELN TYPE STRING,
POSNR TYPE STRING,
AUFNR TYPE STRING,
AUFPL TYPE STRING,
ATINN TYPE STRING,
ATWRT TYPE STRING,
LAYVR TYPE STRING,
SORTF TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
BANFN TYPE STRING,
BNFPO TYPE STRING,
PARTNER TYPE STRING,
PARTNER_GUID TYPE STRING,
BUDGET_PD TYPE STRING,
XFELD TYPE STRING,
BPL_PNGUID TYPE STRING,
QMNUM TYPE STRING,
FENUM TYPE STRING,
EQUNR TYPE STRING,
TPLNR TYPE STRING,
FICTR TYPE STRING,
KATALOGART TYPE STRING,
AUSWAHLMGE TYPE STRING,
CODEGRUPPE TYPE STRING,
ZAEHLER TYPE STRING,
MKMNR TYPE STRING,
PMTNR TYPE STRING,
QVERSION TYPE STRING,
KANTE TYPE STRING,
TRPNR TYPE STRING,
SFHNR TYPE STRING,
PLNTY TYPE STRING,
PLNNR TYPE STRING,
PLNAL TYPE STRING,
STDTY TYPE STRING,
STDNR TYPE STRING,
STDAL TYPE STRING,
KAPPL TYPE STRING,
FRGSX TYPE STRING,
PRNAM TYPE STRING,
POSID TYPE STRING,
LOCNR TYPE STRING,
ABTNR TYPE STRING,
STLTY TYPE STRING,
STLNR TYPE STRING,
CLSZU TYPE STRING,
KNUMH TYPE STRING,
PLNKN TYPE STRING,
POINT TYPE STRING,
MGANR TYPE STRING,
POSNM TYPE STRING,
POSHIVERS TYPE STRING,
BEDAE TYPE STRING,
VERSB TYPE STRING,
PBDNR TYPE STRING,
PDATU TYPE STRING,
APLZL TYPE STRING,
MBLNR TYPE STRING,
MJAHR TYPE STRING,
ZEILE TYPE STRING,
OBKNR TYPE STRING,
RECN TYPE STRING,
ACTN TYPE STRING,
PBLNR TYPE STRING,
ASORT TYPE STRING,
KZWSM TYPE STRING,
SPEC_NO TYPE STRING,
DDI_ID TYPE STRING,
BZOBJ TYPE STRING,
KALNR TYPE STRING,
KALKA TYPE STRING,
KADKY TYPE STRING,
TVERS TYPE STRING,
BWVAR TYPE STRING,
KKZMA TYPE STRING,
MODEL_VAL TYPE STRING,
DOKOB TYPE STRING,
OBZAE TYPE STRING,
GNTYP TYPE STRING,
PMSOG TYPE STRING,
LONGTEXT_ID TYPE STRING,
FIPEX TYPE STRING,
RANL TYPE STRING,
VGBEL TYPE STRING,
VGPOS TYPE STRING,
VGTYP TYPE STRING,
VGSYS TYPE STRING,
BICSELVARIANT TYPE STRING,
SEALNR TYPE STRING,
DATE_TO TYPE STRING,
SEQNR TYPE STRING,
CU_ID TYPE STRING,
CUGUID TYPE STRING,
PLVAR TYPE STRING,
OTYPE TYPE STRING,
OBJID TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
WARPL TYPE STRING,
CLAIM TYPE STRING,
CCEVENT TYPE STRING,
SERVCATID TYPE STRING,
PNGUID TYPE STRING,
PVGUID TYPE STRING,
AENNR2 TYPE STRING,
OUTID TYPE STRING,
OUTPO TYPE STRING,
JCPOS TYPE STRING,
REFTY TYPE STRING,
J_3GKATAL TYPE STRING,
J_3GAUSGJ TYPE STRING,
J_3GKATNRC TYPE STRING,
J_3GTPLKZ TYPE STRING,
J_3GLFDNR TYPE STRING,
J_3GKATNRS TYPE STRING,
J_3GDATBI TYPE STRING,
J_3GPOSNR TYPE STRING,
J_3GKATNRP TYPE STRING,
J_3GOBTXT TYPE STRING,
J_3GSTLNR TYPE STRING,
J_3GPOSNRI TYPE STRING,
PPV_ID TYPE STRING,
CHSTCNT TYPE STRING,
CLA_OBJNO TYPE STRING,
LINE_SEQNO TYPE STRING,
TRIALID TYPE STRING,
VGUID TYPE STRING,
TKONN TYPE STRING,
TPOSN TYPE STRING,
MATID TYPE STRING,
VERSION TYPE STRING,
RESUID TYPE STRING,
COMPONENT_ID TYPE STRING,
OBJECT_TYP TYPE STRING,
CONDITION_ID TYPE STRING,
OBJ_USAGE TYPE STRING,
LINE_NO TYPE STRING,
INFNR TYPE STRING,END OF T_EKKO_STR. DATA: WA_RMCBC_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_RMCBC_STR-KLART sy-vline
WA_RMCBC_STR-ARTXT sy-vline
WA_RMCBC_STR-OBJEK sy-vline
WA_RMCBC_STR-OBTXT sy-vline
WA_RMCBC_STR-CLASS sy-vline
WA_RMCBC_STR-KLTXT sy-vline
WA_RMCBC_STR-CLASN sy-vline
WA_RMCBC_STR-KTEXT sy-vline
WA_RMCBC_STR-CLINT sy-vline
WA_RMCBC_STR-SPRAS sy-vline
WA_RMCBC_STR-AENNR1 sy-vline
WA_RMCBC_STR-DATUV1 sy-vline
WA_RMCBC_STR-ATNAM sy-vline
WA_RMCBC_STR-GUID32 sy-vline
WA_RMCBC_STR-MATNR sy-vline
WA_RMCBC_STR-MEINS sy-vline
WA_RMCBC_STR-DOKNR sy-vline
WA_RMCBC_STR-DOKAR sy-vline
WA_RMCBC_STR-DOKTL sy-vline
WA_RMCBC_STR-DOKVR sy-vline
WA_RMCBC_STR-KNNAM sy-vline
WA_RMCBC_STR-WERKS sy-vline
WA_RMCBC_STR-ARBPL sy-vline
WA_RMCBC_STR-OBJNR sy-vline
WA_RMCBC_STR-LIFNR sy-vline
WA_RMCBC_STR-KUNNR sy-vline
WA_RMCBC_STR-NETNR sy-vline
WA_RMCBC_STR-CHARG sy-vline
WA_RMCBC_STR-KSCHL sy-vline
WA_RMCBC_STR-AENNR sy-vline
WA_RMCBC_STR-KLART_CUVT sy-vline
WA_RMCBC_STR-CLASS_CUVT sy-vline
WA_RMCBC_STR-LNPOS sy-vline
WA_RMCBC_STR-BSSTR sy-vline
WA_RMCBC_STR-WGHIE sy-vline
WA_RMCBC_STR-WARGR sy-vline
WA_RMCBC_STR-WGHIE1 sy-vline
WA_RMCBC_STR-SATNR sy-vline
WA_RMCBC_STR-KOKRS sy-vline
WA_RMCBC_STR-PRZNR sy-vline
WA_RMCBC_STR-DATBI sy-vline
WA_RMCBC_STR-FRGGR sy-vline
WA_RMCBC_STR-GJAHR sy-vline
WA_RMCBC_STR-RSNUM sy-vline
WA_RMCBC_STR-RSPOS sy-vline
WA_RMCBC_STR-RSART sy-vline
WA_RMCBC_STR-ASNUM sy-vline
WA_RMCBC_STR-FIKRS sy-vline
WA_RMCBC_STR-FIPOS sy-vline
WA_RMCBC_STR-FINCODE sy-vline
WA_RMCBC_STR-FICPOS sy-vline
WA_RMCBC_STR-VBELN sy-vline
WA_RMCBC_STR-POSNR sy-vline
WA_RMCBC_STR-AUFNR sy-vline
WA_RMCBC_STR-AUFPL sy-vline
WA_RMCBC_STR-ATINN sy-vline
WA_RMCBC_STR-ATWRT sy-vline
WA_RMCBC_STR-LAYVR sy-vline
WA_RMCBC_STR-SORTF sy-vline
WA_RMCBC_STR-EBELN sy-vline
WA_RMCBC_STR-EBELP sy-vline
WA_RMCBC_STR-BANFN sy-vline
WA_RMCBC_STR-BNFPO sy-vline
WA_RMCBC_STR-PARTNER sy-vline
WA_RMCBC_STR-PARTNER_GUID sy-vline
WA_RMCBC_STR-BUDGET_PD sy-vline
WA_RMCBC_STR-XFELD sy-vline
WA_RMCBC_STR-BPL_PNGUID sy-vline
WA_RMCBC_STR-QMNUM sy-vline
WA_RMCBC_STR-FENUM sy-vline
WA_RMCBC_STR-EQUNR sy-vline
WA_RMCBC_STR-TPLNR sy-vline
WA_RMCBC_STR-FICTR sy-vline
WA_RMCBC_STR-KATALOGART sy-vline
WA_RMCBC_STR-AUSWAHLMGE sy-vline
WA_RMCBC_STR-CODEGRUPPE sy-vline
WA_RMCBC_STR-ZAEHLER sy-vline
WA_RMCBC_STR-MKMNR sy-vline
WA_RMCBC_STR-PMTNR sy-vline
WA_RMCBC_STR-QVERSION sy-vline
WA_RMCBC_STR-KANTE sy-vline
WA_RMCBC_STR-TRPNR sy-vline
WA_RMCBC_STR-SFHNR sy-vline
WA_RMCBC_STR-PLNTY sy-vline
WA_RMCBC_STR-PLNNR sy-vline
WA_RMCBC_STR-PLNAL sy-vline
WA_RMCBC_STR-STDTY sy-vline
WA_RMCBC_STR-STDNR sy-vline
WA_RMCBC_STR-STDAL sy-vline
WA_RMCBC_STR-KAPPL sy-vline
WA_RMCBC_STR-FRGSX sy-vline
WA_RMCBC_STR-PRNAM sy-vline
WA_RMCBC_STR-POSID sy-vline
WA_RMCBC_STR-LOCNR sy-vline
WA_RMCBC_STR-ABTNR sy-vline
WA_RMCBC_STR-STLTY sy-vline
WA_RMCBC_STR-STLNR sy-vline
WA_RMCBC_STR-CLSZU sy-vline
WA_RMCBC_STR-KNUMH sy-vline
WA_RMCBC_STR-PLNKN sy-vline
WA_RMCBC_STR-POINT sy-vline
WA_RMCBC_STR-MGANR sy-vline
WA_RMCBC_STR-POSNM sy-vline
WA_RMCBC_STR-POSHIVERS sy-vline
WA_RMCBC_STR-BEDAE sy-vline
WA_RMCBC_STR-VERSB sy-vline
WA_RMCBC_STR-PBDNR sy-vline
WA_RMCBC_STR-PDATU sy-vline
WA_RMCBC_STR-APLZL sy-vline
WA_RMCBC_STR-MBLNR sy-vline
WA_RMCBC_STR-MJAHR sy-vline
WA_RMCBC_STR-ZEILE sy-vline
WA_RMCBC_STR-OBKNR sy-vline
WA_RMCBC_STR-RECN sy-vline
WA_RMCBC_STR-ACTN sy-vline
WA_RMCBC_STR-PBLNR sy-vline
WA_RMCBC_STR-ASORT sy-vline
WA_RMCBC_STR-KZWSM sy-vline
WA_RMCBC_STR-SPEC_NO sy-vline
WA_RMCBC_STR-DDI_ID sy-vline
WA_RMCBC_STR-BZOBJ sy-vline
WA_RMCBC_STR-KALNR sy-vline
WA_RMCBC_STR-KALKA sy-vline
WA_RMCBC_STR-KADKY sy-vline
WA_RMCBC_STR-TVERS sy-vline
WA_RMCBC_STR-BWVAR sy-vline
WA_RMCBC_STR-KKZMA sy-vline
WA_RMCBC_STR-MODEL_VAL sy-vline
WA_RMCBC_STR-DOKOB sy-vline
WA_RMCBC_STR-OBZAE sy-vline
WA_RMCBC_STR-GNTYP sy-vline
WA_RMCBC_STR-PMSOG sy-vline
WA_RMCBC_STR-LONGTEXT_ID sy-vline
WA_RMCBC_STR-FIPEX sy-vline
WA_RMCBC_STR-RANL sy-vline
WA_RMCBC_STR-VGBEL sy-vline
WA_RMCBC_STR-VGPOS sy-vline
WA_RMCBC_STR-VGTYP sy-vline
WA_RMCBC_STR-VGSYS sy-vline
WA_RMCBC_STR-BICSELVARIANT sy-vline
WA_RMCBC_STR-SEALNR sy-vline
WA_RMCBC_STR-DATE_TO sy-vline
WA_RMCBC_STR-SEQNR sy-vline
WA_RMCBC_STR-CU_ID sy-vline
WA_RMCBC_STR-CUGUID sy-vline
WA_RMCBC_STR-PLVAR sy-vline
WA_RMCBC_STR-OTYPE sy-vline
WA_RMCBC_STR-OBJID sy-vline
WA_RMCBC_STR-VKORG sy-vline
WA_RMCBC_STR-VTWEG sy-vline
WA_RMCBC_STR-WARPL sy-vline
WA_RMCBC_STR-CLAIM sy-vline
WA_RMCBC_STR-CCEVENT sy-vline
WA_RMCBC_STR-SERVCATID sy-vline
WA_RMCBC_STR-PNGUID sy-vline
WA_RMCBC_STR-PVGUID sy-vline
WA_RMCBC_STR-AENNR2 sy-vline
WA_RMCBC_STR-OUTID sy-vline
WA_RMCBC_STR-OUTPO sy-vline
WA_RMCBC_STR-JCPOS sy-vline
WA_RMCBC_STR-REFTY sy-vline
WA_RMCBC_STR-J_3GKATAL sy-vline
WA_RMCBC_STR-J_3GAUSGJ sy-vline
WA_RMCBC_STR-J_3GKATNRC sy-vline
WA_RMCBC_STR-J_3GTPLKZ sy-vline
WA_RMCBC_STR-J_3GLFDNR sy-vline
WA_RMCBC_STR-J_3GKATNRS sy-vline
WA_RMCBC_STR-J_3GDATBI sy-vline
WA_RMCBC_STR-J_3GPOSNR sy-vline
WA_RMCBC_STR-J_3GKATNRP sy-vline
WA_RMCBC_STR-J_3GOBTXT sy-vline
WA_RMCBC_STR-J_3GSTLNR sy-vline
WA_RMCBC_STR-J_3GPOSNRI sy-vline
WA_RMCBC_STR-PPV_ID sy-vline
WA_RMCBC_STR-CHSTCNT sy-vline
WA_RMCBC_STR-CLA_OBJNO sy-vline
WA_RMCBC_STR-LINE_SEQNO sy-vline
WA_RMCBC_STR-TRIALID sy-vline
WA_RMCBC_STR-VGUID sy-vline
WA_RMCBC_STR-TKONN sy-vline
WA_RMCBC_STR-TPOSN sy-vline
WA_RMCBC_STR-MATID sy-vline
WA_RMCBC_STR-VERSION sy-vline
WA_RMCBC_STR-RESUID sy-vline
WA_RMCBC_STR-COMPONENT_ID sy-vline
WA_RMCBC_STR-OBJECT_TYP sy-vline
WA_RMCBC_STR-CONDITION_ID sy-vline
WA_RMCBC_STR-OBJ_USAGE sy-vline
WA_RMCBC_STR-LINE_NO sy-vline
WA_RMCBC_STR-INFNR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.