ABAP Select data from SAP table PLAF 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 PLAF 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 PLAF. 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 PLAF 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_PLAF TYPE STANDARD TABLE OF PLAF,
      WA_PLAF TYPE PLAF,
      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: <PLAF> TYPE PLAF.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PLAF
*  INTO TABLE @DATA(IT_PLAF2).
*--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_PLAF INDEX 1 INTO DATA(WA_PLAF2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PLAF ASSIGNING <PLAF>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PLAF>-MANDT = 1.
<PLAF>-PLNUM = 1.
<PLAF>-MATNR = 1.
<PLAF>-PLWRK = 1.
<PLAF>-PWWRK = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PLAF-PAART, sy-vline,
WA_PLAF-BESKZ, sy-vline,
WA_PLAF-SOBES, sy-vline,
WA_PLAF-GSMNG, sy-vline,
WA_PLAF-TLMNG, sy-vline,
WA_PLAF-AVMNG, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PLAF 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_PLAF 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_PLAF INTO WA_PLAF. *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 PLNUM CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_PLAF-PLNUM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PLAF-PLNUM.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

*Conversion exit TSTLC, internal->external for field DPS_HANDOVER_TIME CALL FUNCTION 'CONVERSION_EXIT_TSTLC_OUTPUT' EXPORTING input = WA_PLAF-DPS_HANDOVER_TIME IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PLAF-DPS_HANDOVER_TIME.
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_PLAF_STR,
MANDT TYPE STRING,
PLNUM TYPE STRING,
MATNR TYPE STRING,
PLWRK TYPE STRING,
PWWRK TYPE STRING,
PAART TYPE STRING,
BESKZ TYPE STRING,
SOBES TYPE STRING,
GSMNG TYPE STRING,
TLMNG TYPE STRING,
AVMNG TYPE STRING,
BDMNG TYPE STRING,
PSTTR TYPE STRING,
PEDTR TYPE STRING,
PERTR TYPE STRING,
WEBAZ TYPE STRING,
DISPO TYPE STRING,
UMSKZ TYPE STRING,
AUFFX TYPE STRING,
STLFX TYPE STRING,
KNTTP TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
KDEIN TYPE STRING,
PROJN TYPE STRING,
RSNUM TYPE STRING,
QUNUM TYPE STRING,
QUPOS TYPE STRING,
FLIEF TYPE STRING,
KONNR TYPE STRING,
KTPNR TYPE STRING,
EKORG TYPE STRING,
LGORT TYPE STRING,
NUMVR TYPE STRING,
KZVBR TYPE STRING,
SOBKZ TYPE STRING,
PSPEL TYPE STRING,
SERNR TYPE STRING,
PALTR TYPE STRING,
TECHS TYPE STRING,
STLAN TYPE STRING,
STALT TYPE STRING,
STSTA TYPE STRING,
AENNR TYPE STRING,
ARSNR TYPE STRING,
ARSPS TYPE STRING,
VERTO TYPE STRING,
VERID TYPE STRING,
AUFNR TYPE STRING,
TRART TYPE STRING,
PLGRP TYPE STRING,
TERST TYPE STRING,
TERED TYPE STRING,
BEDID TYPE STRING,
AUFPL TYPE STRING,
LINID TYPE STRING,
TRMKZ TYPE STRING,
TRMER TYPE STRING,
REDKZ TYPE STRING,
TRMHK TYPE STRING,
PLNNR TYPE STRING,
PLNAL TYPE STRING,
PLNTY TYPE STRING,
FRTHW TYPE STRING,
RGEKZ TYPE STRING,
MEINS TYPE STRING,
CUOBJ TYPE STRING,
REVLV TYPE STRING,
ABMNG TYPE STRING,
RATID TYPE STRING,
GROID TYPE STRING,
RATER TYPE STRING,
GROER TYPE STRING,
OBART TYPE STRING,
PLSCN TYPE STRING,
SBNUM TYPE STRING,
KBNKZ TYPE STRING,
KAPFX TYPE STRING,
SEQNR TYPE STRING,
PSTTI TYPE STRING,
PEDTI TYPE STRING,
MONKZ TYPE STRING,
PRNKZ TYPE STRING,
MDPBV TYPE STRING,
VFMNG TYPE STRING,
MDACH TYPE STRING,
MDACC TYPE STRING,
MDACD TYPE STRING,
MDACT TYPE STRING,
GSBTR TYPE STRING,
PLETX TYPE STRING,
PRSCH TYPE STRING,
LVSCH TYPE STRING,
KZAVC TYPE STRING,
VRPLA TYPE STRING,
PBDNR TYPE STRING,
AGREQ TYPE STRING,
UMREZ TYPE STRING,
UMREN TYPE STRING,
ERFMG TYPE STRING,
ERFME TYPE STRING,
RQNUM TYPE STRING,
KZBWS TYPE STRING,
WEMNG TYPE STRING,
WAMNG TYPE STRING,
EDGNO TYPE STRING,
LBLKZ TYPE STRING,
EMLIF TYPE STRING,
BERID TYPE STRING,
UBERI TYPE STRING,
EMATN TYPE STRING,
REMFL TYPE STRING,
PSTMP TYPE STRING,
PUSER TYPE STRING,
BADI TYPE STRING,
STAEX TYPE STRING,
RESLO TYPE STRING,
SRM_CONTRACT_ID TYPE STRING,
SRM_CONTRACT_ITM TYPE STRING,
ORG_REQ_DATE TYPE STRING,
PTEXT TYPE STRING,
DUMMY_PLAF_INCL_EEW_PS TYPE STRING,
MEDKZ TYPE STRING,
CNFQTY TYPE STRING,
SGT_SCAT TYPE STRING,
PLIFZ TYPE STRING,
BOM_VERSN TYPE STRING,
DAC_PP_COMPONENT TYPE STRING,
DAC_INDIRECT_ACCESS TYPE STRING,
DAC_CREATION_DATE TYPE STRING,
M_MRP TYPE STRING,
KUNNR TYPE STRING,
FLG_BUNDLE TYPE STRING,
FSH_MPLND_ORD TYPE STRING,
FSH_SEASON_YEAR TYPE STRING,
FSH_SEASON TYPE STRING,
FSH_COLLECTION TYPE STRING,
FSH_THEME TYPE STRING,
ATRKZ TYPE STRING,
DPS_HANDOVER_TIME TYPE STRING,END OF T_EKKO_STR. DATA: WA_PLAF_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_PLAF_STR-MANDT sy-vline
WA_PLAF_STR-PLNUM sy-vline
WA_PLAF_STR-MATNR sy-vline
WA_PLAF_STR-PLWRK sy-vline
WA_PLAF_STR-PWWRK sy-vline
WA_PLAF_STR-PAART sy-vline
WA_PLAF_STR-BESKZ sy-vline
WA_PLAF_STR-SOBES sy-vline
WA_PLAF_STR-GSMNG sy-vline
WA_PLAF_STR-TLMNG sy-vline
WA_PLAF_STR-AVMNG sy-vline
WA_PLAF_STR-BDMNG sy-vline
WA_PLAF_STR-PSTTR sy-vline
WA_PLAF_STR-PEDTR sy-vline
WA_PLAF_STR-PERTR sy-vline
WA_PLAF_STR-WEBAZ sy-vline
WA_PLAF_STR-DISPO sy-vline
WA_PLAF_STR-UMSKZ sy-vline
WA_PLAF_STR-AUFFX sy-vline
WA_PLAF_STR-STLFX sy-vline
WA_PLAF_STR-KNTTP sy-vline
WA_PLAF_STR-KDAUF sy-vline
WA_PLAF_STR-KDPOS sy-vline
WA_PLAF_STR-KDEIN sy-vline
WA_PLAF_STR-PROJN sy-vline
WA_PLAF_STR-RSNUM sy-vline
WA_PLAF_STR-QUNUM sy-vline
WA_PLAF_STR-QUPOS sy-vline
WA_PLAF_STR-FLIEF sy-vline
WA_PLAF_STR-KONNR sy-vline
WA_PLAF_STR-KTPNR sy-vline
WA_PLAF_STR-EKORG sy-vline
WA_PLAF_STR-LGORT sy-vline
WA_PLAF_STR-NUMVR sy-vline
WA_PLAF_STR-KZVBR sy-vline
WA_PLAF_STR-SOBKZ sy-vline
WA_PLAF_STR-PSPEL sy-vline
WA_PLAF_STR-SERNR sy-vline
WA_PLAF_STR-PALTR sy-vline
WA_PLAF_STR-TECHS sy-vline
WA_PLAF_STR-STLAN sy-vline
WA_PLAF_STR-STALT sy-vline
WA_PLAF_STR-STSTA sy-vline
WA_PLAF_STR-AENNR sy-vline
WA_PLAF_STR-ARSNR sy-vline
WA_PLAF_STR-ARSPS sy-vline
WA_PLAF_STR-VERTO sy-vline
WA_PLAF_STR-VERID sy-vline
WA_PLAF_STR-AUFNR sy-vline
WA_PLAF_STR-TRART sy-vline
WA_PLAF_STR-PLGRP sy-vline
WA_PLAF_STR-TERST sy-vline
WA_PLAF_STR-TERED sy-vline
WA_PLAF_STR-BEDID sy-vline
WA_PLAF_STR-AUFPL sy-vline
WA_PLAF_STR-LINID sy-vline
WA_PLAF_STR-TRMKZ sy-vline
WA_PLAF_STR-TRMER sy-vline
WA_PLAF_STR-REDKZ sy-vline
WA_PLAF_STR-TRMHK sy-vline
WA_PLAF_STR-PLNNR sy-vline
WA_PLAF_STR-PLNAL sy-vline
WA_PLAF_STR-PLNTY sy-vline
WA_PLAF_STR-FRTHW sy-vline
WA_PLAF_STR-RGEKZ sy-vline
WA_PLAF_STR-MEINS sy-vline
WA_PLAF_STR-CUOBJ sy-vline
WA_PLAF_STR-REVLV sy-vline
WA_PLAF_STR-ABMNG sy-vline
WA_PLAF_STR-RATID sy-vline
WA_PLAF_STR-GROID sy-vline
WA_PLAF_STR-RATER sy-vline
WA_PLAF_STR-GROER sy-vline
WA_PLAF_STR-OBART sy-vline
WA_PLAF_STR-PLSCN sy-vline
WA_PLAF_STR-SBNUM sy-vline
WA_PLAF_STR-KBNKZ sy-vline
WA_PLAF_STR-KAPFX sy-vline
WA_PLAF_STR-SEQNR sy-vline
WA_PLAF_STR-PSTTI sy-vline
WA_PLAF_STR-PEDTI sy-vline
WA_PLAF_STR-MONKZ sy-vline
WA_PLAF_STR-PRNKZ sy-vline
WA_PLAF_STR-MDPBV sy-vline
WA_PLAF_STR-VFMNG sy-vline
WA_PLAF_STR-MDACH sy-vline
WA_PLAF_STR-MDACC sy-vline
WA_PLAF_STR-MDACD sy-vline
WA_PLAF_STR-MDACT sy-vline
WA_PLAF_STR-GSBTR sy-vline
WA_PLAF_STR-PLETX sy-vline
WA_PLAF_STR-PRSCH sy-vline
WA_PLAF_STR-LVSCH sy-vline
WA_PLAF_STR-KZAVC sy-vline
WA_PLAF_STR-VRPLA sy-vline
WA_PLAF_STR-PBDNR sy-vline
WA_PLAF_STR-AGREQ sy-vline
WA_PLAF_STR-UMREZ sy-vline
WA_PLAF_STR-UMREN sy-vline
WA_PLAF_STR-ERFMG sy-vline
WA_PLAF_STR-ERFME sy-vline
WA_PLAF_STR-RQNUM sy-vline
WA_PLAF_STR-KZBWS sy-vline
WA_PLAF_STR-WEMNG sy-vline
WA_PLAF_STR-WAMNG sy-vline
WA_PLAF_STR-EDGNO sy-vline
WA_PLAF_STR-LBLKZ sy-vline
WA_PLAF_STR-EMLIF sy-vline
WA_PLAF_STR-BERID sy-vline
WA_PLAF_STR-UBERI sy-vline
WA_PLAF_STR-EMATN sy-vline
WA_PLAF_STR-REMFL sy-vline
WA_PLAF_STR-PSTMP sy-vline
WA_PLAF_STR-PUSER sy-vline
WA_PLAF_STR-BADI sy-vline
WA_PLAF_STR-STAEX sy-vline
WA_PLAF_STR-RESLO sy-vline
WA_PLAF_STR-SRM_CONTRACT_ID sy-vline
WA_PLAF_STR-SRM_CONTRACT_ITM sy-vline
WA_PLAF_STR-ORG_REQ_DATE sy-vline
WA_PLAF_STR-PTEXT sy-vline
WA_PLAF_STR-DUMMY_PLAF_INCL_EEW_PS sy-vline
WA_PLAF_STR-MEDKZ sy-vline
WA_PLAF_STR-CNFQTY sy-vline
WA_PLAF_STR-SGT_SCAT sy-vline
WA_PLAF_STR-PLIFZ sy-vline
WA_PLAF_STR-BOM_VERSN sy-vline
WA_PLAF_STR-DAC_PP_COMPONENT sy-vline
WA_PLAF_STR-DAC_INDIRECT_ACCESS sy-vline
WA_PLAF_STR-DAC_CREATION_DATE sy-vline
WA_PLAF_STR-M_MRP sy-vline
WA_PLAF_STR-KUNNR sy-vline
WA_PLAF_STR-FLG_BUNDLE sy-vline
WA_PLAF_STR-FSH_MPLND_ORD sy-vline
WA_PLAF_STR-FSH_SEASON_YEAR sy-vline
WA_PLAF_STR-FSH_SEASON sy-vline
WA_PLAF_STR-FSH_COLLECTION sy-vline
WA_PLAF_STR-FSH_THEME sy-vline
WA_PLAF_STR-ATRKZ sy-vline
WA_PLAF_STR-DPS_HANDOVER_TIME sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.