ABAP Select data from SAP table /SEHS/DGS_1078DGDATA3 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 /SEHS/DGS_1078DGDATA3 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 /SEHS/DGS_1078DGDATA3. 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 /SEHS/DGS_1078DGDATA3 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_/SEHS/DGS_1078DGDATA3 TYPE STANDARD TABLE OF /SEHS/DGS_1078DGDATA3,
WA_/SEHS/DGS_1078DGDATA3 TYPE /SEHS/DGS_1078DGDATA3,
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: </SEHS/DGS_1078DGDATA3> TYPE /SEHS/DGS_1078DGDATA3.
*Process all fields in table header/work area as string values
PERFORM process_as_string_field_values CHANGING wa_/SEHS/DGS_1078DGDATA3.
SELECT *
*restrict ABAP select to first 10 rows
UP TO 10 ROWS
FROM /SEHS/DGS_1078DGDATA3
INTO TABLE IT_/SEHS/DGS_1078DGDATA3.
*Select data and declare internal table using in-line method @DATA
*SELECT *
* FROM /SEHS/DGS_1078DGDATA3
* INTO TABLE @DATA(IT_/SEHS/DGS_1078DGDATA32).
*--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_/SEHS/DGS_1078DGDATA3 INDEX 1 INTO DATA(WA_/SEHS/DGS_1078DGDATA32).
*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_/SEHS/DGS_1078DGDATA3 ASSIGNING </SEHS/DGS_1078DGDATA3>.
*To update a field value using a field symbol simply change the value via the field symbol pointer</SEHS/DGS_1078DGDATA3>-TEXT_PATTERN = 1.
</SEHS/DGS_1078DGDATA3>-MIXED_SEPAR1 = 1.
</SEHS/DGS_1078DGDATA3>-MIXED_SEPAR2 = 1.
</SEHS/DGS_1078DGDATA3>-MIXED_SEPAR3 = 1.
</SEHS/DGS_1078DGDATA3>-MIXED_SEPAR4 = 1.
ENDLOOP. LOOP AT IT_/SEHS/DGS_1078DGDATA3 INTO WA_/SEHS/DGS_1078DGDATA3. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_/SEHS/DGS_1078DGDATA3-MIXED_SEPAR5, sy-vline,
WA_/SEHS/DGS_1078DGDATA3-MIXED_SEPAR6, sy-vline,
WA_/SEHS/DGS_1078DGDATA3-MIXED_SEPAR7, sy-vline,
WA_/SEHS/DGS_1078DGDATA3-MIXED_SEPAR8, sy-vline,
WA_/SEHS/DGS_1078DGDATA3-MIXED_SEPAR9, sy-vline,
WA_/SEHS/DGS_1078DGDATA3-MIXED_SEPARA, sy-vline.
ENDLOOP. *Add any further fields from structure WA_/SEHS/DGS_1078DGDATA3 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_/SEHS/DGS_1078DGDATA3 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_/SEHS/DGS_1078DGDATA3 INTO WA_/SEHS/DGS_1078DGDATA3. *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.
ENDFORM. *&---------------------------------------------------------------------* *& Form process_as_string_field_values *&---------------------------------------------------------------------* FORM process_as_string_field_values CHANGING p_EKKO LIKE wa_EKKO. TYPES: BEGIN OF T_/SEHS/DGS_1078DGDATA3_STR,
TEXT_PATTERN TYPE STRING,
MIXED_SEPAR1 TYPE STRING,
MIXED_SEPAR2 TYPE STRING,
MIXED_SEPAR3 TYPE STRING,
MIXED_SEPAR4 TYPE STRING,
MIXED_SEPAR5 TYPE STRING,
MIXED_SEPAR6 TYPE STRING,
MIXED_SEPAR7 TYPE STRING,
MIXED_SEPAR8 TYPE STRING,
MIXED_SEPAR9 TYPE STRING,
MIXED_SEPARA TYPE STRING,
MIXED_SEPARB TYPE STRING,
MIXED_SEPARC TYPE STRING,
MIXED_SEPARD TYPE STRING,
MIXED_SEPARE TYPE STRING,
MIXED_SEPARF TYPE STRING,
MIXED_SEPARG TYPE STRING,
MIXED_SEPARH TYPE STRING,
MIXED_LOADR1 TYPE STRING,
MIXED_LOADR2 TYPE STRING,
MIXED_LOADR3 TYPE STRING,
MIXED_LOADR4 TYPE STRING,
MIXED_LOADR5 TYPE STRING,
MIXED_LOADR6 TYPE STRING,
MIXED_LOADR7 TYPE STRING,
MIXED_LOADR8 TYPE STRING,
MIXED_LOADR9 TYPE STRING,
MIXED_LOADRA TYPE STRING,
REG_LOAD_GRP1 TYPE STRING,
REG_LOAD_GRP2 TYPE STRING,
REG_LOAD_GRP3 TYPE STRING,
ENT_LOAD_GRP1 TYPE STRING,
ENT_LOAD_GRP2 TYPE STRING,
ENT_LOAD_GRP3 TYPE STRING,
DATA_ORIGIN TYPE STRING,
HAZIND_PHR_MP2 TYPE STRING,
REP_QTY2 TYPE STRING,
RQ_UNIT2 TYPE STRING,
TXT_PROFILE1 TYPE STRING,
TXT_PROFILE2 TYPE STRING,
TXT_PROFILE3 TYPE STRING,
TXT_PROFILE4 TYPE STRING,
TXT_PROFILE5 TYPE STRING,
TXT_PROFILE6 TYPE STRING,
TXT_PROFILE7 TYPE STRING,
TXT_PROFILE8 TYPE STRING,
TXT_PROFILE9 TYPE STRING,
TXT_PROFILEA TYPE STRING,
TXT_PROFILEB TYPE STRING,
TXT_PROFILEC TYPE STRING,
TXT_PROFILEE TYPE STRING,
TXT_PROFILEF TYPE STRING,
TXT_PROFILEG TYPE STRING,
RQ_UNIT2_ISO TYPE STRING,
HYGROS_PHR TYPE STRING,
FORM_PHYS_CHEM TYPE STRING,
EXPL_NET TYPE STRING,
EXPL_NET_U TYPE STRING,
EXPL_NET_U_ISO TYPE STRING,
EXPL_REL_PERCENT TYPE STRING,
ACTVTY_MAX TYPE STRING,
ACTVTY_MAX_U TYPE STRING,
ACTVTY_MAX_U_ISO TYPE STRING,
ACTVTY_MAX_REL TYPE STRING,
ACTVTY_MAX_REL_U TYPE STRING,
ACTVTY_MAX_REL_U_ISO TYPE STRING,
MATERIAL_EXTERNAL TYPE STRING,
MATERIAL_GUID TYPE STRING,
MATERIAL_VERSION TYPE STRING,
HAZCHEM_CODE TYPE STRING,
FLG_EMSN1_U TYPE STRING,
FLG_EMSN2_U TYPE STRING,
STOWAGE TYPE STRING,
CARR_TYPE TYPE STRING,
FLG_PAI TYPE STRING,
FLG_PAO TYPE STRING,
FLG_PASI TYPE STRING,
FLG_PAGW TYPE STRING,
FLG_RELQ TYPE STRING,
FLG_MULRQ TYPE STRING,
FLAG_RELQUNLIMIT TYPE STRING,
FLAG_MULRQFORBID TYPE STRING,
PDGNUDPRE TYPE STRING,
PDGNUDSUF TYPE STRING,
AIR_TRANS_SAFE_CODE TYPE STRING,
ELECTRO_MAG_COMPAT TYPE STRING,
PARACH_DROP_CODE TYPE STRING,
THRUST_CODE TYPE STRING,
AMMUNITION_CODE TYPE STRING,
EX_NUMBER TYPE STRING,
ID_APPR_CERTIF TYPE STRING,END OF T_EKKO_STR. DATA: WA_/SEHS/DGS_1078DGDATA3_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_/SEHS/DGS_1078DGDATA3_STR-TEXT_PATTERN sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR1 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR3 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR4 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR5 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR6 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR7 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR8 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPAR9 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARA sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARB sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARC sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARD sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARF sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARG sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_SEPARH sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR1 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR3 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR4 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR5 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR6 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR7 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR8 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADR9 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MIXED_LOADRA sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-REG_LOAD_GRP1 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-REG_LOAD_GRP2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-REG_LOAD_GRP3 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ENT_LOAD_GRP1 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ENT_LOAD_GRP2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ENT_LOAD_GRP3 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-DATA_ORIGIN sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-HAZIND_PHR_MP2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-REP_QTY2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-RQ_UNIT2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE1 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE2 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE3 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE4 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE5 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE6 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE7 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE8 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILE9 sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILEA sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILEB sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILEC sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILEE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILEF sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-TXT_PROFILEG sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-RQ_UNIT2_ISO sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-HYGROS_PHR sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FORM_PHYS_CHEM sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-EXPL_NET sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-EXPL_NET_U sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-EXPL_NET_U_ISO sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-EXPL_REL_PERCENT sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ACTVTY_MAX sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ACTVTY_MAX_U sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ACTVTY_MAX_U_ISO sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ACTVTY_MAX_REL sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ACTVTY_MAX_REL_U sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ACTVTY_MAX_REL_U_ISO sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MATERIAL_EXTERNAL sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MATERIAL_GUID sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-MATERIAL_VERSION sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-HAZCHEM_CODE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_EMSN1_U sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_EMSN2_U sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-STOWAGE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-CARR_TYPE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_PAI sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_PAO sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_PASI sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_PAGW sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_RELQ sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLG_MULRQ sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLAG_RELQUNLIMIT sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-FLAG_MULRQFORBID sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-PDGNUDPRE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-PDGNUDSUF sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-AIR_TRANS_SAFE_CODE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ELECTRO_MAG_COMPAT sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-PARACH_DROP_CODE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-THRUST_CODE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-AMMUNITION_CODE sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-EX_NUMBER sy-vline
WA_/SEHS/DGS_1078DGDATA3_STR-ID_APPR_CERTIF sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.
