ABAP Select data from SAP table /TDAG/CPS_VDM_SUPC 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 /TDAG/CPS_VDM_SUPC 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 /TDAG/CPS_VDM_SUPC. 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 /TDAG/CPS_VDM_SUPC 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_/TDAG/CPS_VDM_SUPC TYPE STANDARD TABLE OF /TDAG/CPS_VDM_SUPC,
WA_/TDAG/CPS_VDM_SUPC TYPE /TDAG/CPS_VDM_SUPC,
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: </TDAG/CPS_VDM_SUPC> TYPE /TDAG/CPS_VDM_SUPC.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_/TDAG/CPS_VDM_SUPC.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM /TDAG/CPS_VDM_SUPC
INTO TABLE IT_/TDAG/CPS_VDM_SUPC.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM /TDAG/CPS_VDM_SUPC
* INTO TABLE @DATA(IT_/TDAG/CPS_VDM_SUPC2).
*--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_/TDAG/CPS_VDM_SUPC INDEX 1 INTO DATA(WA_/TDAG/CPS_VDM_SUPC2).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/TDAG/CPS_VDM_SUPC ASSIGNING </TDAG/CPS_VDM_SUPC>.
*To update a field value using a field symbol simply change the value via the field symbol pointer</TDAG/CPS_VDM_SUPC>-MANDT = 1.
</TDAG/CPS_VDM_SUPC>-GUID = 1.
</TDAG/CPS_VDM_SUPC>-CRDAT = 1.
</TDAG/CPS_VDM_SUPC>-CRNAM = 1.
</TDAG/CPS_VDM_SUPC>-CRTSTMP = 1.
ENDLOOP. LOOP AT IT_/TDAG/CPS_VDM_SUPC INTO WA_/TDAG/CPS_VDM_SUPC. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/TDAG/CPS_VDM_SUPC-UPDDAT, sy-vline,
WA_/TDAG/CPS_VDM_SUPC-UPDNAM, sy-vline,
WA_/TDAG/CPS_VDM_SUPC-UPDTSTMP, sy-vline,
WA_/TDAG/CPS_VDM_SUPC-DELFLG, sy-vline,
WA_/TDAG/CPS_VDM_SUPC-MODULE_ID, sy-vline,
WA_/TDAG/CPS_VDM_SUPC-MODULE_VERSION, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/TDAG/CPS_VDM_SUPC 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_/TDAG/CPS_VDM_SUPC 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_/TDAG/CPS_VDM_SUPC INTO WA_/TDAG/CPS_VDM_SUPC. *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 SPEC1, internal->external for field SPEC_ID CALL FUNCTION 'CONVERSION_EXIT_SPEC1_OUTPUT' EXPORTING input = WA_/TDAG/CPS_VDM_SUPC-SPEC_ID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/TDAG/CPS_VDM_SUPC-SPEC_ID.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RF_DOCNUMBER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/TDAG/CPS_VDM_SUPC-RF_DOCNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/TDAG/CPS_VDM_SUPC-RF_DOCNUMBER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SF_DOCNUMBER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/TDAG/CPS_VDM_SUPC-SF_DOCNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/TDAG/CPS_VDM_SUPC-SF_DOCNUMBER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_/TDAG/CPS_VDM_SUPC-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/TDAG/CPS_VDM_SUPC-MATNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RF_DOCNUMBER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/TDAG/CPS_VDM_SUPC-RF_DOCNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/TDAG/CPS_VDM_SUPC-RF_DOCNUMBER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SF_DOCNUMBER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/TDAG/CPS_VDM_SUPC-SF_DOCNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/TDAG/CPS_VDM_SUPC-SF_DOCNUMBER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field REQ_DOCNUMBER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/TDAG/CPS_VDM_SUPC-REQ_DOCNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/TDAG/CPS_VDM_SUPC-REQ_DOCNUMBER.
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_/TDAG/CPS_VDM_SUPC_STR,
MANDT TYPE STRING,
GUID TYPE STRING,
CRDAT TYPE STRING,
CRNAM TYPE STRING,
CRTSTMP TYPE STRING,
UPDDAT TYPE STRING,
UPDNAM TYPE STRING,
UPDTSTMP TYPE STRING,
DELFLG TYPE STRING,
MODULE_ID TYPE STRING,
MODULE_VERSION TYPE STRING,
NODE_ID TYPE STRING,
PART_NO TYPE STRING,
PART_NO_NORM TYPE STRING,
PART_NAME TYPE STRING,
PART_NAME_NORM TYPE STRING,
SPEC_ID TYPE STRING,
MDS_TYPE TYPE STRING,
MDS_STATUS TYPE STRING,
CHECK_STATUS TYPE STRING,
CHECK_DATE TYPE STRING,
CREATE_DATE TYPE STRING,
CHANGE_DATE TYPE STRING,
RELEASE_DATE TYPE STRING,
SUPPL_COMP TYPE STRING,
SUPPL_ORG TYPE STRING,
SUPPL_CONTPERS TYPE STRING,
COMM_STATUS TYPE STRING,
IMPORT_STATUS TYPE STRING,
APPL_LOG TYPE STRING,
SEND_DATE TYPE STRING,
SEND_TIME TYPE STRING,
DEVSAMPLEREP TYPE STRING,
RF_DOCTYPE TYPE STRING,
RF_DOCNUMBER TYPE STRING,
RF_DOCPART TYPE STRING,
RF_DOCVERSION TYPE STRING,
SF_DOCTYPE TYPE STRING,
SF_DOCNUMBER TYPE STRING,
SF_DOCPART TYPE STRING,
SF_DOCVERSION TYPE STRING,
COMM_STATUS_COMP TYPE STRING,
COMM_STATUS_ICON TYPE STRING,
COMM_STATUS_TEXT TYPE STRING,
CHECK_STATUS_TEXT TYPE STRING,
CHECK_STATUS_ICON TYPE STRING,
MDS_STATUS_ICON TYPE STRING,
MDS_STATUS_TEXT TYPE STRING,
MDS_TYPE_ICON TYPE STRING,
MDS_TYPE_TEXT TYPE STRING,
MDS_VERSION_TXT TYPE STRING,
SUPPL_COMP_NAME TYPE STRING,
SUPPL_ORG_NAME TYPE STRING,
SUPPL_CONTPERS_NAME TYPE STRING,
IMPORT_STATUS_ICON TYPE STRING,
IMPORT_STATUS_TEXT TYPE STRING,
SPEC_IDENT1 TYPE STRING,
SPEC_IDENT2 TYPE STRING,
SPEC_IDENT3 TYPE STRING,
MATNR TYPE STRING,
MAT_NAME TYPE STRING,
SOURCE_FILE TYPE STRING,
RESULT_FILE TYPE STRING,
IMPORT_SWITCH TYPE STRING,
CHAPTER4 TYPE STRING,
MANDT TYPE STRING,
GUID TYPE STRING,
CRDAT TYPE STRING,
CRNAM TYPE STRING,
CRTSTMP TYPE STRING,
UPDDAT TYPE STRING,
UPDNAM TYPE STRING,
UPDTSTMP TYPE STRING,
DELFLG TYPE STRING,
ROOT_GUID TYPE STRING,
ROOT_TABLE TYPE STRING,
COMPANY_ID TYPE STRING,
PART_NO TYPE STRING,
PART_NO_NORM TYPE STRING,
PART_NAME TYPE STRING,
PART_NAME_NORM TYPE STRING,
CHANGE_DATE TYPE STRING,
DRAWING_NO TYPE STRING,
DRAWING_DATED TYPE STRING,
DRAWING_CHG_NO TYPE STRING,
SAMPLE_NO TYPE STRING,
SAMPLE_DATE TYPE STRING,
ORDER_NO TYPE STRING,
DELIVERY_SLIP_NO TYPE STRING,
SUPPLIER_CODE TYPE STRING,
FORWARD_ALLOWED TYPE STRING,
REC_STATUS TYPE STRING,
PREC_REC_STATUS TYPE STRING,
STATUS_CHG TYPE STRING,
STATUS_CHG_TIME TYPE STRING,
RF_DOCTYPE TYPE STRING,
RF_DOCNUMBER TYPE STRING,
RF_DOCPART TYPE STRING,
RF_DOCVERSION TYPE STRING,
SF_DOCTYPE TYPE STRING,
SF_DOCNUMBER TYPE STRING,
SF_DOCPART TYPE STRING,
SF_DOCVERSION TYPE STRING,
TRANS_CHCK_DATE TYPE STRING,
COMM_STATUS TYPE STRING,
SEND_DATE TYPE STRING,
SEND_TIME TYPE STRING,
REQ_ID TYPE STRING,
REQ_MDS_TYPE TYPE STRING,
REQ_PROJ_NAME TYPE STRING,
REQ_DUE_DATE TYPE STRING,
REQ_STATUS TYPE STRING,
PREC_REQ_STATUS TYPE STRING,
REQ_CHANGE_DATE TYPE STRING,
REQ_ASSIGNED_MDS TYPE STRING,
REQ_DOCTYPE TYPE STRING,
REQ_DOCNUMBER TYPE STRING,
REQ_DOCPART TYPE STRING,
REQ_DOCVERSION TYPE STRING,
MODIFIED_FIELDS TYPE STRING,
ADD_COMP_INFO TYPE STRING,
MANDT TYPE STRING,
PARENT_GUID TYPE STRING,
CRDAT TYPE STRING,
CRNAM TYPE STRING,
CRTSTMP TYPE STRING,
UPDDAT TYPE STRING,
UPDNAM TYPE STRING,
UPDTSTMP TYPE STRING,
DELFLG TYPE STRING,
ROOT_GUID TYPE STRING,
SUPPL_SITE_CODE TYPE STRING,
SUPPL_CODE1 TYPE STRING,
SUPPL_CODE2 TYPE STRING,
DGT_LEVEL TYPE STRING,
PART_INDEX TYPE STRING,
PROJECT TYPE STRING,
EMAIL_ADR TYPE STRING,
STANDARD_INDEX TYPE STRING,
ENGINEERING_IV TYPE STRING,
ENGINEERING_IDVU TYPE STRING,
ENGINEERING_IM TYPE STRING,
ENGINEERING_IDPA TYPE STRING,
REMARK TYPE STRING,
MULTIPLE_PARTS TYPE STRING,
REJ_REASON_ABRV TYPE STRING,
TEXTS TYPE STRING,
REC_ORG_NAME TYPE STRING,
RESULT_FILE TYPE STRING,
SOURCE_FILE TYPE STRING,
REQUEST_FILE TYPE STRING,
REQ_REJ_REASON_ABRV TYPE STRING,
RECIPIENT_CNT TYPE STRING,
CELL_STYLES TYPE STRING,
ROW_COLOR TYPE STRING,
C4_REC_ORG_NAME TYPE STRING,
C4_REC_STATUS TYPE STRING,
C4_REC_STATUS_ICON TYPE STRING,
C4_REC_STATUS_TEXT TYPE STRING,
C4_COMPANY_ID TYPE STRING,
C4_PART_NO TYPE STRING,
C4_PART_NAME TYPE STRING,
C4_DRAWING_NO TYPE STRING,
C4_DRAWING_DATED TYPE STRING,
C4_DRAWING_CHG_NO TYPE STRING,
C4_SAMPLE_NO TYPE STRING,
C4_SAMPLE_DATE TYPE STRING,
C4_ORDER_NO TYPE STRING,
C4_DELIVERY_SLIP_NO TYPE STRING,
C4_SUPPLIER_CODE TYPE STRING,
C4_FORWARD_ALLOWED TYPE STRING,
C4_STATUS_CHG TYPE STRING,
C4_STATUS_CHG_TIME TYPE STRING,
C4_TRANS_CHCK_DATE TYPE STRING,
C4_SUPPL_SITE_CODE TYPE STRING,
C4_SUPPL_CODE1 TYPE STRING,
C4_SUPPL_CODE2 TYPE STRING,
C4_DGT_LEVEL TYPE STRING,
C4_PART_INDEX TYPE STRING,
C4_PROJECT TYPE STRING,
C4_EMAIL_ADR TYPE STRING,
C4_STANDARD_INDEX TYPE STRING,
C4_ENGINEERING_IV TYPE STRING,
C4_ENGINEERING_IDVU TYPE STRING,
C4_ENGINEERING_IM TYPE STRING,
C4_ENGINEERING_IDPA TYPE STRING,
C4_REMARK TYPE STRING,
C4_REQ_ID TYPE STRING,
C4_REQ_PROJ_NAME TYPE STRING,
C4_REQ_DUE_DATE TYPE STRING,
C4_REQ_STATUS TYPE STRING,
C4_REQ_STATUS_ICON TYPE STRING,
C4_REQ_STATUS_TEXT TYPE STRING,
C4_REQ_STATUS_OLD TYPE STRING,
C4_REQ_CHANGE_DATE TYPE STRING,END OF T_EKKO_STR. DATA: WA_/TDAG/CPS_VDM_SUPC_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_/TDAG/CPS_VDM_SUPC_STR-MANDT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-GUID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRDAT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRNAM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRTSTMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDDAT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDNAM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDTSTMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DELFLG sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MODULE_ID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MODULE_VERSION sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-NODE_ID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NO_NORM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NAME_NORM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SPEC_ID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MDS_TYPE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MDS_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CHECK_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CHECK_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CREATE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CHANGE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RELEASE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_COMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_ORG sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_CONTPERS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-COMM_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-IMPORT_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-APPL_LOG sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SEND_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SEND_TIME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DEVSAMPLEREP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCTYPE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCNUMBER sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCPART sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCVERSION sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCTYPE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCNUMBER sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCPART sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCVERSION sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-COMM_STATUS_COMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-COMM_STATUS_ICON sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-COMM_STATUS_TEXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CHECK_STATUS_TEXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CHECK_STATUS_ICON sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MDS_STATUS_ICON sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MDS_STATUS_TEXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MDS_TYPE_ICON sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MDS_TYPE_TEXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MDS_VERSION_TXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_COMP_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_ORG_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_CONTPERS_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-IMPORT_STATUS_ICON sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-IMPORT_STATUS_TEXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SPEC_IDENT1 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SPEC_IDENT2 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SPEC_IDENT3 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MATNR sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MAT_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SOURCE_FILE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RESULT_FILE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-IMPORT_SWITCH sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CHAPTER4 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MANDT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-GUID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRDAT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRNAM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRTSTMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDDAT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDNAM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDTSTMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DELFLG sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ROOT_GUID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ROOT_TABLE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-COMPANY_ID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NO_NORM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_NAME_NORM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CHANGE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DRAWING_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DRAWING_DATED sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DRAWING_CHG_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SAMPLE_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SAMPLE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ORDER_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DELIVERY_SLIP_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPLIER_CODE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-FORWARD_ALLOWED sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REC_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PREC_REC_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-STATUS_CHG sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-STATUS_CHG_TIME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCTYPE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCNUMBER sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCPART sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RF_DOCVERSION sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCTYPE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCNUMBER sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCPART sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SF_DOCVERSION sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-TRANS_CHCK_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-COMM_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SEND_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SEND_TIME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_ID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_MDS_TYPE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_PROJ_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_DUE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PREC_REQ_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_CHANGE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_ASSIGNED_MDS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_DOCTYPE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_DOCNUMBER sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_DOCPART sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_DOCVERSION sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MODIFIED_FIELDS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ADD_COMP_INFO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MANDT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PARENT_GUID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRDAT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRNAM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CRTSTMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDDAT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDNAM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-UPDTSTMP sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DELFLG sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ROOT_GUID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_SITE_CODE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_CODE1 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SUPPL_CODE2 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-DGT_LEVEL sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PART_INDEX sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-PROJECT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-EMAIL_ADR sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-STANDARD_INDEX sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ENGINEERING_IV sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ENGINEERING_IDVU sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ENGINEERING_IM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ENGINEERING_IDPA sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REMARK sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-MULTIPLE_PARTS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REJ_REASON_ABRV sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-TEXTS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REC_ORG_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RESULT_FILE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-SOURCE_FILE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQUEST_FILE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-REQ_REJ_REASON_ABRV sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-RECIPIENT_CNT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-CELL_STYLES sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-ROW_COLOR sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REC_ORG_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REC_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REC_STATUS_ICON sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REC_STATUS_TEXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_COMPANY_ID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_PART_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_PART_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_DRAWING_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_DRAWING_DATED sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_DRAWING_CHG_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_SAMPLE_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_SAMPLE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_ORDER_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_DELIVERY_SLIP_NO sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_SUPPLIER_CODE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_FORWARD_ALLOWED sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_STATUS_CHG sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_STATUS_CHG_TIME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_TRANS_CHCK_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_SUPPL_SITE_CODE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_SUPPL_CODE1 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_SUPPL_CODE2 sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_DGT_LEVEL sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_PART_INDEX sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_PROJECT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_EMAIL_ADR sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_STANDARD_INDEX sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_ENGINEERING_IV sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_ENGINEERING_IDVU sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_ENGINEERING_IM sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_ENGINEERING_IDPA sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REMARK sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_ID sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_PROJ_NAME sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_DUE_DATE sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_STATUS sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_STATUS_ICON sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_STATUS_TEXT sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_STATUS_OLD sy-vline
WA_/TDAG/CPS_VDM_SUPC_STR-C4_REQ_CHANGE_DATE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
