ABAP Select data from SAP table PIQ_NL_MESSAGE03 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 PIQ_NL_MESSAGE03 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 PIQ_NL_MESSAGE03. 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 PIQ_NL_MESSAGE03 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_PIQ_NL_MESSAGE03 TYPE STANDARD TABLE OF PIQ_NL_MESSAGE03,
      WA_PIQ_NL_MESSAGE03 TYPE PIQ_NL_MESSAGE03,
      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: <PIQ_NL_MESSAGE03> TYPE PIQ_NL_MESSAGE03.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM PIQ_NL_MESSAGE03
*  INTO TABLE @DATA(IT_PIQ_NL_MESSAGE032).
*--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_PIQ_NL_MESSAGE03 INDEX 1 INTO DATA(WA_PIQ_NL_MESSAGE032).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_PIQ_NL_MESSAGE03 ASSIGNING <PIQ_NL_MESSAGE03>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<PIQ_NL_MESSAGE03>-SOURCE = 1.
<PIQ_NL_MESSAGE03>-MSGID = 1.
<PIQ_NL_MESSAGE03>-SENDER = 1.
<PIQ_NL_MESSAGE03>-RECEIVER = 1.
<PIQ_NL_MESSAGE03>-PROCESSID = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_PIQ_NL_MESSAGE03-FILTERCODE, sy-vline,
WA_PIQ_NL_MESSAGE03-COMPOSITENAME, sy-vline,
WA_PIQ_NL_MESSAGE03-FIRSTNAME, sy-vline,
WA_PIQ_NL_MESSAGE03-NICKNAME, sy-vline,
WA_PIQ_NL_MESSAGE03-INITIALS, sy-vline,
WA_PIQ_NL_MESSAGE03-LASTNAME, sy-vline.
ENDLOOP. *Add any further fields from structure WA_PIQ_NL_MESSAGE03 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_PIQ_NL_MESSAGE03 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_PIQ_NL_MESSAGE03 INTO WA_PIQ_NL_MESSAGE03. *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 SXIDN, internal->external for field EMAILADDR CALL FUNCTION 'CONVERSION_EXIT_SXIDN_OUTPUT' EXPORTING input = WA_PIQ_NL_MESSAGE03-EMAILADDR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PIQ_NL_MESSAGE03-EMAILADDR.
WRITE:/ 'New Value:', ld_input.

