ABAP Select data from SAP table J_1BNFDOC 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_1BNFDOC 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_1BNFDOC. 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_1BNFDOC 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_1BNFDOC TYPE STANDARD TABLE OF J_1BNFDOC,
      WA_J_1BNFDOC TYPE J_1BNFDOC,
      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_1BNFDOC> TYPE J_1BNFDOC.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM J_1BNFDOC
*  INTO TABLE @DATA(IT_J_1BNFDOC2).
*--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_1BNFDOC INDEX 1 INTO DATA(WA_J_1BNFDOC2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<J_1BNFDOC>-MANDT = 1.
<J_1BNFDOC>-DOCNUM = 1.
<J_1BNFDOC>-NFTYPE = 1.
<J_1BNFDOC>-DOCTYP = 1.
<J_1BNFDOC>-DIRECT = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_J_1BNFDOC-DOCDAT, sy-vline,
  WA_J_1BNFDOC-PSTDAT, sy-vline,
  WA_J_1BNFDOC-CREDAT, sy-vline,
  WA_J_1BNFDOC-CRETIM, sy-vline,
  WA_J_1BNFDOC-CRENAM, sy-vline,
  WA_J_1BNFDOC-CHADAT, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_J_1BNFDOC 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_1BNFDOC 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_1BNFDOC INTO WA_J_1BNFDOC.


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

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

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

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

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

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

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

*Conversion exit ISOLA, internal->external for field SPRAS
CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT'
  EXPORTING
    input =                      WA_J_1BNFDOC-SPRAS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BNFDOC-SPRAS.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit CPFBR, internal->external for field CPF
CALL FUNCTION 'CONVERSION_EXIT_CPFBR_OUTPUT'
  EXPORTING
    input =                      WA_J_1BNFDOC-CPF
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BNFDOC-CPF.
WRITE:/ 'New Value:', ld_input.

*Conversion exit SXIDN, internal->external for field SMTP_ADDR
CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT'
  EXPORTING
    input =                      WA_J_1BNFDOC-SMTP_ADDR
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BNFDOC-SMTP_ADDR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit ALPHA, internal->external for field COD_CTA_HEADER
CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'
  EXPORTING
    input =                      WA_J_1BNFDOC-COD_CTA_HEADER
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_J_1BNFDOC-COD_CTA_HEADER.
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_1BNFDOC_STR, 
MANDT TYPE STRING,
DOCNUM TYPE STRING,
NFTYPE TYPE STRING,
DOCTYP TYPE STRING,
DIRECT TYPE STRING,
DOCDAT TYPE STRING,
PSTDAT TYPE STRING,
CREDAT TYPE STRING,
CRETIM TYPE STRING,
CRENAM TYPE STRING,
CHADAT TYPE STRING,
CHATIM TYPE STRING,
CHANAM TYPE STRING,
FORM TYPE STRING,
MODEL TYPE STRING,
SERIES TYPE STRING,
SUBSER TYPE STRING,
NFNUM TYPE STRING,
ENTRAD TYPE STRING,
FATURA TYPE STRING,
ZTERM TYPE STRING,
PRINTD TYPE STRING,
MANUAL TYPE STRING,
FOLLOW TYPE STRING,
WAERK TYPE STRING,
BELNR TYPE STRING,
GJAHR TYPE STRING,
BUKRS TYPE STRING,
BRANCH TYPE STRING,
PARVW TYPE STRING,
PARID TYPE STRING,
PARXCPDK TYPE STRING,
PARTYP TYPE STRING,
CANCEL TYPE STRING,
CANDAT TYPE STRING,
SUBSEQ TYPE STRING,
DOCREF TYPE STRING,
TRATY TYPE STRING,
TRAID TYPE STRING,
INCO1 TYPE STRING,
INCO2 TYPE STRING,
SHPUNT TYPE STRING,
ANZPK TYPE STRING,
SHPMRK TYPE STRING,
SHPNUM TYPE STRING,
BRGEW TYPE STRING,
NTGEW TYPE STRING,
GEWEI TYPE STRING,
ZFBDT TYPE STRING,
WITHA TYPE STRING,
OBSERVAT TYPE STRING,
VSTEL TYPE STRING,
NFDEC TYPE STRING,
NFTOT TYPE STRING,
AWSYS TYPE STRING,
PREFNO TYPE STRING,
CHECOD TYPE STRING,
NFE TYPE STRING,
NFENUM TYPE STRING,
NFESRV TYPE STRING,
CONTING TYPE STRING,
AUTHCOD TYPE STRING,
DOCSTAT TYPE STRING,
XMLVERS TYPE STRING,
NFENRNR TYPE STRING,
CODE TYPE STRING,
ANRED TYPE STRING,
NAME1 TYPE STRING,
NAME2 TYPE STRING,
NAME3 TYPE STRING,
NAME4 TYPE STRING,
STRAS TYPE STRING,
ORT01 TYPE STRING,
ORT02 TYPE STRING,
REGIO TYPE STRING,
LAND1 TYPE STRING,
PSTLZ TYPE STRING,
PFACH TYPE STRING,
PSTL2 TYPE STRING,
SORTL TYPE STRING,
SPRAS TYPE STRING,
TELF1 TYPE STRING,
TELFX TYPE STRING,
TELTX TYPE STRING,
TELX1 TYPE STRING,
INDUST TYPE STRING,
STKZN TYPE STRING,
CGC TYPE STRING,
CPF TYPE STRING,
STAINS TYPE STRING,
MUNINS TYPE STRING,
TXJCD TYPE STRING,
HAUSN TYPE STRING,
STOCK TYPE STRING,
STREET TYPE STRING,
HOUSE_NUM1 TYPE STRING,
HOUSE_NUM2 TYPE STRING,
IND_IEDEST TYPE STRING,
FOREIGNID TYPE STRING,
SMTP_ADDR TYPE STRING,
AUTHDATE TYPE STRING,
AUTHTIME TYPE STRING,
BAPI_FLAG TYPE STRING,
SERV_TP TYPE STRING,
CTE_STRT_LCT TYPE STRING,
CTE_END_LCT TYPE STRING,
MAIN_PRODUCT TYPE STRING,
RCVR_WDW TYPE STRING,
PLN_DT_DLV TYPE STRING,
FTL_IND TYPE STRING,
VOL_TRANSP TYPE STRING,
VOL_UNIT TYPE STRING,
TOTAL_REF_AMT TYPE STRING,
TRANSP_MODE TYPE STRING,
CRE_TIMESTAMP TYPE STRING,
CTE_PARTNER TYPE STRING,
CTE_SERV_TAKER TYPE STRING,
CTE_TYPE TYPE STRING,
AUTOM_INCOMING TYPE STRING,
DOCNUM_NEXT TYPE STRING,
DOCNUM_PREV TYPE STRING,
MUNICIPAL TYPE STRING,
NATOP TYPE STRING,
INDPAG TYPE STRING,
DSAIENT TYPE STRING,
HSAIENT TYPE STRING,
CNPJ_BUPLA TYPE STRING,
IE_BUPLA TYPE STRING,
IEST_BUPLA TYPE STRING,
IEST_PARTNER TYPE STRING,
IM_BUPLA TYPE STRING,
CNAE_BUPLA TYPE STRING,
CNAE_PARTNER TYPE STRING,
CRT_BUPLA TYPE STRING,
CRT_PARTNER TYPE STRING,
ISUF TYPE STRING,
MODFRETE TYPE STRING,
PLACA TYPE STRING,
UF1 TYPE STRING,
RNTC TYPE STRING,
VAGAO TYPE STRING,
BALSA TYPE STRING,
NFAT TYPE STRING,
VORIG TYPE STRING,
VDESC TYPE STRING,
VLIQ TYPE STRING,
UFEMBARQ TYPE STRING,
XLOCEMBARQ TYPE STRING,
XNEMP TYPE STRING,
SPRAS_BUPLA TYPE STRING,
IND_EMIT TYPE STRING,
COD_SIT TYPE STRING,
IND_FINAL TYPE STRING,
IND_PRES TYPE STRING,
XLOCDESPACHO TYPE STRING,
DCOMPET TYPE STRING,
CREGTRIB TYPE STRING,
RETTRANSP_CFOP TYPE STRING,
RETTRANSP_CMUNFG TYPE STRING,
IND_BADI_CTRL TYPE STRING,
ID_DEST TYPE STRING,
HEMI TYPE STRING,
V_TROCO TYPE STRING,
MOD TYPE STRING,
NCOO TYPE STRING,
INDINTERMED TYPE STRING,
IDCADINTTRAN TYPE STRING,
CNPJINTERMED TYPE STRING,
SAFRA TYPE STRING,
REF_MONTH_YEAR TYPE STRING,
QTOTMES TYPE STRING,
QTOTANT TYPE STRING,
QTOTGER TYPE STRING,
VFOR TYPE STRING,
VTOTDED TYPE STRING,
VLIQFOR TYPE STRING,
ITMF_REPDAT TYPE STRING,
ITMF_PCO_CATEGORY TYPE STRING,
PARTR TYPE STRING,
NFNUM_UTILITIES TYPE STRING,
PARTNER_ROLE TYPE STRING,
COD_CTA_HEADER TYPE STRING,
API TYPE STRING,
TAX_SERVICES_CALC TYPE STRING,END OF T_EKKO_STR.
DATA: WA_J_1BNFDOC_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_1BNFDOC_STR-MANDT sy-vline 
WA_J_1BNFDOC_STR-DOCNUM sy-vline 
WA_J_1BNFDOC_STR-NFTYPE sy-vline 
WA_J_1BNFDOC_STR-DOCTYP sy-vline 
WA_J_1BNFDOC_STR-DIRECT sy-vline 
WA_J_1BNFDOC_STR-DOCDAT sy-vline 
WA_J_1BNFDOC_STR-PSTDAT sy-vline 
WA_J_1BNFDOC_STR-CREDAT sy-vline 
WA_J_1BNFDOC_STR-CRETIM sy-vline 
WA_J_1BNFDOC_STR-CRENAM sy-vline 
WA_J_1BNFDOC_STR-CHADAT sy-vline 
WA_J_1BNFDOC_STR-CHATIM sy-vline 
WA_J_1BNFDOC_STR-CHANAM sy-vline 
WA_J_1BNFDOC_STR-FORM sy-vline 
WA_J_1BNFDOC_STR-MODEL sy-vline 
WA_J_1BNFDOC_STR-SERIES sy-vline 
WA_J_1BNFDOC_STR-SUBSER sy-vline 
WA_J_1BNFDOC_STR-NFNUM sy-vline 
WA_J_1BNFDOC_STR-ENTRAD sy-vline 
WA_J_1BNFDOC_STR-FATURA sy-vline 
WA_J_1BNFDOC_STR-ZTERM sy-vline 
WA_J_1BNFDOC_STR-PRINTD sy-vline 
WA_J_1BNFDOC_STR-MANUAL sy-vline 
WA_J_1BNFDOC_STR-FOLLOW sy-vline 
WA_J_1BNFDOC_STR-WAERK sy-vline 
WA_J_1BNFDOC_STR-BELNR sy-vline 
WA_J_1BNFDOC_STR-GJAHR sy-vline 
WA_J_1BNFDOC_STR-BUKRS sy-vline 
WA_J_1BNFDOC_STR-BRANCH sy-vline 
WA_J_1BNFDOC_STR-PARVW sy-vline 
WA_J_1BNFDOC_STR-PARID sy-vline 
WA_J_1BNFDOC_STR-PARXCPDK sy-vline 
WA_J_1BNFDOC_STR-PARTYP sy-vline 
WA_J_1BNFDOC_STR-CANCEL sy-vline 
WA_J_1BNFDOC_STR-CANDAT sy-vline 
WA_J_1BNFDOC_STR-SUBSEQ sy-vline 
WA_J_1BNFDOC_STR-DOCREF sy-vline 
WA_J_1BNFDOC_STR-TRATY sy-vline 
WA_J_1BNFDOC_STR-TRAID sy-vline 
WA_J_1BNFDOC_STR-INCO1 sy-vline 
WA_J_1BNFDOC_STR-INCO2 sy-vline 
WA_J_1BNFDOC_STR-SHPUNT sy-vline 
WA_J_1BNFDOC_STR-ANZPK sy-vline 
WA_J_1BNFDOC_STR-SHPMRK sy-vline 
WA_J_1BNFDOC_STR-SHPNUM sy-vline 
WA_J_1BNFDOC_STR-BRGEW sy-vline 
WA_J_1BNFDOC_STR-NTGEW sy-vline 
WA_J_1BNFDOC_STR-GEWEI sy-vline 
WA_J_1BNFDOC_STR-ZFBDT sy-vline 
WA_J_1BNFDOC_STR-WITHA sy-vline 
WA_J_1BNFDOC_STR-OBSERVAT sy-vline 
WA_J_1BNFDOC_STR-VSTEL sy-vline 
WA_J_1BNFDOC_STR-NFDEC sy-vline 
WA_J_1BNFDOC_STR-NFTOT sy-vline 
WA_J_1BNFDOC_STR-AWSYS sy-vline 
WA_J_1BNFDOC_STR-PREFNO sy-vline 
WA_J_1BNFDOC_STR-CHECOD sy-vline 
WA_J_1BNFDOC_STR-NFE sy-vline 
WA_J_1BNFDOC_STR-NFENUM sy-vline 
WA_J_1BNFDOC_STR-NFESRV sy-vline 
WA_J_1BNFDOC_STR-CONTING sy-vline 
WA_J_1BNFDOC_STR-AUTHCOD sy-vline 
WA_J_1BNFDOC_STR-DOCSTAT sy-vline 
WA_J_1BNFDOC_STR-XMLVERS sy-vline 
WA_J_1BNFDOC_STR-NFENRNR sy-vline 
WA_J_1BNFDOC_STR-CODE sy-vline 
WA_J_1BNFDOC_STR-ANRED sy-vline 
WA_J_1BNFDOC_STR-NAME1 sy-vline 
WA_J_1BNFDOC_STR-NAME2 sy-vline 
WA_J_1BNFDOC_STR-NAME3 sy-vline 
WA_J_1BNFDOC_STR-NAME4 sy-vline 
WA_J_1BNFDOC_STR-STRAS sy-vline 
WA_J_1BNFDOC_STR-ORT01 sy-vline 
WA_J_1BNFDOC_STR-ORT02 sy-vline 
WA_J_1BNFDOC_STR-REGIO sy-vline 
WA_J_1BNFDOC_STR-LAND1 sy-vline 
WA_J_1BNFDOC_STR-PSTLZ sy-vline 
WA_J_1BNFDOC_STR-PFACH sy-vline 
WA_J_1BNFDOC_STR-PSTL2 sy-vline 
WA_J_1BNFDOC_STR-SORTL sy-vline 
WA_J_1BNFDOC_STR-SPRAS sy-vline 
WA_J_1BNFDOC_STR-TELF1 sy-vline 
WA_J_1BNFDOC_STR-TELFX sy-vline 
WA_J_1BNFDOC_STR-TELTX sy-vline 
WA_J_1BNFDOC_STR-TELX1 sy-vline 
WA_J_1BNFDOC_STR-INDUST sy-vline 
WA_J_1BNFDOC_STR-STKZN sy-vline 
WA_J_1BNFDOC_STR-CGC sy-vline 
WA_J_1BNFDOC_STR-CPF sy-vline 
WA_J_1BNFDOC_STR-STAINS sy-vline 
WA_J_1BNFDOC_STR-MUNINS sy-vline 
WA_J_1BNFDOC_STR-TXJCD sy-vline 
WA_J_1BNFDOC_STR-HAUSN sy-vline 
WA_J_1BNFDOC_STR-STOCK sy-vline 
WA_J_1BNFDOC_STR-STREET sy-vline 
WA_J_1BNFDOC_STR-HOUSE_NUM1 sy-vline 
WA_J_1BNFDOC_STR-HOUSE_NUM2 sy-vline 
WA_J_1BNFDOC_STR-IND_IEDEST sy-vline 
WA_J_1BNFDOC_STR-FOREIGNID sy-vline 
WA_J_1BNFDOC_STR-SMTP_ADDR sy-vline 
WA_J_1BNFDOC_STR-AUTHDATE sy-vline 
WA_J_1BNFDOC_STR-AUTHTIME sy-vline 
WA_J_1BNFDOC_STR-BAPI_FLAG sy-vline 
WA_J_1BNFDOC_STR-SERV_TP sy-vline 
WA_J_1BNFDOC_STR-CTE_STRT_LCT sy-vline 
WA_J_1BNFDOC_STR-CTE_END_LCT sy-vline 
WA_J_1BNFDOC_STR-MAIN_PRODUCT sy-vline 
WA_J_1BNFDOC_STR-RCVR_WDW sy-vline 
WA_J_1BNFDOC_STR-PLN_DT_DLV sy-vline 
WA_J_1BNFDOC_STR-FTL_IND sy-vline 
WA_J_1BNFDOC_STR-VOL_TRANSP sy-vline 
WA_J_1BNFDOC_STR-VOL_UNIT sy-vline 
WA_J_1BNFDOC_STR-TOTAL_REF_AMT sy-vline 
WA_J_1BNFDOC_STR-TRANSP_MODE sy-vline 
WA_J_1BNFDOC_STR-CRE_TIMESTAMP sy-vline 
WA_J_1BNFDOC_STR-CTE_PARTNER sy-vline 
WA_J_1BNFDOC_STR-CTE_SERV_TAKER sy-vline 
WA_J_1BNFDOC_STR-CTE_TYPE sy-vline 
WA_J_1BNFDOC_STR-AUTOM_INCOMING sy-vline 
WA_J_1BNFDOC_STR-DOCNUM_NEXT sy-vline 
WA_J_1BNFDOC_STR-DOCNUM_PREV sy-vline 
WA_J_1BNFDOC_STR-MUNICIPAL sy-vline 
WA_J_1BNFDOC_STR-NATOP sy-vline 
WA_J_1BNFDOC_STR-INDPAG sy-vline 
WA_J_1BNFDOC_STR-DSAIENT sy-vline 
WA_J_1BNFDOC_STR-HSAIENT sy-vline 
WA_J_1BNFDOC_STR-CNPJ_BUPLA sy-vline 
WA_J_1BNFDOC_STR-IE_BUPLA sy-vline 
WA_J_1BNFDOC_STR-IEST_BUPLA sy-vline 
WA_J_1BNFDOC_STR-IEST_PARTNER sy-vline 
WA_J_1BNFDOC_STR-IM_BUPLA sy-vline 
WA_J_1BNFDOC_STR-CNAE_BUPLA sy-vline 
WA_J_1BNFDOC_STR-CNAE_PARTNER sy-vline 
WA_J_1BNFDOC_STR-CRT_BUPLA sy-vline 
WA_J_1BNFDOC_STR-CRT_PARTNER sy-vline 
WA_J_1BNFDOC_STR-ISUF sy-vline 
WA_J_1BNFDOC_STR-MODFRETE sy-vline 
WA_J_1BNFDOC_STR-PLACA sy-vline 
WA_J_1BNFDOC_STR-UF1 sy-vline 
WA_J_1BNFDOC_STR-RNTC sy-vline 
WA_J_1BNFDOC_STR-VAGAO sy-vline 
WA_J_1BNFDOC_STR-BALSA sy-vline 
WA_J_1BNFDOC_STR-NFAT sy-vline 
WA_J_1BNFDOC_STR-VORIG sy-vline 
WA_J_1BNFDOC_STR-VDESC sy-vline 
WA_J_1BNFDOC_STR-VLIQ sy-vline 
WA_J_1BNFDOC_STR-UFEMBARQ sy-vline 
WA_J_1BNFDOC_STR-XLOCEMBARQ sy-vline 
WA_J_1BNFDOC_STR-XNEMP sy-vline 
WA_J_1BNFDOC_STR-SPRAS_BUPLA sy-vline 
WA_J_1BNFDOC_STR-IND_EMIT sy-vline 
WA_J_1BNFDOC_STR-COD_SIT sy-vline 
WA_J_1BNFDOC_STR-IND_FINAL sy-vline 
WA_J_1BNFDOC_STR-IND_PRES sy-vline 
WA_J_1BNFDOC_STR-XLOCDESPACHO sy-vline 
WA_J_1BNFDOC_STR-DCOMPET sy-vline 
WA_J_1BNFDOC_STR-CREGTRIB sy-vline 
WA_J_1BNFDOC_STR-RETTRANSP_CFOP sy-vline 
WA_J_1BNFDOC_STR-RETTRANSP_CMUNFG sy-vline 
WA_J_1BNFDOC_STR-IND_BADI_CTRL sy-vline 
WA_J_1BNFDOC_STR-ID_DEST sy-vline 
WA_J_1BNFDOC_STR-HEMI sy-vline 
WA_J_1BNFDOC_STR-V_TROCO sy-vline 
WA_J_1BNFDOC_STR-MOD sy-vline 
WA_J_1BNFDOC_STR-NCOO sy-vline 
WA_J_1BNFDOC_STR-INDINTERMED sy-vline 
WA_J_1BNFDOC_STR-IDCADINTTRAN sy-vline 
WA_J_1BNFDOC_STR-CNPJINTERMED sy-vline 
WA_J_1BNFDOC_STR-SAFRA sy-vline 
WA_J_1BNFDOC_STR-REF_MONTH_YEAR sy-vline 
WA_J_1BNFDOC_STR-QTOTMES sy-vline 
WA_J_1BNFDOC_STR-QTOTANT sy-vline 
WA_J_1BNFDOC_STR-QTOTGER sy-vline 
WA_J_1BNFDOC_STR-VFOR sy-vline 
WA_J_1BNFDOC_STR-VTOTDED sy-vline 
WA_J_1BNFDOC_STR-VLIQFOR sy-vline 
WA_J_1BNFDOC_STR-ITMF_REPDAT sy-vline 
WA_J_1BNFDOC_STR-ITMF_PCO_CATEGORY sy-vline 
WA_J_1BNFDOC_STR-PARTR sy-vline 
WA_J_1BNFDOC_STR-NFNUM_UTILITIES sy-vline 
WA_J_1BNFDOC_STR-PARTNER_ROLE sy-vline 
WA_J_1BNFDOC_STR-COD_CTA_HEADER sy-vline 
WA_J_1BNFDOC_STR-API sy-vline 
WA_J_1BNFDOC_STR-TAX_SERVICES_CALC sy-vline      INTO ld_text SEPARATED BY SPACE.

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