ABAP Select data from SAP table FARR_S_POB_DATA_REV_TRANSFER 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 FARR_S_POB_DATA_REV_TRANSFER 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 FARR_S_POB_DATA_REV_TRANSFER. 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 FARR_S_POB_DATA_REV_TRANSFER 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_FARR_S_POB_DATA_REV_TRANSFER TYPE STANDARD TABLE OF FARR_S_POB_DATA_REV_TRANSFER,
      WA_FARR_S_POB_DATA_REV_TRANSFER TYPE FARR_S_POB_DATA_REV_TRANSFER,
      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: <FARR_S_POB_DATA_REV_TRANSFER> TYPE FARR_S_POB_DATA_REV_TRANSFER.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM FARR_S_POB_DATA_REV_TRANSFER
*  INTO TABLE @DATA(IT_FARR_S_POB_DATA_REV_TRANSFER2).
*--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_FARR_S_POB_DATA_REV_TRANSFER INDEX 1 INTO DATA(WA_FARR_S_POB_DATA_REV_TRANSFER2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_FARR_S_POB_DATA_REV_TRANSFER ASSIGNING <FARR_S_POB_DATA_REV_TRANSFER>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<FARR_S_POB_DATA_REV_TRANSFER>-POB_ID = 1.
<FARR_S_POB_DATA_REV_TRANSFER>-POB_NAME = 1.
<FARR_S_POB_DATA_REV_TRANSFER>-POB_ROLE = 1.
<FARR_S_POB_DATA_REV_TRANSFER>-POB_TYPE = 1.
<FARR_S_POB_DATA_REV_TRANSFER>-POB_CATEGORY = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_FARR_S_POB_DATA_REV_TRANSFER-ACCT_PRINCIPLE, sy-vline,
WA_FARR_S_POB_DATA_REV_TRANSFER-COMPANY_CODE, sy-vline,
WA_FARR_S_POB_DATA_REV_TRANSFER-CUSTOMER_ID, sy-vline,
WA_FARR_S_POB_DATA_REV_TRANSFER-PARTNER, sy-vline,
WA_FARR_S_POB_DATA_REV_TRANSFER-RECEIVABLE_ACCOUNT, sy-vline,
WA_FARR_S_POB_DATA_REV_TRANSFER-SALES_ORG, sy-vline.
ENDLOOP. *Add any further fields from structure WA_FARR_S_POB_DATA_REV_TRANSFER 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_FARR_S_POB_DATA_REV_TRANSFER 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_FARR_S_POB_DATA_REV_TRANSFER INTO WA_FARR_S_POB_DATA_REV_TRANSFER. *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 POB_ID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_FARR_S_POB_DATA_REV_TRANSFER-POB_ID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARR_S_POB_DATA_REV_TRANSFER-POB_ID.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit RRQUT, internal->external for field DELIVERED_QUANTITY CALL FUNCTION 'CONVERSION_EXIT_RRQUT_OUTPUT' EXPORTING input = WA_FARR_S_POB_DATA_REV_TRANSFER-DELIVERED_QUANTITY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARR_S_POB_DATA_REV_TRANSFER-DELIVERED_QUANTITY.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit ABPSN, internal->external for field PS_POSID CALL FUNCTION 'CONVERSION_EXIT_ABPSN_OUTPUT' EXPORTING input = WA_FARR_S_POB_DATA_REV_TRANSFER-PS_POSID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARR_S_POB_DATA_REV_TRANSFER-PS_POSID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ABPSP, internal->external for field PS_PSP_PNR CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_FARR_S_POB_DATA_REV_TRANSFER-PS_PSP_PNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_FARR_S_POB_DATA_REV_TRANSFER-PS_PSP_PNR.
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_FARR_S_POB_DATA_REV_TRANSFER_STR,
POB_ID TYPE STRING,
POB_NAME TYPE STRING,
POB_ROLE TYPE STRING,
POB_TYPE TYPE STRING,
POB_CATEGORY TYPE STRING,
ACCT_PRINCIPLE TYPE STRING,
COMPANY_CODE TYPE STRING,
CUSTOMER_ID TYPE STRING,
PARTNER TYPE STRING,
RECEIVABLE_ACCOUNT TYPE STRING,
SALES_ORG TYPE STRING,
SSP TYPE STRING,
SSP_CURK TYPE STRING,
ALLOC_AMT TYPE STRING,
ALLOC_AMT_CURK TYPE STRING,
TRX_PRICE TYPE STRING,
CONTRACT_ID TYPE STRING,
HI_LEVEL_POB_ID TYPE STRING,
LEADING_POB_ID TYPE STRING,
BOM_POB_ID TYPE STRING,
DUMMY_CONTR_ITM_INCL_EEW_PS TYPE STRING,
POB_EEW_DUMMY TYPE STRING,
REP_EEW_DUMMY TYPE STRING,
FULFILL_TYPE TYPE STRING,
DISTINCT_TYPE TYPE STRING,
START_DATE_TYPE TYPE STRING,
START_DATE TYPE STRING,
END_DATE TYPE STRING,
DURATION TYPE STRING,
DURATION_UNIT TYPE STRING,
XNEGATIVE_ITEM TYPE STRING,
FINAL_DATE TYPE STRING,
SOURCE_OF_PRICE TYPE STRING,
MANUAL_CREATED TYPE STRING,
SIMPLIFY_INVOICE TYPE STRING,
COST_RECOGNITION TYPE STRING,
COST TYPE STRING,
COST_CURK TYPE STRING,
DELIVERED_QUANTITY TYPE STRING,
QUANTITY_UNIT TYPE STRING,
FKBER TYPE STRING,
GSBER TYPE STRING,
SEGMENT TYPE STRING,
PRCTR TYPE STRING,
PAOBJNR TYPE STRING,
KOSTL TYPE STRING,
AUFNR TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
PS_POSID TYPE STRING,
PS_PSP_PNR TYPE STRING,
DISTRIBUTED_ORG_PRICE TYPE STRING,
POSTED TYPE STRING,
FINAL_INVOICE TYPE STRING,
FULLY_FULFILLED TYPE STRING,
STATUS TYPE STRING,
VALUE_RELEVANT TYPE STRING,
COMPLETION_DATE TYPE STRING,
VALIDATE_RESULT TYPE STRING,
VALUE_BASED_FULFILLMENTS TYPE STRING,
PENDING_CONFLICT TYPE STRING,
INVOICE_EFFECT_TYPE TYPE STRING,
INITIAL_EFFECTIVE_DATE TYPE STRING,
LAST_CHANGED_ON TYPE STRING,
REV_REC_BLOCK TYPE STRING,
COST_COMPLETION_STATE TYPE STRING,
EVENT_TYPE TYPE STRING,
SUSPENSION_DATE TYPE STRING,END OF T_EKKO_STR. DATA: WA_FARR_S_POB_DATA_REV_TRANSFER_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_FARR_S_POB_DATA_REV_TRANSFER_STR-POB_ID sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-POB_NAME sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-POB_ROLE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-POB_TYPE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-POB_CATEGORY sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-ACCT_PRINCIPLE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-COMPANY_CODE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-CUSTOMER_ID sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-PARTNER sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-RECEIVABLE_ACCOUNT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-SALES_ORG sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-SSP sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-SSP_CURK sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-ALLOC_AMT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-ALLOC_AMT_CURK sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-TRX_PRICE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-CONTRACT_ID sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-HI_LEVEL_POB_ID sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-LEADING_POB_ID sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-BOM_POB_ID sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-DUMMY_CONTR_ITM_INCL_EEW_PS sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-POB_EEW_DUMMY sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-REP_EEW_DUMMY sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-FULFILL_TYPE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-DISTINCT_TYPE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-START_DATE_TYPE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-START_DATE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-END_DATE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-DURATION sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-DURATION_UNIT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-XNEGATIVE_ITEM sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-FINAL_DATE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-SOURCE_OF_PRICE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-MANUAL_CREATED sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-SIMPLIFY_INVOICE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-COST_RECOGNITION sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-COST sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-COST_CURK sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-DELIVERED_QUANTITY sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-QUANTITY_UNIT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-FKBER sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-GSBER sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-SEGMENT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-PRCTR sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-PAOBJNR sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-KOSTL sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-AUFNR sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-KDAUF sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-KDPOS sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-PS_POSID sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-PS_PSP_PNR sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-DISTRIBUTED_ORG_PRICE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-POSTED sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-FINAL_INVOICE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-FULLY_FULFILLED sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-STATUS sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-VALUE_RELEVANT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-COMPLETION_DATE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-VALIDATE_RESULT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-VALUE_BASED_FULFILLMENTS sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-PENDING_CONFLICT sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-INVOICE_EFFECT_TYPE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-INITIAL_EFFECTIVE_DATE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-LAST_CHANGED_ON sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-REV_REC_BLOCK sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-COST_COMPLETION_STATE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-EVENT_TYPE sy-vline
WA_FARR_S_POB_DATA_REV_TRANSFER_STR-SUSPENSION_DATE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.