ABAP Select data from SAP table J1B_NF_XML_H_OLD 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 J1B_NF_XML_H_OLD 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 J1B_NF_XML_H_OLD. 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 J1B_NF_XML_H_OLD 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_J1B_NF_XML_H_OLD TYPE STANDARD TABLE OF J1B_NF_XML_H_OLD,
      WA_J1B_NF_XML_H_OLD TYPE J1B_NF_XML_H_OLD,
      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: <J1B_NF_XML_H_OLD> TYPE J1B_NF_XML_H_OLD.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J1B_NF_XML_H_OLD
*  INTO TABLE @DATA(IT_J1B_NF_XML_H_OLD2).
*--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_J1B_NF_XML_H_OLD INDEX 1 INTO DATA(WA_J1B_NF_XML_H_OLD2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J1B_NF_XML_H_OLD>-NITEM = 1.
<J1B_NF_XML_H_OLD>-CPROD = 1.
<J1B_NF_XML_H_OLD>-CEAN = 1.
<J1B_NF_XML_H_OLD>-XPROD = 1.
<J1B_NF_XML_H_OLD>-NCM = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J1B_NF_XML_H_OLD-EXTIPI, sy-vline,
  WA_J1B_NF_XML_H_OLD-GENERO, sy-vline,
  WA_J1B_NF_XML_H_OLD-CFOP, sy-vline,
  WA_J1B_NF_XML_H_OLD-UTRIB, sy-vline,
  WA_J1B_NF_XML_H_OLD-UCOM, sy-vline,
  WA_J1B_NF_XML_H_OLD-QTRIB, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J1B_NF_XML_H_OLD 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_J1B_NF_XML_H_OLD 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_J1B_NF_XML_H_OLD INTO WA_J1B_NF_XML_H_OLD.


*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 MATN5, internal->external for field CPROD
CALL FUNCTION 'CONVERSION_EXIT_MATN5_OUTPUT'
  EXPORTING
    input =                      WA_J1B_NF_XML_H_OLD-CPROD
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J1B_NF_XML_H_OLD-CPROD.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit CUNIT, internal->external for field UCOM
CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT'
  EXPORTING
    input =                      WA_J1B_NF_XML_H_OLD-UCOM
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J1B_NF_XML_H_OLD-UCOM.
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_J1B_NF_XML_H_OLD_STR, 
NITEM TYPE STRING,
CPROD TYPE STRING,
CEAN TYPE STRING,
XPROD TYPE STRING,
NCM TYPE STRING,
EXTIPI TYPE STRING,
GENERO TYPE STRING,
CFOP TYPE STRING,
UTRIB TYPE STRING,
UCOM TYPE STRING,
QTRIB TYPE STRING,
QCOM TYPE STRING,
VPROD TYPE STRING,
VFRETE TYPE STRING,
VSEG TYPE STRING,
VDESC TYPE STRING,
VUNCOM TYPE STRING,
CEANTRIB TYPE STRING,
VUNTRIB TYPE STRING,
NDI TYPE STRING,
DDI TYPE STRING,
XLOCDESEMB TYPE STRING,
UFDESEMB TYPE STRING,
DDESEMB TYPE STRING,
CEXPORTADOR TYPE STRING,
NADICAO TYPE STRING,
NSEQADIC TYPE STRING,
CFABRICANTE TYPE STRING,
VDESCDI TYPE STRING,
I_TPOP TYPE STRING,
I_CHASSI TYPE STRING,
I_COR TYPE STRING,
I_XCOR TYPE STRING,
I_POT TYPE STRING,
I_CM3 TYPE STRING,
I_PESOL TYPE STRING,
I_PESOB TYPE STRING,
I_NSERIE TYPE STRING,
I_TPCOMB TYPE STRING,
I_NMOTOR TYPE STRING,
I_CMKG TYPE STRING,
I_DIST TYPE STRING,
I_RENAVAM TYPE STRING,
I_ANOMOD TYPE STRING,
I_ANOFAB TYPE STRING,
I_TPPINT TYPE STRING,
I_TPVEIC TYPE STRING,
I_ESPVEIC TYPE STRING,
I_VIN TYPE STRING,
I_CONDVEIC TYPE STRING,
I_CMOD TYPE STRING,
K_TPARMA TYPE STRING,
K_NSERIE TYPE STRING,
K_NCANO TYPE STRING,
K_DESCR TYPE STRING,
L1_ICMS TYPE STRING,
L1_00_ORIG TYPE STRING,
L1_00_CST TYPE STRING,
L1_00_MODBC TYPE STRING,
L1_00_VBC TYPE STRING,
L1_00_PICMS TYPE STRING,
L1_00_VICMS TYPE STRING,
L1_10_ORIG TYPE STRING,
L1_10_CST TYPE STRING,
L1_10_MODBC TYPE STRING,
L1_10_VBC TYPE STRING,
L1_10_PICMS TYPE STRING,
L1_10_VICMS TYPE STRING,
L1_10_MODBCST TYPE STRING,
L1_10_PMVAST TYPE STRING,
L1_10_PREDBCST TYPE STRING,
L1_10_VBCST TYPE STRING,
L1_10_PICMSST TYPE STRING,
L1_10_VICMSST TYPE STRING,
L1_20_ORIG TYPE STRING,
L1_20_CST TYPE STRING,
L1_20_MODBC TYPE STRING,
L1_20_PREDBC TYPE STRING,
L1_20_VBC TYPE STRING,
L1_20_PICMS TYPE STRING,
L1_20_VICMS TYPE STRING,
L1_30_ORIG TYPE STRING,
L1_30_CST TYPE STRING,
L1_30_MODBCST TYPE STRING,
L1_30_PMVAST TYPE STRING,
L1_30_PREDBCST TYPE STRING,
L1_30_VBCST TYPE STRING,
L1_30_PICMSST TYPE STRING,
L1_30_VICMSST TYPE STRING,
L1_40_ORIG TYPE STRING,
L1_40_CST TYPE STRING,
L1_51_ORIG TYPE STRING,
L1_51_CST TYPE STRING,
L1_51_MODBC TYPE STRING,
L1_51_PREDBC TYPE STRING,
L1_51_VBC TYPE STRING,
L1_51_PICMS TYPE STRING,
L1_51_VICMS TYPE STRING,
L1_60_ORIG TYPE STRING,
L1_60_CST TYPE STRING,
L1_60_VBCST TYPE STRING,
L1_60_VICMSST TYPE STRING,
L1_70_ORIG TYPE STRING,
L1_70_CST TYPE STRING,
L1_70_MODBC TYPE STRING,
L1_70_PREDBC TYPE STRING,
L1_70_VBC TYPE STRING,
L1_70_PICMS TYPE STRING,
L1_70_VICMS TYPE STRING,
L1_70_MODBCST TYPE STRING,
L1_70_PMVAST TYPE STRING,
L1_70_PREDBCST TYPE STRING,
L1_70_VBCST TYPE STRING,
L1_70_PICMSST TYPE STRING,
L1_70_VICMSST TYPE STRING,
L1_90_ORIG TYPE STRING,
L1_90_CST TYPE STRING,
L1_90_MODBC TYPE STRING,
L1_90_PREDBC TYPE STRING,
L1_90_VBC TYPE STRING,
L1_90_PICMS TYPE STRING,
L1_90_VICMS TYPE STRING,
L1_90_MODBCST TYPE STRING,
L1_90_PMVAST TYPE STRING,
L1_90_PREDBCST TYPE STRING,
L1_90_VBCST TYPE STRING,
L1_90_PICMSST TYPE STRING,
L1_90_VICMSST TYPE STRING,
N_IPI TYPE STRING,
N_CLENQ TYPE STRING,
N_CNPJPROD TYPE STRING,
N_CSELO TYPE STRING,
N_QSELO TYPE STRING,
N_CENQ TYPE STRING,
N1_CST TYPE STRING,
N1_VBC TYPE STRING,
N1_QUNID TYPE STRING,
N1_VUNID TYPE STRING,
N1_PIPI TYPE STRING,
N1_VIPI TYPE STRING,
N2_CST TYPE STRING,
O_II TYPE STRING,
O_VBC TYPE STRING,
O_VDESPADU TYPE STRING,
O_VII TYPE STRING,
O_VIOF TYPE STRING,
P_PIS TYPE STRING,
P1_CST TYPE STRING,
P1_VBC TYPE STRING,
P1_PPIS TYPE STRING,
P1_VPIS TYPE STRING,
P2_CST TYPE STRING,
P2_QBCPROD TYPE STRING,
P2_VALIQPROD TYPE STRING,
P2_VPIS TYPE STRING,
P3_CST TYPE STRING,
P4_CST TYPE STRING,
P4_VBC TYPE STRING,
P4_PPIS TYPE STRING,
P4_QBCPROD TYPE STRING,
P4_VALIQPROD TYPE STRING,
P4_VPIS TYPE STRING,
P5_VBC TYPE STRING,
P5_PPIS TYPE STRING,
P5_QBCPROD TYPE STRING,
P5_VALIQPROD TYPE STRING,
P5_VPIS TYPE STRING,
P5_CST TYPE STRING,
Q_COFINS TYPE STRING,
Q1_CST TYPE STRING,
Q1_VBC TYPE STRING,
Q1_PCOFINS TYPE STRING,
Q1_VCOFINS TYPE STRING,
Q2_CST TYPE STRING,
Q2_QBCPROD TYPE STRING,
Q2_VALIQPROD TYPE STRING,
Q2_VCOFINS TYPE STRING,
Q3_CST TYPE STRING,
Q4_CST TYPE STRING,
Q4_VBC TYPE STRING,
Q4_PCOFINS TYPE STRING,
Q4_QBCPROD TYPE STRING,
Q4_VALIQPROD TYPE STRING,
Q4_VCOFINS TYPE STRING,
Q5_VBC TYPE STRING,
Q5_PCOFINS TYPE STRING,
Q5_QBCPROD TYPE STRING,
Q5_VALIQPROD TYPE STRING,
Q5_VCOFINS TYPE STRING,
Q5_CST TYPE STRING,
X_VBC TYPE STRING,
X_VALIQ TYPE STRING,
X_VISSQN TYPE STRING,
X_CMUNFG TYPE STRING,
X_CLISTSERV TYPE STRING,
INFADPROD TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J1B_NF_XML_H_OLD_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_J1B_NF_XML_H_OLD_STR-NITEM sy-vline 
WA_J1B_NF_XML_H_OLD_STR-CPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-CEAN sy-vline 
WA_J1B_NF_XML_H_OLD_STR-XPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-NCM sy-vline 
WA_J1B_NF_XML_H_OLD_STR-EXTIPI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-GENERO sy-vline 
WA_J1B_NF_XML_H_OLD_STR-CFOP sy-vline 
WA_J1B_NF_XML_H_OLD_STR-UTRIB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-UCOM sy-vline 
WA_J1B_NF_XML_H_OLD_STR-QTRIB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-QCOM sy-vline 
WA_J1B_NF_XML_H_OLD_STR-VPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-VFRETE sy-vline 
WA_J1B_NF_XML_H_OLD_STR-VSEG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-VDESC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-VUNCOM sy-vline 
WA_J1B_NF_XML_H_OLD_STR-CEANTRIB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-VUNTRIB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-NDI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-DDI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-XLOCDESEMB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-UFDESEMB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-DDESEMB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-CEXPORTADOR sy-vline 
WA_J1B_NF_XML_H_OLD_STR-NADICAO sy-vline 
WA_J1B_NF_XML_H_OLD_STR-NSEQADIC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-CFABRICANTE sy-vline 
WA_J1B_NF_XML_H_OLD_STR-VDESCDI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_TPOP sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_CHASSI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_COR sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_XCOR sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_POT sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_CM3 sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_PESOL sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_PESOB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_NSERIE sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_TPCOMB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_NMOTOR sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_CMKG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_DIST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_RENAVAM sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_ANOMOD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_ANOFAB sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_TPPINT sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_TPVEIC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_ESPVEIC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_VIN sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_CONDVEIC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-I_CMOD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-K_TPARMA sy-vline 
WA_J1B_NF_XML_H_OLD_STR-K_NSERIE sy-vline 
WA_J1B_NF_XML_H_OLD_STR-K_NCANO sy-vline 
WA_J1B_NF_XML_H_OLD_STR-K_DESCR sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_ICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_00_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_00_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_00_MODBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_00_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_00_PICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_00_VICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_MODBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_PICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_VICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_MODBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_PMVAST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_PREDBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_VBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_PICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_10_VICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_20_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_20_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_20_MODBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_20_PREDBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_20_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_20_PICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_20_VICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_MODBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_PMVAST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_PREDBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_VBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_PICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_30_VICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_40_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_40_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_51_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_51_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_51_MODBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_51_PREDBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_51_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_51_PICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_51_VICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_60_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_60_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_60_VBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_60_VICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_MODBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_PREDBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_PICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_VICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_MODBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_PMVAST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_PREDBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_VBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_PICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_70_VICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_ORIG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_MODBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_PREDBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_PICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_VICMS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_MODBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_PMVAST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_PREDBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_VBCST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_PICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-L1_90_VICMSST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N_IPI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N_CLENQ sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N_CNPJPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N_CSELO sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N_QSELO sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N_CENQ sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N1_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N1_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N1_QUNID sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N1_VUNID sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N1_PIPI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N1_VIPI sy-vline 
WA_J1B_NF_XML_H_OLD_STR-N2_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-O_II sy-vline 
WA_J1B_NF_XML_H_OLD_STR-O_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-O_VDESPADU sy-vline 
WA_J1B_NF_XML_H_OLD_STR-O_VII sy-vline 
WA_J1B_NF_XML_H_OLD_STR-O_VIOF sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P_PIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P1_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P1_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P1_PPIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P1_VPIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P2_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P2_QBCPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P2_VALIQPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P2_VPIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P3_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P4_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P4_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P4_PPIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P4_QBCPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P4_VALIQPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P4_VPIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P5_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P5_PPIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P5_QBCPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P5_VALIQPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P5_VPIS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-P5_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q_COFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q1_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q1_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q1_PCOFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q1_VCOFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q2_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q2_QBCPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q2_VALIQPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q2_VCOFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q3_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q4_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q4_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q4_PCOFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q4_QBCPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q4_VALIQPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q4_VCOFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q5_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q5_PCOFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q5_QBCPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q5_VALIQPROD sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q5_VCOFINS sy-vline 
WA_J1B_NF_XML_H_OLD_STR-Q5_CST sy-vline 
WA_J1B_NF_XML_H_OLD_STR-X_VBC sy-vline 
WA_J1B_NF_XML_H_OLD_STR-X_VALIQ sy-vline 
WA_J1B_NF_XML_H_OLD_STR-X_VISSQN sy-vline 
WA_J1B_NF_XML_H_OLD_STR-X_CMUNFG sy-vline 
WA_J1B_NF_XML_H_OLD_STR-X_CLISTSERV sy-vline 
WA_J1B_NF_XML_H_OLD_STR-INFADPROD sy-vline      INTO ld_text SEPARATED BY SPACE.

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