ABAP Select data from SAP table PFR_RPLAASF1_COMPLDATA_FORM 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 PFR_RPLAASF1_COMPLDATA_FORM 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 PFR_RPLAASF1_COMPLDATA_FORM. 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 PFR_RPLAASF1_COMPLDATA_FORM 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_PFR_RPLAASF1_COMPLDATA_FORM TYPE STANDARD TABLE OF PFR_RPLAASF1_COMPLDATA_FORM,
      WA_PFR_RPLAASF1_COMPLDATA_FORM TYPE PFR_RPLAASF1_COMPLDATA_FORM,
      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: <PFR_RPLAASF1_COMPLDATA_FORM> TYPE PFR_RPLAASF1_COMPLDATA_FORM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PFR_RPLAASF1_COMPLDATA_FORM
*  INTO TABLE @DATA(IT_PFR_RPLAASF1_COMPLDATA_FORM2).
*--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_PFR_RPLAASF1_COMPLDATA_FORM INDEX 1 INTO DATA(WA_PFR_RPLAASF1_COMPLDATA_FORM2).


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

*To update a field value using a field symbol simply change the value via the field symbol pointer
<PFR_RPLAASF1_COMPLDATA_FORM>-BASICDATA = 1.
<PFR_RPLAASF1_COMPLDATA_FORM>-ANO_CHK = 1.
<PFR_RPLAASF1_COMPLDATA_FORM>-APO_CHK = 1.
<PFR_RPLAASF1_COMPLDATA_FORM>-APN_CHK = 1.
<PFR_RPLAASF1_COMPLDATA_FORM>-ANN_CHK = 1.

ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PFR_RPLAASF1_COMPLDATA_FORM-ANO_RAI, sy-vline,
  WA_PFR_RPLAASF1_COMPLDATA_FORM-APN_RAI, sy-vline,
  WA_PFR_RPLAASF1_COMPLDATA_FORM-APO_RAI, sy-vline,
  WA_PFR_RPLAASF1_COMPLDATA_FORM-ANN_RAI, sy-vline,
  WA_PFR_RPLAASF1_COMPLDATA_FORM-IND_SUITE72, sy-vline,
  WA_PFR_RPLAASF1_COMPLDATA_FORM-LIC_DTE, sy-vline.
ENDLOOP.
   
*Add any further fields from structure WA_PFR_RPLAASF1_COMPLDATA_FORM 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_PFR_RPLAASF1_COMPLDATA_FORM 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_PFR_RPLAASF1_COMPLDATA_FORM INTO WA_PFR_RPLAASF1_COMPLDATA_FORM.


*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 PDATE, internal->external for field BORN
CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT'
  EXPORTING
    input =                      WA_PFR_RPLAASF1_COMPLDATA_FORM-BORN
  IMPORTING
    output =                     ld_input.
