ABAP Select data from SAP table J_1BDYLIN 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 J_1BDYLIN 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_1BDYLIN. 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_1BDYLIN 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_1BDYLIN TYPE STANDARD TABLE OF J_1BDYLIN,
      WA_J_1BDYLIN TYPE J_1BDYLIN,
      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_1BDYLIN> TYPE J_1BDYLIN.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_1BDYLIN
*  INTO TABLE @DATA(IT_J_1BDYLIN2).
*--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_1BDYLIN INDEX 1 INTO DATA(WA_J_1BDYLIN2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_1BDYLIN>-MANDT = 1.
<J_1BDYLIN>-DOCNUM = 1.
<J_1BDYLIN>-ITMNUM = 1.
<J_1BDYLIN>-MATNR = 1.
<J_1BDYLIN>-BWKEY = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_1BDYLIN-BWTAR, sy-vline,
  WA_J_1BDYLIN-CHARG, sy-vline,
  WA_J_1BDYLIN-MATKL, sy-vline,
  WA_J_1BDYLIN-MAKTX, sy-vline,
  WA_J_1BDYLIN-DOCREF, sy-vline,
  WA_J_1BDYLIN-ITMREF, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J_1BDYLIN 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_1BDYLIN 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_1BDYLIN INTO WA_J_1BDYLIN.


*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 MATN1, internal->external for field MATNR
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-MATNR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-MATNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CFOBR, internal->external for field CFOP
CALL FUNCTION 'CONVERSION_EXIT_CFOBR_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-CFOP
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-CFOP.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TXSIT, internal->external for field TAXSIT
CALL FUNCTION 'CONVERSION_EXIT_TXSIT_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-TAXSIT
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-TAXSIT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit EAN11, internal->external for field CEAN
CALL FUNCTION 'CONVERSION_EXIT_EAN11_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-CEAN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-CEAN.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit CCEST, internal->external for field CEST
CALL FUNCTION 'CONVERSION_EXIT_CCEST_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-CEST
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-CEST.
WRITE:/ 'New Value:', ld_input.

*Conversion exit EAN11, internal->external for field CEAN_TRIB
CALL FUNCTION 'CONVERSION_EXIT_EAN11_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-CEAN_TRIB
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-CEAN_TRIB.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CGCBR, internal->external for field CNPJFAB
CALL FUNCTION 'CONVERSION_EXIT_CGCBR_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-CNPJFAB
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-CNPJFAB.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

*Conversion exit GJAHR, internal->external for field REFYEAR
CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT'
  EXPORTING
    input =                      WA_J_1BDYLIN-REFYEAR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BDYLIN-REFYEAR.
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_1BDYLIN_STR, 
MANDT TYPE STRING,
DOCNUM TYPE STRING,
ITMNUM TYPE STRING,
MATNR TYPE STRING,
BWKEY TYPE STRING,
BWTAR TYPE STRING,
CHARG TYPE STRING,
MATKL TYPE STRING,
MAKTX TYPE STRING,
DOCREF TYPE STRING,
ITMREF TYPE STRING,
CFOP TYPE STRING,
NBM TYPE STRING,
MATORG TYPE STRING,
TAXSIT TYPE STRING,
TAXSI2 TYPE STRING,
OWNPRO TYPE STRING,
MATUSE TYPE STRING,
REFTYP TYPE STRING,
REFKEY TYPE STRING,
REFITM TYPE STRING,
MENGE TYPE STRING,
MEINS TYPE STRING,
NETPR TYPE STRING,
NETWR TYPE STRING,
TAXLW1 TYPE STRING,
TAXLW2 TYPE STRING,
TMISS TYPE STRING,
NETFRE TYPE STRING,
NETINS TYPE STRING,
NETOTH TYPE STRING,
INDUS3 TYPE STRING,
ITMTYP TYPE STRING,
NETDIS TYPE STRING,
SPCSTO TYPE STRING,
INCLTX TYPE STRING,
STATIT TYPE STRING,
WERKS TYPE STRING,
DIRECT TYPE STRING,
DSTCAT TYPE STRING,
INDUS2 TYPE STRING,
NFPRI TYPE STRING,
NFNET TYPE STRING,
NFDIS TYPE STRING,
NFFRE TYPE STRING,
NFINS TYPE STRING,
NFOTH TYPE STRING,
NETWRT TYPE STRING,
NFNETT TYPE STRING,
MWSKZ TYPE STRING,
KALSM TYPE STRING,
ICMSAVR TYPE STRING,
SUBTAVR TYPE STRING,
LPPNET TYPE STRING,
LPPBRT TYPE STRING,
ICMSVALP TYPE STRING,
SUBTVALP TYPE STRING,
TAXLW3 TYPE STRING,
SRVNR TYPE STRING,
TAXSI3 TYPE STRING,
TAXLW4 TYPE STRING,
TAXSI4 TYPE STRING,
TAXLW5 TYPE STRING,
TAXSI5 TYPE STRING,
REFTYP_PREV TYPE STRING,
REFKEY_PREV TYPE STRING,
REFITM_PREV TYPE STRING,
NBS TYPE STRING,
CEAN TYPE STRING,
XPED TYPE STRING,
NITEMPED TYPE STRING,
MODBC TYPE STRING,
MODBCST TYPE STRING,
MOTDESICMS TYPE STRING,
CLENQ TYPE STRING,
CSELO TYPE STRING,
QSELO TYPE STRING,
CENQ TYPE STRING,
NUM_ITEM TYPE STRING,
IND_MOV TYPE STRING,
COD_CTA TYPE STRING,
NRECOPI TYPE STRING,
INDINCENTIVO TYPE STRING,
VICMSDESON TYPE STRING,
NFICMSDESON TYPE STRING,
VICMSDIF TYPE STRING,
VICMSSTRET TYPE STRING,
VBCSTRET TYPE STRING,
MEINS_TRIB TYPE STRING,
MENGE_TRIB TYPE STRING,
CEST TYPE STRING,
VDESPADU TYPE STRING,
VIOF TYPE STRING,
CEAN_TRIB TYPE STRING,
UTRIB TYPE STRING,
PST TYPE STRING,
VBCFCPSTRET TYPE STRING,
PFCPSTRET TYPE STRING,
VFCPSTRET TYPE STRING,
VBCSTDEST TYPE STRING,
VICMSSTDEST TYPE STRING,
INDESCALA TYPE STRING,
CNPJFAB TYPE STRING,
CBENEF TYPE STRING,
PREDBCEFET TYPE STRING,
VBCEFET TYPE STRING,
PICMSEFET TYPE STRING,
VICMSEFET TYPE STRING,
VOUTRO TYPE STRING,
XPROD TYPE STRING,
TAX_INFO_SOURCE TYPE STRING,
TAX_RATE TYPE STRING,
VICMSSUBSTITUTO TYPE STRING,
MUNICIPAL_ISS_TAXSIT TYPE STRING,
CPRB TYPE STRING,
REINF_SERVICE_CODE TYPE STRING,
LC116_SERVICE_CODE TYPE STRING,
COD_CTA_PIS TYPE STRING,
COD_CTA_COFINS TYPE STRING,
CBENEF_ISS TYPE STRING,
STSTCL_VICMSDESON TYPE STRING,
P_MVAST TYPE STRING,
PICMSDEF TYPE STRING,
ITEM_CNAE_PARTNER TYPE STRING,
ITEM_CNAE_BUPLA TYPE STRING,
IND_NAT_FRT TYPE STRING,
CBARRA TYPE STRING,
CBARRA_TRIB TYPE STRING,
VICMSSTDESON TYPE STRING,
MOTDESICMSST TYPE STRING,
PDIF TYPE STRING,
VFCPDIF TYPE STRING,
PFCPDEF TYPE STRING,
PFCPDIF TYPE STRING,
COFINSST TYPE STRING,
PISST TYPE STRING,
INDSOMACOFINSST TYPE STRING,
INDSOMAPISST TYPE STRING,
NFCOFINSST TYPE STRING,
NFPISST TYPE STRING,
VTOTTRIB TYPE STRING,
NFCI TYPE STRING,
KOSTL TYPE STRING,
AUFNR TYPE STRING,
PRCTR TYPE STRING,
PS_PSP_PNR TYPE STRING,
KSTRG TYPE STRING,
NPLNR TYPE STRING,
SEGMENT TYPE STRING,
PIPIDEVOL TYPE STRING,
NPROCESSO TYPE STRING,
NAT_BC_CRED TYPE STRING,
NFQTY TYPE STRING,
NFUNT TYPE STRING,
NFTOT TYPE STRING,
IPIRATE TYPE STRING,
IPIVAL TYPE STRING,
IPISTAT TYPE STRING,
ICMSRATE TYPE STRING,
ICMSVAL TYPE STRING,
ICMSSTAT TYPE STRING,
ISSPRATE TYPE STRING,
ISSPVAL TYPE STRING,
ISSSRATE TYPE STRING,
ISSSVAL TYPE STRING,
PISRATE TYPE STRING,
PISVAL TYPE STRING,
COFIRATE TYPE STRING,
COFIVAL TYPE STRING,
PISRATE4DEC TYPE STRING,
COFIRATE4DEC TYPE STRING,
MATUSE0 TYPE STRING,
MATUSE1 TYPE STRING,
MATUSE2 TYPE STRING,
MATUSE3 TYPE STRING,
OWNPRO1 TYPE STRING,
OWNPRO2 TYPE STRING,
ITTPTX TYPE STRING,
REFKY1 TYPE STRING,
RFTTXT TYPE STRING,
SELKZ TYPE STRING,
REFYEAR TYPE STRING,
IND_MOV_TXT TYPE STRING,
MODBC_TXT TYPE STRING,
MODBCST_TXT TYPE STRING,
MOTDESICMS_TXT TYPE STRING,
CENQ_TXT TYPE STRING,
CEST_TXT TYPE STRING,
COFINSST_SCR_ONLY TYPE STRING,
PISST_SCR_ONLY TYPE STRING,
INDSOMACOFINSST_TXT TYPE STRING,
INDSOMAPISST_TXT TYPE STRING,
MOTDESICMSST_TXT TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_1BDYLIN_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_1BDYLIN_STR-MANDT sy-vline 
WA_J_1BDYLIN_STR-DOCNUM sy-vline 
WA_J_1BDYLIN_STR-ITMNUM sy-vline 
WA_J_1BDYLIN_STR-MATNR sy-vline 
WA_J_1BDYLIN_STR-BWKEY sy-vline 
WA_J_1BDYLIN_STR-BWTAR sy-vline 
WA_J_1BDYLIN_STR-CHARG sy-vline 
WA_J_1BDYLIN_STR-MATKL sy-vline 
WA_J_1BDYLIN_STR-MAKTX sy-vline 
WA_J_1BDYLIN_STR-DOCREF sy-vline 
WA_J_1BDYLIN_STR-ITMREF sy-vline 
WA_J_1BDYLIN_STR-CFOP sy-vline 
WA_J_1BDYLIN_STR-NBM sy-vline 
WA_J_1BDYLIN_STR-MATORG sy-vline 
WA_J_1BDYLIN_STR-TAXSIT sy-vline 
WA_J_1BDYLIN_STR-TAXSI2 sy-vline 
WA_J_1BDYLIN_STR-OWNPRO sy-vline 
WA_J_1BDYLIN_STR-MATUSE sy-vline 
WA_J_1BDYLIN_STR-REFTYP sy-vline 
WA_J_1BDYLIN_STR-REFKEY sy-vline 
WA_J_1BDYLIN_STR-REFITM sy-vline 
WA_J_1BDYLIN_STR-MENGE sy-vline 
WA_J_1BDYLIN_STR-MEINS sy-vline 
WA_J_1BDYLIN_STR-NETPR sy-vline 
WA_J_1BDYLIN_STR-NETWR sy-vline 
WA_J_1BDYLIN_STR-TAXLW1 sy-vline 
WA_J_1BDYLIN_STR-TAXLW2 sy-vline 
WA_J_1BDYLIN_STR-TMISS sy-vline 
WA_J_1BDYLIN_STR-NETFRE sy-vline 
WA_J_1BDYLIN_STR-NETINS sy-vline 
WA_J_1BDYLIN_STR-NETOTH sy-vline 
WA_J_1BDYLIN_STR-INDUS3 sy-vline 
WA_J_1BDYLIN_STR-ITMTYP sy-vline 
WA_J_1BDYLIN_STR-NETDIS sy-vline 
WA_J_1BDYLIN_STR-SPCSTO sy-vline 
WA_J_1BDYLIN_STR-INCLTX sy-vline 
WA_J_1BDYLIN_STR-STATIT sy-vline 
WA_J_1BDYLIN_STR-WERKS sy-vline 
WA_J_1BDYLIN_STR-DIRECT sy-vline 
WA_J_1BDYLIN_STR-DSTCAT sy-vline 
WA_J_1BDYLIN_STR-INDUS2 sy-vline 
WA_J_1BDYLIN_STR-NFPRI sy-vline 
WA_J_1BDYLIN_STR-NFNET sy-vline 
WA_J_1BDYLIN_STR-NFDIS sy-vline 
WA_J_1BDYLIN_STR-NFFRE sy-vline 
WA_J_1BDYLIN_STR-NFINS sy-vline 
WA_J_1BDYLIN_STR-NFOTH sy-vline 
WA_J_1BDYLIN_STR-NETWRT sy-vline 
WA_J_1BDYLIN_STR-NFNETT sy-vline 
WA_J_1BDYLIN_STR-MWSKZ sy-vline 
WA_J_1BDYLIN_STR-KALSM sy-vline 
WA_J_1BDYLIN_STR-ICMSAVR sy-vline 
WA_J_1BDYLIN_STR-SUBTAVR sy-vline 
WA_J_1BDYLIN_STR-LPPNET sy-vline 
WA_J_1BDYLIN_STR-LPPBRT sy-vline 
WA_J_1BDYLIN_STR-ICMSVALP sy-vline 
WA_J_1BDYLIN_STR-SUBTVALP sy-vline 
WA_J_1BDYLIN_STR-TAXLW3 sy-vline 
WA_J_1BDYLIN_STR-SRVNR sy-vline 
WA_J_1BDYLIN_STR-TAXSI3 sy-vline 
WA_J_1BDYLIN_STR-TAXLW4 sy-vline 
WA_J_1BDYLIN_STR-TAXSI4 sy-vline 
WA_J_1BDYLIN_STR-TAXLW5 sy-vline 
WA_J_1BDYLIN_STR-TAXSI5 sy-vline 
WA_J_1BDYLIN_STR-REFTYP_PREV sy-vline 
WA_J_1BDYLIN_STR-REFKEY_PREV sy-vline 
WA_J_1BDYLIN_STR-REFITM_PREV sy-vline 
WA_J_1BDYLIN_STR-NBS sy-vline 
WA_J_1BDYLIN_STR-CEAN sy-vline 
WA_J_1BDYLIN_STR-XPED sy-vline 
WA_J_1BDYLIN_STR-NITEMPED sy-vline 
WA_J_1BDYLIN_STR-MODBC sy-vline 
WA_J_1BDYLIN_STR-MODBCST sy-vline 
WA_J_1BDYLIN_STR-MOTDESICMS sy-vline 
WA_J_1BDYLIN_STR-CLENQ sy-vline 
WA_J_1BDYLIN_STR-CSELO sy-vline 
WA_J_1BDYLIN_STR-QSELO sy-vline 
WA_J_1BDYLIN_STR-CENQ sy-vline 
WA_J_1BDYLIN_STR-NUM_ITEM sy-vline 
WA_J_1BDYLIN_STR-IND_MOV sy-vline 
WA_J_1BDYLIN_STR-COD_CTA sy-vline 
WA_J_1BDYLIN_STR-NRECOPI sy-vline 
WA_J_1BDYLIN_STR-INDINCENTIVO sy-vline 
WA_J_1BDYLIN_STR-VICMSDESON sy-vline 
WA_J_1BDYLIN_STR-NFICMSDESON sy-vline 
WA_J_1BDYLIN_STR-VICMSDIF sy-vline 
WA_J_1BDYLIN_STR-VICMSSTRET sy-vline 
WA_J_1BDYLIN_STR-VBCSTRET sy-vline 
WA_J_1BDYLIN_STR-MEINS_TRIB sy-vline 
WA_J_1BDYLIN_STR-MENGE_TRIB sy-vline 
WA_J_1BDYLIN_STR-CEST sy-vline 
WA_J_1BDYLIN_STR-VDESPADU sy-vline 
WA_J_1BDYLIN_STR-VIOF sy-vline 
WA_J_1BDYLIN_STR-CEAN_TRIB sy-vline 
WA_J_1BDYLIN_STR-UTRIB sy-vline 
WA_J_1BDYLIN_STR-PST sy-vline 
WA_J_1BDYLIN_STR-VBCFCPSTRET sy-vline 
WA_J_1BDYLIN_STR-PFCPSTRET sy-vline 
WA_J_1BDYLIN_STR-VFCPSTRET sy-vline 
WA_J_1BDYLIN_STR-VBCSTDEST sy-vline 
WA_J_1BDYLIN_STR-VICMSSTDEST sy-vline 
WA_J_1BDYLIN_STR-INDESCALA sy-vline 
WA_J_1BDYLIN_STR-CNPJFAB sy-vline 
WA_J_1BDYLIN_STR-CBENEF sy-vline 
WA_J_1BDYLIN_STR-PREDBCEFET sy-vline 
WA_J_1BDYLIN_STR-VBCEFET sy-vline 
WA_J_1BDYLIN_STR-PICMSEFET sy-vline 
WA_J_1BDYLIN_STR-VICMSEFET sy-vline 
WA_J_1BDYLIN_STR-VOUTRO sy-vline 
WA_J_1BDYLIN_STR-XPROD sy-vline 
WA_J_1BDYLIN_STR-TAX_INFO_SOURCE sy-vline 
WA_J_1BDYLIN_STR-TAX_RATE sy-vline 
WA_J_1BDYLIN_STR-VICMSSUBSTITUTO sy-vline 
WA_J_1BDYLIN_STR-MUNICIPAL_ISS_TAXSIT sy-vline 
WA_J_1BDYLIN_STR-CPRB sy-vline 
WA_J_1BDYLIN_STR-REINF_SERVICE_CODE sy-vline 
WA_J_1BDYLIN_STR-LC116_SERVICE_CODE sy-vline 
WA_J_1BDYLIN_STR-COD_CTA_PIS sy-vline 
WA_J_1BDYLIN_STR-COD_CTA_COFINS sy-vline 
WA_J_1BDYLIN_STR-CBENEF_ISS sy-vline 
WA_J_1BDYLIN_STR-STSTCL_VICMSDESON sy-vline 
WA_J_1BDYLIN_STR-P_MVAST sy-vline 
WA_J_1BDYLIN_STR-PICMSDEF sy-vline 
WA_J_1BDYLIN_STR-ITEM_CNAE_PARTNER sy-vline 
WA_J_1BDYLIN_STR-ITEM_CNAE_BUPLA sy-vline 
WA_J_1BDYLIN_STR-IND_NAT_FRT sy-vline 
WA_J_1BDYLIN_STR-CBARRA sy-vline 
WA_J_1BDYLIN_STR-CBARRA_TRIB sy-vline 
WA_J_1BDYLIN_STR-VICMSSTDESON sy-vline 
WA_J_1BDYLIN_STR-MOTDESICMSST sy-vline 
WA_J_1BDYLIN_STR-PDIF sy-vline 
WA_J_1BDYLIN_STR-VFCPDIF sy-vline 
WA_J_1BDYLIN_STR-PFCPDEF sy-vline 
WA_J_1BDYLIN_STR-PFCPDIF sy-vline 
WA_J_1BDYLIN_STR-COFINSST sy-vline 
WA_J_1BDYLIN_STR-PISST sy-vline 
WA_J_1BDYLIN_STR-INDSOMACOFINSST sy-vline 
WA_J_1BDYLIN_STR-INDSOMAPISST sy-vline 
WA_J_1BDYLIN_STR-NFCOFINSST sy-vline 
WA_J_1BDYLIN_STR-NFPISST sy-vline 
WA_J_1BDYLIN_STR-VTOTTRIB sy-vline 
WA_J_1BDYLIN_STR-NFCI sy-vline 
WA_J_1BDYLIN_STR-KOSTL sy-vline 
WA_J_1BDYLIN_STR-AUFNR sy-vline 
WA_J_1BDYLIN_STR-PRCTR sy-vline 
WA_J_1BDYLIN_STR-PS_PSP_PNR sy-vline 
WA_J_1BDYLIN_STR-KSTRG sy-vline 
WA_J_1BDYLIN_STR-NPLNR sy-vline 
WA_J_1BDYLIN_STR-SEGMENT sy-vline 
WA_J_1BDYLIN_STR-PIPIDEVOL sy-vline 
WA_J_1BDYLIN_STR-NPROCESSO sy-vline 
WA_J_1BDYLIN_STR-NAT_BC_CRED sy-vline 
WA_J_1BDYLIN_STR-NFQTY sy-vline 
WA_J_1BDYLIN_STR-NFUNT sy-vline 
WA_J_1BDYLIN_STR-NFTOT sy-vline 
WA_J_1BDYLIN_STR-IPIRATE sy-vline 
WA_J_1BDYLIN_STR-IPIVAL sy-vline 
WA_J_1BDYLIN_STR-IPISTAT sy-vline 
WA_J_1BDYLIN_STR-ICMSRATE sy-vline 
WA_J_1BDYLIN_STR-ICMSVAL sy-vline 
WA_J_1BDYLIN_STR-ICMSSTAT sy-vline 
WA_J_1BDYLIN_STR-ISSPRATE sy-vline 
WA_J_1BDYLIN_STR-ISSPVAL sy-vline 
WA_J_1BDYLIN_STR-ISSSRATE sy-vline 
WA_J_1BDYLIN_STR-ISSSVAL sy-vline 
WA_J_1BDYLIN_STR-PISRATE sy-vline 
WA_J_1BDYLIN_STR-PISVAL sy-vline 
WA_J_1BDYLIN_STR-COFIRATE sy-vline 
WA_J_1BDYLIN_STR-COFIVAL sy-vline 
WA_J_1BDYLIN_STR-PISRATE4DEC sy-vline 
WA_J_1BDYLIN_STR-COFIRATE4DEC sy-vline 
WA_J_1BDYLIN_STR-MATUSE0 sy-vline 
WA_J_1BDYLIN_STR-MATUSE1 sy-vline 
WA_J_1BDYLIN_STR-MATUSE2 sy-vline 
WA_J_1BDYLIN_STR-MATUSE3 sy-vline 
WA_J_1BDYLIN_STR-OWNPRO1 sy-vline 
WA_J_1BDYLIN_STR-OWNPRO2 sy-vline 
WA_J_1BDYLIN_STR-ITTPTX sy-vline 
WA_J_1BDYLIN_STR-REFKY1 sy-vline 
WA_J_1BDYLIN_STR-RFTTXT sy-vline 
WA_J_1BDYLIN_STR-SELKZ sy-vline 
WA_J_1BDYLIN_STR-REFYEAR sy-vline 
WA_J_1BDYLIN_STR-IND_MOV_TXT sy-vline 
WA_J_1BDYLIN_STR-MODBC_TXT sy-vline 
WA_J_1BDYLIN_STR-MODBCST_TXT sy-vline 
WA_J_1BDYLIN_STR-MOTDESICMS_TXT sy-vline 
WA_J_1BDYLIN_STR-CENQ_TXT sy-vline 
WA_J_1BDYLIN_STR-CEST_TXT sy-vline 
WA_J_1BDYLIN_STR-COFINSST_SCR_ONLY sy-vline 
WA_J_1BDYLIN_STR-PISST_SCR_ONLY sy-vline 
WA_J_1BDYLIN_STR-INDSOMACOFINSST_TXT sy-vline 
WA_J_1BDYLIN_STR-INDSOMAPISST_TXT sy-vline 
WA_J_1BDYLIN_STR-MOTDESICMSST_TXT sy-vline      INTO ld_text SEPARATED BY SPACE.

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