ABAP Select data from SAP table PIQAGR_APPR_POWL 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 PIQAGR_APPR_POWL 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 PIQAGR_APPR_POWL. 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 PIQAGR_APPR_POWL 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_PIQAGR_APPR_POWL TYPE STANDARD TABLE OF PIQAGR_APPR_POWL,
      WA_PIQAGR_APPR_POWL TYPE PIQAGR_APPR_POWL,
      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: <PIQAGR_APPR_POWL> TYPE PIQAGR_APPR_POWL.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PIQAGR_APPR_POWL
*  INTO TABLE @DATA(IT_PIQAGR_APPR_POWL2).
*--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_PIQAGR_APPR_POWL INDEX 1 INTO DATA(WA_PIQAGR_APPR_POWL2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PIQAGR_APPR_POWL ASSIGNING <PIQAGR_APPR_POWL>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PIQAGR_APPR_POWL>-STUDENTNUMBER = 1.
<PIQAGR_APPR_POWL>-STUDENTNAME = 1.
<PIQAGR_APPR_POWL>-FIRST_NAME = 1.
<PIQAGR_APPR_POWL>-LAST_NAME = 1.
<PIQAGR_APPR_POWL>-PERSIDNO = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PIQAGR_APPR_POWL-NAME_AT_BIRTH, sy-vline,
WA_PIQAGR_APPR_POWL-ASSIGNED_ORGUNIT, sy-vline,
WA_PIQAGR_APPR_POWL-ASSIGNED_ORGUNIT_TXT, sy-vline,
WA_PIQAGR_APPR_POWL-ASSIGNED_ORGUNIT_SHT, sy-vline,
WA_PIQAGR_APPR_POWL-PLVAR, sy-vline,
WA_PIQAGR_APPR_POWL-ST_OTYPE, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PIQAGR_APPR_POWL 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_PIQAGR_APPR_POWL 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_PIQAGR_APPR_POWL INTO WA_PIQAGR_APPR_POWL. *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 PIQST, internal->external for field STUDENTNUMBER CALL FUNCTION 'CONVERSION_EXIT_PIQST_OUTPUT' EXPORTING input = WA_PIQAGR_APPR_POWL-STUDENTNUMBER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PIQAGR_APPR_POWL-STUDENTNUMBER.
WRITE:/ 'New Value:', ld_input.

*Conversion exit ISOLA, internal->external for field LANGUTXT CALL FUNCTION 'CONVERSION_EXIT_ISOLA_OUTPUT' EXPORTING input = WA_PIQAGR_APPR_POWL-LANGUTXT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PIQAGR_APPR_POWL-LANGUTXT.
WRITE:/ 'New Value:', ld_input.

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

*Conversion exit CUNIT, internal->external for field CPUNIT CALL FUNCTION 'CONVERSION_EXIT_CUNIT_OUTPUT' EXPORTING input = WA_PIQAGR_APPR_POWL-CPUNIT IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PIQAGR_APPR_POWL-CPUNIT.
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_PIQAGR_APPR_POWL_STR,
STUDENTNUMBER TYPE STRING,
STUDENTNAME TYPE STRING,
FIRST_NAME TYPE STRING,
LAST_NAME TYPE STRING,
PERSIDNO TYPE STRING,
NAME_AT_BIRTH TYPE STRING,
ASSIGNED_ORGUNIT TYPE STRING,
ASSIGNED_ORGUNIT_TXT TYPE STRING,
ASSIGNED_ORGUNIT_SHT TYPE STRING,
PLVAR TYPE STRING,
ST_OTYPE TYPE STRING,
ST_OBJID TYPE STRING,
CS_OTYPE TYPE STRING,
CS_OBJID TYPE STRING,
SC_OTYPE TYPE STRING,
SC_OBJID TYPE STRING,
BEGDA TYPE STRING,
ENDDA TYPE STRING,
PRIOX TYPE STRING,
SC_SHORT TYPE STRING,
SC_STEXT TYPE STRING,
AGRID TYPE STRING,
ATTNO TYPE STRING,
AGRTYPE TYPE STRING,
AGRSTAT TYPE STRING,
ARCH_STATUS TYPE STRING,
AGRREMARK TYPE STRING,
AYEAR TYPE STRING,
APERIOD TYPE STRING,
AGRBEGDA TYPE STRING,
AGRENDDA TYPE STRING,
AGRDATEE TYPE STRING,
AGRDATEL TYPE STRING,
AGRWEIGHT TYPE STRING,
UPAGRID TYPE STRING,
LAST_DAY_ATT TYPE STRING,
GRADESYM TYPE STRING,
GRADE TYPE STRING,
GRADESCALE TYPE STRING,
AGRNOTRATED TYPE STRING,
AGRDATE TYPE STRING,
AGRCOMPLETED TYPE STRING,
NOTEID TYPE STRING,
REGNUM TYPE STRING,
GRADECHANGED TYPE STRING,
PUBLICATIONDATE TYPE STRING,
AGRIDTXT TYPE STRING,
LANGUTXT TYPE STRING,
AGRTEXTTXT TYPE STRING,
SEQNRAPR TYPE STRING,
OTYPEAPR TYPE STRING,
REALOAPR TYPE STRING,
PLVARAPR TYPE STRING,
FUNCTIONAPR TYPE STRING,
CPATTEMPFOL TYPE STRING,
CPEARNEDFOL TYPE STRING,
CPGRADEDFOL TYPE STRING,
CPUNITFOL TYPE STRING,
SMSTATUS TYPE STRING,
STORREASON TYPE STRING,
STORDATE TYPE STRING,
CPATTEMP TYPE STRING,
CPGAINED TYPE STRING,
CPUNIT TYPE STRING,
NORM_VAL TYPE STRING,
BOOKDATE TYPE STRING,
BOOKTIME TYPE STRING,
SMRATING TYPE STRING,
CHARGEFREE TYPE STRING,
TRANSFERFLAG TYPE STRING,
PACKNUMBER TYPE STRING,
VARID TYPE STRING,
PERID TYPE STRING,
PERYR TYPE STRING,
ALT_SCALEID TYPE STRING,
ID TYPE STRING,
BOOKREASON TYPE STRING,
ANNULMENT TYPE STRING,
LOCKFLAG TYPE STRING,
COBOK TYPE STRING,
BOOKING_SUBGROUP_ID TYPE STRING,
ATTNO_TW TYPE STRING,
MODREG_ID TYPE STRING,
AGRSTATTEXT TYPE STRING,
SMSTATUST TYPE STRING,
SMRATINGT TYPE STRING,
PERYT TYPE STRING,
PERIT TYPE STRING,
PUSHNOTES TYPE STRING,
GRADSUM TYPE STRING,
PIQFLAG TYPE STRING,
SUBTYPTERM TYPE STRING,
LFNR TYPE STRING,
REFINDX TYPE STRING,
ICONATTNO TYPE STRING,
ICONCOBOK TYPE STRING,
CANCELREASON_TXT TYPE STRING,
BOOKREASON_TXT TYPE STRING,
CPUNIT_TXT TYPE STRING,
AGRTYPE_TXT TYPE STRING,
AGRREMARK_TXT TYPE STRING,
GRADETEXT TYPE STRING,
APPSERTEXT TYPE STRING,
GRADESCALET TYPE STRING,
BLINDGRADID TYPE STRING,
RANK1 TYPE STRING,
RANK2 TYPE STRING,
PARAM1 TYPE STRING,
PARAM2 TYPE STRING,
PARAM3 TYPE STRING,
PARAM4 TYPE STRING,
PARAM5 TYPE STRING,
SM_SHORT TYPE STRING,
SM_STEXT TYPE STRING,END OF T_EKKO_STR. DATA: WA_PIQAGR_APPR_POWL_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_PIQAGR_APPR_POWL_STR-STUDENTNUMBER sy-vline
WA_PIQAGR_APPR_POWL_STR-STUDENTNAME sy-vline
WA_PIQAGR_APPR_POWL_STR-FIRST_NAME sy-vline
WA_PIQAGR_APPR_POWL_STR-LAST_NAME sy-vline
WA_PIQAGR_APPR_POWL_STR-PERSIDNO sy-vline
WA_PIQAGR_APPR_POWL_STR-NAME_AT_BIRTH sy-vline
WA_PIQAGR_APPR_POWL_STR-ASSIGNED_ORGUNIT sy-vline
WA_PIQAGR_APPR_POWL_STR-ASSIGNED_ORGUNIT_TXT sy-vline
WA_PIQAGR_APPR_POWL_STR-ASSIGNED_ORGUNIT_SHT sy-vline
WA_PIQAGR_APPR_POWL_STR-PLVAR sy-vline
WA_PIQAGR_APPR_POWL_STR-ST_OTYPE sy-vline
WA_PIQAGR_APPR_POWL_STR-ST_OBJID sy-vline
WA_PIQAGR_APPR_POWL_STR-CS_OTYPE sy-vline
WA_PIQAGR_APPR_POWL_STR-CS_OBJID sy-vline
WA_PIQAGR_APPR_POWL_STR-SC_OTYPE sy-vline
WA_PIQAGR_APPR_POWL_STR-SC_OBJID sy-vline
WA_PIQAGR_APPR_POWL_STR-BEGDA sy-vline
WA_PIQAGR_APPR_POWL_STR-ENDDA sy-vline
WA_PIQAGR_APPR_POWL_STR-PRIOX sy-vline
WA_PIQAGR_APPR_POWL_STR-SC_SHORT sy-vline
WA_PIQAGR_APPR_POWL_STR-SC_STEXT sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRID sy-vline
WA_PIQAGR_APPR_POWL_STR-ATTNO sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRTYPE sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRSTAT sy-vline
WA_PIQAGR_APPR_POWL_STR-ARCH_STATUS sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRREMARK sy-vline
WA_PIQAGR_APPR_POWL_STR-AYEAR sy-vline
WA_PIQAGR_APPR_POWL_STR-APERIOD sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRBEGDA sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRENDDA sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRDATEE sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRDATEL sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRWEIGHT sy-vline
WA_PIQAGR_APPR_POWL_STR-UPAGRID sy-vline
WA_PIQAGR_APPR_POWL_STR-LAST_DAY_ATT sy-vline
WA_PIQAGR_APPR_POWL_STR-GRADESYM sy-vline
WA_PIQAGR_APPR_POWL_STR-GRADE sy-vline
WA_PIQAGR_APPR_POWL_STR-GRADESCALE sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRNOTRATED sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRDATE sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRCOMPLETED sy-vline
WA_PIQAGR_APPR_POWL_STR-NOTEID sy-vline
WA_PIQAGR_APPR_POWL_STR-REGNUM sy-vline
WA_PIQAGR_APPR_POWL_STR-GRADECHANGED sy-vline
WA_PIQAGR_APPR_POWL_STR-PUBLICATIONDATE sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRIDTXT sy-vline
WA_PIQAGR_APPR_POWL_STR-LANGUTXT sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRTEXTTXT sy-vline
WA_PIQAGR_APPR_POWL_STR-SEQNRAPR sy-vline
WA_PIQAGR_APPR_POWL_STR-OTYPEAPR sy-vline
WA_PIQAGR_APPR_POWL_STR-REALOAPR sy-vline
WA_PIQAGR_APPR_POWL_STR-PLVARAPR sy-vline
WA_PIQAGR_APPR_POWL_STR-FUNCTIONAPR sy-vline
WA_PIQAGR_APPR_POWL_STR-CPATTEMPFOL sy-vline
WA_PIQAGR_APPR_POWL_STR-CPEARNEDFOL sy-vline
WA_PIQAGR_APPR_POWL_STR-CPGRADEDFOL sy-vline
WA_PIQAGR_APPR_POWL_STR-CPUNITFOL sy-vline
WA_PIQAGR_APPR_POWL_STR-SMSTATUS sy-vline
WA_PIQAGR_APPR_POWL_STR-STORREASON sy-vline
WA_PIQAGR_APPR_POWL_STR-STORDATE sy-vline
WA_PIQAGR_APPR_POWL_STR-CPATTEMP sy-vline
WA_PIQAGR_APPR_POWL_STR-CPGAINED sy-vline
WA_PIQAGR_APPR_POWL_STR-CPUNIT sy-vline
WA_PIQAGR_APPR_POWL_STR-NORM_VAL sy-vline
WA_PIQAGR_APPR_POWL_STR-BOOKDATE sy-vline
WA_PIQAGR_APPR_POWL_STR-BOOKTIME sy-vline
WA_PIQAGR_APPR_POWL_STR-SMRATING sy-vline
WA_PIQAGR_APPR_POWL_STR-CHARGEFREE sy-vline
WA_PIQAGR_APPR_POWL_STR-TRANSFERFLAG sy-vline
WA_PIQAGR_APPR_POWL_STR-PACKNUMBER sy-vline
WA_PIQAGR_APPR_POWL_STR-VARID sy-vline
WA_PIQAGR_APPR_POWL_STR-PERID sy-vline
WA_PIQAGR_APPR_POWL_STR-PERYR sy-vline
WA_PIQAGR_APPR_POWL_STR-ALT_SCALEID sy-vline
WA_PIQAGR_APPR_POWL_STR-ID sy-vline
WA_PIQAGR_APPR_POWL_STR-BOOKREASON sy-vline
WA_PIQAGR_APPR_POWL_STR-ANNULMENT sy-vline
WA_PIQAGR_APPR_POWL_STR-LOCKFLAG sy-vline
WA_PIQAGR_APPR_POWL_STR-COBOK sy-vline
WA_PIQAGR_APPR_POWL_STR-BOOKING_SUBGROUP_ID sy-vline
WA_PIQAGR_APPR_POWL_STR-ATTNO_TW sy-vline
WA_PIQAGR_APPR_POWL_STR-MODREG_ID sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRSTATTEXT sy-vline
WA_PIQAGR_APPR_POWL_STR-SMSTATUST sy-vline
WA_PIQAGR_APPR_POWL_STR-SMRATINGT sy-vline
WA_PIQAGR_APPR_POWL_STR-PERYT sy-vline
WA_PIQAGR_APPR_POWL_STR-PERIT sy-vline
WA_PIQAGR_APPR_POWL_STR-PUSHNOTES sy-vline
WA_PIQAGR_APPR_POWL_STR-GRADSUM sy-vline
WA_PIQAGR_APPR_POWL_STR-PIQFLAG sy-vline
WA_PIQAGR_APPR_POWL_STR-SUBTYPTERM sy-vline
WA_PIQAGR_APPR_POWL_STR-LFNR sy-vline
WA_PIQAGR_APPR_POWL_STR-REFINDX sy-vline
WA_PIQAGR_APPR_POWL_STR-ICONATTNO sy-vline
WA_PIQAGR_APPR_POWL_STR-ICONCOBOK sy-vline
WA_PIQAGR_APPR_POWL_STR-CANCELREASON_TXT sy-vline
WA_PIQAGR_APPR_POWL_STR-BOOKREASON_TXT sy-vline
WA_PIQAGR_APPR_POWL_STR-CPUNIT_TXT sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRTYPE_TXT sy-vline
WA_PIQAGR_APPR_POWL_STR-AGRREMARK_TXT sy-vline
WA_PIQAGR_APPR_POWL_STR-GRADETEXT sy-vline
WA_PIQAGR_APPR_POWL_STR-APPSERTEXT sy-vline
WA_PIQAGR_APPR_POWL_STR-GRADESCALET sy-vline
WA_PIQAGR_APPR_POWL_STR-BLINDGRADID sy-vline
WA_PIQAGR_APPR_POWL_STR-RANK1 sy-vline
WA_PIQAGR_APPR_POWL_STR-RANK2 sy-vline
WA_PIQAGR_APPR_POWL_STR-PARAM1 sy-vline
WA_PIQAGR_APPR_POWL_STR-PARAM2 sy-vline
WA_PIQAGR_APPR_POWL_STR-PARAM3 sy-vline
WA_PIQAGR_APPR_POWL_STR-PARAM4 sy-vline
WA_PIQAGR_APPR_POWL_STR-PARAM5 sy-vline
WA_PIQAGR_APPR_POWL_STR-SM_SHORT sy-vline
WA_PIQAGR_APPR_POWL_STR-SM_STEXT sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.