ABAP Select data from SAP table RNWCHLS_NFAL 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 RNWCHLS_NFAL 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 RNWCHLS_NFAL. 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 RNWCHLS_NFAL 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_RNWCHLS_NFAL TYPE STANDARD TABLE OF RNWCHLS_NFAL,
      WA_RNWCHLS_NFAL TYPE RNWCHLS_NFAL,
      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: <RNWCHLS_NFAL> TYPE RNWCHLS_NFAL.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM RNWCHLS_NFAL
*  INTO TABLE @DATA(IT_RNWCHLS_NFAL2).
*--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_RNWCHLS_NFAL INDEX 1 INTO DATA(WA_RNWCHLS_NFAL2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_RNWCHLS_NFAL ASSIGNING <RNWCHLS_NFAL>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<RNWCHLS_NFAL>-MANDT = 1.
<RNWCHLS_NFAL>-EINRI = 1.
<RNWCHLS_NFAL>-FALNR = 1.
<RNWCHLS_NFAL>-FALAR = 1.
<RNWCHLS_NFAL>-PATNR = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_RNWCHLS_NFAL-BEKAT, sy-vline,
WA_RNWCHLS_NFAL-ABRKZ, sy-vline,
WA_RNWCHLS_NFAL-SICHV, sy-vline,
WA_RNWCHLS_NFAL-EINZG, sy-vline,
WA_RNWCHLS_NFAL-KZTXT, sy-vline,
WA_RNWCHLS_NFAL-KUALF, sy-vline.
ENDLOOP. *Add any further fields from structure WA_RNWCHLS_NFAL 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_RNWCHLS_NFAL 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_RNWCHLS_NFAL INTO WA_RNWCHLS_NFAL. *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 EINRI CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RNWCHLS_NFAL-EINRI IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RNWCHLS_NFAL-EINRI.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

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

*Conversion exit NLJUS, internal->external for field DOCNR CALL FUNCTION 'CONVERSION_EXIT_NLJUS_OUTPUT' EXPORTING input = WA_RNWCHLS_NFAL-DOCNR IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RNWCHLS_NFAL-DOCNR.
WRITE:/ 'New Value:', ld_input.

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

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

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

*Conversion exit ALPHA, internal->external for field ASL_RES CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_RNWCHLS_NFAL-ASL_RES IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_RNWCHLS_NFAL-ASL_RES.
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_RNWCHLS_NFAL_STR,
MANDT TYPE STRING,
EINRI TYPE STRING,
FALNR TYPE STRING,
FALAR TYPE STRING,
PATNR TYPE STRING,
BEKAT TYPE STRING,
ABRKZ TYPE STRING,
SICHV TYPE STRING,
EINZG TYPE STRING,
KZTXT TYPE STRING,
KUALF TYPE STRING,
BEWLF TYPE STRING,
DGNLF TYPE STRING,
PGRLF TYPE STRING,
INFKZ TYPE STRING,
STATU TYPE STRING,
FZIFF TYPE STRING,
NOTAN TYPE STRING,
KRZAN TYPE STRING,
ENDAT TYPE STRING,
ENTIM TYPE STRING,
FGTYP TYPE STRING,
KZKOM TYPE STRING,
KOMTX TYPE STRING,
KOLTX TYPE STRING,
ARBUN TYPE STRING,
ENDDT TYPE STRING,
FSPER TYPE STRING,
ERDAT TYPE STRING,
ERUSR TYPE STRING,
UPDAT TYPE STRING,
UPUSR TYPE STRING,
STORN TYPE STRING,
STUSR TYPE STRING,
STDAT TYPE STRING,
VORPT TYPE STRING,
BEGDT TYPE STRING,
STASP TYPE STRING,
KV_KZ TYPE STRING,
EAUFN TYPE STRING,
KVUEB TYPE STRING,
VORGR TYPE STRING,
OBJNR TYPE STRING,
RESID TYPE STRING,
CHILD TYPE STRING,
FOREI TYPE STRING,
FATYP TYPE STRING,
EMTYP TYPE STRING,
KTTAR TYPE STRING,
KTABK TYPE STRING,
GSTA1 TYPE STRING,
GSTA2 TYPE STRING,
ANZSC TYPE STRING,
ANZTD TYPE STRING,
ANZAB TYPE STRING,
LGBIS TYPE STRING,
FPEDT TYPE STRING,
APSTATE TYPE STRING,
FACHR TYPE STRING,
ENDTYP TYPE STRING,
DOCTY TYPE STRING,
DOCNR TYPE STRING,
WKAT TYPE STRING,
DOCW TYPE STRING,
PATW TYPE STRING,
PATGEW TYPE STRING,
GWEIN TYPE STRING,
PATGRO TYPE STRING,
GREIN TYPE STRING,
RESPI TYPE STRING,
FEXNR TYPE STRING,
TIMESTAMP TYPE STRING,
TOB TYPE STRING,
ISTAT_RES TYPE STRING,
ASL_RES TYPE STRING,
EXTBUD TYPE STRING,
DELGW TYPE STRING,
PLSNR TYPE STRING,
INV_COPY TYPE STRING,
SAPS_C TYPE STRING,
PIM2_C TYPE STRING,
CRIB_C TYPE STRING,
NEMS_C TYPE STRING,
MHLS TYPE STRING,
READM TYPE STRING,
LMPER TYPE STRING,
CONSENT TYPE STRING,
SUBSYS TYPE STRING,
PID TYPE STRING,
PNAME TYPE STRING,
PGIVENNAME TYPE STRING,
PBIRTHDATE TYPE STRING,
PGENDER TYPE STRING,
CTERMINATION TYPE STRING,
CTERMREASON TYPE STRING,END OF T_EKKO_STR. DATA: WA_RNWCHLS_NFAL_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_RNWCHLS_NFAL_STR-MANDT sy-vline
WA_RNWCHLS_NFAL_STR-EINRI sy-vline
WA_RNWCHLS_NFAL_STR-FALNR sy-vline
WA_RNWCHLS_NFAL_STR-FALAR sy-vline
WA_RNWCHLS_NFAL_STR-PATNR sy-vline
WA_RNWCHLS_NFAL_STR-BEKAT sy-vline
WA_RNWCHLS_NFAL_STR-ABRKZ sy-vline
WA_RNWCHLS_NFAL_STR-SICHV sy-vline
WA_RNWCHLS_NFAL_STR-EINZG sy-vline
WA_RNWCHLS_NFAL_STR-KZTXT sy-vline
WA_RNWCHLS_NFAL_STR-KUALF sy-vline
WA_RNWCHLS_NFAL_STR-BEWLF sy-vline
WA_RNWCHLS_NFAL_STR-DGNLF sy-vline
WA_RNWCHLS_NFAL_STR-PGRLF sy-vline
WA_RNWCHLS_NFAL_STR-INFKZ sy-vline
WA_RNWCHLS_NFAL_STR-STATU sy-vline
WA_RNWCHLS_NFAL_STR-FZIFF sy-vline
WA_RNWCHLS_NFAL_STR-NOTAN sy-vline
WA_RNWCHLS_NFAL_STR-KRZAN sy-vline
WA_RNWCHLS_NFAL_STR-ENDAT sy-vline
WA_RNWCHLS_NFAL_STR-ENTIM sy-vline
WA_RNWCHLS_NFAL_STR-FGTYP sy-vline
WA_RNWCHLS_NFAL_STR-KZKOM sy-vline
WA_RNWCHLS_NFAL_STR-KOMTX sy-vline
WA_RNWCHLS_NFAL_STR-KOLTX sy-vline
WA_RNWCHLS_NFAL_STR-ARBUN sy-vline
WA_RNWCHLS_NFAL_STR-ENDDT sy-vline
WA_RNWCHLS_NFAL_STR-FSPER sy-vline
WA_RNWCHLS_NFAL_STR-ERDAT sy-vline
WA_RNWCHLS_NFAL_STR-ERUSR sy-vline
WA_RNWCHLS_NFAL_STR-UPDAT sy-vline
WA_RNWCHLS_NFAL_STR-UPUSR sy-vline
WA_RNWCHLS_NFAL_STR-STORN sy-vline
WA_RNWCHLS_NFAL_STR-STUSR sy-vline
WA_RNWCHLS_NFAL_STR-STDAT sy-vline
WA_RNWCHLS_NFAL_STR-VORPT sy-vline
WA_RNWCHLS_NFAL_STR-BEGDT sy-vline
WA_RNWCHLS_NFAL_STR-STASP sy-vline
WA_RNWCHLS_NFAL_STR-KV_KZ sy-vline
WA_RNWCHLS_NFAL_STR-EAUFN sy-vline
WA_RNWCHLS_NFAL_STR-KVUEB sy-vline
WA_RNWCHLS_NFAL_STR-VORGR sy-vline
WA_RNWCHLS_NFAL_STR-OBJNR sy-vline
WA_RNWCHLS_NFAL_STR-RESID sy-vline
WA_RNWCHLS_NFAL_STR-CHILD sy-vline
WA_RNWCHLS_NFAL_STR-FOREI sy-vline
WA_RNWCHLS_NFAL_STR-FATYP sy-vline
WA_RNWCHLS_NFAL_STR-EMTYP sy-vline
WA_RNWCHLS_NFAL_STR-KTTAR sy-vline
WA_RNWCHLS_NFAL_STR-KTABK sy-vline
WA_RNWCHLS_NFAL_STR-GSTA1 sy-vline
WA_RNWCHLS_NFAL_STR-GSTA2 sy-vline
WA_RNWCHLS_NFAL_STR-ANZSC sy-vline
WA_RNWCHLS_NFAL_STR-ANZTD sy-vline
WA_RNWCHLS_NFAL_STR-ANZAB sy-vline
WA_RNWCHLS_NFAL_STR-LGBIS sy-vline
WA_RNWCHLS_NFAL_STR-FPEDT sy-vline
WA_RNWCHLS_NFAL_STR-APSTATE sy-vline
WA_RNWCHLS_NFAL_STR-FACHR sy-vline
WA_RNWCHLS_NFAL_STR-ENDTYP sy-vline
WA_RNWCHLS_NFAL_STR-DOCTY sy-vline
WA_RNWCHLS_NFAL_STR-DOCNR sy-vline
WA_RNWCHLS_NFAL_STR-WKAT sy-vline
WA_RNWCHLS_NFAL_STR-DOCW sy-vline
WA_RNWCHLS_NFAL_STR-PATW sy-vline
WA_RNWCHLS_NFAL_STR-PATGEW sy-vline
WA_RNWCHLS_NFAL_STR-GWEIN sy-vline
WA_RNWCHLS_NFAL_STR-PATGRO sy-vline
WA_RNWCHLS_NFAL_STR-GREIN sy-vline
WA_RNWCHLS_NFAL_STR-RESPI sy-vline
WA_RNWCHLS_NFAL_STR-FEXNR sy-vline
WA_RNWCHLS_NFAL_STR-TIMESTAMP sy-vline
WA_RNWCHLS_NFAL_STR-TOB sy-vline
WA_RNWCHLS_NFAL_STR-ISTAT_RES sy-vline
WA_RNWCHLS_NFAL_STR-ASL_RES sy-vline
WA_RNWCHLS_NFAL_STR-EXTBUD sy-vline
WA_RNWCHLS_NFAL_STR-DELGW sy-vline
WA_RNWCHLS_NFAL_STR-PLSNR sy-vline
WA_RNWCHLS_NFAL_STR-INV_COPY sy-vline
WA_RNWCHLS_NFAL_STR-SAPS_C sy-vline
WA_RNWCHLS_NFAL_STR-PIM2_C sy-vline
WA_RNWCHLS_NFAL_STR-CRIB_C sy-vline
WA_RNWCHLS_NFAL_STR-NEMS_C sy-vline
WA_RNWCHLS_NFAL_STR-MHLS sy-vline
WA_RNWCHLS_NFAL_STR-READM sy-vline
WA_RNWCHLS_NFAL_STR-LMPER sy-vline
WA_RNWCHLS_NFAL_STR-CONSENT sy-vline
WA_RNWCHLS_NFAL_STR-SUBSYS sy-vline
WA_RNWCHLS_NFAL_STR-PID sy-vline
WA_RNWCHLS_NFAL_STR-PNAME sy-vline
WA_RNWCHLS_NFAL_STR-PGIVENNAME sy-vline
WA_RNWCHLS_NFAL_STR-PBIRTHDATE sy-vline
WA_RNWCHLS_NFAL_STR-PGENDER sy-vline
WA_RNWCHLS_NFAL_STR-CTERMINATION sy-vline
WA_RNWCHLS_NFAL_STR-CTERMREASON sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.