ABAP Select data from SAP table P08_ABS_PAYMENT_SHEET_88_2 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 P08_ABS_PAYMENT_SHEET_88_2 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 P08_ABS_PAYMENT_SHEET_88_2. 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 P08_ABS_PAYMENT_SHEET_88_2 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_P08_ABS_PAYMENT_SHEET_88_2 TYPE STANDARD TABLE OF P08_ABS_PAYMENT_SHEET_88_2,
      WA_P08_ABS_PAYMENT_SHEET_88_2 TYPE P08_ABS_PAYMENT_SHEET_88_2,
      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: <P08_ABS_PAYMENT_SHEET_88_2> TYPE P08_ABS_PAYMENT_SHEET_88_2.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM P08_ABS_PAYMENT_SHEET_88_2
*  INTO TABLE @DATA(IT_P08_ABS_PAYMENT_SHEET_88_22).
*--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_P08_ABS_PAYMENT_SHEET_88_2 INDEX 1 INTO DATA(WA_P08_ABS_PAYMENT_SHEET_88_22).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_P08_ABS_PAYMENT_SHEET_88_2 ASSIGNING <P08_ABS_PAYMENT_SHEET_88_2>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<P08_ABS_PAYMENT_SHEET_88_2>-MB1PR = 1.
<P08_ABS_PAYMENT_SHEET_88_2>-MB1DS = 1.
<P08_ABS_PAYMENT_SHEET_88_2>-SMPPD = 1.
<P08_ABS_PAYMENT_SHEET_88_2>-AVEWE = 1.
<P08_ABS_PAYMENT_SHEET_88_2>-ELGYN = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_P08_ABS_PAYMENT_SHEET_88_2-SDMPP, sy-vline,
WA_P08_ABS_PAYMENT_SHEET_88_2-WPHRA, sy-vline,
WA_P08_ABS_PAYMENT_SHEET_88_2-ADBTH, sy-vline,
WA_P08_ABS_PAYMENT_SHEET_88_2-AEMPP, sy-vline,
WA_P08_ABS_PAYMENT_SHEET_88_2-MSTLL, sy-vline,
WA_P08_ABS_PAYMENT_SHEET_88_2-NOTLV, sy-vline.
ENDLOOP. *Add any further fields from structure WA_P08_ABS_PAYMENT_SHEET_88_2 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_P08_ABS_PAYMENT_SHEET_88_2 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_P08_ABS_PAYMENT_SHEET_88_2 INTO WA_P08_ABS_PAYMENT_SHEET_88_2. *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_P08_ABS_PAYMENT_SHEET_88_2_STR,
MB1PR TYPE STRING,
MB1DS TYPE STRING,
SMPPD TYPE STRING,
AVEWE TYPE STRING,
ELGYN TYPE STRING,
SDMPP TYPE STRING,
WPHRA TYPE STRING,
ADBTH TYPE STRING,
AEMPP TYPE STRING,
MSTLL TYPE STRING,
NOTLV TYPE STRING,
SCPR TYPE STRING,
IDLVE TYPE STRING,
EPLDT TYPE STRING,
APLDT TYPE STRING,
ACBDT TYPE STRING,
NMTCH TYPE STRING,
PLEND TYPE STRING,
MPPBI TYPE STRING,
MPPSD TYPE STRING,
ADPOS TYPE STRING,
ASPP_MPPSD TYPE STRING,
ASPP_MPPED TYPE STRING,
ASPP_MDIED TYPE STRING,
ASPP_MBDOD TYPE STRING,
ASPP_APPSD TYPE STRING,
ASPP_APPED TYPE STRING,
ASPP_PDIED TYPE STRING,
ASPP_MRTWD TYPE STRING,
ASPP_PRTWD TYPE STRING,
PNACH TYPE STRING,
PVORN TYPE STRING,
PINIT TYPE STRING,
PMIDN TYPE STRING,
PNINO TYPE STRING,
LVESD TYPE STRING,
SHPPNOC TYPE STRING,
SHPPNOE TYPE STRING,
SHPPLVS TYPE STRING,
SHPPLVE TYPE STRING,
SHPPLVT TYPE STRING,
SHPPCRN TYPE STRING,
SHPPCUR TYPE STRING,
SHPPREV TYPE STRING,
SHPPWK1 TYPE STRING,
SHPPWK2 TYPE STRING,
SHPPBND TYPE STRING,
SHPPBKN TYPE STRING,
SHPPPYP TYPE STRING,
SHPPWK3 TYPE STRING,
SHPPWK4 TYPE STRING,
SHPPLV1 TYPE STRING,
SHPPLV2 TYPE STRING,
SHPPLV3 TYPE STRING,
SHPPLV4 TYPE STRING,
SHPPMAP TYPE STRING,
SURROGACY TYPE STRING,
SHPPLVN TYPE STRING,
LVESD2 TYPE STRING,
EWCDA TYPE STRING,
QWKDA TYPE STRING,
MWKDA TYPE STRING,
LVEPS TYPE STRING,
LVEPE TYPE STRING,
LVEED TYPE STRING,
LVEWK TYPE STRING,
ORDSD TYPE STRING,
ORDED TYPE STRING,
ORDWK TYPE STRING,
ADDSD TYPE STRING,
ADDED TYPE STRING,
ADDWK TYPE STRING,
PAYSD TYPE STRING,
PAYED TYPE STRING,
PAYWK TYPE STRING,
MORAD TYPE STRING,
CONTY TYPE STRING,
FACTW TYPE STRING,
EMP TYPE STRING,
AWE TYPE STRING,
ECCK1 TYPE STRING,
ECCK2 TYPE STRING,
ECCK3 TYPE STRING,END OF T_EKKO_STR. DATA: WA_P08_ABS_PAYMENT_SHEET_88_2_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_P08_ABS_PAYMENT_SHEET_88_2_STR-MB1PR sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-MB1DS sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SMPPD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-AVEWE sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ELGYN sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SDMPP sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-WPHRA sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ADBTH sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-AEMPP sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-MSTLL sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-NOTLV sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SCPR sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-IDLVE sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-EPLDT sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-APLDT sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ACBDT sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-NMTCH sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PLEND sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-MPPBI sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-MPPSD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ADPOS sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_MPPSD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_MPPED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_MDIED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_MBDOD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_APPSD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_APPED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_PDIED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_MRTWD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ASPP_PRTWD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PNACH sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PVORN sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PINIT sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PMIDN sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PNINO sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-LVESD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPNOC sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPNOE sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLVS sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLVE sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLVT sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPCRN sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPCUR sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPREV sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPWK1 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPWK2 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPBND sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPBKN sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPPYP sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPWK3 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPWK4 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLV1 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLV2 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLV3 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLV4 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPMAP sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SURROGACY sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-SHPPLVN sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-LVESD2 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-EWCDA sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-QWKDA sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-MWKDA sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-LVEPS sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-LVEPE sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-LVEED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-LVEWK sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ORDSD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ORDED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ORDWK sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ADDSD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ADDED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ADDWK sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PAYSD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PAYED sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-PAYWK sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-MORAD sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-CONTY sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-FACTW sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-EMP sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-AWE sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ECCK1 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ECCK2 sy-vline
WA_P08_ABS_PAYMENT_SHEET_88_2_STR-ECCK3 sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.