ABAP Select data from SAP table IWLFSMTDOCLST 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 IWLFSMTDOCLST 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 IWLFSMTDOCLST. 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 IWLFSMTDOCLST 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_IWLFSMTDOCLST TYPE STANDARD TABLE OF IWLFSMTDOCLST,
      WA_IWLFSMTDOCLST TYPE IWLFSMTDOCLST,
      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: <IWLFSMTDOCLST> TYPE IWLFSMTDOCLST.

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

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

*Select data and declare internal table using in-line method @DATA
*SELECT *
*  FROM IWLFSMTDOCLST
*  INTO TABLE @DATA(IT_IWLFSMTDOCLST2).
*--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_IWLFSMTDOCLST INDEX 1 INTO DATA(WA_IWLFSMTDOCLST2).


*Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL
LOOP AT IT_IWLFSMTDOCLST ASSIGNING <IWLFSMTDOCLST>.
*To update a field value using a field symbol simply change the value via the field symbol pointer
<IWLFSMTDOCLST>-MANDT = 1.
<IWLFSMTDOCLST>-SETTLMTDOCLIST = 1.
<IWLFSMTDOCLST>-SETTLMTDOCTYPE = 1.
<IWLFSMTDOCLST>-SETTLMTDOCCAT = 1.
<IWLFSMTDOCLST>-SETTLMTPROCESSTYPE = 1.
ENDLOOP.

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

*Write selected data to screen/report before conversion.
  WRITE:/ sy-vline,   WA_IWLFSMTDOCLST-SETTLMTDOCLISTCAT, sy-vline,
WA_IWLFSMTDOCLST-LOGISTICSDATAENTRYCAT, sy-vline,
WA_IWLFSMTDOCLST-PRICINGPROCEDURE, sy-vline,
WA_IWLFSMTDOCLST-POSTINGDATE, sy-vline,
WA_IWLFSMTDOCLST-SETTLMTMGMTACCTGTRANSFSTS, sy-vline,
WA_IWLFSMTDOCLST-INVOICINGPARTY, sy-vline.
ENDLOOP. *Add any further fields from structure WA_IWLFSMTDOCLST 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_IWLFSMTDOCLST 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_IWLFSMTDOCLST INTO WA_IWLFSMTDOCLST. *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 SETTLMTDOCLIST CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IWLFSMTDOCLST-SETTLMTDOCLIST IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IWLFSMTDOCLST-SETTLMTDOCLIST.
WRITE:/ 'New Value:', ld_input.

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

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

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

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

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

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

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

