ABAP Select data from SAP table REGUP_S_1821_PRL 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 REGUP_S_1821_PRL 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 REGUP_S_1821_PRL. 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 REGUP_S_1821_PRL 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_REGUP_S_1821_PRL TYPE STANDARD TABLE OF REGUP_S_1821_PRL,
WA_REGUP_S_1821_PRL TYPE REGUP_S_1821_PRL,
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: <REGUP_S_1821_PRL> TYPE REGUP_S_1821_PRL.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_REGUP_S_1821_PRL.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM REGUP_S_1821_PRL
INTO TABLE IT_REGUP_S_1821_PRL.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM REGUP_S_1821_PRL
* INTO TABLE @DATA(IT_REGUP_S_1821_PRL2).
*--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_REGUP_S_1821_PRL INDEX 1 INTO DATA(WA_REGUP_S_1821_PRL2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_REGUP_S_1821_PRL ASSIGNING <REGUP_S_1821_PRL>.
*To update a field value using a field symbol simply change the value via the field symbol pointer<REGUP_S_1821_PRL>-HEADER_1821_PRL = 1.
<REGUP_S_1821_PRL>-ZBUKR = 1.
<REGUP_S_1821_PRL>-ABSBU = 1.
<REGUP_S_1821_PRL>-LIFNR = 1.
<REGUP_S_1821_PRL>-KUNNR = 1.
ENDLOOP. LOOP AT IT_REGUP_S_1821_PRL INTO WA_REGUP_S_1821_PRL. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_REGUP_S_1821_PRL-EMPFG, sy-vline,
WA_REGUP_S_1821_PRL-WAERS, sy-vline,
WA_REGUP_S_1821_PRL-ZLSCH, sy-vline,
WA_REGUP_S_1821_PRL-HBKID, sy-vline,
WA_REGUP_S_1821_PRL-HKTID, sy-vline,
WA_REGUP_S_1821_PRL-BVTYP, sy-vline.
ENDLOOP. *Add any further fields from structure WA_REGUP_S_1821_PRL 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_REGUP_S_1821_PRL 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_REGUP_S_1821_PRL INTO WA_REGUP_S_1821_PRL. *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 LIFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-LIFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-LIFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KUNNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-KUNNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-KUNNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field REBZG CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-REBZG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-REBZG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field REBZJ CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-REBZJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-REBZJ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field LIFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-LIFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-LIFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KUNNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-KUNNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-KUNNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VBLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-VBLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-VBLNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field BELNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-BELNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-BELNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-GJAHR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field FILKD CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-FILKD IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-FILKD.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field HKONT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-HKONT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-HKONT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SAKNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-SAKNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-SAKNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DMBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMBTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field WRBTR CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-WRBTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-WRBTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field BDIFF CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-BDIFF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-BDIFF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MWSTS CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-MWSTS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-MWSTS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field WMWST CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-WMWST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-WMWST.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMBT1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMBT1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMBT1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field WRBT1 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-WRBT1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-WRBT1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMBT2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMBT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMBT2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field WRBT2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-WRBT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-WRBT2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMBT3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMBT3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMBT3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field WRBT3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-WRBT3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-WRBT3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKFBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-SKFBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-SKFBT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKNTO CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-SKNTO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-SKNTO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field WSKTO CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-WSKTO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-WSKTO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field QSSHB CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-QSSHB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-QSSHB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field QBSHB CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-QBSHB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-QBSHB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field QBSHH CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-QBSHH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-QBSHH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ESRRE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-ESRRE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-ESRRE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MSHBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-MSHBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-MSHBT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MSFBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-MSFBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-MSFBT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AUFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-AUFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-AUFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN1 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-ANLN1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-ANLN1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ANLN2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-ANLN2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-ANLN2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field EBELN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-EBELN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-EBELN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VBUND CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-VBUND IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-VBUND.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field BDIF2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-BDIF2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-BDIF2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DSKVH CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DSKVH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DSKVH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit FMCIS, internal->external for field FIPOS CALL FUNCTION 'CONVERSION_EXIT_FMCIS_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-FIPOS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-FIPOS.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSP, internal->external for field PROJK CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PROJK IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PROJK.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field NPLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-NPLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-NPLNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field BDIF3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-BDIF3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-BDIF3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DMBE2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMBE2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMBE2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field DMBE3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMBE3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMBE3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MWST2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-MWST2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-MWST2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKNT2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-SKNT2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-SKNT2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field SKNT3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-SKNT3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-SKNT3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field QBSH2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-QBSH2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-QBSH2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field QBSH3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-QBSH3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-QBSH3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB21 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMB21 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMB21.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB22 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMB22 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMB22.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB23 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMB23 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMB23.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB31 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMB31 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMB31.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB32 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMB32 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMB32.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field DMB33 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-DMB33 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-DMB33.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field MWST3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-MWST3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-MWST3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field OSKTO CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-OSKTO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-OSKTO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VERTN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-VERTN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-VERTN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit IMKEY, internal->external for field IMKEY CALL FUNCTION 'CONVERSION_EXIT_IMKEY_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-IMKEY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-IMKEY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field REBZG CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-REBZG IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-REBZG.
WRITE:/ 'New Value:', ld_input.
*Conversion exit GJAHR, internal->external for field REBZJ CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-REBZJ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-REBZJ.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KOSTL CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-KOSTL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-KOSTL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field VBEL2 CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-VBEL2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-VBEL2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field EMPFB CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-EMPFB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-EMPFB.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PRCTR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PRCTR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PRCTR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PSWBT CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PSWBT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PSWBT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field PSSKT CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PSSKT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PSSKT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field GDIFF CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-GDIFF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-GDIFF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field GDIF2 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-GDIF2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-GDIF2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AC132, internal->external for field GDIF3 CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-GDIF3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-GDIF3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KBLNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-KBLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-KBLNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KEYNO CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-KEYNO IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-KEYNO.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PAMTF CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PAMTF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PAMTF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PENLC1 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PENLC1 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PENLC1.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PENLC2 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PENLC2 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PENLC2.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PENLC3 CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PENLC3 IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PENLC3.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AU132, internal->external for field PENFC CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PENFC IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PENFC.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PPRCT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-PPRCT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-PPRCT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field GRANT_NBR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_REGUP_S_1821_PRL-GRANT_NBR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_REGUP_S_1821_PRL-GRANT_NBR.
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_REGUP_S_1821_PRL_STR,
HEADER_1821_PRL TYPE STRING,
ZBUKR TYPE STRING,
ABSBU TYPE STRING,
LIFNR TYPE STRING,
KUNNR TYPE STRING,
EMPFG TYPE STRING,
WAERS TYPE STRING,
ZLSCH TYPE STRING,
HBKID TYPE STRING,
HKTID TYPE STRING,
BVTYP TYPE STRING,
SRTGB TYPE STRING,
SRTBP TYPE STRING,
XINVE TYPE STRING,
PAYGR TYPE STRING,
UZAWE TYPE STRING,
DTWS1 TYPE STRING,
DTWS2 TYPE STRING,
DTWS3 TYPE STRING,
DTWS4 TYPE STRING,
PAYT_RSN TYPE STRING,
KIDNO TYPE STRING,
PAYGR_INT TYPE STRING,
REF_TYPE TYPE STRING,
REF_ID TYPE STRING,
MNDID TYPE STRING,
CUP TYPE STRING,
CIG TYPE STRING,
MGO TYPE STRING,
SATZA TYPE STRING,
BUKRS TYPE STRING,
REBZG TYPE STRING,
REBZJ TYPE STRING,
REBZZ TYPE STRING,
XREBZ TYPE STRING,
REGUP TYPE STRING,
MANDT TYPE STRING,
LAUFD TYPE STRING,
LAUFI TYPE STRING,
XVORL TYPE STRING,
ZBUKR TYPE STRING,
LIFNR TYPE STRING,
KUNNR TYPE STRING,
EMPFG TYPE STRING,
VBLNR TYPE STRING,
BUKRS TYPE STRING,
BELNR TYPE STRING,
GJAHR TYPE STRING,
BUZEI TYPE STRING,
FILKD TYPE STRING,
ZLSCH TYPE STRING,
WAERS TYPE STRING,
HBKID TYPE STRING,
BVTYP TYPE STRING,
POKEN TYPE STRING,
XBLNR TYPE STRING,
BLART TYPE STRING,
BUDAT TYPE STRING,
BLDAT TYPE STRING,
KOART TYPE STRING,
BSCHL TYPE STRING,
HKONT TYPE STRING,
SAKNR TYPE STRING,
UMSKZ TYPE STRING,
UMSKS TYPE STRING,
ZUMSK TYPE STRING,
SHKZG TYPE STRING,
DMBTR TYPE STRING,
WRBTR TYPE STRING,
BDIFF TYPE STRING,
GSBER TYPE STRING,
TAX_COUNTRY TYPE STRING,
MWSKZ TYPE STRING,
TXDAT_FROM TYPE STRING,
MWSTS TYPE STRING,
WMWST TYPE STRING,
LWSTS TYPE STRING,
HIST_TAX_FACTOR TYPE STRING,
MWSK1 TYPE STRING,
TXDAT_FROM1 TYPE STRING,
TAX_COUNTRY1 TYPE STRING,
DMBT1 TYPE STRING,
WRBT1 TYPE STRING,
HIST_TAX_FACTOR1 TYPE STRING,
MWSK2 TYPE STRING,
TXDAT_FROM2 TYPE STRING,
TAX_COUNTRY2 TYPE STRING,
DMBT2 TYPE STRING,
WRBT2 TYPE STRING,
HIST_TAX_FACTOR2 TYPE STRING,
MWSK3 TYPE STRING,
TXDAT_FROM3 TYPE STRING,
TAX_COUNTRY3 TYPE STRING,
DMBT3 TYPE STRING,
WRBT3 TYPE STRING,
HIST_TAX_FACTOR3 TYPE STRING,
SGTXT TYPE STRING,
ZFBDT TYPE STRING,
ZTERM TYPE STRING,
ZBD1T TYPE STRING,
ZBD2T TYPE STRING,
ZBD3T TYPE STRING,
ZBD1P TYPE STRING,
ZBD2P TYPE STRING,
SKFBT TYPE STRING,
SKNTO TYPE STRING,
WSKTO TYPE STRING,
ZBFIX TYPE STRING,
ZLSPR TYPE STRING,
SPLEV TYPE STRING,
XREBZ TYPE STRING,
ZOLLT TYPE STRING,
ZOLLD TYPE STRING,
LZBKZ TYPE STRING,
LANDL TYPE STRING,
DIEKZ TYPE STRING,
QSSKZ TYPE STRING,
QSSHB TYPE STRING,
QBSHB TYPE STRING,
QBSHH TYPE STRING,
ESRNR TYPE STRING,
ESRRE TYPE STRING,
ESRPZ TYPE STRING,
ZBDXT TYPE STRING,
ZBDXP TYPE STRING,
MSHBT TYPE STRING,
MSFBT TYPE STRING,
PROJN TYPE STRING,
AUFNR TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
XANET TYPE STRING,
XNETB TYPE STRING,
XNACH TYPE STRING,
ZWELS TYPE STRING,
VBUND TYPE STRING,
STCEG TYPE STRING,
EGBLD TYPE STRING,
EGLLD TYPE STRING,
QSZNR TYPE STRING,
BDIF2 TYPE STRING,
DSKVH TYPE STRING,
POKLA TYPE STRING,
FIPOS TYPE STRING,
PROJK TYPE STRING,
NPLNR TYPE STRING,
AUFPL TYPE STRING,
APLZL TYPE STRING,
XEGDR TYPE STRING,
BDIF3 TYPE STRING,
DMBE2 TYPE STRING,
DMBE3 TYPE STRING,
MWST2 TYPE STRING,
SKNT2 TYPE STRING,
SKNT3 TYPE STRING,
QBSH2 TYPE STRING,
QBSH3 TYPE STRING,
DMB21 TYPE STRING,
DMB22 TYPE STRING,
DMB23 TYPE STRING,
DMB31 TYPE STRING,
DMB32 TYPE STRING,
DMB33 TYPE STRING,
UZAWE TYPE STRING,
MWST3 TYPE STRING,
ZUONR TYPE STRING,
OSKTO TYPE STRING,
VERTN TYPE STRING,
IMKEY TYPE STRING,
REBZT TYPE STRING,
REBZG TYPE STRING,
REBZJ TYPE STRING,
REBZZ TYPE STRING,
KOSTL TYPE STRING,
XINVE TYPE STRING,
VBEL2 TYPE STRING,
VPOS2 TYPE STRING,
ZEKKN TYPE STRING,
POSN2 TYPE STRING,
ETEN2 TYPE STRING,
FISTL TYPE STRING,
GEBER TYPE STRING,
DABRZ TYPE STRING,
KKBER TYPE STRING,
EMPFB TYPE STRING,
PRCTR TYPE STRING,
XREF1 TYPE STRING,
XREF2 TYPE STRING,
XREF3 TYPE STRING,
ZINKZ TYPE STRING,
DTWS1 TYPE STRING,
DTWS2 TYPE STRING,
DTWS3 TYPE STRING,
DTWS4 TYPE STRING,
PAYT_RSN TYPE STRING,
MANSP TYPE STRING,
KIDNO TYPE STRING,
XCPDD TYPE STRING,
VERTT TYPE STRING,
VBEWA TYPE STRING,
AGZEI TYPE STRING,
PSWSL TYPE STRING,
PSWBT TYPE STRING,
PSSKT TYPE STRING,
XPYAM TYPE STRING,
GDIFF TYPE STRING,
GDIF2 TYPE STRING,
GDIF3 TYPE STRING,
BUPLA TYPE STRING,
SECCO TYPE STRING,
XSAEN TYPE STRING,
KBLNR TYPE STRING,
KBLPOS TYPE STRING,
CESSION_KZ TYPE STRING,
KEYNO TYPE STRING,
PAMTF TYPE STRING,
ORIGIN TYPE STRING,
PENLC1 TYPE STRING,
PENLC2 TYPE STRING,
PENLC3 TYPE STRING,
PENFC TYPE STRING,
PENDAYS TYPE STRING,
PPRCT TYPE STRING,
GRANT_NBR TYPE STRING,
FKBER TYPE STRING,
SNAME1 TYPE STRING,
SORT01 TYPE STRING,
SLAND1 TYPE STRING,
SAMNR TYPE STRING,
MABER TYPE STRING,
BUDGET_PD TYPE STRING,
SNAME2 TYPE STRING,
SNAME3 TYPE STRING,
SNAME4 TYPE STRING,
SSTRAS TYPE STRING,
SSTRS2 TYPE STRING,
SPSTLZ TYPE STRING,
SID TYPE STRING,
RSTGR TYPE STRING,
EXTACCOUNT TYPE STRING,END OF T_EKKO_STR. DATA: WA_REGUP_S_1821_PRL_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_REGUP_S_1821_PRL_STR-HEADER_1821_PRL sy-vline
WA_REGUP_S_1821_PRL_STR-ZBUKR sy-vline
WA_REGUP_S_1821_PRL_STR-ABSBU sy-vline
WA_REGUP_S_1821_PRL_STR-LIFNR sy-vline
WA_REGUP_S_1821_PRL_STR-KUNNR sy-vline
WA_REGUP_S_1821_PRL_STR-EMPFG sy-vline
WA_REGUP_S_1821_PRL_STR-WAERS sy-vline
WA_REGUP_S_1821_PRL_STR-ZLSCH sy-vline
WA_REGUP_S_1821_PRL_STR-HBKID sy-vline
WA_REGUP_S_1821_PRL_STR-HKTID sy-vline
WA_REGUP_S_1821_PRL_STR-BVTYP sy-vline
WA_REGUP_S_1821_PRL_STR-SRTGB sy-vline
WA_REGUP_S_1821_PRL_STR-SRTBP sy-vline
WA_REGUP_S_1821_PRL_STR-XINVE sy-vline
WA_REGUP_S_1821_PRL_STR-PAYGR sy-vline
WA_REGUP_S_1821_PRL_STR-UZAWE sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS1 sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS2 sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS3 sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS4 sy-vline
WA_REGUP_S_1821_PRL_STR-PAYT_RSN sy-vline
WA_REGUP_S_1821_PRL_STR-KIDNO sy-vline
WA_REGUP_S_1821_PRL_STR-PAYGR_INT sy-vline
WA_REGUP_S_1821_PRL_STR-REF_TYPE sy-vline
WA_REGUP_S_1821_PRL_STR-REF_ID sy-vline
WA_REGUP_S_1821_PRL_STR-MNDID sy-vline
WA_REGUP_S_1821_PRL_STR-CUP sy-vline
WA_REGUP_S_1821_PRL_STR-CIG sy-vline
WA_REGUP_S_1821_PRL_STR-MGO sy-vline
WA_REGUP_S_1821_PRL_STR-SATZA sy-vline
WA_REGUP_S_1821_PRL_STR-BUKRS sy-vline
WA_REGUP_S_1821_PRL_STR-REBZG sy-vline
WA_REGUP_S_1821_PRL_STR-REBZJ sy-vline
WA_REGUP_S_1821_PRL_STR-REBZZ sy-vline
WA_REGUP_S_1821_PRL_STR-XREBZ sy-vline
WA_REGUP_S_1821_PRL_STR-REGUP sy-vline
WA_REGUP_S_1821_PRL_STR-MANDT sy-vline
WA_REGUP_S_1821_PRL_STR-LAUFD sy-vline
WA_REGUP_S_1821_PRL_STR-LAUFI sy-vline
WA_REGUP_S_1821_PRL_STR-XVORL sy-vline
WA_REGUP_S_1821_PRL_STR-ZBUKR sy-vline
WA_REGUP_S_1821_PRL_STR-LIFNR sy-vline
WA_REGUP_S_1821_PRL_STR-KUNNR sy-vline
WA_REGUP_S_1821_PRL_STR-EMPFG sy-vline
WA_REGUP_S_1821_PRL_STR-VBLNR sy-vline
WA_REGUP_S_1821_PRL_STR-BUKRS sy-vline
WA_REGUP_S_1821_PRL_STR-BELNR sy-vline
WA_REGUP_S_1821_PRL_STR-GJAHR sy-vline
WA_REGUP_S_1821_PRL_STR-BUZEI sy-vline
WA_REGUP_S_1821_PRL_STR-FILKD sy-vline
WA_REGUP_S_1821_PRL_STR-ZLSCH sy-vline
WA_REGUP_S_1821_PRL_STR-WAERS sy-vline
WA_REGUP_S_1821_PRL_STR-HBKID sy-vline
WA_REGUP_S_1821_PRL_STR-BVTYP sy-vline
WA_REGUP_S_1821_PRL_STR-POKEN sy-vline
WA_REGUP_S_1821_PRL_STR-XBLNR sy-vline
WA_REGUP_S_1821_PRL_STR-BLART sy-vline
WA_REGUP_S_1821_PRL_STR-BUDAT sy-vline
WA_REGUP_S_1821_PRL_STR-BLDAT sy-vline
WA_REGUP_S_1821_PRL_STR-KOART sy-vline
WA_REGUP_S_1821_PRL_STR-BSCHL sy-vline
WA_REGUP_S_1821_PRL_STR-HKONT sy-vline
WA_REGUP_S_1821_PRL_STR-SAKNR sy-vline
WA_REGUP_S_1821_PRL_STR-UMSKZ sy-vline
WA_REGUP_S_1821_PRL_STR-UMSKS sy-vline
WA_REGUP_S_1821_PRL_STR-ZUMSK sy-vline
WA_REGUP_S_1821_PRL_STR-SHKZG sy-vline
WA_REGUP_S_1821_PRL_STR-DMBTR sy-vline
WA_REGUP_S_1821_PRL_STR-WRBTR sy-vline
WA_REGUP_S_1821_PRL_STR-BDIFF sy-vline
WA_REGUP_S_1821_PRL_STR-GSBER sy-vline
WA_REGUP_S_1821_PRL_STR-TAX_COUNTRY sy-vline
WA_REGUP_S_1821_PRL_STR-MWSKZ sy-vline
WA_REGUP_S_1821_PRL_STR-TXDAT_FROM sy-vline
WA_REGUP_S_1821_PRL_STR-MWSTS sy-vline
WA_REGUP_S_1821_PRL_STR-WMWST sy-vline
WA_REGUP_S_1821_PRL_STR-LWSTS sy-vline
WA_REGUP_S_1821_PRL_STR-HIST_TAX_FACTOR sy-vline
WA_REGUP_S_1821_PRL_STR-MWSK1 sy-vline
WA_REGUP_S_1821_PRL_STR-TXDAT_FROM1 sy-vline
WA_REGUP_S_1821_PRL_STR-TAX_COUNTRY1 sy-vline
WA_REGUP_S_1821_PRL_STR-DMBT1 sy-vline
WA_REGUP_S_1821_PRL_STR-WRBT1 sy-vline
WA_REGUP_S_1821_PRL_STR-HIST_TAX_FACTOR1 sy-vline
WA_REGUP_S_1821_PRL_STR-MWSK2 sy-vline
WA_REGUP_S_1821_PRL_STR-TXDAT_FROM2 sy-vline
WA_REGUP_S_1821_PRL_STR-TAX_COUNTRY2 sy-vline
WA_REGUP_S_1821_PRL_STR-DMBT2 sy-vline
WA_REGUP_S_1821_PRL_STR-WRBT2 sy-vline
WA_REGUP_S_1821_PRL_STR-HIST_TAX_FACTOR2 sy-vline
WA_REGUP_S_1821_PRL_STR-MWSK3 sy-vline
WA_REGUP_S_1821_PRL_STR-TXDAT_FROM3 sy-vline
WA_REGUP_S_1821_PRL_STR-TAX_COUNTRY3 sy-vline
WA_REGUP_S_1821_PRL_STR-DMBT3 sy-vline
WA_REGUP_S_1821_PRL_STR-WRBT3 sy-vline
WA_REGUP_S_1821_PRL_STR-HIST_TAX_FACTOR3 sy-vline
WA_REGUP_S_1821_PRL_STR-SGTXT sy-vline
WA_REGUP_S_1821_PRL_STR-ZFBDT sy-vline
WA_REGUP_S_1821_PRL_STR-ZTERM sy-vline
WA_REGUP_S_1821_PRL_STR-ZBD1T sy-vline
WA_REGUP_S_1821_PRL_STR-ZBD2T sy-vline
WA_REGUP_S_1821_PRL_STR-ZBD3T sy-vline
WA_REGUP_S_1821_PRL_STR-ZBD1P sy-vline
WA_REGUP_S_1821_PRL_STR-ZBD2P sy-vline
WA_REGUP_S_1821_PRL_STR-SKFBT sy-vline
WA_REGUP_S_1821_PRL_STR-SKNTO sy-vline
WA_REGUP_S_1821_PRL_STR-WSKTO sy-vline
WA_REGUP_S_1821_PRL_STR-ZBFIX sy-vline
WA_REGUP_S_1821_PRL_STR-ZLSPR sy-vline
WA_REGUP_S_1821_PRL_STR-SPLEV sy-vline
WA_REGUP_S_1821_PRL_STR-XREBZ sy-vline
WA_REGUP_S_1821_PRL_STR-ZOLLT sy-vline
WA_REGUP_S_1821_PRL_STR-ZOLLD sy-vline
WA_REGUP_S_1821_PRL_STR-LZBKZ sy-vline
WA_REGUP_S_1821_PRL_STR-LANDL sy-vline
WA_REGUP_S_1821_PRL_STR-DIEKZ sy-vline
WA_REGUP_S_1821_PRL_STR-QSSKZ sy-vline
WA_REGUP_S_1821_PRL_STR-QSSHB sy-vline
WA_REGUP_S_1821_PRL_STR-QBSHB sy-vline
WA_REGUP_S_1821_PRL_STR-QBSHH sy-vline
WA_REGUP_S_1821_PRL_STR-ESRNR sy-vline
WA_REGUP_S_1821_PRL_STR-ESRRE sy-vline
WA_REGUP_S_1821_PRL_STR-ESRPZ sy-vline
WA_REGUP_S_1821_PRL_STR-ZBDXT sy-vline
WA_REGUP_S_1821_PRL_STR-ZBDXP sy-vline
WA_REGUP_S_1821_PRL_STR-MSHBT sy-vline
WA_REGUP_S_1821_PRL_STR-MSFBT sy-vline
WA_REGUP_S_1821_PRL_STR-PROJN sy-vline
WA_REGUP_S_1821_PRL_STR-AUFNR sy-vline
WA_REGUP_S_1821_PRL_STR-ANLN1 sy-vline
WA_REGUP_S_1821_PRL_STR-ANLN2 sy-vline
WA_REGUP_S_1821_PRL_STR-EBELN sy-vline
WA_REGUP_S_1821_PRL_STR-EBELP sy-vline
WA_REGUP_S_1821_PRL_STR-XANET sy-vline
WA_REGUP_S_1821_PRL_STR-XNETB sy-vline
WA_REGUP_S_1821_PRL_STR-XNACH sy-vline
WA_REGUP_S_1821_PRL_STR-ZWELS sy-vline
WA_REGUP_S_1821_PRL_STR-VBUND sy-vline
WA_REGUP_S_1821_PRL_STR-STCEG sy-vline
WA_REGUP_S_1821_PRL_STR-EGBLD sy-vline
WA_REGUP_S_1821_PRL_STR-EGLLD sy-vline
WA_REGUP_S_1821_PRL_STR-QSZNR sy-vline
WA_REGUP_S_1821_PRL_STR-BDIF2 sy-vline
WA_REGUP_S_1821_PRL_STR-DSKVH sy-vline
WA_REGUP_S_1821_PRL_STR-POKLA sy-vline
WA_REGUP_S_1821_PRL_STR-FIPOS sy-vline
WA_REGUP_S_1821_PRL_STR-PROJK sy-vline
WA_REGUP_S_1821_PRL_STR-NPLNR sy-vline
WA_REGUP_S_1821_PRL_STR-AUFPL sy-vline
WA_REGUP_S_1821_PRL_STR-APLZL sy-vline
WA_REGUP_S_1821_PRL_STR-XEGDR sy-vline
WA_REGUP_S_1821_PRL_STR-BDIF3 sy-vline
WA_REGUP_S_1821_PRL_STR-DMBE2 sy-vline
WA_REGUP_S_1821_PRL_STR-DMBE3 sy-vline
WA_REGUP_S_1821_PRL_STR-MWST2 sy-vline
WA_REGUP_S_1821_PRL_STR-SKNT2 sy-vline
WA_REGUP_S_1821_PRL_STR-SKNT3 sy-vline
WA_REGUP_S_1821_PRL_STR-QBSH2 sy-vline
WA_REGUP_S_1821_PRL_STR-QBSH3 sy-vline
WA_REGUP_S_1821_PRL_STR-DMB21 sy-vline
WA_REGUP_S_1821_PRL_STR-DMB22 sy-vline
WA_REGUP_S_1821_PRL_STR-DMB23 sy-vline
WA_REGUP_S_1821_PRL_STR-DMB31 sy-vline
WA_REGUP_S_1821_PRL_STR-DMB32 sy-vline
WA_REGUP_S_1821_PRL_STR-DMB33 sy-vline
WA_REGUP_S_1821_PRL_STR-UZAWE sy-vline
WA_REGUP_S_1821_PRL_STR-MWST3 sy-vline
WA_REGUP_S_1821_PRL_STR-ZUONR sy-vline
WA_REGUP_S_1821_PRL_STR-OSKTO sy-vline
WA_REGUP_S_1821_PRL_STR-VERTN sy-vline
WA_REGUP_S_1821_PRL_STR-IMKEY sy-vline
WA_REGUP_S_1821_PRL_STR-REBZT sy-vline
WA_REGUP_S_1821_PRL_STR-REBZG sy-vline
WA_REGUP_S_1821_PRL_STR-REBZJ sy-vline
WA_REGUP_S_1821_PRL_STR-REBZZ sy-vline
WA_REGUP_S_1821_PRL_STR-KOSTL sy-vline
WA_REGUP_S_1821_PRL_STR-XINVE sy-vline
WA_REGUP_S_1821_PRL_STR-VBEL2 sy-vline
WA_REGUP_S_1821_PRL_STR-VPOS2 sy-vline
WA_REGUP_S_1821_PRL_STR-ZEKKN sy-vline
WA_REGUP_S_1821_PRL_STR-POSN2 sy-vline
WA_REGUP_S_1821_PRL_STR-ETEN2 sy-vline
WA_REGUP_S_1821_PRL_STR-FISTL sy-vline
WA_REGUP_S_1821_PRL_STR-GEBER sy-vline
WA_REGUP_S_1821_PRL_STR-DABRZ sy-vline
WA_REGUP_S_1821_PRL_STR-KKBER sy-vline
WA_REGUP_S_1821_PRL_STR-EMPFB sy-vline
WA_REGUP_S_1821_PRL_STR-PRCTR sy-vline
WA_REGUP_S_1821_PRL_STR-XREF1 sy-vline
WA_REGUP_S_1821_PRL_STR-XREF2 sy-vline
WA_REGUP_S_1821_PRL_STR-XREF3 sy-vline
WA_REGUP_S_1821_PRL_STR-ZINKZ sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS1 sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS2 sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS3 sy-vline
WA_REGUP_S_1821_PRL_STR-DTWS4 sy-vline
WA_REGUP_S_1821_PRL_STR-PAYT_RSN sy-vline
WA_REGUP_S_1821_PRL_STR-MANSP sy-vline
WA_REGUP_S_1821_PRL_STR-KIDNO sy-vline
WA_REGUP_S_1821_PRL_STR-XCPDD sy-vline
WA_REGUP_S_1821_PRL_STR-VERTT sy-vline
WA_REGUP_S_1821_PRL_STR-VBEWA sy-vline
WA_REGUP_S_1821_PRL_STR-AGZEI sy-vline
WA_REGUP_S_1821_PRL_STR-PSWSL sy-vline
WA_REGUP_S_1821_PRL_STR-PSWBT sy-vline
WA_REGUP_S_1821_PRL_STR-PSSKT sy-vline
WA_REGUP_S_1821_PRL_STR-XPYAM sy-vline
WA_REGUP_S_1821_PRL_STR-GDIFF sy-vline
WA_REGUP_S_1821_PRL_STR-GDIF2 sy-vline
WA_REGUP_S_1821_PRL_STR-GDIF3 sy-vline
WA_REGUP_S_1821_PRL_STR-BUPLA sy-vline
WA_REGUP_S_1821_PRL_STR-SECCO sy-vline
WA_REGUP_S_1821_PRL_STR-XSAEN sy-vline
WA_REGUP_S_1821_PRL_STR-KBLNR sy-vline
WA_REGUP_S_1821_PRL_STR-KBLPOS sy-vline
WA_REGUP_S_1821_PRL_STR-CESSION_KZ sy-vline
WA_REGUP_S_1821_PRL_STR-KEYNO sy-vline
WA_REGUP_S_1821_PRL_STR-PAMTF sy-vline
WA_REGUP_S_1821_PRL_STR-ORIGIN sy-vline
WA_REGUP_S_1821_PRL_STR-PENLC1 sy-vline
WA_REGUP_S_1821_PRL_STR-PENLC2 sy-vline
WA_REGUP_S_1821_PRL_STR-PENLC3 sy-vline
WA_REGUP_S_1821_PRL_STR-PENFC sy-vline
WA_REGUP_S_1821_PRL_STR-PENDAYS sy-vline
WA_REGUP_S_1821_PRL_STR-PPRCT sy-vline
WA_REGUP_S_1821_PRL_STR-GRANT_NBR sy-vline
WA_REGUP_S_1821_PRL_STR-FKBER sy-vline
WA_REGUP_S_1821_PRL_STR-SNAME1 sy-vline
WA_REGUP_S_1821_PRL_STR-SORT01 sy-vline
WA_REGUP_S_1821_PRL_STR-SLAND1 sy-vline
WA_REGUP_S_1821_PRL_STR-SAMNR sy-vline
WA_REGUP_S_1821_PRL_STR-MABER sy-vline
WA_REGUP_S_1821_PRL_STR-BUDGET_PD sy-vline
WA_REGUP_S_1821_PRL_STR-SNAME2 sy-vline
WA_REGUP_S_1821_PRL_STR-SNAME3 sy-vline
WA_REGUP_S_1821_PRL_STR-SNAME4 sy-vline
WA_REGUP_S_1821_PRL_STR-SSTRAS sy-vline
WA_REGUP_S_1821_PRL_STR-SSTRS2 sy-vline
WA_REGUP_S_1821_PRL_STR-SPSTLZ sy-vline
WA_REGUP_S_1821_PRL_STR-SID sy-vline
WA_REGUP_S_1821_PRL_STR-RSTGR sy-vline
WA_REGUP_S_1821_PRL_STR-EXTACCOUNT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
