ABAP Select data from SAP table J_3GBELP_S 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 J_3GBELP_S 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 J_3GBELP_S. 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 J_3GBELP_S 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_J_3GBELP_S TYPE STANDARD TABLE OF J_3GBELP_S,
WA_J_3GBELP_S TYPE J_3GBELP_S,
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: <J_3GBELP_S> TYPE J_3GBELP_S.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_J_3GBELP_S.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM J_3GBELP_S
INTO TABLE IT_J_3GBELP_S.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM J_3GBELP_S
* INTO TABLE @DATA(IT_J_3GBELP_S2).
*--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_J_3GBELP_S INDEX 1 INTO DATA(WA_J_3GBELP_S2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_J_3GBELP_S ASSIGNING <J_3GBELP_S>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<J_3GBELP_S>-MANDT = 1.
<J_3GBELP_S>-J_3GBELNRI = 1.
<J_3GBELP_S>-J_3GPOSNRI = 1.
<J_3GBELP_S>-J_3GUPOSNR = 1.
<J_3GBELP_S>-ERNAM = 1.
ENDLOOP. LOOP AT IT_J_3GBELP_S INTO WA_J_3GBELP_S. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_J_3GBELP_S-ERZET, sy-vline,
WA_J_3GBELP_S-ERDAT, sy-vline,
WA_J_3GBELP_S-UNAME, sy-vline,
WA_J_3GBELP_S-AEZET, sy-vline,
WA_J_3GBELP_S-AEDTM, sy-vline,
WA_J_3GBELP_S-J_3GABSEND, sy-vline.
ENDLOOP. *Add any further fields from structure WA_J_3GBELP_S 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_J_3GBELP_S 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_J_3GBELP_S INTO WA_J_3GBELP_S. *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 J_3GBELNRI CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GBELNRI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GBELNRI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GABSEND CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSEND IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSEND.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSP, internal->external for field J_3GABSPSP CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSPSP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSPSP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit KONPD, internal->external for field J_3GABSPRO CALL FUNCTION 'CONVERSION_EXIT_KONPD_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSPRO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSPRO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GABSKOS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSKOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSKOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GABSACO CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSACO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSACO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GABSAPM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSAPM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSAPM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GABSEXT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSEXT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSEXT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GABSDEB CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSDEB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSDEB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPFAE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPFAE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPFAE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSP, internal->external for field J_3GEMPPSP CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPPSP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPPSP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit KONPD, internal->external for field J_3GEMPPRO CALL FUNCTION 'CONVERSION_EXIT_KONPD_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPPRO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPPRO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPKOS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPKOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPKOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPACO CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPACO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPACO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPAPM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPAPM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPAPM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPEXT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPEXT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPEXT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPDEB CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPDEB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPDEB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GMITTLE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMITTLE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMITTLE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSP, internal->external for field J_3GMITPSP CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMITPSP IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMITPSP.
WRITE:/ 'New Value:', ld_input.
*Conversion exit KONPD, internal->external for field J_3GMITPRO CALL FUNCTION 'CONVERSION_EXIT_KONPD_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMITPRO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMITPRO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GMITKOS CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMITKOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMITKOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GMITACO CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMITACO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMITACO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GMITAPM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMITAPM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMITAPM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPPER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPPER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPPER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field EQUNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-EQUNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-EQUNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GBELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GBELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GBELNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field J_3GMEINS CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMEINS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMEINS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field J_3GMEINS2 CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMEINS2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMEINS2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GVBELNE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GVBELNE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GVBELNE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field EQUNR2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-EQUNR2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-EQUNR2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_J_3GBELP_S-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-MATNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GBESTEM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GBESTEM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GBESTEM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GIMPT1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GIMPT1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GIMPT1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GIMPT2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GIMPT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GIMPT2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GMDOCM1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMDOCM1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMDOCM1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GMDOCM2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GMDOCM2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GMDOCM2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field USE04 CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_J_3GBELP_S-USE04 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-USE04.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field USE05 CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_J_3GBELP_S-USE05 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-USE05.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VNAME CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-VNAME IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-VNAME.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-RECID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-RECID.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ETYPE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-ETYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-ETYPE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field JV_OTYPE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-JV_OTYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-JV_OTYPE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field FERC_IND CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-FERC_IND IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-FERC_IND.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field J_3GGEWEI CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GGEWEI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GGEWEI.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GPKOSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GPKOSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GPKOSTL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field /SAPCEM/BDNUM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-/SAPCEM/BDNUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-/SAPCEM/BDNUM.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GABSNPLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSNPLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSNPLNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit NUMCV, internal->external for field J_3GABSVORNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GABSVORNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GABSVORNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field J_3GEMPNPLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPNPLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPNPLNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit NUMCV, internal->external for field J_3GEMPVORNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_J_3GBELP_S-J_3GEMPVORNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-J_3GEMPVORNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field /SAPCEM/AUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_J_3GBELP_S-/SAPCEM/AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-/SAPCEM/AUFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit NUMCV, internal->external for field /SAPCEM/VORNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_J_3GBELP_S-/SAPCEM/VORNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-/SAPCEM/VORNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit NUMCV, internal->external for field /SAPCEM/UVORN CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_J_3GBELP_S-/SAPCEM/UVORN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_J_3GBELP_S-/SAPCEM/UVORN.
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_J_3GBELP_S_STR,
MANDT TYPE STRING,
J_3GBELNRI TYPE STRING,
J_3GPOSNRI TYPE STRING,
J_3GUPOSNR TYPE STRING,
ERNAM TYPE STRING,
ERZET TYPE STRING,
ERDAT TYPE STRING,
UNAME TYPE STRING,
AEZET TYPE STRING,
AEDTM TYPE STRING,
J_3GABSEND TYPE STRING,
J_3GABSREF TYPE STRING,
J_3GABSPSP TYPE STRING,
J_3GABSPRO TYPE STRING,
J_3GABSKOS TYPE STRING,
J_3GABSKOK TYPE STRING,
J_3GABSACO TYPE STRING,
J_3GABSAPM TYPE STRING,
J_3GABSWRK TYPE STRING,
J_3GABSLAG TYPE STRING,
J_3GABSEXT TYPE STRING,
J_3GABSDEB TYPE STRING,
J_3GEMPFAE TYPE STRING,
J_3GEMPREF TYPE STRING,
J_3GEMPPSP TYPE STRING,
J_3GEMPPRO TYPE STRING,
J_3GEMPKOS TYPE STRING,
J_3GEMPKOK TYPE STRING,
J_3GEMPACO TYPE STRING,
J_3GEMPAPM TYPE STRING,
J_3GEMPWRK TYPE STRING,
J_3GEMPLAG TYPE STRING,
J_3GEMPEXT TYPE STRING,
J_3GEMPDEB TYPE STRING,
J_3GMITTLE TYPE STRING,
J_3GMITREF TYPE STRING,
J_3GMITPSP TYPE STRING,
J_3GMITPRO TYPE STRING,
J_3GMITKOS TYPE STRING,
J_3GMITKOK TYPE STRING,
J_3GMITACO TYPE STRING,
J_3GMITAPM TYPE STRING,
J_3GMITWRK TYPE STRING,
J_3GMITLAG TYPE STRING,
J_3GFREMDP TYPE STRING,
PERNR TYPE STRING,
NACHN TYPE STRING,
J_3GEMPPER TYPE STRING,
J_3GBELSTA TYPE STRING,
J_3GPIABS TYPE STRING,
J_3GPEABS TYPE STRING,
J_3GPIEMPF TYPE STRING,
J_3GPEEMPS TYPE STRING,
J_3GBETR1 TYPE STRING,
J_3GBETR2 TYPE STRING,
J_3GBETR3 TYPE STRING,
J_3GBETR4 TYPE STRING,
J_3GWAERS1 TYPE STRING,
J_3GWAERS2 TYPE STRING,
J_3GWAERS3 TYPE STRING,
J_3GWAERS4 TYPE STRING,
J_3GFAKTAB TYPE STRING,
J_3GFAKTEM TYPE STRING,
EQUNR TYPE STRING,
J_3GTPLKZ TYPE STRING,
J_3GKATNRC TYPE STRING,
LFDNR TYPE STRING,
J_3GDOMLMB TYPE STRING,
J_3GDOMMB TYPE STRING,
J_3GBELNR TYPE STRING,
J_3GPOSNR TYPE STRING,
J_3GGRUND TYPE STRING,
J_3GLFDNR TYPE STRING,
J_3GLVART TYPE STRING,
J_3GMENGE TYPE STRING,
J_3GMEINS TYPE STRING,
J_3GMENGE2 TYPE STRING,
J_3GMEINS2 TYPE STRING,
J_3GKZLATR TYPE STRING,
J_3GVBELNE TYPE STRING,
EQUNR2 TYPE STRING,
J_3GKZMENG TYPE STRING,
MATNR TYPE STRING,
J_3GGENSTA TYPE STRING,
J_3GKZFRIS TYPE STRING,
J_3GEINEND TYPE STRING,
J_3GDATLAB TYPE STRING,
J_3GKZLADI TYPE STRING,
J_3GKZLADE TYPE STRING,
J_3GKZBERG TYPE STRING,
J_3GBESTEM TYPE STRING,
J_3GKZSPIL TYPE STRING,
J_3GKZSPEL TYPE STRING,
J_3GKZSPIB TYPE STRING,
J_3GKZSPEB TYPE STRING,
J_3GKZLVOI TYPE STRING,
J_3GKZLVOE TYPE STRING,
J_3GUMVERI TYPE STRING,
J_3GUMVERE TYPE STRING,
J_3GIMPT1 TYPE STRING,
J_3GIMPT2 TYPE STRING,
J_3GMPOBJ TYPE STRING,
J_3GMPBEG1 TYPE STRING,
J_3GMPEND1 TYPE STRING,
J_3GCDIFF TYPE STRING,
J_3GMDOCM1 TYPE STRING,
J_3GMDOCM2 TYPE STRING,
J_3GIDATE TYPE STRING,
J_3GITIME TYPE STRING,
J_3GBELSTE TYPE STRING,
SLWID TYPE STRING,
USR00 TYPE STRING,
USR01 TYPE STRING,
USR02 TYPE STRING,
USR03 TYPE STRING,
USR04 TYPE STRING,
USE04 TYPE STRING,
USR05 TYPE STRING,
USE05 TYPE STRING,
USR06 TYPE STRING,
USE06 TYPE STRING,
USR07 TYPE STRING,
USE07 TYPE STRING,
USR08 TYPE STRING,
USR09 TYPE STRING,
USR10 TYPE STRING,
USR11 TYPE STRING,
VNAME TYPE STRING,
RECID TYPE STRING,
ETYPE TYPE STRING,
JV_OTYPE TYPE STRING,
JV_JIBCL TYPE STRING,
JV_JIBSA TYPE STRING,
JV_OCO TYPE STRING,
DUMMY_AFVU_INCL_EEW_PS TYPE STRING,
SPARAMETER1 TYPE STRING,
SPARAMETER2 TYPE STRING,
SPARAMETER3 TYPE STRING,
ILART_OP TYPE STRING,
FERC_IND TYPE STRING,
J_3GVVCOM1 TYPE STRING,
J_3GVVCOM2 TYPE STRING,
J_3GGEWICHT TYPE STRING,
J_3GGEWEI TYPE STRING,
J_3GPAKKENN TYPE STRING,
CHARGE TYPE STRING,
J_3GPKOKRS TYPE STRING,
J_3GPKOSTL TYPE STRING,
J_3GRESTYP TYPE STRING,
J_3GLVART_WL TYPE STRING,
J_3GBFART TYPE STRING,
/SAPCEM/BDNUM TYPE STRING,
/SAPCEM/BDPOS TYPE STRING,
/SAPCEM/FRISTDAT TYPE STRING,
J_3GEMP_CHARGE TYPE STRING,
RSNUM TYPE STRING,
RSPOS TYPE STRING,
J_3GABSNPLNR TYPE STRING,
J_3GABSVORNR TYPE STRING,
J_3GEMPNPLNR TYPE STRING,
J_3GEMPVORNR TYPE STRING,
RUECK TYPE STRING,
RMZHL TYPE STRING,
/SAPCEM/BDENDU TYPE STRING,
BEDID TYPE STRING,
BEDZL TYPE STRING,
CANUM TYPE STRING,
/SAPCEM/AUFNR TYPE STRING,
/SAPCEM/VORNR TYPE STRING,
/SAPCEM/UVORN TYPE STRING,
UPDKZ TYPE STRING,
MARK TYPE STRING,END OF T_EKKO_STR. DATA: WA_J_3GBELP_S_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_J_3GBELP_S_STR-MANDT sy-vline
WA_J_3GBELP_S_STR-J_3GBELNRI sy-vline
WA_J_3GBELP_S_STR-J_3GPOSNRI sy-vline
WA_J_3GBELP_S_STR-J_3GUPOSNR sy-vline
WA_J_3GBELP_S_STR-ERNAM sy-vline
WA_J_3GBELP_S_STR-ERZET sy-vline
WA_J_3GBELP_S_STR-ERDAT sy-vline
WA_J_3GBELP_S_STR-UNAME sy-vline
WA_J_3GBELP_S_STR-AEZET sy-vline
WA_J_3GBELP_S_STR-AEDTM sy-vline
WA_J_3GBELP_S_STR-J_3GABSEND sy-vline
WA_J_3GBELP_S_STR-J_3GABSREF sy-vline
WA_J_3GBELP_S_STR-J_3GABSPSP sy-vline
WA_J_3GBELP_S_STR-J_3GABSPRO sy-vline
WA_J_3GBELP_S_STR-J_3GABSKOS sy-vline
WA_J_3GBELP_S_STR-J_3GABSKOK sy-vline
WA_J_3GBELP_S_STR-J_3GABSACO sy-vline
WA_J_3GBELP_S_STR-J_3GABSAPM sy-vline
WA_J_3GBELP_S_STR-J_3GABSWRK sy-vline
WA_J_3GBELP_S_STR-J_3GABSLAG sy-vline
WA_J_3GBELP_S_STR-J_3GABSEXT sy-vline
WA_J_3GBELP_S_STR-J_3GABSDEB sy-vline
WA_J_3GBELP_S_STR-J_3GEMPFAE sy-vline
WA_J_3GBELP_S_STR-J_3GEMPREF sy-vline
WA_J_3GBELP_S_STR-J_3GEMPPSP sy-vline
WA_J_3GBELP_S_STR-J_3GEMPPRO sy-vline
WA_J_3GBELP_S_STR-J_3GEMPKOS sy-vline
WA_J_3GBELP_S_STR-J_3GEMPKOK sy-vline
WA_J_3GBELP_S_STR-J_3GEMPACO sy-vline
WA_J_3GBELP_S_STR-J_3GEMPAPM sy-vline
WA_J_3GBELP_S_STR-J_3GEMPWRK sy-vline
WA_J_3GBELP_S_STR-J_3GEMPLAG sy-vline
WA_J_3GBELP_S_STR-J_3GEMPEXT sy-vline
WA_J_3GBELP_S_STR-J_3GEMPDEB sy-vline
WA_J_3GBELP_S_STR-J_3GMITTLE sy-vline
WA_J_3GBELP_S_STR-J_3GMITREF sy-vline
WA_J_3GBELP_S_STR-J_3GMITPSP sy-vline
WA_J_3GBELP_S_STR-J_3GMITPRO sy-vline
WA_J_3GBELP_S_STR-J_3GMITKOS sy-vline
WA_J_3GBELP_S_STR-J_3GMITKOK sy-vline
WA_J_3GBELP_S_STR-J_3GMITACO sy-vline
WA_J_3GBELP_S_STR-J_3GMITAPM sy-vline
WA_J_3GBELP_S_STR-J_3GMITWRK sy-vline
WA_J_3GBELP_S_STR-J_3GMITLAG sy-vline
WA_J_3GBELP_S_STR-J_3GFREMDP sy-vline
WA_J_3GBELP_S_STR-PERNR sy-vline
WA_J_3GBELP_S_STR-NACHN sy-vline
WA_J_3GBELP_S_STR-J_3GEMPPER sy-vline
WA_J_3GBELP_S_STR-J_3GBELSTA sy-vline
WA_J_3GBELP_S_STR-J_3GPIABS sy-vline
WA_J_3GBELP_S_STR-J_3GPEABS sy-vline
WA_J_3GBELP_S_STR-J_3GPIEMPF sy-vline
WA_J_3GBELP_S_STR-J_3GPEEMPS sy-vline
WA_J_3GBELP_S_STR-J_3GBETR1 sy-vline
WA_J_3GBELP_S_STR-J_3GBETR2 sy-vline
WA_J_3GBELP_S_STR-J_3GBETR3 sy-vline
WA_J_3GBELP_S_STR-J_3GBETR4 sy-vline
WA_J_3GBELP_S_STR-J_3GWAERS1 sy-vline
WA_J_3GBELP_S_STR-J_3GWAERS2 sy-vline
WA_J_3GBELP_S_STR-J_3GWAERS3 sy-vline
WA_J_3GBELP_S_STR-J_3GWAERS4 sy-vline
WA_J_3GBELP_S_STR-J_3GFAKTAB sy-vline
WA_J_3GBELP_S_STR-J_3GFAKTEM sy-vline
WA_J_3GBELP_S_STR-EQUNR sy-vline
WA_J_3GBELP_S_STR-J_3GTPLKZ sy-vline
WA_J_3GBELP_S_STR-J_3GKATNRC sy-vline
WA_J_3GBELP_S_STR-LFDNR sy-vline
WA_J_3GBELP_S_STR-J_3GDOMLMB sy-vline
WA_J_3GBELP_S_STR-J_3GDOMMB sy-vline
WA_J_3GBELP_S_STR-J_3GBELNR sy-vline
WA_J_3GBELP_S_STR-J_3GPOSNR sy-vline
WA_J_3GBELP_S_STR-J_3GGRUND sy-vline
WA_J_3GBELP_S_STR-J_3GLFDNR sy-vline
WA_J_3GBELP_S_STR-J_3GLVART sy-vline
WA_J_3GBELP_S_STR-J_3GMENGE sy-vline
WA_J_3GBELP_S_STR-J_3GMEINS sy-vline
WA_J_3GBELP_S_STR-J_3GMENGE2 sy-vline
WA_J_3GBELP_S_STR-J_3GMEINS2 sy-vline
WA_J_3GBELP_S_STR-J_3GKZLATR sy-vline
WA_J_3GBELP_S_STR-J_3GVBELNE sy-vline
WA_J_3GBELP_S_STR-EQUNR2 sy-vline
WA_J_3GBELP_S_STR-J_3GKZMENG sy-vline
WA_J_3GBELP_S_STR-MATNR sy-vline
WA_J_3GBELP_S_STR-J_3GGENSTA sy-vline
WA_J_3GBELP_S_STR-J_3GKZFRIS sy-vline
WA_J_3GBELP_S_STR-J_3GEINEND sy-vline
WA_J_3GBELP_S_STR-J_3GDATLAB sy-vline
WA_J_3GBELP_S_STR-J_3GKZLADI sy-vline
WA_J_3GBELP_S_STR-J_3GKZLADE sy-vline
WA_J_3GBELP_S_STR-J_3GKZBERG sy-vline
WA_J_3GBELP_S_STR-J_3GBESTEM sy-vline
WA_J_3GBELP_S_STR-J_3GKZSPIL sy-vline
WA_J_3GBELP_S_STR-J_3GKZSPEL sy-vline
WA_J_3GBELP_S_STR-J_3GKZSPIB sy-vline
WA_J_3GBELP_S_STR-J_3GKZSPEB sy-vline
WA_J_3GBELP_S_STR-J_3GKZLVOI sy-vline
WA_J_3GBELP_S_STR-J_3GKZLVOE sy-vline
WA_J_3GBELP_S_STR-J_3GUMVERI sy-vline
WA_J_3GBELP_S_STR-J_3GUMVERE sy-vline
WA_J_3GBELP_S_STR-J_3GIMPT1 sy-vline
WA_J_3GBELP_S_STR-J_3GIMPT2 sy-vline
WA_J_3GBELP_S_STR-J_3GMPOBJ sy-vline
WA_J_3GBELP_S_STR-J_3GMPBEG1 sy-vline
WA_J_3GBELP_S_STR-J_3GMPEND1 sy-vline
WA_J_3GBELP_S_STR-J_3GCDIFF sy-vline
WA_J_3GBELP_S_STR-J_3GMDOCM1 sy-vline
WA_J_3GBELP_S_STR-J_3GMDOCM2 sy-vline
WA_J_3GBELP_S_STR-J_3GIDATE sy-vline
WA_J_3GBELP_S_STR-J_3GITIME sy-vline
WA_J_3GBELP_S_STR-J_3GBELSTE sy-vline
WA_J_3GBELP_S_STR-SLWID sy-vline
WA_J_3GBELP_S_STR-USR00 sy-vline
WA_J_3GBELP_S_STR-USR01 sy-vline
WA_J_3GBELP_S_STR-USR02 sy-vline
WA_J_3GBELP_S_STR-USR03 sy-vline
WA_J_3GBELP_S_STR-USR04 sy-vline
WA_J_3GBELP_S_STR-USE04 sy-vline
WA_J_3GBELP_S_STR-USR05 sy-vline
WA_J_3GBELP_S_STR-USE05 sy-vline
WA_J_3GBELP_S_STR-USR06 sy-vline
WA_J_3GBELP_S_STR-USE06 sy-vline
WA_J_3GBELP_S_STR-USR07 sy-vline
WA_J_3GBELP_S_STR-USE07 sy-vline
WA_J_3GBELP_S_STR-USR08 sy-vline
WA_J_3GBELP_S_STR-USR09 sy-vline
WA_J_3GBELP_S_STR-USR10 sy-vline
WA_J_3GBELP_S_STR-USR11 sy-vline
WA_J_3GBELP_S_STR-VNAME sy-vline
WA_J_3GBELP_S_STR-RECID sy-vline
WA_J_3GBELP_S_STR-ETYPE sy-vline
WA_J_3GBELP_S_STR-JV_OTYPE sy-vline
WA_J_3GBELP_S_STR-JV_JIBCL sy-vline
WA_J_3GBELP_S_STR-JV_JIBSA sy-vline
WA_J_3GBELP_S_STR-JV_OCO sy-vline
WA_J_3GBELP_S_STR-DUMMY_AFVU_INCL_EEW_PS sy-vline
WA_J_3GBELP_S_STR-SPARAMETER1 sy-vline
WA_J_3GBELP_S_STR-SPARAMETER2 sy-vline
WA_J_3GBELP_S_STR-SPARAMETER3 sy-vline
WA_J_3GBELP_S_STR-ILART_OP sy-vline
WA_J_3GBELP_S_STR-FERC_IND sy-vline
WA_J_3GBELP_S_STR-J_3GVVCOM1 sy-vline
WA_J_3GBELP_S_STR-J_3GVVCOM2 sy-vline
WA_J_3GBELP_S_STR-J_3GGEWICHT sy-vline
WA_J_3GBELP_S_STR-J_3GGEWEI sy-vline
WA_J_3GBELP_S_STR-J_3GPAKKENN sy-vline
WA_J_3GBELP_S_STR-CHARGE sy-vline
WA_J_3GBELP_S_STR-J_3GPKOKRS sy-vline
WA_J_3GBELP_S_STR-J_3GPKOSTL sy-vline
WA_J_3GBELP_S_STR-J_3GRESTYP sy-vline
WA_J_3GBELP_S_STR-J_3GLVART_WL sy-vline
WA_J_3GBELP_S_STR-J_3GBFART sy-vline
WA_J_3GBELP_S_STR-/SAPCEM/BDNUM sy-vline
WA_J_3GBELP_S_STR-/SAPCEM/BDPOS sy-vline
WA_J_3GBELP_S_STR-/SAPCEM/FRISTDAT sy-vline
WA_J_3GBELP_S_STR-J_3GEMP_CHARGE sy-vline
WA_J_3GBELP_S_STR-RSNUM sy-vline
WA_J_3GBELP_S_STR-RSPOS sy-vline
WA_J_3GBELP_S_STR-J_3GABSNPLNR sy-vline
WA_J_3GBELP_S_STR-J_3GABSVORNR sy-vline
WA_J_3GBELP_S_STR-J_3GEMPNPLNR sy-vline
WA_J_3GBELP_S_STR-J_3GEMPVORNR sy-vline
WA_J_3GBELP_S_STR-RUECK sy-vline
WA_J_3GBELP_S_STR-RMZHL sy-vline
WA_J_3GBELP_S_STR-/SAPCEM/BDENDU sy-vline
WA_J_3GBELP_S_STR-BEDID sy-vline
WA_J_3GBELP_S_STR-BEDZL sy-vline
WA_J_3GBELP_S_STR-CANUM sy-vline
WA_J_3GBELP_S_STR-/SAPCEM/AUFNR sy-vline
WA_J_3GBELP_S_STR-/SAPCEM/VORNR sy-vline
WA_J_3GBELP_S_STR-/SAPCEM/UVORN sy-vline
WA_J_3GBELP_S_STR-UPDKZ sy-vline
WA_J_3GBELP_S_STR-MARK sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