WRITE:/ 'Org Value:', WA_PFR_RPLAASF1_COMPLDATA_FORM-BORN.
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_PFR_RPLAASF1_COMPLDATA_FORM_STR, 
BASICDATA TYPE STRING,
ANO_CHK TYPE STRING,
APO_CHK TYPE STRING,
APN_CHK TYPE STRING,
ANN_CHK TYPE STRING,
ANO_RAI TYPE STRING,
APN_RAI TYPE STRING,
APO_RAI TYPE STRING,
ANN_RAI TYPE STRING,
IND_SUITE72 TYPE STRING,
LIC_DTE TYPE STRING,
LIQ_JUD TYPE STRING,
RESPON TYPE STRING,
P_REG_SP TYPE STRING,
LIEU_SIG TYPE STRING,
DDTE TYPE STRING,
PRE_SIG TYPE STRING,
TELNR TYPE STRING,
TEST_RUN TYPE STRING,
NOM_SIG TYPE STRING,
RUP_LIC TYPE STRING,
PAR_TXT TYPE STRING,
SOLDEDATA TYPE STRING,
DEVISE TYPE STRING,
IAPP TYPE STRING,
IAUTR TYPE STRING,
IAVION TYPE STRING,
ICCONG TYPE STRING,
ICLIEN TYPE STRING,
ICNE TYPE STRING,
ICONTR TYPE STRING,
ICPREA TYPE STRING,
IJOURN TYPE STRING,
ILEG TYPE STRING,
IMISS TYPE STRING,
IRETR TYPE STRING,
ISIN TYPE STRING,
ISPE TYPE STRING,
ISPEC TYPE STRING,
ISUP TYPE STRING,
IRCO TYPE STRING,
NBCP TYPE STRING,
POST_ASSED TYPE STRING,
POST_BEG TYPE STRING,
POST_BRUT TYPE STRING,
POST_END TYPE STRING,
POST_NBHRS TYPE STRING,
POST_PAY TYPE STRING,
TR_EN_COURS TYPE STRING,
TSVERSEES TYPE STRING,
TT_CONV TYPE STRING,
TT_LEGAL TYPE STRING,
TT_TRANS TYPE STRING,
RUPTUREDATA TYPE STRING,
ADD_INFO TYPE STRING,
COD TYPE STRING,
INDFNE TYPE STRING,
REASON TYPE STRING,
UNEMPLOYDATA TYPE STRING,
CHOM_BEG TYPE STRING,
CHOM_END TYPE STRING,
CHOM_REP TYPE STRING,
RETIREMENTDATA TYPE STRING,
AGORGAN TYPE STRING,
AGORT01 TYPE STRING,
AGOTEXT TYPE STRING,
AGPSTLZ TYPE STRING,
AGSTRAS TYPE STRING,
ARORGAN TYPE STRING,
ARORT01 TYPE STRING,
AROTEXT TYPE STRING,
ARPSTLZ TYPE STRING,
ARSTRAS TYPE STRING,
AUORGAN TYPE STRING,
AUORT01 TYPE STRING,
AUOTEXT TYPE STRING,
AUPSTLZ TYPE STRING,
AUSTRAS TYPE STRING,
PERSONDATA TYPE STRING,
ADCMP TYPE STRING,
ANRED TYPE STRING,
BORN TYPE STRING,
CADRE TYPE STRING,
CLESS TYPE STRING,
CNAME TYPE STRING,
COD_QUA TYPE STRING,
HSNMR TYPE STRING,
NAME TYPE STRING,
NUMSS TYPE STRING,
PNAME TYPE STRING,
QUALIFICATION TYPE STRING,
STREET TYPE STRING,
TOWN TYPE STRING,
ZIP TYPE STRING,
FIRMDATA TYPE STRING,
ANTXT_A TYPE STRING,
ANTXT_B TYPE STRING,
ANTXT_C TYPE STRING,
ANTXT_D TYPE STRING,
ANTXT_E TYPE STRING,
ANTXT_S TYPE STRING,
ASSED TYPE STRING,
ASSNA TYPE STRING,
CNACE TYPE STRING,
GARP TYPE STRING,
NUMIC TYPE STRING,
SIREN TYPE STRING,
TELNR TYPE STRING,
EMPLOYDATA TYPE STRING,
AH_GLOBAL TYPE STRING,
AH_PERSON TYPE STRING,
CAT_EMP_PART TYPE STRING,
CNE TYPE STRING,
CTP TYPE STRING,
CTTXT TYPE STRING,
CTYP TYPE STRING,
PREAV_BEGNP TYPE STRING,
PREAV_BEGPAY TYPE STRING,
PREAV_DAT TYPE STRING,
PREAV_DATFIN TYPE STRING,
PREAV_DATNOT TYPE STRING,
PREAV_ENDNP TYPE STRING,
PREAV_ENDPAY TYPE STRING,
PREAV_MOT TYPE STRING,
REG_ALS TYPE STRING,
STP TYPE STRING,
TPART TYPE STRING,
WH_GLOBAL TYPE STRING,
WH_PERSON TYPE STRING,
XPBEG1 TYPE STRING,
XPEND1 TYPE STRING,
ATTESTDATA TYPE STRING,
LASTDAY TYPE STRING,
NUM TYPE STRING,
SIGN_QUALIF TYPE STRING,
MONTHTABDATA TYPE STRING,
BONUSTABDATA TYPE STRING,END OF T_EKKO_STR.
DATA: WA_PFR_RPLAASF1_COMPLDATA_FORM_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_PFR_RPLAASF1_COMPLDATA_FORM_STR-BASICDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANO_CHK sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-APO_CHK sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-APN_CHK sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANN_CHK sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANO_RAI sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-APN_RAI sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-APO_RAI sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANN_RAI sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IND_SUITE72 sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-LIC_DTE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-LIQ_JUD sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-RESPON sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-P_REG_SP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-LIEU_SIG sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-DDTE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PRE_SIG sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TELNR sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TEST_RUN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-NOM_SIG sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-RUP_LIC sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PAR_TXT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-SOLDEDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-DEVISE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IAPP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IAUTR sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IAVION sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ICCONG sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ICLIEN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ICNE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ICONTR sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ICPREA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IJOURN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ILEG sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IMISS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IRETR sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ISIN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ISPE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ISPEC sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ISUP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-IRCO sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-NBCP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-POST_ASSED sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-POST_BEG sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-POST_BRUT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-POST_END sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-POST_NBHRS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-POST_PAY sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TR_EN_COURS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TSVERSEES sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TT_CONV sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TT_LEGAL sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TT_TRANS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-RUPTUREDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ADD_INFO sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-COD sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-INDFNE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-REASON sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-UNEMPLOYDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CHOM_BEG sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CHOM_END sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CHOM_REP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-RETIREMENTDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AGORGAN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AGORT01 sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AGOTEXT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AGPSTLZ sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AGSTRAS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ARORGAN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ARORT01 sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AROTEXT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ARPSTLZ sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ARSTRAS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AUORGAN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AUORT01 sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AUOTEXT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AUPSTLZ sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AUSTRAS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PERSONDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ADCMP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANRED sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-BORN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CADRE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CLESS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CNAME sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-COD_QUA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-HSNMR sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-NAME sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-NUMSS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PNAME sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-QUALIFICATION sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-STREET sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TOWN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ZIP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-FIRMDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANTXT_A sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANTXT_B sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANTXT_C sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANTXT_D sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANTXT_E sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ANTXT_S sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ASSED sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ASSNA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CNACE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-GARP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-NUMIC sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-SIREN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TELNR sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-EMPLOYDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AH_GLOBAL sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-AH_PERSON sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CAT_EMP_PART sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CNE sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CTP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CTTXT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-CTYP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_BEGNP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_BEGPAY sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_DAT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_DATFIN sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_DATNOT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_ENDNP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_ENDPAY sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-PREAV_MOT sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-REG_ALS sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-STP sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-TPART sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-WH_GLOBAL sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-WH_PERSON sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-XPBEG1 sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-XPEND1 sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-ATTESTDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-LASTDAY sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-NUM sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-SIGN_QUALIF sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-MONTHTABDATA sy-vline 
WA_PFR_RPLAASF1_COMPLDATA_FORM_STR-BONUSTABDATA sy-vline      INTO ld_text SEPARATED BY SPACE.

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