ABAP Select data from SAP table /PLMB/S_SPCFCM_USG_POP_VALA_SP 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 /PLMB/S_SPCFCM_USG_POP_VALA_SP 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 /PLMB/S_SPCFCM_USG_POP_VALA_SP. 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 /PLMB/S_SPCFCM_USG_POP_VALA_SP 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_/PLMB/S_SPCFCM_USG_POP_VALA_SP TYPE STANDARD TABLE OF /PLMB/S_SPCFCM_USG_POP_VALA_SP, WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP TYPE /PLMB/S_SPCFCM_USG_POP_VALA_SP, 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: </PLMB/S_SPCFCM_USG_POP_VALA_SP> TYPE /PLMB/S_SPCFCM_USG_POP_VALA_SP. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_/PLMB/S_SPCFCM_USG_POP_VALA_SP. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM /PLMB/S_SPCFCM_USG_POP_VALA_SP INTO TABLE IT_/PLMB/S_SPCFCM_USG_POP_VALA_SP. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM /PLMB/S_SPCFCM_USG_POP_VALA_SP * INTO TABLE @DATA(IT_/PLMB/S_SPCFCM_USG_POP_VALA_SP2). *--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_/PLMB/S_SPCFCM_USG_POP_VALA_SP INDEX 1 INTO DATA(WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_/PLMB/S_SPCFCM_USG_POP_VALA_SP ASSIGNING </PLMB/S_SPCFCM_USG_POP_VALA_SP>.*To update a field value using a field symbol simply change the value via the field symbol pointer
</PLMB/S_SPCFCM_USG_POP_VALA_SP>-VACLID = 1.
</PLMB/S_SPCFCM_USG_POP_VALA_SP>-ROW_ID = 1.
</PLMB/S_SPCFCM_USG_POP_VALA_SP>-RECN = 1.
</PLMB/S_SPCFCM_USG_POP_VALA_SP>-RECNROOT = 1.
</PLMB/S_SPCFCM_USG_POP_VALA_SP>-DELETE_FLAG = 1.
ENDLOOP. LOOP AT IT_/PLMB/S_SPCFCM_USG_POP_VALA_SP INTO WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-ACTVFLG, sy-vline,
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-ACTN, sy-vline,
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RVLID, sy-vline,
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-VALAR_ROW_ID, sy-vline,
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-VACLNAM, sy-vline,
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-EXCLFLG, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP 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_/PLMB/S_SPCFCM_USG_POP_VALA_SP 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_/PLMB/S_SPCFCM_USG_POP_VALA_SP INTO WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP. *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 RECN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECNROOT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNROOT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNROOT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ACTN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-ACTN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-ACTN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field ACTN CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-ACTN IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-ACTN.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field AENNR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-AENNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-AENNR.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field OWNID CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-OWNID IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-OWNID.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECNROOT CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNROOT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNROOT.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECNMST CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNMST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNMST.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECN_REFRH CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECN_REFRH IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECN_REFRH.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field RECNMST CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNMST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP-RECNMST.
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_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR,
VACLID TYPE STRING,
ROW_ID TYPE STRING,
RECN TYPE STRING,
RECNROOT TYPE STRING,
DELETE_FLAG TYPE STRING,
ACTVFLG TYPE STRING,
ACTN TYPE STRING,
RVLID TYPE STRING,
VALAR_ROW_ID TYPE STRING,
VACLNAM TYPE STRING,
EXCLFLG TYPE STRING,
EXCLFLGNAM TYPE STRING,
RVLTYPE_DESC TYPE STRING,
RVLNAM TYPE STRING,
RVLTYPE TYPE STRING,
RECORD TYPE STRING,
CREATED_BY TYPE STRING,
CHANGED_BY TYPE STRING,
CHANGE_NR_DESC TYPE STRING,
ERRORMODE TYPE STRING,
ERRORINFO TYPE STRING,
ERRORCLASS TYPE STRING,
ERRORPARAM TYPE STRING,
LOGLOCKMOD TYPE STRING,
EXTINFO TYPE STRING,
LINEMOD TYPE STRING,
MANDT TYPE STRING,
RECN TYPE STRING,
ACTN TYPE STRING,
VALFR TYPE STRING,
VALTO TYPE STRING,
AENNR TYPE STRING,
DELFLG TYPE STRING,
PARKFLG TYPE STRING,
CRDAT TYPE STRING,
CRNAM TYPE STRING,
UPDDAT TYPE STRING,
UPDNAM TYPE STRING,
SRSID TYPE STRING,
OWNID TYPE STRING,
RECNROOT TYPE STRING,
NAMEMST TYPE STRING,
RECNMST TYPE STRING,
VACLID TYPE STRING,
VACLNAM TYPE STRING,
RVLID TYPE STRING,
RVLNAM TYPE STRING,
RVLTYPE TYPE STRING,
RVLTYPENAM TYPE STRING,
EXCLFLG TYPE STRING,
ACTVFLG TYPE STRING,
ESNTFLG TYPE STRING,
RECN_REFRH TYPE STRING,
USAGECHECK TYPE STRING,
USAGE_TYPE TYPE STRING,
RECNMST TYPE STRING,END OF T_EKKO_STR. DATA: WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_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_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-VACLID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ROW_ID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECN sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECNROOT sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-DELETE_FLAG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ACTVFLG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ACTN sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-VALAR_ROW_ID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-VACLNAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-EXCLFLG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-EXCLFLGNAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLTYPE_DESC sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLNAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLTYPE sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECORD sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-CREATED_BY sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-CHANGED_BY sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-CHANGE_NR_DESC sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ERRORMODE sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ERRORINFO sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ERRORCLASS sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ERRORPARAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-LOGLOCKMOD sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-EXTINFO sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-LINEMOD sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-MANDT sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECN sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ACTN sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-VALFR sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-VALTO sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-AENNR sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-DELFLG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-PARKFLG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-CRDAT sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-CRNAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-UPDDAT sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-UPDNAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-SRSID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-OWNID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECNROOT sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-NAMEMST sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECNMST sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-VACLID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-VACLNAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLID sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLNAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLTYPE sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RVLTYPENAM sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-EXCLFLG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ACTVFLG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-ESNTFLG sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECN_REFRH sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-USAGECHECK sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-USAGE_TYPE sy-vline
WA_/PLMB/S_SPCFCM_USG_POP_VALA_SP_STR-RECNMST sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.