*Conversion exit ALPHA, internal->external for field SETTLMTDOCLISTTYPE CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_IWLFSMTDOCLST-SETTLMTDOCLISTTYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_IWLFSMTDOCLST-SETTLMTDOCLISTTYPE.
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_IWLFSMTDOCLST_STR,
MANDT TYPE STRING,
SETTLMTDOCLIST TYPE STRING,
SETTLMTDOCTYPE TYPE STRING,
SETTLMTDOCCAT TYPE STRING,
SETTLMTPROCESSTYPE TYPE STRING,
SETTLMTDOCLISTCAT TYPE STRING,
LOGISTICSDATAENTRYCAT TYPE STRING,
PRICINGPROCEDURE TYPE STRING,
POSTINGDATE TYPE STRING,
SETTLMTMGMTACCTGTRANSFSTS TYPE STRING,
INVOICINGPARTY TYPE STRING,
PAYEEPARTY TYPE STRING,
BILLTOPARTY TYPE STRING,
PAYERPARTY TYPE STRING,
PURCHASINGORGANIZATION TYPE STRING,
PURCHASINGGROUP TYPE STRING,
SALESORGANIZATION TYPE STRING,
DISTRIBUTIONCHANNEL TYPE STRING,
DIVISION TYPE STRING,
COMPANYCODE TYPE STRING,
CREATEDBYUSER TYPE STRING,
CREATIONDATE TYPE STRING,
CREATIONTIME TYPE STRING,
LASTCHANGEDATE TYPE STRING,
DOCUMENTDATE TYPE STRING,
DOCUMENTREFERENCEID TYPE STRING,
ASSIGNMENTREFERENCE TYPE STRING,
SETTLMTDOCLISTCURRENCY TYPE STRING,
EXCHANGERATE TYPE STRING,
EXCHANGERATEISFIXED TYPE STRING,
EXCHANGERATEDATE TYPE STRING,
SETTLMTDOCLISTTOTALGROSSAMOUNT TYPE STRING,
SETTLMTDOCLISTTOTALNETAMOUNT TYPE STRING,
PAYMENTTERMS TYPE STRING,
CASHDISCOUNT1DAYS TYPE STRING,
CASHDISCOUNT2DAYS TYPE STRING,
NETPAYMENTDAYS TYPE STRING,
CASHDISCOUNT1PERCENT TYPE STRING,
CASHDISCOUNT2PERCENT TYPE STRING,
PAYMENTMETHOD TYPE STRING,
ELIGIBLEAMOUNTFORCASHDISCOUNT TYPE STRING,
SETTLMTDOCLISTISCANCELED TYPE STRING,
CANCLDSETTLMTDOCLIST TYPE STRING,
SETTLMTDOCLISTADDLVALDAYS TYPE STRING,
SETTLMTDOCLISTFXDVALDTE TYPE STRING,
SETTLMTDOCLISTTOTALTAXAMOUNT TYPE STRING,
SUPPLYINGCOUNTRY TYPE STRING,
STATECENTRALBANKPAYMENTREASON TYPE STRING,
CREDITCONTROLAREA TYPE STRING,
SETTLMTDOCACTIVITYREASON TYPE STRING,
PAYMENTREFERENCE TYPE STRING,
SETTLMTDOCLISTPAYMENTCURRENCY TYPE STRING,
SETTLMTDOCLISTPAYTCRCYEXCHRATE TYPE STRING,
SETTLMTAPPLSTS TYPE STRING,
EXCHANGERATETYPE TYPE STRING,
ONETIMESETTLMTPARTADDRID TYPE STRING,
FISCALPERIOD TYPE STRING,
SETTLMTDOCLISTINCMPLTNSRSN TYPE STRING,
ALTERNATIVEINVOICINGPARTY TYPE STRING,
DOCINTRASTATRELEVANCE TYPE STRING,
TAXDEPARTURECOUNTRY TYPE STRING,
TAXDESTINATIONCOUNTRY TYPE STRING,
ISEUTRIANGULARDEAL TYPE STRING,
VATREGISTRATION TYPE STRING,
INTRASTATDECLNGDSFLWCAT TYPE STRING,
INCOTERMSVERSION TYPE STRING,
INCOTERMSCLASSIFICATION TYPE STRING,
INCOTERMSTRANSFERLOCATION TYPE STRING,
INCOTERMSLOCATION1 TYPE STRING,
INCOTERMSLOCATION2 TYPE STRING,
SETTLMTDATE TYPE STRING,
SETTLMTBUSPROCVAR TYPE STRING,
SETTLMTDOCLISTCOCODETAXCOUNTRY TYPE STRING,
SETTLMTBUSPROCCAT TYPE STRING,
SEPAMANDATE TYPE STRING,
SETTLMTAPPLSTSGRP TYPE STRING,
SETTLMTDOCLISTTYPE TYPE STRING,END OF T_EKKO_STR. DATA: WA_IWLFSMTDOCLST_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_IWLFSMTDOCLST_STR-MANDT sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLIST sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCTYPE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCCAT sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTPROCESSTYPE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTCAT sy-vline
WA_IWLFSMTDOCLST_STR-LOGISTICSDATAENTRYCAT sy-vline
WA_IWLFSMTDOCLST_STR-PRICINGPROCEDURE sy-vline
WA_IWLFSMTDOCLST_STR-POSTINGDATE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTMGMTACCTGTRANSFSTS sy-vline
WA_IWLFSMTDOCLST_STR-INVOICINGPARTY sy-vline
WA_IWLFSMTDOCLST_STR-PAYEEPARTY sy-vline
WA_IWLFSMTDOCLST_STR-BILLTOPARTY sy-vline
WA_IWLFSMTDOCLST_STR-PAYERPARTY sy-vline
WA_IWLFSMTDOCLST_STR-PURCHASINGORGANIZATION sy-vline
WA_IWLFSMTDOCLST_STR-PURCHASINGGROUP sy-vline
WA_IWLFSMTDOCLST_STR-SALESORGANIZATION sy-vline
WA_IWLFSMTDOCLST_STR-DISTRIBUTIONCHANNEL sy-vline
WA_IWLFSMTDOCLST_STR-DIVISION sy-vline
WA_IWLFSMTDOCLST_STR-COMPANYCODE sy-vline
WA_IWLFSMTDOCLST_STR-CREATEDBYUSER sy-vline
WA_IWLFSMTDOCLST_STR-CREATIONDATE sy-vline
WA_IWLFSMTDOCLST_STR-CREATIONTIME sy-vline
WA_IWLFSMTDOCLST_STR-LASTCHANGEDATE sy-vline
WA_IWLFSMTDOCLST_STR-DOCUMENTDATE sy-vline
WA_IWLFSMTDOCLST_STR-DOCUMENTREFERENCEID sy-vline
WA_IWLFSMTDOCLST_STR-ASSIGNMENTREFERENCE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTCURRENCY sy-vline
WA_IWLFSMTDOCLST_STR-EXCHANGERATE sy-vline
WA_IWLFSMTDOCLST_STR-EXCHANGERATEISFIXED sy-vline
WA_IWLFSMTDOCLST_STR-EXCHANGERATEDATE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTTOTALGROSSAMOUNT sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTTOTALNETAMOUNT sy-vline
WA_IWLFSMTDOCLST_STR-PAYMENTTERMS sy-vline
WA_IWLFSMTDOCLST_STR-CASHDISCOUNT1DAYS sy-vline
WA_IWLFSMTDOCLST_STR-CASHDISCOUNT2DAYS sy-vline
WA_IWLFSMTDOCLST_STR-NETPAYMENTDAYS sy-vline
WA_IWLFSMTDOCLST_STR-CASHDISCOUNT1PERCENT sy-vline
WA_IWLFSMTDOCLST_STR-CASHDISCOUNT2PERCENT sy-vline
WA_IWLFSMTDOCLST_STR-PAYMENTMETHOD sy-vline
WA_IWLFSMTDOCLST_STR-ELIGIBLEAMOUNTFORCASHDISCOUNT sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTISCANCELED sy-vline
WA_IWLFSMTDOCLST_STR-CANCLDSETTLMTDOCLIST sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTADDLVALDAYS sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTFXDVALDTE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTTOTALTAXAMOUNT sy-vline
WA_IWLFSMTDOCLST_STR-SUPPLYINGCOUNTRY sy-vline
WA_IWLFSMTDOCLST_STR-STATECENTRALBANKPAYMENTREASON sy-vline
WA_IWLFSMTDOCLST_STR-CREDITCONTROLAREA sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCACTIVITYREASON sy-vline
WA_IWLFSMTDOCLST_STR-PAYMENTREFERENCE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTPAYMENTCURRENCY sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTPAYTCRCYEXCHRATE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTAPPLSTS sy-vline
WA_IWLFSMTDOCLST_STR-EXCHANGERATETYPE sy-vline
WA_IWLFSMTDOCLST_STR-ONETIMESETTLMTPARTADDRID sy-vline
WA_IWLFSMTDOCLST_STR-FISCALPERIOD sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTINCMPLTNSRSN sy-vline
WA_IWLFSMTDOCLST_STR-ALTERNATIVEINVOICINGPARTY sy-vline
WA_IWLFSMTDOCLST_STR-DOCINTRASTATRELEVANCE sy-vline
WA_IWLFSMTDOCLST_STR-TAXDEPARTURECOUNTRY sy-vline
WA_IWLFSMTDOCLST_STR-TAXDESTINATIONCOUNTRY sy-vline
WA_IWLFSMTDOCLST_STR-ISEUTRIANGULARDEAL sy-vline
WA_IWLFSMTDOCLST_STR-VATREGISTRATION sy-vline
WA_IWLFSMTDOCLST_STR-INTRASTATDECLNGDSFLWCAT sy-vline
WA_IWLFSMTDOCLST_STR-INCOTERMSVERSION sy-vline
WA_IWLFSMTDOCLST_STR-INCOTERMSCLASSIFICATION sy-vline
WA_IWLFSMTDOCLST_STR-INCOTERMSTRANSFERLOCATION sy-vline
WA_IWLFSMTDOCLST_STR-INCOTERMSLOCATION1 sy-vline
WA_IWLFSMTDOCLST_STR-INCOTERMSLOCATION2 sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDATE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTBUSPROCVAR sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTCOCODETAXCOUNTRY sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTBUSPROCCAT sy-vline
WA_IWLFSMTDOCLST_STR-SEPAMANDATE sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTAPPLSTSGRP sy-vline
WA_IWLFSMTDOCLST_STR-SETTLMTDOCLISTTYPE sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.