*Conversion exit PDATE, internal->external for field DOB CALL FUNCTION 'CONVERSION_EXIT_PDATE_OUTPUT' EXPORTING input = WA_PIQ_NL_MESSAGE03-DOB IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_PIQ_NL_MESSAGE03-DOB.
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_PIQ_NL_MESSAGE03_STR,
SOURCE TYPE STRING,
MSGID TYPE STRING,
SENDER TYPE STRING,
RECEIVER TYPE STRING,
PROCESSID TYPE STRING,
FILTERCODE TYPE STRING,
COMPOSITENAME TYPE STRING,
FIRSTNAME TYPE STRING,
NICKNAME TYPE STRING,
INITIALS TYPE STRING,
LASTNAME TYPE STRING,
INFIX TYPE STRING,
GBAADDRESS TYPE STRING,
COUNTRYNO TYPE STRING,
TELEPHONENO TYPE STRING,
MOBILENO TYPE STRING,
EMAILADDR TYPE STRING,
GENDER TYPE STRING,
DOB TYPE STRING,
COUNTRYOFBIRTH TYPE STRING,
MOBILECTYCODE TYPE STRING,
FOREIGNADDRESS TYPE STRING,
BIRTHPLACE TYPE STRING,
BIRTHDATEUNKNOWN TYPE STRING,
NATIONALITY TYPE STRING,
NATIONALITY2 TYPE STRING,
RESIDENCESTAT TYPE STRING,
FATHERBIRCOUN TYPE STRING,
MOTHERBIRCOUN TYPE STRING,
FORMOFRELATION TYPE STRING,
PARTNERNAME TYPE STRING,
PARTNERINFIX TYPE STRING,
STATOFCONSENT TYPE STRING,
LANGUAGE TYPE STRING,
CONFID TYPE STRING,
O_NUMBER TYPE STRING,
STUDIELINK_NO TYPE STRING,
OCW_NUMBER TYPE STRING,
SSN_NUMBER TYPE STRING,
VERIFIEDSTATUS TYPE STRING,
SIGNALCODE TYPE STRING,
VERIFICATIONDATE TYPE STRING,
IDENTITYTYPE TYPE STRING,
IDENTITYPROOF TYPE STRING,
VERIFIEDBRIN TYPE STRING,
VERIFIEDINST TYPE STRING,
EMPLOYEE TYPE STRING,
VERIFY_COMMENT TYPE STRING,
PREEDUCATIONBLOCK TYPE STRING,
DATEOFENROLLMENT TYPE STRING,
STATUS TYPE STRING,
PROGCODE TYPE STRING,
ALTPROGCODE TYPE STRING,
BRINNUMBER TYPE STRING,
BRINSEQUENCE TYPE STRING,
FORMOFEDUCATION TYPE STRING,
LOCATIONEDU TYPE STRING,
EDUPHASECODE TYPE STRING,
ENROLLFORMCODE TYPE STRING,
YEAROFSTUDY TYPE STRING,
STARTMONTH TYPE STRING,
ENROLLMENTCODE TYPE STRING,
REGNUM TYPE STRING,
UPDATED_REGNUM TYPE STRING,
FIRSTYEAR TYPE STRING,
COMPREQSTATUS TYPE STRING,
ACTIVITIESSTATUS TYPE STRING,
LANGUAGETEST TYPE STRING,
PAIDBY TYPE STRING,
PAYMENTTYPE TYPE STRING,
PAYMENTNAME TYPE STRING,
ADR_KIND_BILL TYPE STRING,
STREET_BLK TYPE STRING,
LOCATION_BLK TYPE STRING,
HOUSENUMBERREF_BLK TYPE STRING,
HOUSENUMBER_BLK TYPE STRING,
HOUSENUMBERADD_BLK TYPE STRING,
ZIPCODE_BLK TYPE STRING,
ZIPCHECKCORR_BLK TYPE STRING,
CITY_BLK TYPE STRING,
COUNTRY_BLK TYPE STRING,
ADR_KIND_FOR TYPE STRING,
LINE1_FOR TYPE STRING,
LINE2_FOR TYPE STRING,
LINE3_FOR TYPE STRING,
COUNTRY_FOR TYPE STRING,
PAYMENTBANKGBA TYPE STRING,
PAYMENTBANKFORE TYPE STRING,
BANK TYPE STRING,
BANKCOUNTRY TYPE STRING,
INSTALLMENTS TYPE STRING,
ENQUIRYBLOCK TYPE STRING,
LOTTERYDRAW TYPE STRING,END OF T_EKKO_STR. DATA: WA_PIQ_NL_MESSAGE03_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_PIQ_NL_MESSAGE03_STR-SOURCE sy-vline
WA_PIQ_NL_MESSAGE03_STR-MSGID sy-vline
WA_PIQ_NL_MESSAGE03_STR-SENDER sy-vline
WA_PIQ_NL_MESSAGE03_STR-RECEIVER sy-vline
WA_PIQ_NL_MESSAGE03_STR-PROCESSID sy-vline
WA_PIQ_NL_MESSAGE03_STR-FILTERCODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-COMPOSITENAME sy-vline
WA_PIQ_NL_MESSAGE03_STR-FIRSTNAME sy-vline
WA_PIQ_NL_MESSAGE03_STR-NICKNAME sy-vline
WA_PIQ_NL_MESSAGE03_STR-INITIALS sy-vline
WA_PIQ_NL_MESSAGE03_STR-LASTNAME sy-vline
WA_PIQ_NL_MESSAGE03_STR-INFIX sy-vline
WA_PIQ_NL_MESSAGE03_STR-GBAADDRESS sy-vline
WA_PIQ_NL_MESSAGE03_STR-COUNTRYNO sy-vline
WA_PIQ_NL_MESSAGE03_STR-TELEPHONENO sy-vline
WA_PIQ_NL_MESSAGE03_STR-MOBILENO sy-vline
WA_PIQ_NL_MESSAGE03_STR-EMAILADDR sy-vline
WA_PIQ_NL_MESSAGE03_STR-GENDER sy-vline
WA_PIQ_NL_MESSAGE03_STR-DOB sy-vline
WA_PIQ_NL_MESSAGE03_STR-COUNTRYOFBIRTH sy-vline
WA_PIQ_NL_MESSAGE03_STR-MOBILECTYCODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-FOREIGNADDRESS sy-vline
WA_PIQ_NL_MESSAGE03_STR-BIRTHPLACE sy-vline
WA_PIQ_NL_MESSAGE03_STR-BIRTHDATEUNKNOWN sy-vline
WA_PIQ_NL_MESSAGE03_STR-NATIONALITY sy-vline
WA_PIQ_NL_MESSAGE03_STR-NATIONALITY2 sy-vline
WA_PIQ_NL_MESSAGE03_STR-RESIDENCESTAT sy-vline
WA_PIQ_NL_MESSAGE03_STR-FATHERBIRCOUN sy-vline
WA_PIQ_NL_MESSAGE03_STR-MOTHERBIRCOUN sy-vline
WA_PIQ_NL_MESSAGE03_STR-FORMOFRELATION sy-vline
WA_PIQ_NL_MESSAGE03_STR-PARTNERNAME sy-vline
WA_PIQ_NL_MESSAGE03_STR-PARTNERINFIX sy-vline
WA_PIQ_NL_MESSAGE03_STR-STATOFCONSENT sy-vline
WA_PIQ_NL_MESSAGE03_STR-LANGUAGE sy-vline
WA_PIQ_NL_MESSAGE03_STR-CONFID sy-vline
WA_PIQ_NL_MESSAGE03_STR-O_NUMBER sy-vline
WA_PIQ_NL_MESSAGE03_STR-STUDIELINK_NO sy-vline
WA_PIQ_NL_MESSAGE03_STR-OCW_NUMBER sy-vline
WA_PIQ_NL_MESSAGE03_STR-SSN_NUMBER sy-vline
WA_PIQ_NL_MESSAGE03_STR-VERIFIEDSTATUS sy-vline
WA_PIQ_NL_MESSAGE03_STR-SIGNALCODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-VERIFICATIONDATE sy-vline
WA_PIQ_NL_MESSAGE03_STR-IDENTITYTYPE sy-vline
WA_PIQ_NL_MESSAGE03_STR-IDENTITYPROOF sy-vline
WA_PIQ_NL_MESSAGE03_STR-VERIFIEDBRIN sy-vline
WA_PIQ_NL_MESSAGE03_STR-VERIFIEDINST sy-vline
WA_PIQ_NL_MESSAGE03_STR-EMPLOYEE sy-vline
WA_PIQ_NL_MESSAGE03_STR-VERIFY_COMMENT sy-vline
WA_PIQ_NL_MESSAGE03_STR-PREEDUCATIONBLOCK sy-vline
WA_PIQ_NL_MESSAGE03_STR-DATEOFENROLLMENT sy-vline
WA_PIQ_NL_MESSAGE03_STR-STATUS sy-vline
WA_PIQ_NL_MESSAGE03_STR-PROGCODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-ALTPROGCODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-BRINNUMBER sy-vline
WA_PIQ_NL_MESSAGE03_STR-BRINSEQUENCE sy-vline
WA_PIQ_NL_MESSAGE03_STR-FORMOFEDUCATION sy-vline
WA_PIQ_NL_MESSAGE03_STR-LOCATIONEDU sy-vline
WA_PIQ_NL_MESSAGE03_STR-EDUPHASECODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-ENROLLFORMCODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-YEAROFSTUDY sy-vline
WA_PIQ_NL_MESSAGE03_STR-STARTMONTH sy-vline
WA_PIQ_NL_MESSAGE03_STR-ENROLLMENTCODE sy-vline
WA_PIQ_NL_MESSAGE03_STR-REGNUM sy-vline
WA_PIQ_NL_MESSAGE03_STR-UPDATED_REGNUM sy-vline
WA_PIQ_NL_MESSAGE03_STR-FIRSTYEAR sy-vline
WA_PIQ_NL_MESSAGE03_STR-COMPREQSTATUS sy-vline
WA_PIQ_NL_MESSAGE03_STR-ACTIVITIESSTATUS sy-vline
WA_PIQ_NL_MESSAGE03_STR-LANGUAGETEST sy-vline
WA_PIQ_NL_MESSAGE03_STR-PAIDBY sy-vline
WA_PIQ_NL_MESSAGE03_STR-PAYMENTTYPE sy-vline
WA_PIQ_NL_MESSAGE03_STR-PAYMENTNAME sy-vline
WA_PIQ_NL_MESSAGE03_STR-ADR_KIND_BILL sy-vline
WA_PIQ_NL_MESSAGE03_STR-STREET_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-LOCATION_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-HOUSENUMBERREF_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-HOUSENUMBER_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-HOUSENUMBERADD_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-ZIPCODE_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-ZIPCHECKCORR_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-CITY_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-COUNTRY_BLK sy-vline
WA_PIQ_NL_MESSAGE03_STR-ADR_KIND_FOR sy-vline
WA_PIQ_NL_MESSAGE03_STR-LINE1_FOR sy-vline
WA_PIQ_NL_MESSAGE03_STR-LINE2_FOR sy-vline
WA_PIQ_NL_MESSAGE03_STR-LINE3_FOR sy-vline
WA_PIQ_NL_MESSAGE03_STR-COUNTRY_FOR sy-vline
WA_PIQ_NL_MESSAGE03_STR-PAYMENTBANKGBA sy-vline
WA_PIQ_NL_MESSAGE03_STR-PAYMENTBANKFORE sy-vline
WA_PIQ_NL_MESSAGE03_STR-BANK sy-vline
WA_PIQ_NL_MESSAGE03_STR-BANKCOUNTRY sy-vline
WA_PIQ_NL_MESSAGE03_STR-INSTALLMENTS sy-vline
WA_PIQ_NL_MESSAGE03_STR-ENQUIRYBLOCK sy-vline
WA_PIQ_NL_MESSAGE03_STR-LOTTERYDRAW sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.