ABAP Select data from SAP table /ISDFPS/FDPMAT_STOCKLIST_DIS into internal table

Get Example source ABAP code based on a different SAP table
  

Below is a number of ABAP code snippets to demonstrate how to select data from SAP /ISDFPS/FDPMAT_STOCKLIST_DIS 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 /ISDFPS/FDPMAT_STOCKLIST_DIS. 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 /ISDFPS/FDPMAT_STOCKLIST_DIS 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_/ISDFPS/FDPMAT_STOCKLIST_DIS TYPE STANDARD TABLE OF /ISDFPS/FDPMAT_STOCKLIST_DIS,
      WA_/ISDFPS/FDPMAT_STOCKLIST_DIS TYPE /ISDFPS/FDPMAT_STOCKLIST_DIS,
      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: </ISDFPS/FDPMAT_STOCKLIST_DIS> TYPE /ISDFPS/FDPMAT_STOCKLIST_DIS.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /ISDFPS/FDPMAT_STOCKLIST_DIS
  INTO TABLE IT_/ISDFPS/FDPMAT_STOCKLIST_DIS.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /ISDFPS/FDPMAT_STOCKLIST_DIS
*  INTO TABLE @DATA(IT_/ISDFPS/FDPMAT_STOCKLIST_DIS2).
*--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_/ISDFPS/FDPMAT_STOCKLIST_DIS INDEX 1 INTO DATA(WA_/ISDFPS/FDPMAT_STOCKLIST_DIS2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/ISDFPS/FDPMAT_STOCKLIST_DIS ASSIGNING </ISDFPS/FDPMAT_STOCKLIST_DIS>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
</ISDFPS/FDPMAT_STOCKLIST_DIS>-DELIVERY_DATE = 1.
</ISDFPS/FDPMAT_STOCKLIST_DIS>-RECTYPE = 1.
</ISDFPS/FDPMAT_STOCKLIST_DIS>-RECTYPE_TEXT = 1.
</ISDFPS/FDPMAT_STOCKLIST_DIS>-STATUSICON = 1.
</ISDFPS/FDPMAT_STOCKLIST_DIS>-PREQ_REL = 1.
ENDLOOP.

LOOP AT IT_/ISDFPS/FDPMAT_STOCKLIST_DIS INTO WA_/ISDFPS/FDPMAT_STOCKLIST_DIS.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-PREQ_REJ, sy-vline,
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-PRIO_REQ, sy-vline,
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-PRIO_URG, sy-vline,
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-ADVCODE, sy-vline,
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-STACODE, sy-vline,
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-STRUC_CODE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/ISDFPS/FDPMAT_STOCKLIST_DIS 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_/ISDFPS/FDPMAT_STOCKLIST_DIS 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_/ISDFPS/FDPMAT_STOCKLIST_DIS INTO WA_/ISDFPS/FDPMAT_STOCKLIST_DIS. *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_/ISDFPS/FDPMAT_STOCKLIST_DIS-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-MATNR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit GERNR, internal->external for field SERNR CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT' EXPORTING input = WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-SERNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-SERNR.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit GERNR, internal->external for field SERNR_PREQ CALL FUNCTION 'CONVERSION_EXIT_GERNR_OUTPUT' EXPORTING input = WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-SERNR_PREQ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-SERNR_PREQ.
WRITE:/ 'New Value:', ld_input.

*Conversion exit MATN1, internal->external for field PACK_MAT CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-PACK_MAT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-PACK_MAT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit CUNIT, internal->external for field DOC_MEINS CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-DOC_MEINS IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/ISDFPS/FDPMAT_STOCKLIST_DIS-DOC_MEINS.
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_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR,
DELIVERY_DATE TYPE STRING,
RECTYPE TYPE STRING,
RECTYPE_TEXT TYPE STRING,
STATUSICON TYPE STRING,
PREQ_REL TYPE STRING,
PREQ_REJ TYPE STRING,
PRIO_REQ TYPE STRING,
PRIO_URG TYPE STRING,
ADVCODE TYPE STRING,
STACODE TYPE STRING,
STRUC_CODE TYPE STRING,
STRUC_CLASS TYPE STRING,
STRUC_CLASSTYP TYPE STRING,
PLANT TYPE STRING,
PLANT_TEXT TYPE STRING,
MRP_AREA TYPE STRING,
FORCE_ID TYPE STRING,
FORCE_CNT TYPE STRING,
FORCE_OBJID TYPE STRING,
FORCE_NAME TYPE STRING,
FORCE_PRIO TYPE STRING,
STORAGE_LOC TYPE STRING,
STOR_LOC_TEXT TYPE STRING,
HU_LOC TYPE STRING,
MATKL TYPE STRING,
MATNR TYPE STRING,
FLAG_TEMPLATE TYPE STRING,
MAKTX TYPE STRING,
BATCH TYPE STRING,
BATCH_TEXT TYPE STRING,
PSPNR TYPE STRING,
PSPNR_TEXT TYPE STRING,
SERNR TYPE STRING,
UII TYPE STRING,
ANZSN TYPE STRING,
HU_EXID TYPE STRING,
QUANT TYPE STRING,
QBLOCK TYPE STRING,
QQUAL TYPE STRING,
QTRANS TYPE STRING,
QURES TYPE STRING,
QLOCK TYPE STRING,
SERNR_PREQ TYPE STRING,
X_PLAN TYPE STRING,
X_ORDER TYPE STRING,
X_DELIV TYPE STRING,
RELOC_ID TYPE STRING,
RELOC_SEQ_ID TYPE STRING,
PACK_MAT TYPE STRING,
STATUSICON_EPA TYPE STRING,
QAUTH TYPE STRING,
EXPIRYDATE TYPE STRING,
STATUSKEY TYPE STRING,
VENDRBATCH TYPE STRING,
EQUNR TYPE STRING,
ESTAT TYPE STRING,
STATXT TYPE STRING,
IDENT TYPE STRING,
FORCE2_ID TYPE STRING,
FORCE2_OBJID TYPE STRING,
FORCE2_CNT TYPE STRING,
FORCE2_NAME TYPE STRING,
FORCE2_PRIO TYPE STRING,
PLANT2 TYPE STRING,
PLANT2_TEXT TYPE STRING,
STORAGE_LOC2 TYPE STRING,
STOR_LOC2_TEXT TYPE STRING,
HU_LOC2 TYPE STRING,
FLAG_LOAN TYPE STRING,
RETURN_DATE TYPE STRING,
FLAG_LOAN_RET TYPE STRING,
FLAG_RETURN TYPE STRING,
ITEM_CS TYPE STRING,
PNGUID TYPE STRING,
PNAME TYPE STRING,
PNTEXT TYPE STRING,
RSNUM TYPE STRING,
PREQ_NO TYPE STRING,
PREQ_ITEM TYPE STRING,
EBELN TYPE STRING,
EBELP TYPE STRING,
VBELN TYPE STRING,
POSNR TYPE STRING,
VENDOR TYPE STRING,
EKORG TYPE STRING,
EKGRP TYPE STRING,
DISPO TYPE STRING,
BANFN_CS TYPE STRING,
BNFPO_CS TYPE STRING,
BSMNG_SND TYPE STRING,
COMNT TYPE STRING,
PLANNING_GUID TYPE STRING,
REF_GUID TYPE STRING,
REF_TYPE TYPE STRING,
REF_GUID2 TYPE STRING,
REF_TYPE2 TYPE STRING,
QMATNR TYPE STRING,
BSART TYPE STRING,
RECORD_INVISIBLE TYPE STRING,
VEPOS TYPE STRING,
SONUM TYPE STRING,
LINE_GUID TYPE STRING,
LOCATION_S_GUID TYPE STRING,
LOCATION_D_GUID TYPE STRING,
FLAG_TEXT TYPE STRING,
FLAG_MAINTENANCE TYPE STRING,
FLAG_COMPLETED TYPE STRING,
FLAG_FORWARDED TYPE STRING,
FLAG_DERIVED TYPE STRING,
FLAG_SUBITEM TYPE STRING,
EBAKZ TYPE STRING,
ROUTE TYPE STRING,
VSBED TYPE STRING,
DELDATE_REF TYPE STRING,
AFNAM TYPE STRING,
TOP_HU_EXTERNAL TYPE STRING,
TOP_HU_INTERNAL TYPE STRING,
VENUM TYPE STRING,
VPOBJ TYPE STRING,
ATP_QUAN TYPE STRING,
PREQ_REQ_DATE TYPE STRING,
HU_LEAD TYPE STRING,
ACC_ASS_CAT TYPE STRING,
MRP_TYPE TYPE STRING,
MTART TYPE STRING,
EXTWG TYPE STRING,
RSPOS TYPE STRING,
FLAG_RES_FWD TYPE STRING,
DOC_MEINS TYPE STRING,
STATUSICON_TEC TYPE STRING,
FLAG_SERNR_PREQ TYPE STRING,
RELSEQ_TYPE TYPE STRING,
NSNID TYPE STRING,
QUANT_POSTING TYPE STRING,
DESIRED_QTY TYPE STRING,
QUEQUI_INST TYPE STRING,
FLAG_PROV TYPE STRING,
PNAME_PPA TYPE STRING,
PNAME_EPA TYPE STRING,
ITEM_TEXT TYPE STRING,
EPSTP TYPE STRING,
VAL_TYPE TYPE STRING,
DISPLAY_PARAM TYPE STRING,END OF T_EKKO_STR. DATA: WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_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_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-DELIVERY_DATE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RECTYPE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RECTYPE_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STATUSICON sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PREQ_REL sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PREQ_REJ sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PRIO_REQ sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PRIO_URG sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ADVCODE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STACODE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STRUC_CODE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STRUC_CLASS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STRUC_CLASSTYP sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PLANT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PLANT_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-MRP_AREA sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE_ID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE_CNT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE_OBJID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE_NAME sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE_PRIO sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STORAGE_LOC sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STOR_LOC_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-HU_LOC sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-MATKL sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-MATNR sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_TEMPLATE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-MAKTX sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-BATCH sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-BATCH_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PSPNR sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PSPNR_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-SERNR sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-UII sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ANZSN sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-HU_EXID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QUANT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QBLOCK sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QQUAL sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QTRANS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QURES sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QLOCK sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-SERNR_PREQ sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-X_PLAN sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-X_ORDER sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-X_DELIV sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RELOC_ID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RELOC_SEQ_ID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PACK_MAT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STATUSICON_EPA sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QAUTH sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EXPIRYDATE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STATUSKEY sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VENDRBATCH sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EQUNR sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ESTAT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STATXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-IDENT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE2_ID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE2_OBJID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE2_CNT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE2_NAME sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FORCE2_PRIO sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PLANT2 sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PLANT2_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STORAGE_LOC2 sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STOR_LOC2_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-HU_LOC2 sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_LOAN sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RETURN_DATE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_LOAN_RET sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_RETURN sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ITEM_CS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PNGUID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PNAME sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PNTEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RSNUM sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PREQ_NO sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PREQ_ITEM sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EBELN sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EBELP sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VBELN sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-POSNR sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VENDOR sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EKORG sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EKGRP sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-DISPO sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-BANFN_CS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-BNFPO_CS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-BSMNG_SND sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-COMNT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PLANNING_GUID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-REF_GUID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-REF_TYPE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-REF_GUID2 sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-REF_TYPE2 sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QMATNR sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-BSART sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RECORD_INVISIBLE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VEPOS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-SONUM sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-LINE_GUID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-LOCATION_S_GUID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-LOCATION_D_GUID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_MAINTENANCE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_COMPLETED sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_FORWARDED sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_DERIVED sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_SUBITEM sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EBAKZ sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ROUTE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VSBED sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-DELDATE_REF sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-AFNAM sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-TOP_HU_EXTERNAL sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-TOP_HU_INTERNAL sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VENUM sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VPOBJ sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ATP_QUAN sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PREQ_REQ_DATE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-HU_LEAD sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ACC_ASS_CAT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-MRP_TYPE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-MTART sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EXTWG sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RSPOS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_RES_FWD sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-DOC_MEINS sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-STATUSICON_TEC sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_SERNR_PREQ sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-RELSEQ_TYPE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-NSNID sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QUANT_POSTING sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-DESIRED_QTY sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-QUEQUI_INST sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-FLAG_PROV sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PNAME_PPA sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-PNAME_EPA sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-ITEM_TEXT sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-EPSTP sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-VAL_TYPE sy-vline
WA_/ISDFPS/FDPMAT_STOCKLIST_DIS_STR-DISPLAY_PARAM sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.