ABAP Select data from SAP table PFIACDOCPCOM 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 PFIACDOCPCOM 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 PFIACDOCPCOM. 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 PFIACDOCPCOM 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_PFIACDOCPCOM TYPE STANDARD TABLE OF PFIACDOCPCOM,
      WA_PFIACDOCPCOM TYPE PFIACDOCPCOM,
      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: <PFIACDOCPCOM> TYPE PFIACDOCPCOM.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PFIACDOCPCOM
*  INTO TABLE @DATA(IT_PFIACDOCPCOM2).
*--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_PFIACDOCPCOM INDEX 1 INTO DATA(WA_PFIACDOCPCOM2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PFIACDOCPCOM ASSIGNING <PFIACDOCPCOM>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PFIACDOCPCOM>-MANDT = 1.
<PFIACDOCPCOM>-REQTSN = 1.
<PFIACDOCPCOM>-DATAPAKID = 1.
<PFIACDOCPCOM>-RECORD = 1.
<PFIACDOCPCOM>-RBUKRS = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PFIACDOCPCOM-RLDNR, sy-vline,
WA_PFIACDOCPCOM-RACCT, sy-vline,
WA_PFIACDOCPCOM-RCNTR, sy-vline,
WA_PFIACDOCPCOM-PRCTR, sy-vline,
WA_PFIACDOCPCOM-RFAREA, sy-vline,
WA_PFIACDOCPCOM-RBUSA, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PFIACDOCPCOM 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_PFIACDOCPCOM 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_PFIACDOCPCOM INTO WA_PFIACDOCPCOM. *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 RLDNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-RLDNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-RLDNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit GJAHR, internal->external for field GJAHR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-GJAHR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-GJAHR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit GJAHR, internal->external for field RYEAR CALL FUNCTION 'CONVERSION_EXIT_GJAHR_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-RYEAR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-RYEAR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

*Conversion exit BEKNZ, internal->external for field CO_BELKZ CALL FUNCTION 'CONVERSION_EXIT_BEKNZ_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-CO_BELKZ IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-CO_BELKZ.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit NUMCV, internal->external for field VORNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-VORNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-VORNR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit NUMCV, internal->external for field UVORN CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-UVORN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-UVORN.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit TPLNR, internal->external for field TPLNR CALL FUNCTION 'CONVERSION_EXIT_TPLNR_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-TPLNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-TPLNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field CATEGORY CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_PFIACDOCPCOM-CATEGORY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PFIACDOCPCOM-CATEGORY.
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_PFIACDOCPCOM_STR,
MANDT TYPE STRING,
REQTSN TYPE STRING,
DATAPAKID TYPE STRING,
RECORD TYPE STRING,
RBUKRS TYPE STRING,
RLDNR TYPE STRING,
RACCT TYPE STRING,
RCNTR TYPE STRING,
PRCTR TYPE STRING,
RFAREA TYPE STRING,
RBUSA TYPE STRING,
KOKRS TYPE STRING,
SEGMENT TYPE STRING,
SCNTR TYPE STRING,
PPRCTR TYPE STRING,
SFAREA TYPE STRING,
SBUSA TYPE STRING,
RASSC TYPE STRING,
PSEGMENT TYPE STRING,
RWCUR TYPE STRING,
WSL TYPE STRING,
RHCUR TYPE STRING,
HSL TYPE STRING,
RKCUR TYPE STRING,
KSL TYPE STRING,
RFCCUR TYPE STRING,
FCSL TYPE STRING,
ROCUR TYPE STRING,
OSL TYPE STRING,
RVCUR TYPE STRING,
VSL TYPE STRING,
RBCUR TYPE STRING,
BSL TYPE STRING,
RCCUR TYPE STRING,
CSL TYPE STRING,
RDCUR TYPE STRING,
DSL TYPE STRING,
RECUR TYPE STRING,
ESL TYPE STRING,
RFCUR TYPE STRING,
FSL TYPE STRING,
RGCUR TYPE STRING,
GSL TYPE STRING,
RCO_OCUR TYPE STRING,
CO_OSL TYPE STRING,
KFSL TYPE STRING,
HFSL TYPE STRING,
RVUNIT TYPE STRING,
VMSL TYPE STRING,
RRUNIT TYPE STRING,
RMSL TYPE STRING,
GJAHR TYPE STRING,
RYEAR TYPE STRING,
POPER TYPE STRING,
FISCYEARPER TYPE STRING,
BUDAT TYPE STRING,
PERIV TYPE STRING,
KTOPL TYPE STRING,
SLALITTYPE TYPE STRING,
BTTYPE TYPE STRING,
RMVCT TYPE STRING,
AWTYP TYPE STRING,
AWORG TYPE STRING,
AWREF TYPE STRING,
USNAM TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
WERKS TYPE STRING,
MATNR TYPE STRING,
KUNNR TYPE STRING,
CO_BELKZ TYPE STRING,
PS_PSP_PNR TYPE STRING,
PS_POSID TYPE STRING,
PS_PRJ_PNR TYPE STRING,
PS_PSPID TYPE STRING,
PERNR TYPE STRING,
PBUKRS TYPE STRING,
UKOSTL TYPE STRING,
ULSTAR TYPE STRING,
ACCASTY TYPE STRING,
PACCASTY TYPE STRING,
LSTAR TYPE STRING,
AUFNR TYPE STRING,
RSRCE TYPE STRING,
PLSTAR TYPE STRING,
PAUFNR TYPE STRING,
PPS_PSP_PNR TYPE STRING,
PPS_POSID TYPE STRING,
PPS_PRJ_PNR TYPE STRING,
PPS_PSPID TYPE STRING,
WORK_ITEM_ID TYPE STRING,
BEMOT TYPE STRING,
PSKNZ TYPE STRING,
SERVICE_DOC_TYPE TYPE STRING,
SERVICE_DOC_ID TYPE STRING,
SERVICE_DOC_ITEM_ID TYPE STRING,
SERVICE_CONTRACT_TYPE TYPE STRING,
SERVICE_CONTRACT_ID TYPE STRING,
SERVICE_CONTRACT_ITEM_ID TYPE STRING,
LOSGR TYPE STRING,
LSUNIT TYPE STRING,
FKART TYPE STRING,
VKORG TYPE STRING,
VTWEG TYPE STRING,
SPART TYPE STRING,
MATNR_COPA TYPE STRING,
MATKL TYPE STRING,
KDGRP TYPE STRING,
LAND1 TYPE STRING,
BRSCH TYPE STRING,
BZIRK TYPE STRING,
KUNRE TYPE STRING,
KUNWE TYPE STRING,
KONZS TYPE STRING,
FIKRS TYPE STRING,
RFUND TYPE STRING,
RGRANT_NBR TYPE STRING,
RBUDGET_PD TYPE STRING,
RSPONSORED_PROG TYPE STRING,
RSPONSORED_CLASS TYPE STRING,
RBDGT_VLDTY_NBR TYPE STRING,
BUDGET_PROCESS TYPE STRING,
BUDGET_SUBCATEGORY TYPE STRING,
ARBID TYPE STRING,
VORNR TYPE STRING,
AUFPS TYPE STRING,
PAUFPS TYPE STRING,
UVORN TYPE STRING,
EQUNR TYPE STRING,
TPLNR TYPE STRING,
ISTRU TYPE STRING,
ILART TYPE STRING,
PLKNZ TYPE STRING,
ARTPR TYPE STRING,
PRIOK TYPE STRING,
MAUFNR TYPE STRING,
MATKL_MM TYPE STRING,
AFABE TYPE STRING,
ANLN1 TYPE STRING,
ANLN2 TYPE STRING,
MOVCAT TYPE STRING,
ANLKL TYPE STRING,
VNAME TYPE STRING,
EGRUP TYPE STRING,
RECID TYPE STRING,
PRODPER TYPE STRING,
RSNUM TYPE STRING,
RSPOS TYPE STRING,
RSART TYPE STRING,
PACKNO TYPE STRING,
INTROW TYPE STRING,
SWENR TYPE STRING,
SGENR TYPE STRING,
SGRNR TYPE STRING,
SMENR TYPE STRING,
RECNNR TYPE STRING,
SNKSL TYPE STRING,
SEMPSL TYPE STRING,
DABRZ TYPE STRING,
PMATNR TYPE STRING,
COSTG_FROM_DATE TYPE STRING,
COSTG_TO_DATE TYPE STRING,
CATEGORY TYPE STRING,
KPRICE TYPE STRING,
HPRICE TYPE STRING,
WPRICE TYPE STRING,
SGTXT TYPE STRING,END OF T_EKKO_STR. DATA: WA_PFIACDOCPCOM_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_PFIACDOCPCOM_STR-MANDT sy-vline
WA_PFIACDOCPCOM_STR-REQTSN sy-vline
WA_PFIACDOCPCOM_STR-DATAPAKID sy-vline
WA_PFIACDOCPCOM_STR-RECORD sy-vline
WA_PFIACDOCPCOM_STR-RBUKRS sy-vline
WA_PFIACDOCPCOM_STR-RLDNR sy-vline
WA_PFIACDOCPCOM_STR-RACCT sy-vline
WA_PFIACDOCPCOM_STR-RCNTR sy-vline
WA_PFIACDOCPCOM_STR-PRCTR sy-vline
WA_PFIACDOCPCOM_STR-RFAREA sy-vline
WA_PFIACDOCPCOM_STR-RBUSA sy-vline
WA_PFIACDOCPCOM_STR-KOKRS sy-vline
WA_PFIACDOCPCOM_STR-SEGMENT sy-vline
WA_PFIACDOCPCOM_STR-SCNTR sy-vline
WA_PFIACDOCPCOM_STR-PPRCTR sy-vline
WA_PFIACDOCPCOM_STR-SFAREA sy-vline
WA_PFIACDOCPCOM_STR-SBUSA sy-vline
WA_PFIACDOCPCOM_STR-RASSC sy-vline
WA_PFIACDOCPCOM_STR-PSEGMENT sy-vline
WA_PFIACDOCPCOM_STR-RWCUR sy-vline
WA_PFIACDOCPCOM_STR-WSL sy-vline
WA_PFIACDOCPCOM_STR-RHCUR sy-vline
WA_PFIACDOCPCOM_STR-HSL sy-vline
WA_PFIACDOCPCOM_STR-RKCUR sy-vline
WA_PFIACDOCPCOM_STR-KSL sy-vline
WA_PFIACDOCPCOM_STR-RFCCUR sy-vline
WA_PFIACDOCPCOM_STR-FCSL sy-vline
WA_PFIACDOCPCOM_STR-ROCUR sy-vline
WA_PFIACDOCPCOM_STR-OSL sy-vline
WA_PFIACDOCPCOM_STR-RVCUR sy-vline
WA_PFIACDOCPCOM_STR-VSL sy-vline
WA_PFIACDOCPCOM_STR-RBCUR sy-vline
WA_PFIACDOCPCOM_STR-BSL sy-vline
WA_PFIACDOCPCOM_STR-RCCUR sy-vline
WA_PFIACDOCPCOM_STR-CSL sy-vline
WA_PFIACDOCPCOM_STR-RDCUR sy-vline
WA_PFIACDOCPCOM_STR-DSL sy-vline
WA_PFIACDOCPCOM_STR-RECUR sy-vline
WA_PFIACDOCPCOM_STR-ESL sy-vline
WA_PFIACDOCPCOM_STR-RFCUR sy-vline
WA_PFIACDOCPCOM_STR-FSL sy-vline
WA_PFIACDOCPCOM_STR-RGCUR sy-vline
WA_PFIACDOCPCOM_STR-GSL sy-vline
WA_PFIACDOCPCOM_STR-RCO_OCUR sy-vline
WA_PFIACDOCPCOM_STR-CO_OSL sy-vline
WA_PFIACDOCPCOM_STR-KFSL sy-vline
WA_PFIACDOCPCOM_STR-HFSL sy-vline
WA_PFIACDOCPCOM_STR-RVUNIT sy-vline
WA_PFIACDOCPCOM_STR-VMSL sy-vline
WA_PFIACDOCPCOM_STR-RRUNIT sy-vline
WA_PFIACDOCPCOM_STR-RMSL sy-vline
WA_PFIACDOCPCOM_STR-GJAHR sy-vline
WA_PFIACDOCPCOM_STR-RYEAR sy-vline
WA_PFIACDOCPCOM_STR-POPER sy-vline
WA_PFIACDOCPCOM_STR-FISCYEARPER sy-vline
WA_PFIACDOCPCOM_STR-BUDAT sy-vline
WA_PFIACDOCPCOM_STR-PERIV sy-vline
WA_PFIACDOCPCOM_STR-KTOPL sy-vline
WA_PFIACDOCPCOM_STR-SLALITTYPE sy-vline
WA_PFIACDOCPCOM_STR-BTTYPE sy-vline
WA_PFIACDOCPCOM_STR-RMVCT sy-vline
WA_PFIACDOCPCOM_STR-AWTYP sy-vline
WA_PFIACDOCPCOM_STR-AWORG sy-vline
WA_PFIACDOCPCOM_STR-AWREF sy-vline
WA_PFIACDOCPCOM_STR-USNAM sy-vline
WA_PFIACDOCPCOM_STR-KDAUF sy-vline
WA_PFIACDOCPCOM_STR-KDPOS sy-vline
WA_PFIACDOCPCOM_STR-WERKS sy-vline
WA_PFIACDOCPCOM_STR-MATNR sy-vline
WA_PFIACDOCPCOM_STR-KUNNR sy-vline
WA_PFIACDOCPCOM_STR-CO_BELKZ sy-vline
WA_PFIACDOCPCOM_STR-PS_PSP_PNR sy-vline
WA_PFIACDOCPCOM_STR-PS_POSID sy-vline
WA_PFIACDOCPCOM_STR-PS_PRJ_PNR sy-vline
WA_PFIACDOCPCOM_STR-PS_PSPID sy-vline
WA_PFIACDOCPCOM_STR-PERNR sy-vline
WA_PFIACDOCPCOM_STR-PBUKRS sy-vline
WA_PFIACDOCPCOM_STR-UKOSTL sy-vline
WA_PFIACDOCPCOM_STR-ULSTAR sy-vline
WA_PFIACDOCPCOM_STR-ACCASTY sy-vline
WA_PFIACDOCPCOM_STR-PACCASTY sy-vline
WA_PFIACDOCPCOM_STR-LSTAR sy-vline
WA_PFIACDOCPCOM_STR-AUFNR sy-vline
WA_PFIACDOCPCOM_STR-RSRCE sy-vline
WA_PFIACDOCPCOM_STR-PLSTAR sy-vline
WA_PFIACDOCPCOM_STR-PAUFNR sy-vline
WA_PFIACDOCPCOM_STR-PPS_PSP_PNR sy-vline
WA_PFIACDOCPCOM_STR-PPS_POSID sy-vline
WA_PFIACDOCPCOM_STR-PPS_PRJ_PNR sy-vline
WA_PFIACDOCPCOM_STR-PPS_PSPID sy-vline
WA_PFIACDOCPCOM_STR-WORK_ITEM_ID sy-vline
WA_PFIACDOCPCOM_STR-BEMOT sy-vline
WA_PFIACDOCPCOM_STR-PSKNZ sy-vline
WA_PFIACDOCPCOM_STR-SERVICE_DOC_TYPE sy-vline
WA_PFIACDOCPCOM_STR-SERVICE_DOC_ID sy-vline
WA_PFIACDOCPCOM_STR-SERVICE_DOC_ITEM_ID sy-vline
WA_PFIACDOCPCOM_STR-SERVICE_CONTRACT_TYPE sy-vline
WA_PFIACDOCPCOM_STR-SERVICE_CONTRACT_ID sy-vline
WA_PFIACDOCPCOM_STR-SERVICE_CONTRACT_ITEM_ID sy-vline
WA_PFIACDOCPCOM_STR-LOSGR sy-vline
WA_PFIACDOCPCOM_STR-LSUNIT sy-vline
WA_PFIACDOCPCOM_STR-FKART sy-vline
WA_PFIACDOCPCOM_STR-VKORG sy-vline
WA_PFIACDOCPCOM_STR-VTWEG sy-vline
WA_PFIACDOCPCOM_STR-SPART sy-vline
WA_PFIACDOCPCOM_STR-MATNR_COPA sy-vline
WA_PFIACDOCPCOM_STR-MATKL sy-vline
WA_PFIACDOCPCOM_STR-KDGRP sy-vline
WA_PFIACDOCPCOM_STR-LAND1 sy-vline
WA_PFIACDOCPCOM_STR-BRSCH sy-vline
WA_PFIACDOCPCOM_STR-BZIRK sy-vline
WA_PFIACDOCPCOM_STR-KUNRE sy-vline
WA_PFIACDOCPCOM_STR-KUNWE sy-vline
WA_PFIACDOCPCOM_STR-KONZS sy-vline
WA_PFIACDOCPCOM_STR-FIKRS sy-vline
WA_PFIACDOCPCOM_STR-RFUND sy-vline
WA_PFIACDOCPCOM_STR-RGRANT_NBR sy-vline
WA_PFIACDOCPCOM_STR-RBUDGET_PD sy-vline
WA_PFIACDOCPCOM_STR-RSPONSORED_PROG sy-vline
WA_PFIACDOCPCOM_STR-RSPONSORED_CLASS sy-vline
WA_PFIACDOCPCOM_STR-RBDGT_VLDTY_NBR sy-vline
WA_PFIACDOCPCOM_STR-BUDGET_PROCESS sy-vline
WA_PFIACDOCPCOM_STR-BUDGET_SUBCATEGORY sy-vline
WA_PFIACDOCPCOM_STR-ARBID sy-vline
WA_PFIACDOCPCOM_STR-VORNR sy-vline
WA_PFIACDOCPCOM_STR-AUFPS sy-vline
WA_PFIACDOCPCOM_STR-PAUFPS sy-vline
WA_PFIACDOCPCOM_STR-UVORN sy-vline
WA_PFIACDOCPCOM_STR-EQUNR sy-vline
WA_PFIACDOCPCOM_STR-TPLNR sy-vline
WA_PFIACDOCPCOM_STR-ISTRU sy-vline
WA_PFIACDOCPCOM_STR-ILART sy-vline
WA_PFIACDOCPCOM_STR-PLKNZ sy-vline
WA_PFIACDOCPCOM_STR-ARTPR sy-vline
WA_PFIACDOCPCOM_STR-PRIOK sy-vline
WA_PFIACDOCPCOM_STR-MAUFNR sy-vline
WA_PFIACDOCPCOM_STR-MATKL_MM sy-vline
WA_PFIACDOCPCOM_STR-AFABE sy-vline
WA_PFIACDOCPCOM_STR-ANLN1 sy-vline
WA_PFIACDOCPCOM_STR-ANLN2 sy-vline
WA_PFIACDOCPCOM_STR-MOVCAT sy-vline
WA_PFIACDOCPCOM_STR-ANLKL sy-vline
WA_PFIACDOCPCOM_STR-VNAME sy-vline
WA_PFIACDOCPCOM_STR-EGRUP sy-vline
WA_PFIACDOCPCOM_STR-RECID sy-vline
WA_PFIACDOCPCOM_STR-PRODPER sy-vline
WA_PFIACDOCPCOM_STR-RSNUM sy-vline
WA_PFIACDOCPCOM_STR-RSPOS sy-vline
WA_PFIACDOCPCOM_STR-RSART sy-vline
WA_PFIACDOCPCOM_STR-PACKNO sy-vline
WA_PFIACDOCPCOM_STR-INTROW sy-vline
WA_PFIACDOCPCOM_STR-SWENR sy-vline
WA_PFIACDOCPCOM_STR-SGENR sy-vline
WA_PFIACDOCPCOM_STR-SGRNR sy-vline
WA_PFIACDOCPCOM_STR-SMENR sy-vline
WA_PFIACDOCPCOM_STR-RECNNR sy-vline
WA_PFIACDOCPCOM_STR-SNKSL sy-vline
WA_PFIACDOCPCOM_STR-SEMPSL sy-vline
WA_PFIACDOCPCOM_STR-DABRZ sy-vline
WA_PFIACDOCPCOM_STR-PMATNR sy-vline
WA_PFIACDOCPCOM_STR-COSTG_FROM_DATE sy-vline
WA_PFIACDOCPCOM_STR-COSTG_TO_DATE sy-vline
WA_PFIACDOCPCOM_STR-CATEGORY sy-vline
WA_PFIACDOCPCOM_STR-KPRICE sy-vline
WA_PFIACDOCPCOM_STR-HPRICE sy-vline
WA_PFIACDOCPCOM_STR-WPRICE sy-vline
WA_PFIACDOCPCOM_STR-SGTXT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.