ABAP Select data from SAP table /SCWM/S_STOCK_UPLOAD 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 /SCWM/S_STOCK_UPLOAD 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 /SCWM/S_STOCK_UPLOAD. 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 /SCWM/S_STOCK_UPLOAD 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_/SCWM/S_STOCK_UPLOAD TYPE STANDARD TABLE OF /SCWM/S_STOCK_UPLOAD,
      WA_/SCWM/S_STOCK_UPLOAD TYPE /SCWM/S_STOCK_UPLOAD,
      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: </SCWM/S_STOCK_UPLOAD> TYPE /SCWM/S_STOCK_UPLOAD.

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

SELECT *
*restrict ABAP select to first 10 rows
 UP TO 10 ROWS      
  FROM /SCWM/S_STOCK_UPLOAD
  INTO TABLE IT_/SCWM/S_STOCK_UPLOAD.

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM /SCWM/S_STOCK_UPLOAD
*  INTO TABLE @DATA(IT_/SCWM/S_STOCK_UPLOAD2).
*--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_/SCWM/S_STOCK_UPLOAD INDEX 1 INTO DATA(WA_/SCWM/S_STOCK_UPLOAD2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/SCWM/S_STOCK_UPLOAD ASSIGNING </SCWM/S_STOCK_UPLOAD>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
</SCWM/S_STOCK_UPLOAD>-MANDT = 1.
</SCWM/S_STOCK_UPLOAD>-ICON = 1.
</SCWM/S_STOCK_UPLOAD>-POSTYPE = 1.
</SCWM/S_STOCK_UPLOAD>-MATID = 1.
</SCWM/S_STOCK_UPLOAD>-OWNER = 1.
ENDLOOP.

LOOP AT IT_/SCWM/S_STOCK_UPLOAD INTO WA_/SCWM/S_STOCK_UPLOAD.
*Write horizonal line to screen report.
  WRITE:/ sy-uline.

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_/SCWM/S_STOCK_UPLOAD-OWNER_ROLE, sy-vline,
WA_/SCWM/S_STOCK_UPLOAD-BATCHID, sy-vline,
WA_/SCWM/S_STOCK_UPLOAD-CAT, sy-vline,
WA_/SCWM/S_STOCK_UPLOAD-STOCK_DOCCAT, sy-vline,
WA_/SCWM/S_STOCK_UPLOAD-STOCK_DOCNO, sy-vline,
WA_/SCWM/S_STOCK_UPLOAD-STOCK_ITMNO, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/SCWM/S_STOCK_UPLOAD 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_/SCWM/S_STOCK_UPLOAD 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_/SCWM/S_STOCK_UPLOAD INTO WA_/SCWM/S_STOCK_UPLOAD. *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 MDLPD, internal->external for field MATID CALL FUNCTION 'CONVERSION_EXIT_MDLPD_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-MATID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-MATID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit BPMAP, internal->external for field OWNER CALL FUNCTION 'CONVERSION_EXIT_BPMAP_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-OWNER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-OWNER.
WRITE:/ 'New Value:', ld_input.

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

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

*Conversion exit MDLPD, internal->external for field PMAT CALL FUNCTION 'CONVERSION_EXIT_MDLPD_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-PMAT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-PMAT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit HUID, internal->external for field HUIDENT CALL FUNCTION 'CONVERSION_EXIT_HUID_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-HUIDENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-HUIDENT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit HUID, internal->external for field PARHUIDENT CALL FUNCTION 'CONVERSION_EXIT_HUID_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-PARHUIDENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-PARHUIDENT.
WRITE:/ 'New Value:', ld_input.

*Conversion exit HUID, internal->external for field TOPHUIDENT CALL FUNCTION 'CONVERSION_EXIT_HUID_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-TOPHUIDENT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-TOPHUIDENT.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

*Conversion exit SERID, internal->external for field SERID CALL FUNCTION 'CONVERSION_EXIT_SERID_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-SERID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-SERID.
WRITE:/ 'New Value:', ld_input.

*Conversion exit CUNIT, internal->external for field CWUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_/SCWM/S_STOCK_UPLOAD-CWUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/SCWM/S_STOCK_UPLOAD-CWUNIT.
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_/SCWM/S_STOCK_UPLOAD_STR,
MANDT TYPE STRING,
ICON TYPE STRING,
POSTYPE TYPE STRING,
MATID TYPE STRING,
OWNER TYPE STRING,
OWNER_ROLE TYPE STRING,
BATCHID TYPE STRING,
CAT TYPE STRING,
STOCK_DOCCAT TYPE STRING,
STOCK_DOCNO TYPE STRING,
STOCK_ITMNO TYPE STRING,
STOCK_USAGE TYPE STRING,
ENTITLED TYPE STRING,
ENTITLED_ROLE TYPE STRING,
COO TYPE STRING,
QUAN TYPE STRING,
UNIT TYPE STRING,
HUTYP TYPE STRING,
LGPLA TYPE STRING,
LOGPOS TYPE STRING,
GRDAT TYPE STRING,
VFDAT TYPE STRING,
PMAT TYPE STRING,
EXTNO TYPE STRING,
HUIDENT TYPE STRING,
PARHUIDENT TYPE STRING,
TOPHUIDENT TYPE STRING,
ROW TYPE STRING,
REFROW TYPE STRING,
G_WEIGHT TYPE STRING,
N_WEIGHT TYPE STRING,
UNIT_GW TYPE STRING,
T_WEIGHT TYPE STRING,
UNIT_TW TYPE STRING,
G_VOLUME TYPE STRING,
N_VOLUME TYPE STRING,
UNIT_GV TYPE STRING,
T_VOLUME TYPE STRING,
UNIT_TV TYPE STRING,
G_CAPA TYPE STRING,
N_CAPA TYPE STRING,
T_CAPA TYPE STRING,
LENGTH TYPE STRING,
WIDTH TYPE STRING,
HEIGHT TYPE STRING,
UNIT_LWH TYPE STRING,
MAX_WEIGHT TYPE STRING,
TOLW TYPE STRING,
TARE_VAR TYPE STRING,
MAX_VOLUME TYPE STRING,
TOLV TYPE STRING,
CLOSED_PACKAGE TYPE STRING,
MAX_CAPA TYPE STRING,
MAX_LENGTH TYPE STRING,
MAX_WIDTH TYPE STRING,
MAX_HEIGHT TYPE STRING,
UNIT_MAX_LWH TYPE STRING,
SERID TYPE STRING,
CWQUAN TYPE STRING,
CWUNIT TYPE STRING,
CWEXACT TYPE STRING,
UII TYPE STRING,
AMOUNT_LC TYPE STRING,
DUMMY_ISU TYPE STRING,
ZEUGN TYPE STRING,END OF T_EKKO_STR. DATA: WA_/SCWM/S_STOCK_UPLOAD_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_/SCWM/S_STOCK_UPLOAD_STR-MANDT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-ICON sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-POSTYPE sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-MATID sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-OWNER sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-OWNER_ROLE sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-BATCHID sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-CAT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-STOCK_DOCCAT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-STOCK_DOCNO sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-STOCK_ITMNO sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-STOCK_USAGE sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-ENTITLED sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-ENTITLED_ROLE sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-COO sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-QUAN sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UNIT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-HUTYP sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-LGPLA sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-LOGPOS sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-GRDAT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-VFDAT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-PMAT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-EXTNO sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-HUIDENT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-PARHUIDENT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-TOPHUIDENT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-ROW sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-REFROW sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-G_WEIGHT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-N_WEIGHT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UNIT_GW sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-T_WEIGHT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UNIT_TW sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-G_VOLUME sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-N_VOLUME sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UNIT_GV sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-T_VOLUME sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UNIT_TV sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-G_CAPA sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-N_CAPA sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-T_CAPA sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-LENGTH sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-WIDTH sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-HEIGHT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UNIT_LWH sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-MAX_WEIGHT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-TOLW sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-TARE_VAR sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-MAX_VOLUME sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-TOLV sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-CLOSED_PACKAGE sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-MAX_CAPA sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-MAX_LENGTH sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-MAX_WIDTH sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-MAX_HEIGHT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UNIT_MAX_LWH sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-SERID sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-CWQUAN sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-CWUNIT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-CWEXACT sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-UII sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-AMOUNT_LC sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-DUMMY_ISU sy-vline
WA_/SCWM/S_STOCK_UPLOAD_STR-ZEUGN sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.