ABAP Select data from SAP table PSHLP_ALV_MATERIAL_ST 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 PSHLP_ALV_MATERIAL_ST 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 PSHLP_ALV_MATERIAL_ST. 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 PSHLP_ALV_MATERIAL_ST 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_PSHLP_ALV_MATERIAL_ST TYPE STANDARD TABLE OF PSHLP_ALV_MATERIAL_ST, WA_PSHLP_ALV_MATERIAL_ST TYPE PSHLP_ALV_MATERIAL_ST, 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: <PSHLP_ALV_MATERIAL_ST> TYPE PSHLP_ALV_MATERIAL_ST. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_PSHLP_ALV_MATERIAL_ST. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM PSHLP_ALV_MATERIAL_ST INTO TABLE IT_PSHLP_ALV_MATERIAL_ST. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM PSHLP_ALV_MATERIAL_ST * INTO TABLE @DATA(IT_PSHLP_ALV_MATERIAL_ST2). *--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_PSHLP_ALV_MATERIAL_ST INDEX 1 INTO DATA(WA_PSHLP_ALV_MATERIAL_ST2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_PSHLP_ALV_MATERIAL_ST ASSIGNING <PSHLP_ALV_MATERIAL_ST>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<PSHLP_ALV_MATERIAL_ST>-POSNR = 1.
<PSHLP_ALV_MATERIAL_ST>-MATNR = 1.
<PSHLP_ALV_MATERIAL_ST>-WERKS = 1.
<PSHLP_ALV_MATERIAL_ST>-MENGE = 1.
<PSHLP_ALV_MATERIAL_ST>-EINHEIT = 1.
ENDLOOP. LOOP AT IT_PSHLP_ALV_MATERIAL_ST INTO WA_PSHLP_ALV_MATERIAL_ST. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_PSHLP_ALV_MATERIAL_ST-MFLIC, sy-vline,
WA_PSHLP_ALV_MATERIAL_ST-POSTP, sy-vline,
WA_PSHLP_ALV_MATERIAL_ST-AUDISP, sy-vline,
WA_PSHLP_ALV_MATERIAL_ST-LGORT, sy-vline,
WA_PSHLP_ALV_MATERIAL_ST-SERNR, sy-vline,
WA_PSHLP_ALV_MATERIAL_ST-MATXT, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PSHLP_ALV_MATERIAL_ST 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_PSHLP_ALV_MATERIAL_ST 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_PSHLP_ALV_MATERIAL_ST INTO WA_PSHLP_ALV_MATERIAL_ST. *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 NUMCV, internal->external for field POSNR CALL FUNCTION 'CONVERSION_EXIT_NUMCV_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-POSNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-POSNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field MATNR CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-MATNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-MATNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field EINHEIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-EINHEIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-EINHEIT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit CUNIT, internal->external for field NLFMV CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-NLFMV IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-NLFMV.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field INFNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-INFNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-INFNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ABPSP, internal->external for field PSPEL CALL FUNCTION 'CONVERSION_EXIT_ABPSP_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-PSPEL IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-PSPEL.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field KDAUF CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-KDAUF IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-KDAUF.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field ASSEMBLY CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-ASSEMBLY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-ASSEMBLY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit MATN1, internal->external for field MAINBOM CALL FUNCTION 'CONVERSION_EXIT_MATN1_OUTPUT' EXPORTING input = WA_PSHLP_ALV_MATERIAL_ST-MAINBOM IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PSHLP_ALV_MATERIAL_ST-MAINBOM.
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_PSHLP_ALV_MATERIAL_ST_STR,
POSNR TYPE STRING,
MATNR TYPE STRING,
WERKS TYPE STRING,
MENGE TYPE STRING,
EINHEIT TYPE STRING,
MFLIC TYPE STRING,
POSTP TYPE STRING,
AUDISP TYPE STRING,
LGORT TYPE STRING,
SERNR TYPE STRING,
MATXT TYPE STRING,
SORTF TYPE STRING,
BDTER TYPE STRING,
SCHED_START TYPE STRING,
SCHED_END TYPE STRING,
KZMPF TYPE STRING,
NLFZV TYPE STRING,
NLFMV TYPE STRING,
VERTI TYPE STRING,
INFNR TYPE STRING,
EKORG TYPE STRING,
GRP_IND TYPE STRING,
LTEXT TYPE STRING,
PSPEL TYPE STRING,
KDAUF TYPE STRING,
KDPOS TYPE STRING,
ASSEMBLY TYPE STRING,
STLTY TYPE STRING,
MAINBOM TYPE STRING,
MAINTY TYPE STRING,
BRTDATE TYPE STRING,
SANKA TYPE STRING,
KZEKL TYPE STRING,
KZFIX TYPE STRING,
XWAOK TYPE STRING,
KZEAR TYPE STRING,
SCHGT TYPE STRING,
RGEKZ TYPE STRING,
VORAB TYPE STRING,
STRECKE TYPE STRING,
XFEHL TYPE STRING,
FLG_PURS TYPE STRING,
KZKFG TYPE STRING,
DUMPS TYPE STRING,
KZAUS TYPE STRING,
ALPOS TYPE STRING,
SPLKZ TYPE STRING,
CHARG TYPE STRING,
PRCTYPE TYPE STRING,
XLOEK TYPE STRING,
SOBKZ TYPE STRING,
ENMNG TYPE STRING,
FLMNG TYPE STRING,
VMENG TYPE STRING,
WEMNG_CMP TYPE STRING,
TECHS TYPE STRING,
CELLTAB TYPE STRING,
COLOR_TAB TYPE STRING,
OBJNR TYPE STRING,END OF T_EKKO_STR. DATA: WA_PSHLP_ALV_MATERIAL_ST_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_PSHLP_ALV_MATERIAL_ST_STR-POSNR sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-MATNR sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-WERKS sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-MENGE sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-EINHEIT sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-MFLIC sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-POSTP sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-AUDISP sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-LGORT sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SERNR sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-MATXT sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SORTF sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-BDTER sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SCHED_START sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SCHED_END sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KZMPF sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-NLFZV sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-NLFMV sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-VERTI sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-INFNR sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-EKORG sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-GRP_IND sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-LTEXT sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-PSPEL sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KDAUF sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KDPOS sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-ASSEMBLY sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-STLTY sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-MAINBOM sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-MAINTY sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-BRTDATE sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SANKA sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KZEKL sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KZFIX sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-XWAOK sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KZEAR sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SCHGT sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-RGEKZ sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-VORAB sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-STRECKE sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-XFEHL sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-FLG_PURS sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KZKFG sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-DUMPS sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-KZAUS sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-ALPOS sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SPLKZ sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-CHARG sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-PRCTYPE sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-XLOEK sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-SOBKZ sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-ENMNG sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-FLMNG sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-VMENG sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-WEMNG_CMP sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-TECHS sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-CELLTAB sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-COLOR_TAB sy-vline
WA_PSHLP_ALV_MATERIAL_ST_STR-OBJNR sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.