ABAP Select data from SAP table REXCJP_PYMNTREC into internal table

Get Example source ABAP code based on a different SAP table
  Get ABAP code

Below is a number of ABAP code snippets to demonstrate how to select data from SAP REXCJP_PYMNTREC 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 REXCJP_PYMNTREC. 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 REXCJP_PYMNTREC 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_REXCJP_PYMNTREC TYPE STANDARD TABLE OF REXCJP_PYMNTREC,
      WA_REXCJP_PYMNTREC TYPE REXCJP_PYMNTREC,
      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: <REXCJP_PYMNTREC> TYPE REXCJP_PYMNTREC.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM REXCJP_PYMNTREC
*  INTO TABLE @DATA(IT_REXCJP_PYMNTREC2).
*--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_REXCJP_PYMNTREC INDEX 1 INTO DATA(WA_REXCJP_PYMNTREC2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_REXCJP_PYMNTREC ASSIGNING <REXCJP_PYMNTREC>.

*To update a field value using a field symbol simply change the value via the field symbol pointer
<REXCJP_PYMNTREC>-CNBUKRS = 1.
<REXCJP_PYMNTREC>-RECNR = 1.
<REXCJP_PYMNTREC>-VENDORID = 1.
<REXCJP_PYMNTREC>-PYMENTCAT = 1.
<REXCJP_PYMNTREC>-RECNTYPE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_REXCJP_PYMNTREC-BP, sy-vline,
  WA_REXCJP_PYMNTREC-BP_TYPE, sy-vline,
  WA_REXCJP_PYMNTREC-BP_ROLE, sy-vline,
  WA_REXCJP_PYMNTREC-BP_NAME, sy-vline,
  WA_REXCJP_PYMNTREC-BPADDR, sy-vline,
  WA_REXCJP_PYMNTREC-BP_COUNTRY, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_REXCJP_PYMNTREC 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_REXCJP_PYMNTREC 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_REXCJP_PYMNTREC INTO WA_REXCJP_PYMNTREC.


*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 RECNR
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-RECNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-RECNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit AU132, internal->external for field DMBTR
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMBTR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field WRBTR
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-WRBTR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-WRBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field MWSTS
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-MWSTS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-MWSTS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field WMWST
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-WMWST
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-WMWST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field BDIFF
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-BDIFF
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-BDIFF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field BDIF2
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-BDIF2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-BDIF2.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit AU132, internal->external for field SKFBT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-SKFBT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-SKFBT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field SKNTO
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-SKNTO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-SKNTO.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field WSKTO
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-WSKTO
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-WSKTO.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit AC132, internal->external for field DMBT1
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMBT1
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMBT1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field WRBT1
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-WRBT1
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-WRBT1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMBT2
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMBT2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMBT2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field WRBT2
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-WRBT2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-WRBT2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMBT3
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMBT3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMBT3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field WRBT3
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-WRBT3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-WRBT3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field QSSHB
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-QSSHB
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-QSSHB.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field QBSHB
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-QBSHB
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-QBSHB.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AU132, internal->external for field QSFBT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-QSFBT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-QSFBT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSP, internal->external for field PROJK
CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PROJK
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PROJK.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit AU132, internal->external for field DMBE2
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMBE2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMBE2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field DMBE3
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMBE3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMBE3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMB21
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMB21
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMB21.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMB22
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMB22
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMB22.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMB23
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMB23
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMB23.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMB31
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMB31
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMB31.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMB32
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMB32
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMB32.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field DMB33
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-DMB33
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-DMB33.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field MWST2
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-MWST2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-MWST2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field MWST3
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-MWST3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-MWST3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field SKNT2
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-SKNT2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-SKNT2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field SKNT3
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-SKNT3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-SKNT3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field BDIF3
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-BDIF3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-BDIF3.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit AU132, internal->external for field KZBTR
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-KZBTR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-KZBTR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field PSWBT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PSWBT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PSWBT.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit AU132, internal->external for field PYAMT
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PYAMT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PYAMT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field PPDIFF
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PPDIFF
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PPDIFF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field PPDIF2
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PPDIF2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PPDIF2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AC132, internal->external for field PPDIF3
CALL FUNCTION 'CONVERSION_EXIT_AC132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PPDIF3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PPDIF3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field PENLC1
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PENLC1
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PENLC1.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field PENLC2
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PENLC2
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PENLC2.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field PENLC3
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PENLC3
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PENLC3.
WRITE:/ 'New Value:', ld_input.

*Conversion exit AU132, internal->external for field PENFC
CALL FUNCTION 'CONVERSION_EXIT_AU132_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-PENFC
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-PENFC.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit GJAHR, internal->external for field GJAHR_SENDER
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_REXCJP_PYMNTREC-GJAHR_SENDER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_REXCJP_PYMNTREC-GJAHR_SENDER.
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_REXCJP_PYMNTREC_STR, 
CNBUKRS TYPE STRING,
RECNR TYPE STRING,
VENDORID TYPE STRING,
PYMENTCAT TYPE STRING,
RECNTYPE TYPE STRING,
BP TYPE STRING,
BP_TYPE TYPE STRING,
BP_ROLE TYPE STRING,
BP_NAME TYPE STRING,
BPADDR TYPE STRING,
BP_COUNTRY TYPE STRING,
FLOWTYPE TYPE STRING,
AGENT TYPE STRING,
AGENT_NAME TYPE STRING,
AGENTADDR TYPE STRING,
AGENT_COUNTRY TYPE STRING,
AGENT_TYPE TYPE STRING,
RECNINTRENO TYPE STRING,
REOBJNR TYPE STRING,
XIDENT TYPE STRING,
XOBJTYPE TYPE STRING,
OBJADDR TYPE STRING,
COMMISSION TYPE STRING,
BASIS TYPE STRING,
DETAIL TYPE STRING,
OBJNR TYPE STRING,
PDF_BUKRS TYPE STRING,
N01_REPTYPE TYPE STRING,
N02_REFNR1 TYPE STRING,
N02CORPORATENUMBER TYPE STRING,
N03_OFFCAT TYPE STRING,
N04RESP_ADDR TYPE STRING,
N05_REP1 TYPE STRING,
N06_REP1TEL TYPE STRING,
N07_REFNR2 TYPE STRING,
N08FILER_ADDR TYPE STRING,
N09_REP2 TYPE STRING,
N10_CORRIND TYPE STRING,
N11_REPERA TYPE STRING,
N11_REPYEAR TYPE STRING,
N12PAYEE_ADDR TYPE STRING,
N13_PAYFA TYPE STRING,
N14_PAYEE TYPE STRING,
N14PAYEENUMBER TYPE STRING,
N15_PAYEECAT TYPE STRING,
N16_PYMNTCAT1 TYPE STRING,
N17PYMNT1_ADDR TYPE STRING,
N18_PYMNTDET1 TYPE STRING,
N19_PYMNTBAS1 TYPE STRING,
N20_PYMNTAM1 TYPE STRING,
N21_PYMNTCAT2 TYPE STRING,
N22PYMNT2_ADDR TYPE STRING,
N23_PYMNTDET2 TYPE STRING,
N24_PYMNTBAS2 TYPE STRING,
N25_PYMNTAM2 TYPE STRING,
N26_PYMNTCAT3 TYPE STRING,
N27PYMNT3_ADDR TYPE STRING,
N28_PYMNTDET3 TYPE STRING,
N29_PYMNTBAS3 TYPE STRING,
N30_PYMNTAM3 TYPE STRING,
N31AGENT_ADDR TYPE STRING,
N32_BRFA TYPE STRING,
N33_BRNAME TYPE STRING,
N32AGENTNUMBER TYPE STRING,
N34_BRCAT TYPE STRING,
N35_BRYEAR TYPE STRING,
N35_BRMONTH TYPE STRING,
N35_BRDAY TYPE STRING,
N38_BRFEE TYPE STRING,
N39_REMARK TYPE STRING,
CURRENCY TYPE STRING,
N04RESP TYPE STRING,
N08FILER TYPE STRING,
N12PAYEE TYPE STRING,
N17PYMNT1 TYPE STRING,
N22PYMNT2 TYPE STRING,
N27PYMNT3 TYPE STRING,
N31AGENT TYPE STRING,
N40_TAX_OFFICE TYPE STRING,
MANDT TYPE STRING,
BUKRS TYPE STRING,
LIFNR TYPE STRING,
UMSKS TYPE STRING,
UMSKZ TYPE STRING,
AUGDT TYPE STRING,
AUGBL TYPE STRING,
ZUONR TYPE STRING,
GJAHR TYPE STRING,
BELNR TYPE STRING,
BUZEI TYPE STRING,
BUDAT TYPE STRING,
BLDAT TYPE STRING,
CPUDT TYPE STRING,
WAERS TYPE STRING,
XBLNR TYPE STRING,
BLART TYPE STRING,
MONAT TYPE STRING,
BSCHL TYPE STRING,
ZUMSK TYPE STRING,
SHKZG TYPE STRING,
GSBER TYPE STRING,
TAX_COUNTRY TYPE STRING,
MWSKZ TYPE STRING,
TXDAT_FROM TYPE STRING,
DMBTR TYPE STRING,
WRBTR TYPE STRING,
FCSL TYPE STRING,
RFCCUR TYPE STRING,
MWSTS TYPE STRING,
WMWST TYPE STRING,
LWSTS TYPE STRING,
BDIFF TYPE STRING,
BDIF2 TYPE STRING,
SGTXT TYPE STRING,
PROJN TYPE STRING,
AUFNR TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
SAKNR TYPE STRING,
HKONT TYPE STRING,
FKONT TYPE STRING,
FILKD 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,
ZLSCH TYPE STRING,
ZLSPR TYPE STRING,
ZBFIX TYPE STRING,
HBKID TYPE STRING,
BVTYP TYPE STRING,
REBZG TYPE STRING,
REBZJ TYPE STRING,
REBZZ TYPE STRING,
SAMNR TYPE STRING,
ZOLLT TYPE STRING,
ZOLLD TYPE STRING,
LZBKZ TYPE STRING,
LANDL TYPE STRING,
DIEKZ TYPE STRING,
MANSP TYPE STRING,
MSCHL TYPE STRING,
MADAT TYPE STRING,
MANST TYPE STRING,
MABER TYPE STRING,
XNETB TYPE STRING,
XANET TYPE STRING,
XCPDD TYPE STRING,
XESRD TYPE STRING,
XZAHL 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,
HIST_TAX_FACTOR TYPE STRING,
QSSKZ TYPE STRING,
QSSHB TYPE STRING,
QBSHB TYPE STRING,
BSTAT TYPE STRING,
ANFBN TYPE STRING,
ANFBJ TYPE STRING,
ANFBU TYPE STRING,
VBUND TYPE STRING,
REBZT TYPE STRING,
STCEG TYPE STRING,
EGBLD TYPE STRING,
EGLLD TYPE STRING,
QSZNR TYPE STRING,
QSFBT TYPE STRING,
XINVE TYPE STRING,
PROJK TYPE STRING,
FIPOS TYPE STRING,
NPLNR TYPE STRING,
AUFPL TYPE STRING,
APLZL TYPE STRING,
XEGDR TYPE STRING,
DMBE2 TYPE STRING,
DMBE3 TYPE STRING,
DMB21 TYPE STRING,
DMB22 TYPE STRING,
DMB23 TYPE STRING,
DMB31 TYPE STRING,
DMB32 TYPE STRING,
DMB33 TYPE STRING,
MWST2 TYPE STRING,
MWST3 TYPE STRING,
SKNT2 TYPE STRING,
SKNT3 TYPE STRING,
BDIF3 TYPE STRING,
XRAGL TYPE STRING,
RSTGR TYPE STRING,
UZAWE TYPE STRING,
KOSTL TYPE STRING,
LNRAN TYPE STRING,
XSTOV TYPE STRING,
KZBTR TYPE STRING,
XREF1 TYPE STRING,
XREF2 TYPE STRING,
XARCH TYPE STRING,
PSWSL TYPE STRING,
PSWBT TYPE STRING,
IMKEY TYPE STRING,
ZEKKN TYPE STRING,
FISTL TYPE STRING,
GEBER TYPE STRING,
DABRZ TYPE STRING,
XNEGP TYPE STRING,
EMPFB TYPE STRING,
PRCTR TYPE STRING,
XREF3 TYPE STRING,
DTWS1 TYPE STRING,
DTWS2 TYPE STRING,
DTWS3 TYPE STRING,
DTWS4 TYPE STRING,
XPYPR TYPE STRING,
KIDNO TYPE STRING,
PYCUR TYPE STRING,
PYAMT TYPE STRING,
BUPLA TYPE STRING,
SECCO TYPE STRING,
PPDIFF TYPE STRING,
PPDIF2 TYPE STRING,
PPDIF3 TYPE STRING,
PENLC1 TYPE STRING,
PENLC2 TYPE STRING,
PENLC3 TYPE STRING,
PENFC TYPE STRING,
PENDAYS TYPE STRING,
PENRC TYPE STRING,
VERTT TYPE STRING,
VERTN TYPE STRING,
VBEWA TYPE STRING,
KBLNR TYPE STRING,
KBLPOS TYPE STRING,
GRANT_NBR TYPE STRING,
GMVKZ TYPE STRING,
SRTYPE TYPE STRING,
LOTKZ TYPE STRING,
ZINKZ TYPE STRING,
FKBER TYPE STRING,
INTRENO TYPE STRING,
PPRCT TYPE STRING,
BUZID TYPE STRING,
AUGGJ TYPE STRING,
HKTID TYPE STRING,
BUDGET_PD TYPE STRING,
BDGT_ACCOUNT TYPE STRING,
RE_ACCOUNT TYPE STRING,
PAYT_RSN TYPE STRING,
_DATAAGING TYPE STRING,
KONTT TYPE STRING,
KONTL TYPE STRING,
UEBGDAT TYPE STRING,
VNAME TYPE STRING,
EGRUP TYPE STRING,
BTYPE TYPE STRING,
PROPMANO TYPE STRING,
GKONT TYPE STRING,
GKART TYPE STRING,
GHKON TYPE STRING,
PERNR TYPE STRING,
VORGN TYPE STRING,
AWTYP TYPE STRING,
LOGSYSTEM_SENDER TYPE STRING,
BUKRS_SENDER TYPE STRING,
BELNR_SENDER TYPE STRING,
GJAHR_SENDER TYPE STRING,
BUZEI_SENDER TYPE STRING,
WRBTRV TYPE STRING,
PAYMENTCAT TYPE STRING,
PAYMENTCATT TYPE STRING,
LOCATION TYPE STRING,
OBJECTNR TYPE STRING,
CONTRACTINTRENO TYPE STRING,
MYNUMBER TYPE STRING,
PYMNTCATOK TYPE STRING,END OF T_EKKO_STR.
DATA: WA_REXCJP_PYMNTREC_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_REXCJP_PYMNTREC_STR-CNBUKRS sy-vline 
WA_REXCJP_PYMNTREC_STR-RECNR sy-vline 
WA_REXCJP_PYMNTREC_STR-VENDORID sy-vline 
WA_REXCJP_PYMNTREC_STR-PYMENTCAT sy-vline 
WA_REXCJP_PYMNTREC_STR-RECNTYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-BP sy-vline 
WA_REXCJP_PYMNTREC_STR-BP_TYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-BP_ROLE sy-vline 
WA_REXCJP_PYMNTREC_STR-BP_NAME sy-vline 
WA_REXCJP_PYMNTREC_STR-BPADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-BP_COUNTRY sy-vline 
WA_REXCJP_PYMNTREC_STR-FLOWTYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-AGENT sy-vline 
WA_REXCJP_PYMNTREC_STR-AGENT_NAME sy-vline 
WA_REXCJP_PYMNTREC_STR-AGENTADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-AGENT_COUNTRY sy-vline 
WA_REXCJP_PYMNTREC_STR-AGENT_TYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-RECNINTRENO sy-vline 
WA_REXCJP_PYMNTREC_STR-REOBJNR sy-vline 
WA_REXCJP_PYMNTREC_STR-XIDENT sy-vline 
WA_REXCJP_PYMNTREC_STR-XOBJTYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-OBJADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-COMMISSION sy-vline 
WA_REXCJP_PYMNTREC_STR-BASIS sy-vline 
WA_REXCJP_PYMNTREC_STR-DETAIL sy-vline 
WA_REXCJP_PYMNTREC_STR-OBJNR sy-vline 
WA_REXCJP_PYMNTREC_STR-PDF_BUKRS sy-vline 
WA_REXCJP_PYMNTREC_STR-N01_REPTYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-N02_REFNR1 sy-vline 
WA_REXCJP_PYMNTREC_STR-N02CORPORATENUMBER sy-vline 
WA_REXCJP_PYMNTREC_STR-N03_OFFCAT sy-vline 
WA_REXCJP_PYMNTREC_STR-N04RESP_ADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-N05_REP1 sy-vline 
WA_REXCJP_PYMNTREC_STR-N06_REP1TEL sy-vline 
WA_REXCJP_PYMNTREC_STR-N07_REFNR2 sy-vline 
WA_REXCJP_PYMNTREC_STR-N08FILER_ADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-N09_REP2 sy-vline 
WA_REXCJP_PYMNTREC_STR-N10_CORRIND sy-vline 
WA_REXCJP_PYMNTREC_STR-N11_REPERA sy-vline 
WA_REXCJP_PYMNTREC_STR-N11_REPYEAR sy-vline 
WA_REXCJP_PYMNTREC_STR-N12PAYEE_ADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-N13_PAYFA sy-vline 
WA_REXCJP_PYMNTREC_STR-N14_PAYEE sy-vline 
WA_REXCJP_PYMNTREC_STR-N14PAYEENUMBER sy-vline 
WA_REXCJP_PYMNTREC_STR-N15_PAYEECAT sy-vline 
WA_REXCJP_PYMNTREC_STR-N16_PYMNTCAT1 sy-vline 
WA_REXCJP_PYMNTREC_STR-N17PYMNT1_ADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-N18_PYMNTDET1 sy-vline 
WA_REXCJP_PYMNTREC_STR-N19_PYMNTBAS1 sy-vline 
WA_REXCJP_PYMNTREC_STR-N20_PYMNTAM1 sy-vline 
WA_REXCJP_PYMNTREC_STR-N21_PYMNTCAT2 sy-vline 
WA_REXCJP_PYMNTREC_STR-N22PYMNT2_ADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-N23_PYMNTDET2 sy-vline 
WA_REXCJP_PYMNTREC_STR-N24_PYMNTBAS2 sy-vline 
WA_REXCJP_PYMNTREC_STR-N25_PYMNTAM2 sy-vline 
WA_REXCJP_PYMNTREC_STR-N26_PYMNTCAT3 sy-vline 
WA_REXCJP_PYMNTREC_STR-N27PYMNT3_ADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-N28_PYMNTDET3 sy-vline 
WA_REXCJP_PYMNTREC_STR-N29_PYMNTBAS3 sy-vline 
WA_REXCJP_PYMNTREC_STR-N30_PYMNTAM3 sy-vline 
WA_REXCJP_PYMNTREC_STR-N31AGENT_ADDR sy-vline 
WA_REXCJP_PYMNTREC_STR-N32_BRFA sy-vline 
WA_REXCJP_PYMNTREC_STR-N33_BRNAME sy-vline 
WA_REXCJP_PYMNTREC_STR-N32AGENTNUMBER sy-vline 
WA_REXCJP_PYMNTREC_STR-N34_BRCAT sy-vline 
WA_REXCJP_PYMNTREC_STR-N35_BRYEAR sy-vline 
WA_REXCJP_PYMNTREC_STR-N35_BRMONTH sy-vline 
WA_REXCJP_PYMNTREC_STR-N35_BRDAY sy-vline 
WA_REXCJP_PYMNTREC_STR-N38_BRFEE sy-vline 
WA_REXCJP_PYMNTREC_STR-N39_REMARK sy-vline 
WA_REXCJP_PYMNTREC_STR-CURRENCY sy-vline 
WA_REXCJP_PYMNTREC_STR-N04RESP sy-vline 
WA_REXCJP_PYMNTREC_STR-N08FILER sy-vline 
WA_REXCJP_PYMNTREC_STR-N12PAYEE sy-vline 
WA_REXCJP_PYMNTREC_STR-N17PYMNT1 sy-vline 
WA_REXCJP_PYMNTREC_STR-N22PYMNT2 sy-vline 
WA_REXCJP_PYMNTREC_STR-N27PYMNT3 sy-vline 
WA_REXCJP_PYMNTREC_STR-N31AGENT sy-vline 
WA_REXCJP_PYMNTREC_STR-N40_TAX_OFFICE sy-vline 
WA_REXCJP_PYMNTREC_STR-MANDT sy-vline 
WA_REXCJP_PYMNTREC_STR-BUKRS sy-vline 
WA_REXCJP_PYMNTREC_STR-LIFNR sy-vline 
WA_REXCJP_PYMNTREC_STR-UMSKS sy-vline 
WA_REXCJP_PYMNTREC_STR-UMSKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-AUGDT sy-vline 
WA_REXCJP_PYMNTREC_STR-AUGBL sy-vline 
WA_REXCJP_PYMNTREC_STR-ZUONR sy-vline 
WA_REXCJP_PYMNTREC_STR-GJAHR sy-vline 
WA_REXCJP_PYMNTREC_STR-BELNR sy-vline 
WA_REXCJP_PYMNTREC_STR-BUZEI sy-vline 
WA_REXCJP_PYMNTREC_STR-BUDAT sy-vline 
WA_REXCJP_PYMNTREC_STR-BLDAT sy-vline 
WA_REXCJP_PYMNTREC_STR-CPUDT sy-vline 
WA_REXCJP_PYMNTREC_STR-WAERS sy-vline 
WA_REXCJP_PYMNTREC_STR-XBLNR sy-vline 
WA_REXCJP_PYMNTREC_STR-BLART sy-vline 
WA_REXCJP_PYMNTREC_STR-MONAT sy-vline 
WA_REXCJP_PYMNTREC_STR-BSCHL sy-vline 
WA_REXCJP_PYMNTREC_STR-ZUMSK sy-vline 
WA_REXCJP_PYMNTREC_STR-SHKZG sy-vline 
WA_REXCJP_PYMNTREC_STR-GSBER sy-vline 
WA_REXCJP_PYMNTREC_STR-TAX_COUNTRY sy-vline 
WA_REXCJP_PYMNTREC_STR-MWSKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-TXDAT_FROM sy-vline 
WA_REXCJP_PYMNTREC_STR-DMBTR sy-vline 
WA_REXCJP_PYMNTREC_STR-WRBTR sy-vline 
WA_REXCJP_PYMNTREC_STR-FCSL sy-vline 
WA_REXCJP_PYMNTREC_STR-RFCCUR sy-vline 
WA_REXCJP_PYMNTREC_STR-MWSTS sy-vline 
WA_REXCJP_PYMNTREC_STR-WMWST sy-vline 
WA_REXCJP_PYMNTREC_STR-LWSTS sy-vline 
WA_REXCJP_PYMNTREC_STR-BDIFF sy-vline 
WA_REXCJP_PYMNTREC_STR-BDIF2 sy-vline 
WA_REXCJP_PYMNTREC_STR-SGTXT sy-vline 
WA_REXCJP_PYMNTREC_STR-PROJN sy-vline 
WA_REXCJP_PYMNTREC_STR-AUFNR sy-vline 
WA_REXCJP_PYMNTREC_STR-ANLN1 sy-vline 
WA_REXCJP_PYMNTREC_STR-ANLN2 sy-vline 
WA_REXCJP_PYMNTREC_STR-EBELN sy-vline 
WA_REXCJP_PYMNTREC_STR-EBELP sy-vline 
WA_REXCJP_PYMNTREC_STR-SAKNR sy-vline 
WA_REXCJP_PYMNTREC_STR-HKONT sy-vline 
WA_REXCJP_PYMNTREC_STR-FKONT sy-vline 
WA_REXCJP_PYMNTREC_STR-FILKD sy-vline 
WA_REXCJP_PYMNTREC_STR-ZFBDT sy-vline 
WA_REXCJP_PYMNTREC_STR-ZTERM sy-vline 
WA_REXCJP_PYMNTREC_STR-ZBD1T sy-vline 
WA_REXCJP_PYMNTREC_STR-ZBD2T sy-vline 
WA_REXCJP_PYMNTREC_STR-ZBD3T sy-vline 
WA_REXCJP_PYMNTREC_STR-ZBD1P sy-vline 
WA_REXCJP_PYMNTREC_STR-ZBD2P sy-vline 
WA_REXCJP_PYMNTREC_STR-SKFBT sy-vline 
WA_REXCJP_PYMNTREC_STR-SKNTO sy-vline 
WA_REXCJP_PYMNTREC_STR-WSKTO sy-vline 
WA_REXCJP_PYMNTREC_STR-ZLSCH sy-vline 
WA_REXCJP_PYMNTREC_STR-ZLSPR sy-vline 
WA_REXCJP_PYMNTREC_STR-ZBFIX sy-vline 
WA_REXCJP_PYMNTREC_STR-HBKID sy-vline 
WA_REXCJP_PYMNTREC_STR-BVTYP sy-vline 
WA_REXCJP_PYMNTREC_STR-REBZG sy-vline 
WA_REXCJP_PYMNTREC_STR-REBZJ sy-vline 
WA_REXCJP_PYMNTREC_STR-REBZZ sy-vline 
WA_REXCJP_PYMNTREC_STR-SAMNR sy-vline 
WA_REXCJP_PYMNTREC_STR-ZOLLT sy-vline 
WA_REXCJP_PYMNTREC_STR-ZOLLD sy-vline 
WA_REXCJP_PYMNTREC_STR-LZBKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-LANDL sy-vline 
WA_REXCJP_PYMNTREC_STR-DIEKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-MANSP sy-vline 
WA_REXCJP_PYMNTREC_STR-MSCHL sy-vline 
WA_REXCJP_PYMNTREC_STR-MADAT sy-vline 
WA_REXCJP_PYMNTREC_STR-MANST sy-vline 
WA_REXCJP_PYMNTREC_STR-MABER sy-vline 
WA_REXCJP_PYMNTREC_STR-XNETB sy-vline 
WA_REXCJP_PYMNTREC_STR-XANET sy-vline 
WA_REXCJP_PYMNTREC_STR-XCPDD sy-vline 
WA_REXCJP_PYMNTREC_STR-XESRD sy-vline 
WA_REXCJP_PYMNTREC_STR-XZAHL sy-vline 
WA_REXCJP_PYMNTREC_STR-MWSK1 sy-vline 
WA_REXCJP_PYMNTREC_STR-TXDAT_FROM1 sy-vline 
WA_REXCJP_PYMNTREC_STR-TAX_COUNTRY1 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMBT1 sy-vline 
WA_REXCJP_PYMNTREC_STR-WRBT1 sy-vline 
WA_REXCJP_PYMNTREC_STR-HIST_TAX_FACTOR1 sy-vline 
WA_REXCJP_PYMNTREC_STR-MWSK2 sy-vline 
WA_REXCJP_PYMNTREC_STR-TXDAT_FROM2 sy-vline 
WA_REXCJP_PYMNTREC_STR-TAX_COUNTRY2 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMBT2 sy-vline 
WA_REXCJP_PYMNTREC_STR-WRBT2 sy-vline 
WA_REXCJP_PYMNTREC_STR-HIST_TAX_FACTOR2 sy-vline 
WA_REXCJP_PYMNTREC_STR-MWSK3 sy-vline 
WA_REXCJP_PYMNTREC_STR-TXDAT_FROM3 sy-vline 
WA_REXCJP_PYMNTREC_STR-TAX_COUNTRY3 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMBT3 sy-vline 
WA_REXCJP_PYMNTREC_STR-WRBT3 sy-vline 
WA_REXCJP_PYMNTREC_STR-HIST_TAX_FACTOR3 sy-vline 
WA_REXCJP_PYMNTREC_STR-HIST_TAX_FACTOR sy-vline 
WA_REXCJP_PYMNTREC_STR-QSSKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-QSSHB sy-vline 
WA_REXCJP_PYMNTREC_STR-QBSHB sy-vline 
WA_REXCJP_PYMNTREC_STR-BSTAT sy-vline 
WA_REXCJP_PYMNTREC_STR-ANFBN sy-vline 
WA_REXCJP_PYMNTREC_STR-ANFBJ sy-vline 
WA_REXCJP_PYMNTREC_STR-ANFBU sy-vline 
WA_REXCJP_PYMNTREC_STR-VBUND sy-vline 
WA_REXCJP_PYMNTREC_STR-REBZT sy-vline 
WA_REXCJP_PYMNTREC_STR-STCEG sy-vline 
WA_REXCJP_PYMNTREC_STR-EGBLD sy-vline 
WA_REXCJP_PYMNTREC_STR-EGLLD sy-vline 
WA_REXCJP_PYMNTREC_STR-QSZNR sy-vline 
WA_REXCJP_PYMNTREC_STR-QSFBT sy-vline 
WA_REXCJP_PYMNTREC_STR-XINVE sy-vline 
WA_REXCJP_PYMNTREC_STR-PROJK sy-vline 
WA_REXCJP_PYMNTREC_STR-FIPOS sy-vline 
WA_REXCJP_PYMNTREC_STR-NPLNR sy-vline 
WA_REXCJP_PYMNTREC_STR-AUFPL sy-vline 
WA_REXCJP_PYMNTREC_STR-APLZL sy-vline 
WA_REXCJP_PYMNTREC_STR-XEGDR sy-vline 
WA_REXCJP_PYMNTREC_STR-DMBE2 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMBE3 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMB21 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMB22 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMB23 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMB31 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMB32 sy-vline 
WA_REXCJP_PYMNTREC_STR-DMB33 sy-vline 
WA_REXCJP_PYMNTREC_STR-MWST2 sy-vline 
WA_REXCJP_PYMNTREC_STR-MWST3 sy-vline 
WA_REXCJP_PYMNTREC_STR-SKNT2 sy-vline 
WA_REXCJP_PYMNTREC_STR-SKNT3 sy-vline 
WA_REXCJP_PYMNTREC_STR-BDIF3 sy-vline 
WA_REXCJP_PYMNTREC_STR-XRAGL sy-vline 
WA_REXCJP_PYMNTREC_STR-RSTGR sy-vline 
WA_REXCJP_PYMNTREC_STR-UZAWE sy-vline 
WA_REXCJP_PYMNTREC_STR-KOSTL sy-vline 
WA_REXCJP_PYMNTREC_STR-LNRAN sy-vline 
WA_REXCJP_PYMNTREC_STR-XSTOV sy-vline 
WA_REXCJP_PYMNTREC_STR-KZBTR sy-vline 
WA_REXCJP_PYMNTREC_STR-XREF1 sy-vline 
WA_REXCJP_PYMNTREC_STR-XREF2 sy-vline 
WA_REXCJP_PYMNTREC_STR-XARCH sy-vline 
WA_REXCJP_PYMNTREC_STR-PSWSL sy-vline 
WA_REXCJP_PYMNTREC_STR-PSWBT sy-vline 
WA_REXCJP_PYMNTREC_STR-IMKEY sy-vline 
WA_REXCJP_PYMNTREC_STR-ZEKKN sy-vline 
WA_REXCJP_PYMNTREC_STR-FISTL sy-vline 
WA_REXCJP_PYMNTREC_STR-GEBER sy-vline 
WA_REXCJP_PYMNTREC_STR-DABRZ sy-vline 
WA_REXCJP_PYMNTREC_STR-XNEGP sy-vline 
WA_REXCJP_PYMNTREC_STR-EMPFB sy-vline 
WA_REXCJP_PYMNTREC_STR-PRCTR sy-vline 
WA_REXCJP_PYMNTREC_STR-XREF3 sy-vline 
WA_REXCJP_PYMNTREC_STR-DTWS1 sy-vline 
WA_REXCJP_PYMNTREC_STR-DTWS2 sy-vline 
WA_REXCJP_PYMNTREC_STR-DTWS3 sy-vline 
WA_REXCJP_PYMNTREC_STR-DTWS4 sy-vline 
WA_REXCJP_PYMNTREC_STR-XPYPR sy-vline 
WA_REXCJP_PYMNTREC_STR-KIDNO sy-vline 
WA_REXCJP_PYMNTREC_STR-PYCUR sy-vline 
WA_REXCJP_PYMNTREC_STR-PYAMT sy-vline 
WA_REXCJP_PYMNTREC_STR-BUPLA sy-vline 
WA_REXCJP_PYMNTREC_STR-SECCO sy-vline 
WA_REXCJP_PYMNTREC_STR-PPDIFF sy-vline 
WA_REXCJP_PYMNTREC_STR-PPDIF2 sy-vline 
WA_REXCJP_PYMNTREC_STR-PPDIF3 sy-vline 
WA_REXCJP_PYMNTREC_STR-PENLC1 sy-vline 
WA_REXCJP_PYMNTREC_STR-PENLC2 sy-vline 
WA_REXCJP_PYMNTREC_STR-PENLC3 sy-vline 
WA_REXCJP_PYMNTREC_STR-PENFC sy-vline 
WA_REXCJP_PYMNTREC_STR-PENDAYS sy-vline 
WA_REXCJP_PYMNTREC_STR-PENRC sy-vline 
WA_REXCJP_PYMNTREC_STR-VERTT sy-vline 
WA_REXCJP_PYMNTREC_STR-VERTN sy-vline 
WA_REXCJP_PYMNTREC_STR-VBEWA sy-vline 
WA_REXCJP_PYMNTREC_STR-KBLNR sy-vline 
WA_REXCJP_PYMNTREC_STR-KBLPOS sy-vline 
WA_REXCJP_PYMNTREC_STR-GRANT_NBR sy-vline 
WA_REXCJP_PYMNTREC_STR-GMVKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-SRTYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-LOTKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-ZINKZ sy-vline 
WA_REXCJP_PYMNTREC_STR-FKBER sy-vline 
WA_REXCJP_PYMNTREC_STR-INTRENO sy-vline 
WA_REXCJP_PYMNTREC_STR-PPRCT sy-vline 
WA_REXCJP_PYMNTREC_STR-BUZID sy-vline 
WA_REXCJP_PYMNTREC_STR-AUGGJ sy-vline 
WA_REXCJP_PYMNTREC_STR-HKTID sy-vline 
WA_REXCJP_PYMNTREC_STR-BUDGET_PD sy-vline 
WA_REXCJP_PYMNTREC_STR-BDGT_ACCOUNT sy-vline 
WA_REXCJP_PYMNTREC_STR-RE_ACCOUNT sy-vline 
WA_REXCJP_PYMNTREC_STR-PAYT_RSN sy-vline 
WA_REXCJP_PYMNTREC_STR-_DATAAGING sy-vline 
WA_REXCJP_PYMNTREC_STR-KONTT sy-vline 
WA_REXCJP_PYMNTREC_STR-KONTL sy-vline 
WA_REXCJP_PYMNTREC_STR-UEBGDAT sy-vline 
WA_REXCJP_PYMNTREC_STR-VNAME sy-vline 
WA_REXCJP_PYMNTREC_STR-EGRUP sy-vline 
WA_REXCJP_PYMNTREC_STR-BTYPE sy-vline 
WA_REXCJP_PYMNTREC_STR-PROPMANO sy-vline 
WA_REXCJP_PYMNTREC_STR-GKONT sy-vline 
WA_REXCJP_PYMNTREC_STR-GKART sy-vline 
WA_REXCJP_PYMNTREC_STR-GHKON sy-vline 
WA_REXCJP_PYMNTREC_STR-PERNR sy-vline 
WA_REXCJP_PYMNTREC_STR-VORGN sy-vline 
WA_REXCJP_PYMNTREC_STR-AWTYP sy-vline 
WA_REXCJP_PYMNTREC_STR-LOGSYSTEM_SENDER sy-vline 
WA_REXCJP_PYMNTREC_STR-BUKRS_SENDER sy-vline 
WA_REXCJP_PYMNTREC_STR-BELNR_SENDER sy-vline 
WA_REXCJP_PYMNTREC_STR-GJAHR_SENDER sy-vline 
WA_REXCJP_PYMNTREC_STR-BUZEI_SENDER sy-vline 
WA_REXCJP_PYMNTREC_STR-WRBTRV sy-vline 
WA_REXCJP_PYMNTREC_STR-PAYMENTCAT sy-vline 
WA_REXCJP_PYMNTREC_STR-PAYMENTCATT sy-vline 
WA_REXCJP_PYMNTREC_STR-LOCATION sy-vline 
WA_REXCJP_PYMNTREC_STR-OBJECTNR sy-vline 
WA_REXCJP_PYMNTREC_STR-CONTRACTINTRENO sy-vline 
WA_REXCJP_PYMNTREC_STR-MYNUMBER sy-vline 
WA_REXCJP_PYMNTREC_STR-PYMNTCATOK sy-vline      INTO ld_text SEPARATED BY SPACE.

*Add any further fields from structure WA_EKKO_STR you want to CONCATENATE...
ENDLOOP.
ENDFORM.