ABAP Select data from SAP table V_SOUDADCP 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 V_SOUDADCP 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 V_SOUDADCP. 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 V_SOUDADCP 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_V_SOUDADCP TYPE STANDARD TABLE OF V_SOUDADCP,
      WA_V_SOUDADCP TYPE V_SOUDADCP,
      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: <V_SOUDADCP> TYPE V_SOUDADCP.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM V_SOUDADCP
*  INTO TABLE @DATA(IT_V_SOUDADCP2).
*--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_V_SOUDADCP INDEX 1 INTO DATA(WA_V_SOUDADCP2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_V_SOUDADCP ASSIGNING <V_SOUDADCP>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<V_SOUDADCP>-MANDT = 1.
<V_SOUDADCP>-USRTP = 1.
<V_SOUDADCP>-USRYR = 1.
<V_SOUDADCP>-USRNO = 1.
<V_SOUDADCP>-CLIENT = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_V_SOUDADCP-ADDRNUMBER, sy-vline,
WA_V_SOUDADCP-PERSNUMBER, sy-vline,
WA_V_SOUDADCP-DATE_FROM, sy-vline,
WA_V_SOUDADCP-NATION, sy-vline,
WA_V_SOUDADCP-CROTP, sy-vline,
WA_V_SOUDADCP-CROYR, sy-vline.
ENDLOOP. *Add any further fields from structure WA_V_SOUDADCP 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_V_SOUDADCP 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_V_SOUDADCP INTO WA_V_SOUDADCP. *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 ADDRNUMBER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_V_SOUDADCP-ADDRNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_V_SOUDADCP-ADDRNUMBER.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit ALPHA, internal->external for field USRADR CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_V_SOUDADCP-USRADR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_V_SOUDADCP-USRADR.
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_V_SOUDADCP_STR,
MANDT TYPE STRING,
USRTP TYPE STRING,
USRYR TYPE STRING,
USRNO TYPE STRING,
CLIENT TYPE STRING,
ADDRNUMBER TYPE STRING,
PERSNUMBER TYPE STRING,
DATE_FROM TYPE STRING,
NATION TYPE STRING,
CROTP TYPE STRING,
CROYR TYPE STRING,
CRONO TYPE STRING,
CRONAM TYPE STRING,
CRDAT TYPE STRING,
CRTIM TYPE STRING,
CHOTP TYPE STRING,
CHOYR TYPE STRING,
CHONO TYPE STRING,
CHONAM TYPE STRING,
CHDAT TYPE STRING,
CHTIM TYPE STRING,
SAPNAM TYPE STRING,
USRNAM TYPE STRING,
LOADAT TYPE STRING,
EXMAX TYPE STRING,
RCMAX TYPE STRING,
INMAX TYPE STRING,
USRAU TYPE STRING,
CRGDL TYPE STRING,
CRFCL TYPE STRING,
CRFCC TYPE STRING,
CRFPL TYPE STRING,
CRFDP TYPE STRING,
CRFAD TYPE STRING,
CRFGR TYPE STRING,
HOMAX TYPE STRING,
HOCNT TYPE STRING,
GLMAX TYPE STRING,
GFMAX TYPE STRING,
GFCNT TYPE STRING,
AUTEXT TYPE STRING,
NOTTP TYPE STRING,
CALEN TYPE STRING,
OUTFL TYPE STRING,
SQWIN TYPE STRING,
SYUSR TYPE STRING,
SYUSRINB TYPE STRING,
SYUSROUT TYPE STRING,
ADREXT TYPE STRING,
PRWYR TYPE STRING,
PRWNO TYPE STRING,
PUWYR TYPE STRING,
PUWNO TYPE STRING,
INBYR TYPE STRING,
INBNO TYPE STRING,
OUTYR TYPE STRING,
OUTNO TYPE STRING,
WSTYR TYPE STRING,
WSTNO TYPE STRING,
PFRYR TYPE STRING,
PFRNO TYPE STRING,
PDLYR TYPE STRING,
PDLNO TYPE STRING,
VORYR TYPE STRING,
VORNO TYPE STRING,
NOTYR TYPE STRING,
NOTNO TYPE STRING,
DELETED TYPE STRING,
RSWORKDAY TYPE STRING,
RSFACID TYPE STRING,
USRADR TYPE STRING,
LFDNR TYPE STRING,
SNDART TYPE STRING,
FLAG1 TYPE STRING,
FLAG2 TYPE STRING,
FLAG3 TYPE STRING,
NATIO TYPE STRING,
LADAT TYPE STRING,
VLADAT TYPE STRING,
LASDAT TYPE STRING,
EXTTELE TYPE STRING,
EXTSMTP TYPE STRING,
EXTX400 TYPE STRING,
EXTSAP TYPE STRING,
AREPYR TYPE STRING,
AREPNO TYPE STRING,
AREPABDAT TYPE STRING,
AREPAEDAT TYPE STRING,
FAXFORM TYPE STRING,
SCRFORM TYPE STRING,
DEPARTMENT TYPE STRING,
BUILDING TYPE STRING,
ROOMNUMBER TYPE STRING,
NAME_TEXT TYPE STRING,
CHATSEND TYPE STRING,
NOARSDEX TYPE STRING,
PRPARCHG TYPE STRING,
PRPARNDH TYPE STRING,
PRPARRCL TYPE STRING,
PRPARNOP TYPE STRING,
DELFORIB TYPE STRING,
GHRAWDOC TYPE STRING,
FOLDSORT TYPE STRING,
DELTRASH TYPE STRING,
RSDOCFOR TYPE STRING,
FOLASDYR TYPE STRING,
FOLASDNO TYPE STRING,
FOLLINYR TYPE STRING,
FOLLINNO TYPE STRING,
FOLCRDYR TYPE STRING,
FOLCRDNO TYPE STRING,
LINKDOYR TYPE STRING,
LINKDONO TYPE STRING,
NORTFEDIT TYPE STRING,
PCOLE TYPE STRING,END OF T_EKKO_STR. DATA: WA_V_SOUDADCP_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_V_SOUDADCP_STR-MANDT sy-vline
WA_V_SOUDADCP_STR-USRTP sy-vline
WA_V_SOUDADCP_STR-USRYR sy-vline
WA_V_SOUDADCP_STR-USRNO sy-vline
WA_V_SOUDADCP_STR-CLIENT sy-vline
WA_V_SOUDADCP_STR-ADDRNUMBER sy-vline
WA_V_SOUDADCP_STR-PERSNUMBER sy-vline
WA_V_SOUDADCP_STR-DATE_FROM sy-vline
WA_V_SOUDADCP_STR-NATION sy-vline
WA_V_SOUDADCP_STR-CROTP sy-vline
WA_V_SOUDADCP_STR-CROYR sy-vline
WA_V_SOUDADCP_STR-CRONO sy-vline
WA_V_SOUDADCP_STR-CRONAM sy-vline
WA_V_SOUDADCP_STR-CRDAT sy-vline
WA_V_SOUDADCP_STR-CRTIM sy-vline
WA_V_SOUDADCP_STR-CHOTP sy-vline
WA_V_SOUDADCP_STR-CHOYR sy-vline
WA_V_SOUDADCP_STR-CHONO sy-vline
WA_V_SOUDADCP_STR-CHONAM sy-vline
WA_V_SOUDADCP_STR-CHDAT sy-vline
WA_V_SOUDADCP_STR-CHTIM sy-vline
WA_V_SOUDADCP_STR-SAPNAM sy-vline
WA_V_SOUDADCP_STR-USRNAM sy-vline
WA_V_SOUDADCP_STR-LOADAT sy-vline
WA_V_SOUDADCP_STR-EXMAX sy-vline
WA_V_SOUDADCP_STR-RCMAX sy-vline
WA_V_SOUDADCP_STR-INMAX sy-vline
WA_V_SOUDADCP_STR-USRAU sy-vline
WA_V_SOUDADCP_STR-CRGDL sy-vline
WA_V_SOUDADCP_STR-CRFCL sy-vline
WA_V_SOUDADCP_STR-CRFCC sy-vline
WA_V_SOUDADCP_STR-CRFPL sy-vline
WA_V_SOUDADCP_STR-CRFDP sy-vline
WA_V_SOUDADCP_STR-CRFAD sy-vline
WA_V_SOUDADCP_STR-CRFGR sy-vline
WA_V_SOUDADCP_STR-HOMAX sy-vline
WA_V_SOUDADCP_STR-HOCNT sy-vline
WA_V_SOUDADCP_STR-GLMAX sy-vline
WA_V_SOUDADCP_STR-GFMAX sy-vline
WA_V_SOUDADCP_STR-GFCNT sy-vline
WA_V_SOUDADCP_STR-AUTEXT sy-vline
WA_V_SOUDADCP_STR-NOTTP sy-vline
WA_V_SOUDADCP_STR-CALEN sy-vline
WA_V_SOUDADCP_STR-OUTFL sy-vline
WA_V_SOUDADCP_STR-SQWIN sy-vline
WA_V_SOUDADCP_STR-SYUSR sy-vline
WA_V_SOUDADCP_STR-SYUSRINB sy-vline
WA_V_SOUDADCP_STR-SYUSROUT sy-vline
WA_V_SOUDADCP_STR-ADREXT sy-vline
WA_V_SOUDADCP_STR-PRWYR sy-vline
WA_V_SOUDADCP_STR-PRWNO sy-vline
WA_V_SOUDADCP_STR-PUWYR sy-vline
WA_V_SOUDADCP_STR-PUWNO sy-vline
WA_V_SOUDADCP_STR-INBYR sy-vline
WA_V_SOUDADCP_STR-INBNO sy-vline
WA_V_SOUDADCP_STR-OUTYR sy-vline
WA_V_SOUDADCP_STR-OUTNO sy-vline
WA_V_SOUDADCP_STR-WSTYR sy-vline
WA_V_SOUDADCP_STR-WSTNO sy-vline
WA_V_SOUDADCP_STR-PFRYR sy-vline
WA_V_SOUDADCP_STR-PFRNO sy-vline
WA_V_SOUDADCP_STR-PDLYR sy-vline
WA_V_SOUDADCP_STR-PDLNO sy-vline
WA_V_SOUDADCP_STR-VORYR sy-vline
WA_V_SOUDADCP_STR-VORNO sy-vline
WA_V_SOUDADCP_STR-NOTYR sy-vline
WA_V_SOUDADCP_STR-NOTNO sy-vline
WA_V_SOUDADCP_STR-DELETED sy-vline
WA_V_SOUDADCP_STR-RSWORKDAY sy-vline
WA_V_SOUDADCP_STR-RSFACID sy-vline
WA_V_SOUDADCP_STR-USRADR sy-vline
WA_V_SOUDADCP_STR-LFDNR sy-vline
WA_V_SOUDADCP_STR-SNDART sy-vline
WA_V_SOUDADCP_STR-FLAG1 sy-vline
WA_V_SOUDADCP_STR-FLAG2 sy-vline
WA_V_SOUDADCP_STR-FLAG3 sy-vline
WA_V_SOUDADCP_STR-NATIO sy-vline
WA_V_SOUDADCP_STR-LADAT sy-vline
WA_V_SOUDADCP_STR-VLADAT sy-vline
WA_V_SOUDADCP_STR-LASDAT sy-vline
WA_V_SOUDADCP_STR-EXTTELE sy-vline
WA_V_SOUDADCP_STR-EXTSMTP sy-vline
WA_V_SOUDADCP_STR-EXTX400 sy-vline
WA_V_SOUDADCP_STR-EXTSAP sy-vline
WA_V_SOUDADCP_STR-AREPYR sy-vline
WA_V_SOUDADCP_STR-AREPNO sy-vline
WA_V_SOUDADCP_STR-AREPABDAT sy-vline
WA_V_SOUDADCP_STR-AREPAEDAT sy-vline
WA_V_SOUDADCP_STR-FAXFORM sy-vline
WA_V_SOUDADCP_STR-SCRFORM sy-vline
WA_V_SOUDADCP_STR-DEPARTMENT sy-vline
WA_V_SOUDADCP_STR-BUILDING sy-vline
WA_V_SOUDADCP_STR-ROOMNUMBER sy-vline
WA_V_SOUDADCP_STR-NAME_TEXT sy-vline
WA_V_SOUDADCP_STR-CHATSEND sy-vline
WA_V_SOUDADCP_STR-NOARSDEX sy-vline
WA_V_SOUDADCP_STR-PRPARCHG sy-vline
WA_V_SOUDADCP_STR-PRPARNDH sy-vline
WA_V_SOUDADCP_STR-PRPARRCL sy-vline
WA_V_SOUDADCP_STR-PRPARNOP sy-vline
WA_V_SOUDADCP_STR-DELFORIB sy-vline
WA_V_SOUDADCP_STR-GHRAWDOC sy-vline
WA_V_SOUDADCP_STR-FOLDSORT sy-vline
WA_V_SOUDADCP_STR-DELTRASH sy-vline
WA_V_SOUDADCP_STR-RSDOCFOR sy-vline
WA_V_SOUDADCP_STR-FOLASDYR sy-vline
WA_V_SOUDADCP_STR-FOLASDNO sy-vline
WA_V_SOUDADCP_STR-FOLLINYR sy-vline
WA_V_SOUDADCP_STR-FOLLINNO sy-vline
WA_V_SOUDADCP_STR-FOLCRDYR sy-vline
WA_V_SOUDADCP_STR-FOLCRDNO sy-vline
WA_V_SOUDADCP_STR-LINKDOYR sy-vline
WA_V_SOUDADCP_STR-LINKDONO sy-vline
WA_V_SOUDADCP_STR-NORTFEDIT sy-vline
WA_V_SOUDADCP_STR-PCOLE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.