ABAP Select data from SAP table BAPILEDLHEAD 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 BAPILEDLHEAD 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 BAPILEDLHEAD. 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 BAPILEDLHEAD 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_BAPILEDLHEAD TYPE STANDARD TABLE OF BAPILEDLHEAD,
      WA_BAPILEDLHEAD TYPE BAPILEDLHEAD,
      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: <BAPILEDLHEAD> TYPE BAPILEDLHEAD.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM BAPILEDLHEAD
*  INTO TABLE @DATA(IT_BAPILEDLHEAD2).
*--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_BAPILEDLHEAD INDEX 1 INTO DATA(WA_BAPILEDLHEAD2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<BAPILEDLHEAD>-CLIENT = 1.
<BAPILEDLHEAD>-DELIV_NUMB = 1.
<BAPILEDLHEAD>-CREATED_BY = 1.
<BAPILEDLHEAD>-REC_TIME = 1.
<BAPILEDLHEAD>-REC_DATE = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_BAPILEDLHEAD-SALES_DIST, sy-vline,
  WA_BAPILEDLHEAD-SHIP_POINT, sy-vline,
  WA_BAPILEDLHEAD-SALESORG, sy-vline,
  WA_BAPILEDLHEAD-DLV_TYPE, sy-vline,
  WA_BAPILEDLHEAD-COMPL_DLV, sy-vline,
  WA_BAPILEDLHEAD-ORDER_COMP, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_BAPILEDLHEAD 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_BAPILEDLHEAD 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_BAPILEDLHEAD INTO WA_BAPILEDLHEAD.


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

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

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

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

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

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

*Conversion exit EXCRT, internal->external for field EXCHRATEST
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_BAPILEDLHEAD-EXCHRATEST
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPILEDLHEAD-EXCHRATEST.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit EXCRT, internal->external for field EXCH_RATE_LOC
CALL FUNCTION 'CONVERSION_EXIT_EXCRT_OUTPUT'
  EXPORTING
    input =                      WA_BAPILEDLHEAD-EXCH_RATE_LOC
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPILEDLHEAD-EXCH_RATE_LOC.
WRITE:/ 'New Value:', ld_input.

*Conversion exit TMPLA, internal->external for field TIMESEG_TEMPL
CALL FUNCTION 'CONVERSION_EXIT_TMPLA_OUTPUT'
  EXPORTING
    input =                      WA_BAPILEDLHEAD-TIMESEG_TEMPL
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPILEDLHEAD-TIMESEG_TEMPL.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit MATN5, internal->external for field MEANS_OF_TRANS
CALL FUNCTION 'CONVERSION_EXIT_MATN5_OUTPUT'
  EXPORTING
    input =                      WA_BAPILEDLHEAD-MEANS_OF_TRANS
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPILEDLHEAD-MEANS_OF_TRANS.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field MEANS_OF_TRANS_LONG
CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT'
  EXPORTING
    input =                      WA_BAPILEDLHEAD-MEANS_OF_TRANS_LONG
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_BAPILEDLHEAD-MEANS_OF_TRANS_LONG.
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_BAPILEDLHEAD_STR, 
CLIENT TYPE STRING,
DELIV_NUMB TYPE STRING,
CREATED_BY TYPE STRING,
REC_TIME TYPE STRING,
REC_DATE TYPE STRING,
SALES_DIST TYPE STRING,
SHIP_POINT TYPE STRING,
SALESORG TYPE STRING,
DLV_TYPE TYPE STRING,
COMPL_DLV TYPE STRING,
ORDER_COMP TYPE STRING,
GI_DATE_PLAN TYPE STRING,
LOAD_DATE TYPE STRING,
TP_DATE TYPE STRING,
DLV_DATE TYPE STRING,
PICK_DATE TYPE STRING,
UNLOAD_PT TYPE STRING,
INCOTERMS1 TYPE STRING,
INCOTERMS2 TYPE STRING,
EXPORT_IND TYPE STRING,
ROUTE TYPE STRING,
BILL_BLOCK TYPE STRING,
DLV_BLOCK TYPE STRING,
SD_DOC_CAT TYPE STRING,
FAC_CALEND TYPE STRING,
DLV_PRIO TYPE STRING,
SHIP_COND TYPE STRING,
SHIP_TO TYPE STRING,
SOLD_TO TYPE STRING,
CUST_GROUP TYPE STRING,
TOTAL_WGHT TYPE STRING,
NET_WEIGHT TYPE STRING,
UNIT_OF_WT TYPE STRING,
UNIT_OF_WT_ISO TYPE STRING,
VOLUME TYPE STRING,
VOLUMEUNIT TYPE STRING,
VOLUMEUNIT_ISO TYPE STRING,
NOSHPUNITS TYPE STRING,
PICK_ITEMS_LOC TYPE STRING,
DLV_TIME TYPE STRING,
WEIGHT_GRP_DLV TYPE STRING,
LOADING_PT TYPE STRING,
TRANS_GRP TYPE STRING,
BILL_TYPE_PROP TYPE STRING,
BILL_DATE TYPE STRING,
BILL_SCHED TYPE STRING,
ROUTE_ORD TYPE STRING,
UPDATE_GRP TYPE STRING,
PROCEDURE TYPE STRING,
CONDITION TYPE STRING,
CURRENCY TYPE STRING,
CURRENCY_ISO TYPE STRING,
SALES_OFF TYPE STRING,
SHIP_PROC_TIME TYPE STRING,
COMP_CRIT_DLV TYPE STRING,
TRANS_CENTR TYPE STRING,
COMM_NO TYPE STRING,
CURRENCY_STAT TYPE STRING,
CURRENCY_STAT_ISO TYPE STRING,
EXCHRATEST TYPE STRING,
EXPORT_NO TYPE STRING,
CH_ON TYPE STRING,
WHSE_NO TYPE STRING,
ONE_WAREH_DLV TYPE STRING,
SALESORG_IB TYPE STRING,
DISTR_CHAN_IB TYPE STRING,
DIVISION_IB TYPE STRING,
BILL_TYPE_IB TYPE STRING,
DATE_IB TYPE STRING,
BILL_DATE_IB TYPE STRING,
CUSTOMER_IB TYPE STRING,
C_CTR_AREA TYPE STRING,
CRED_ACCNT TYPE STRING,
CRED_GROUP TYPE STRING,
REPR_GROUP TYPE STRING,
RISK_CATEG TYPE STRING,
CURRENCY_CM TYPE STRING,
CURRENCY_CM_ISO TYPE STRING,
REL_CRED_VALUE TYPE STRING,
REL_CRED_VALUE_ISO TYPE STRING,
BILLOFLADING TYPE STRING,
VENDOR TYPE STRING,
TRANS_CAT TYPE STRING,
TRANSP_ID TYPE STRING,
REL_DATE_CM TYPE STRING,
NEXT_SHP_DATE TYPE STRING,
GR_GI_SLIP_NO TYPE STRING,
GI_DATE_ACT TYPE STRING,
SHIP_BLOCK_REA TYPE STRING,
EXT_DLV_SYS_ID TYPE STRING,
EXTDELV_NO TYPE STRING,
ORDERID TYPE STRING,
SEARCH_PR_BATCH TYPE STRING,
CORR_DLV TYPE STRING,
PROCEDURE_SHP TYPE STRING,
CONDITION_DLV TYPE STRING,
ROUTESCHED TYPE STRING,
RECEIV_PLANT TYPE STRING,
FIN_DOC_IN TYPE STRING,
PAY_GUAR_PROC TYPE STRING,
PICK_TIME TYPE STRING,
TP_TIME TYPE STRING,
LOAD_TIME TYPE STRING,
GI_TIME TYPE STRING,
DOOR TYPE STRING,
MAT_STAG_AREA TYPE STRING,
CURRENCY_LOC TYPE STRING,
CURRENCY_LOC_ISO TYPE STRING,
EXCH_RATE_LOC TYPE STRING,
DEPR_PRC_LOC TYPE STRING,
DANG_GOODS_PROF TYPE STRING,
REF_DOC_NO TYPE STRING,
UPDATE_IND TYPE STRING,
NET_VAL_HD TYPE STRING,
NET_VAL_HD_ISO TYPE STRING,
UID_DLV TYPE STRING,
TIMESEG_EXISTS TYPE STRING,
TIMESEG_TEMPL TYPE STRING,
TIMEZONE_DLV TYPE STRING,
TIMEZONE_REC TYPE STRING,
DANG_GOODS_IND TYPE STRING,
ORIG_SYS_DLV TYPE STRING,
GOOD_MOVE_IND TYPE STRING,
DISTRIB_STATUS TYPE STRING,
COMPANY_ID TYPE STRING,
CHANGED_BY TYPE STRING,
DOC_DATE TYPE STRING,
TRANS_CODE TYPE STRING,
SHP_TYPE TYPE STRING,
MEANS_OF_TRANS TYPE STRING,
SPEC_PROC_IND TYPE STRING,
VAL_CALC_OPEN TYPE STRING,
AUT_TO_CREAT TYPE STRING,
SUPPLYAREA TYPE STRING,
DLV_TYPE_SUCC TYPE STRING,
POD_DATE TYPE STRING,
POD_TIME TYPE STRING,
GEOROUTE TYPE STRING,
GEOROUTE_SRC TYPE STRING,
CARRIER_IND TYPE STRING,
GTS_RELEVANCE TYPE STRING,
GTS_ROUTE_CD TYPE STRING,
DIRECT_BILLING TYPE STRING,
IBGI_STATUS TYPE STRING,
PRINTER_PROF TYPE STRING,
TRNSP_MODE TYPE STRING,
SD_DOC_CAT_LONG TYPE STRING,
MEANS_OF_TRANS_LONG TYPE STRING,END OF T_EKKO_STR.
DATA: WA_BAPILEDLHEAD_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_BAPILEDLHEAD_STR-CLIENT sy-vline 
WA_BAPILEDLHEAD_STR-DELIV_NUMB sy-vline 
WA_BAPILEDLHEAD_STR-CREATED_BY sy-vline 
WA_BAPILEDLHEAD_STR-REC_TIME sy-vline 
WA_BAPILEDLHEAD_STR-REC_DATE sy-vline 
WA_BAPILEDLHEAD_STR-SALES_DIST sy-vline 
WA_BAPILEDLHEAD_STR-SHIP_POINT sy-vline 
WA_BAPILEDLHEAD_STR-SALESORG sy-vline 
WA_BAPILEDLHEAD_STR-DLV_TYPE sy-vline 
WA_BAPILEDLHEAD_STR-COMPL_DLV sy-vline 
WA_BAPILEDLHEAD_STR-ORDER_COMP sy-vline 
WA_BAPILEDLHEAD_STR-GI_DATE_PLAN sy-vline 
WA_BAPILEDLHEAD_STR-LOAD_DATE sy-vline 
WA_BAPILEDLHEAD_STR-TP_DATE sy-vline 
WA_BAPILEDLHEAD_STR-DLV_DATE sy-vline 
WA_BAPILEDLHEAD_STR-PICK_DATE sy-vline 
WA_BAPILEDLHEAD_STR-UNLOAD_PT sy-vline 
WA_BAPILEDLHEAD_STR-INCOTERMS1 sy-vline 
WA_BAPILEDLHEAD_STR-INCOTERMS2 sy-vline 
WA_BAPILEDLHEAD_STR-EXPORT_IND sy-vline 
WA_BAPILEDLHEAD_STR-ROUTE sy-vline 
WA_BAPILEDLHEAD_STR-BILL_BLOCK sy-vline 
WA_BAPILEDLHEAD_STR-DLV_BLOCK sy-vline 
WA_BAPILEDLHEAD_STR-SD_DOC_CAT sy-vline 
WA_BAPILEDLHEAD_STR-FAC_CALEND sy-vline 
WA_BAPILEDLHEAD_STR-DLV_PRIO sy-vline 
WA_BAPILEDLHEAD_STR-SHIP_COND sy-vline 
WA_BAPILEDLHEAD_STR-SHIP_TO sy-vline 
WA_BAPILEDLHEAD_STR-SOLD_TO sy-vline 
WA_BAPILEDLHEAD_STR-CUST_GROUP sy-vline 
WA_BAPILEDLHEAD_STR-TOTAL_WGHT sy-vline 
WA_BAPILEDLHEAD_STR-NET_WEIGHT sy-vline 
WA_BAPILEDLHEAD_STR-UNIT_OF_WT sy-vline 
WA_BAPILEDLHEAD_STR-UNIT_OF_WT_ISO sy-vline 
WA_BAPILEDLHEAD_STR-VOLUME sy-vline 
WA_BAPILEDLHEAD_STR-VOLUMEUNIT sy-vline 
WA_BAPILEDLHEAD_STR-VOLUMEUNIT_ISO sy-vline 
WA_BAPILEDLHEAD_STR-NOSHPUNITS sy-vline 
WA_BAPILEDLHEAD_STR-PICK_ITEMS_LOC sy-vline 
WA_BAPILEDLHEAD_STR-DLV_TIME sy-vline 
WA_BAPILEDLHEAD_STR-WEIGHT_GRP_DLV sy-vline 
WA_BAPILEDLHEAD_STR-LOADING_PT sy-vline 
WA_BAPILEDLHEAD_STR-TRANS_GRP sy-vline 
WA_BAPILEDLHEAD_STR-BILL_TYPE_PROP sy-vline 
WA_BAPILEDLHEAD_STR-BILL_DATE sy-vline 
WA_BAPILEDLHEAD_STR-BILL_SCHED sy-vline 
WA_BAPILEDLHEAD_STR-ROUTE_ORD sy-vline 
WA_BAPILEDLHEAD_STR-UPDATE_GRP sy-vline 
WA_BAPILEDLHEAD_STR-PROCEDURE sy-vline 
WA_BAPILEDLHEAD_STR-CONDITION sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY_ISO sy-vline 
WA_BAPILEDLHEAD_STR-SALES_OFF sy-vline 
WA_BAPILEDLHEAD_STR-SHIP_PROC_TIME sy-vline 
WA_BAPILEDLHEAD_STR-COMP_CRIT_DLV sy-vline 
WA_BAPILEDLHEAD_STR-TRANS_CENTR sy-vline 
WA_BAPILEDLHEAD_STR-COMM_NO sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY_STAT sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY_STAT_ISO sy-vline 
WA_BAPILEDLHEAD_STR-EXCHRATEST sy-vline 
WA_BAPILEDLHEAD_STR-EXPORT_NO sy-vline 
WA_BAPILEDLHEAD_STR-CH_ON sy-vline 
WA_BAPILEDLHEAD_STR-WHSE_NO sy-vline 
WA_BAPILEDLHEAD_STR-ONE_WAREH_DLV sy-vline 
WA_BAPILEDLHEAD_STR-SALESORG_IB sy-vline 
WA_BAPILEDLHEAD_STR-DISTR_CHAN_IB sy-vline 
WA_BAPILEDLHEAD_STR-DIVISION_IB sy-vline 
WA_BAPILEDLHEAD_STR-BILL_TYPE_IB sy-vline 
WA_BAPILEDLHEAD_STR-DATE_IB sy-vline 
WA_BAPILEDLHEAD_STR-BILL_DATE_IB sy-vline 
WA_BAPILEDLHEAD_STR-CUSTOMER_IB sy-vline 
WA_BAPILEDLHEAD_STR-C_CTR_AREA sy-vline 
WA_BAPILEDLHEAD_STR-CRED_ACCNT sy-vline 
WA_BAPILEDLHEAD_STR-CRED_GROUP sy-vline 
WA_BAPILEDLHEAD_STR-REPR_GROUP sy-vline 
WA_BAPILEDLHEAD_STR-RISK_CATEG sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY_CM sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY_CM_ISO sy-vline 
WA_BAPILEDLHEAD_STR-REL_CRED_VALUE sy-vline 
WA_BAPILEDLHEAD_STR-REL_CRED_VALUE_ISO sy-vline 
WA_BAPILEDLHEAD_STR-BILLOFLADING sy-vline 
WA_BAPILEDLHEAD_STR-VENDOR sy-vline 
WA_BAPILEDLHEAD_STR-TRANS_CAT sy-vline 
WA_BAPILEDLHEAD_STR-TRANSP_ID sy-vline 
WA_BAPILEDLHEAD_STR-REL_DATE_CM sy-vline 
WA_BAPILEDLHEAD_STR-NEXT_SHP_DATE sy-vline 
WA_BAPILEDLHEAD_STR-GR_GI_SLIP_NO sy-vline 
WA_BAPILEDLHEAD_STR-GI_DATE_ACT sy-vline 
WA_BAPILEDLHEAD_STR-SHIP_BLOCK_REA sy-vline 
WA_BAPILEDLHEAD_STR-EXT_DLV_SYS_ID sy-vline 
WA_BAPILEDLHEAD_STR-EXTDELV_NO sy-vline 
WA_BAPILEDLHEAD_STR-ORDERID sy-vline 
WA_BAPILEDLHEAD_STR-SEARCH_PR_BATCH sy-vline 
WA_BAPILEDLHEAD_STR-CORR_DLV sy-vline 
WA_BAPILEDLHEAD_STR-PROCEDURE_SHP sy-vline 
WA_BAPILEDLHEAD_STR-CONDITION_DLV sy-vline 
WA_BAPILEDLHEAD_STR-ROUTESCHED sy-vline 
WA_BAPILEDLHEAD_STR-RECEIV_PLANT sy-vline 
WA_BAPILEDLHEAD_STR-FIN_DOC_IN sy-vline 
WA_BAPILEDLHEAD_STR-PAY_GUAR_PROC sy-vline 
WA_BAPILEDLHEAD_STR-PICK_TIME sy-vline 
WA_BAPILEDLHEAD_STR-TP_TIME sy-vline 
WA_BAPILEDLHEAD_STR-LOAD_TIME sy-vline 
WA_BAPILEDLHEAD_STR-GI_TIME sy-vline 
WA_BAPILEDLHEAD_STR-DOOR sy-vline 
WA_BAPILEDLHEAD_STR-MAT_STAG_AREA sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY_LOC sy-vline 
WA_BAPILEDLHEAD_STR-CURRENCY_LOC_ISO sy-vline 
WA_BAPILEDLHEAD_STR-EXCH_RATE_LOC sy-vline 
WA_BAPILEDLHEAD_STR-DEPR_PRC_LOC sy-vline 
WA_BAPILEDLHEAD_STR-DANG_GOODS_PROF sy-vline 
WA_BAPILEDLHEAD_STR-REF_DOC_NO sy-vline 
WA_BAPILEDLHEAD_STR-UPDATE_IND sy-vline 
WA_BAPILEDLHEAD_STR-NET_VAL_HD sy-vline 
WA_BAPILEDLHEAD_STR-NET_VAL_HD_ISO sy-vline 
WA_BAPILEDLHEAD_STR-UID_DLV sy-vline 
WA_BAPILEDLHEAD_STR-TIMESEG_EXISTS sy-vline 
WA_BAPILEDLHEAD_STR-TIMESEG_TEMPL sy-vline 
WA_BAPILEDLHEAD_STR-TIMEZONE_DLV sy-vline 
WA_BAPILEDLHEAD_STR-TIMEZONE_REC sy-vline 
WA_BAPILEDLHEAD_STR-DANG_GOODS_IND sy-vline 
WA_BAPILEDLHEAD_STR-ORIG_SYS_DLV sy-vline 
WA_BAPILEDLHEAD_STR-GOOD_MOVE_IND sy-vline 
WA_BAPILEDLHEAD_STR-DISTRIB_STATUS sy-vline 
WA_BAPILEDLHEAD_STR-COMPANY_ID sy-vline 
WA_BAPILEDLHEAD_STR-CHANGED_BY sy-vline 
WA_BAPILEDLHEAD_STR-DOC_DATE sy-vline 
WA_BAPILEDLHEAD_STR-TRANS_CODE sy-vline 
WA_BAPILEDLHEAD_STR-SHP_TYPE sy-vline 
WA_BAPILEDLHEAD_STR-MEANS_OF_TRANS sy-vline 
WA_BAPILEDLHEAD_STR-SPEC_PROC_IND sy-vline 
WA_BAPILEDLHEAD_STR-VAL_CALC_OPEN sy-vline 
WA_BAPILEDLHEAD_STR-AUT_TO_CREAT sy-vline 
WA_BAPILEDLHEAD_STR-SUPPLYAREA sy-vline 
WA_BAPILEDLHEAD_STR-DLV_TYPE_SUCC sy-vline 
WA_BAPILEDLHEAD_STR-POD_DATE sy-vline 
WA_BAPILEDLHEAD_STR-POD_TIME sy-vline 
WA_BAPILEDLHEAD_STR-GEOROUTE sy-vline 
WA_BAPILEDLHEAD_STR-GEOROUTE_SRC sy-vline 
WA_BAPILEDLHEAD_STR-CARRIER_IND sy-vline 
WA_BAPILEDLHEAD_STR-GTS_RELEVANCE sy-vline 
WA_BAPILEDLHEAD_STR-GTS_ROUTE_CD sy-vline 
WA_BAPILEDLHEAD_STR-DIRECT_BILLING sy-vline 
WA_BAPILEDLHEAD_STR-IBGI_STATUS sy-vline 
WA_BAPILEDLHEAD_STR-PRINTER_PROF sy-vline 
WA_BAPILEDLHEAD_STR-TRNSP_MODE sy-vline 
WA_BAPILEDLHEAD_STR-SD_DOC_CAT_LONG sy-vline 
WA_BAPILEDLHEAD_STR-MEANS_OF_TRANS_LONG sy-vline      INTO ld_text SEPARATED BY SPACE.

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