ABAP Select data from SAP table ISOFSLSORD 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 ISOFSLSORD 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 ISOFSLSORD. 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 ISOFSLSORD 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_ISOFSLSORD TYPE STANDARD TABLE OF ISOFSLSORD, WA_ISOFSLSORD TYPE ISOFSLSORD, 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: <ISOFSLSORD> TYPE ISOFSLSORD. *Process all fields in table header/work area as string values PERFORM process_as_string_field_values CHANGING wa_ISOFSLSORD. SELECT * *restrict ABAP select to first 10 rows UP TO 10 ROWS FROM ISOFSLSORD INTO TABLE IT_ISOFSLSORD. *Select data and declare internal table using in-line method @DATA *SELECT * * FROM ISOFSLSORD * INTO TABLE @DATA(IT_ISOFSLSORD2). *--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_ISOFSLSORD INDEX 1 INTO DATA(WA_ISOFSLSORD2). *Demonstrate how to loop at an internal table and update values using a FIELD-SYMBOL LOOP AT IT_ISOFSLSORD ASSIGNING <ISOFSLSORD>.*To update a field value using a field symbol simply change the value via the field symbol pointer
<ISOFSLSORD>-MANDT = 1.
<ISOFSLSORD>-SALESORDER = 1.
<ISOFSLSORD>-SALESORDERTYPE = 1.
<ISOFSLSORD>-SDDOCUMENTCATEGORY = 1.
<ISOFSLSORD>-CREATEDBYUSER = 1.
ENDLOOP. LOOP AT IT_ISOFSLSORD INTO WA_ISOFSLSORD. *Write horizonal line to screen report. WRITE:/ sy-uline. *Write selected data to screen/report before conversion. WRITE:/ sy-vline, WA_ISOFSLSORD-CREATIONDATE, sy-vline,
WA_ISOFSLSORD-CREATIONTIME, sy-vline,
WA_ISOFSLSORD-LASTCHANGEDATE, sy-vline,
WA_ISOFSLSORD-ORGANIZATIONDIVISION, sy-vline,
WA_ISOFSLSORD-SALESORGANIZATION, sy-vline,
WA_ISOFSLSORD-DISTRIBUTIONCHANNEL, sy-vline.
ENDLOOP. *Add any further fields from structure WA_ISOFSLSORD 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_ISOFSLSORD 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_ISOFSLSORD INTO WA_ISOFSLSORD. *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 SALESORDER CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISOFSLSORD-SALESORDER IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISOFSLSORD-SALESORDER.
WRITE:/ 'New Value:', ld_input.
*Conversion exit AUART, internal->external for field SALESORDERTYPE CALL FUNCTION 'CONVERSION_EXIT_AUART_OUTPUT' EXPORTING input = WA_ISOFSLSORD-SALESORDERTYPE IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISOFSLSORD-SALESORDERTYPE.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SOLDTOPARTY CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISOFSLSORD-SOLDTOPARTY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISOFSLSORD-SOLDTOPARTY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field SHIPTOPARTY CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISOFSLSORD-SHIPTOPARTY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISOFSLSORD-SHIPTOPARTY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field BILLTOPARTY CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISOFSLSORD-BILLTOPARTY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISOFSLSORD-BILLTOPARTY.
WRITE:/ 'New Value:', ld_input.
*Conversion exit ALPHA, internal->external for field PAYERPARTY CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT' EXPORTING input = WA_ISOFSLSORD-PAYERPARTY IMPORTING output = ld_input.
WRITE:/ 'Org Value:', WA_ISOFSLSORD-PAYERPARTY.
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_ISOFSLSORD_STR,
MANDT TYPE STRING,
SALESORDER TYPE STRING,
SALESORDERTYPE TYPE STRING,
SDDOCUMENTCATEGORY TYPE STRING,
CREATEDBYUSER TYPE STRING,
CREATIONDATE TYPE STRING,
CREATIONTIME TYPE STRING,
LASTCHANGEDATE TYPE STRING,
ORGANIZATIONDIVISION TYPE STRING,
SALESORGANIZATION TYPE STRING,
DISTRIBUTIONCHANNEL TYPE STRING,
SALESGROUP TYPE STRING,
SALESOFFICE TYPE STRING,
SOLDTOPARTY TYPE STRING,
SOLDTOPARTYNAME TYPE STRING,
SHIPTOPARTY TYPE STRING,
SHIPTOPARTYNAME TYPE STRING,
BILLTOPARTY TYPE STRING,
BILLTOPARTYNAME TYPE STRING,
PAYERPARTY TYPE STRING,
PAYERPARTYNAME TYPE STRING,
RESPONSIBLEEMPLOYEE TYPE STRING,
RESPONSIBLEEMPLOYEENAME TYPE STRING,
CUSTOMERCLASSIFICATION TYPE STRING,
SALESORDERDATE TYPE STRING,
PURCHASEORDERBYCUSTOMER TYPE STRING,
CREDITCONTROLAREA TYPE STRING,
CREDITSEGMENT TYPE STRING,
NEXTCREDITCHECKDATE TYPE STRING,
TOTALNETAMOUNT TYPE STRING,
TRANSACTIONCURRENCY TYPE STRING,
STATISTICSCURRENCY TYPE STRING,
COMPLETEDELIVERYISDEFINED TYPE STRING,
DELIVERYBLOCKREASON TYPE STRING,
REQUESTEDDELIVERYDATE TYPE STRING,
SHIPPINGCONDITION TYPE STRING,
INCOTERMSCLASSIFICATION TYPE STRING,
INCOTERMSTRANSFERLOCATION TYPE STRING,
INCOTERMSLOCATION1 TYPE STRING,
INCOTERMSLOCATION2 TYPE STRING,
INCOTERMSVERSION TYPE STRING,
SHIPPINGTYPE TYPE STRING,
HEADERBILLINGBLOCKREASON TYPE STRING,
BILLINGDOCUMENTDATE TYPE STRING,
CUSTOMERPAYMENTTERMS TYPE STRING,
OVERALLSDDOCUMENTREJECTIONSTS TYPE STRING,
OVERALLDELIVCONFSTATUS TYPE STRING,
OVERALLDELIVERYSTATUS TYPE STRING,
HDRGENERALINCOMPLETIONSTATUS TYPE STRING,
HEADERDELIVINCOMPLETIONSTATUS TYPE STRING,
OVERALLPRICINGINCOMPLETIONSTS TYPE STRING,
HEADERBILLGINCOMPLETIONSTATUS TYPE STRING,
OVRLITMGENERALINCOMPLETIONSTS TYPE STRING,
OVRLITMBILLINGINCOMPLETIONSTS TYPE STRING,
OVRLITMDELIVINCOMPLETIONSTS TYPE STRING,
FINDOCCREDITCHECKSTATUS TYPE STRING,
EXPRTINSURCREDITCHECKSTATUS TYPE STRING,
PAYTAUTHSNCREDITCHECKSTS TYPE STRING,
CENTRALCREDITCHECKSTATUS TYPE STRING,
CONTROLLINGOBJECT TYPE STRING,
CUSTOMERPROJECTUUID TYPE STRING,
CUSTOMERPROJECT TYPE STRING,
CUSTOMERPROJECTNAME TYPE STRING,END OF T_EKKO_STR. DATA: WA_ISOFSLSORD_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_ISOFSLSORD_STR-MANDT sy-vline
WA_ISOFSLSORD_STR-SALESORDER sy-vline
WA_ISOFSLSORD_STR-SALESORDERTYPE sy-vline
WA_ISOFSLSORD_STR-SDDOCUMENTCATEGORY sy-vline
WA_ISOFSLSORD_STR-CREATEDBYUSER sy-vline
WA_ISOFSLSORD_STR-CREATIONDATE sy-vline
WA_ISOFSLSORD_STR-CREATIONTIME sy-vline
WA_ISOFSLSORD_STR-LASTCHANGEDATE sy-vline
WA_ISOFSLSORD_STR-ORGANIZATIONDIVISION sy-vline
WA_ISOFSLSORD_STR-SALESORGANIZATION sy-vline
WA_ISOFSLSORD_STR-DISTRIBUTIONCHANNEL sy-vline
WA_ISOFSLSORD_STR-SALESGROUP sy-vline
WA_ISOFSLSORD_STR-SALESOFFICE sy-vline
WA_ISOFSLSORD_STR-SOLDTOPARTY sy-vline
WA_ISOFSLSORD_STR-SOLDTOPARTYNAME sy-vline
WA_ISOFSLSORD_STR-SHIPTOPARTY sy-vline
WA_ISOFSLSORD_STR-SHIPTOPARTYNAME sy-vline
WA_ISOFSLSORD_STR-BILLTOPARTY sy-vline
WA_ISOFSLSORD_STR-BILLTOPARTYNAME sy-vline
WA_ISOFSLSORD_STR-PAYERPARTY sy-vline
WA_ISOFSLSORD_STR-PAYERPARTYNAME sy-vline
WA_ISOFSLSORD_STR-RESPONSIBLEEMPLOYEE sy-vline
WA_ISOFSLSORD_STR-RESPONSIBLEEMPLOYEENAME sy-vline
WA_ISOFSLSORD_STR-CUSTOMERCLASSIFICATION sy-vline
WA_ISOFSLSORD_STR-SALESORDERDATE sy-vline
WA_ISOFSLSORD_STR-PURCHASEORDERBYCUSTOMER sy-vline
WA_ISOFSLSORD_STR-CREDITCONTROLAREA sy-vline
WA_ISOFSLSORD_STR-CREDITSEGMENT sy-vline
WA_ISOFSLSORD_STR-NEXTCREDITCHECKDATE sy-vline
WA_ISOFSLSORD_STR-TOTALNETAMOUNT sy-vline
WA_ISOFSLSORD_STR-TRANSACTIONCURRENCY sy-vline
WA_ISOFSLSORD_STR-STATISTICSCURRENCY sy-vline
WA_ISOFSLSORD_STR-COMPLETEDELIVERYISDEFINED sy-vline
WA_ISOFSLSORD_STR-DELIVERYBLOCKREASON sy-vline
WA_ISOFSLSORD_STR-REQUESTEDDELIVERYDATE sy-vline
WA_ISOFSLSORD_STR-SHIPPINGCONDITION sy-vline
WA_ISOFSLSORD_STR-INCOTERMSCLASSIFICATION sy-vline
WA_ISOFSLSORD_STR-INCOTERMSTRANSFERLOCATION sy-vline
WA_ISOFSLSORD_STR-INCOTERMSLOCATION1 sy-vline
WA_ISOFSLSORD_STR-INCOTERMSLOCATION2 sy-vline
WA_ISOFSLSORD_STR-INCOTERMSVERSION sy-vline
WA_ISOFSLSORD_STR-SHIPPINGTYPE sy-vline
WA_ISOFSLSORD_STR-HEADERBILLINGBLOCKREASON sy-vline
WA_ISOFSLSORD_STR-BILLINGDOCUMENTDATE sy-vline
WA_ISOFSLSORD_STR-CUSTOMERPAYMENTTERMS sy-vline
WA_ISOFSLSORD_STR-OVERALLSDDOCUMENTREJECTIONSTS sy-vline
WA_ISOFSLSORD_STR-OVERALLDELIVCONFSTATUS sy-vline
WA_ISOFSLSORD_STR-OVERALLDELIVERYSTATUS sy-vline
WA_ISOFSLSORD_STR-HDRGENERALINCOMPLETIONSTATUS sy-vline
WA_ISOFSLSORD_STR-HEADERDELIVINCOMPLETIONSTATUS sy-vline
WA_ISOFSLSORD_STR-OVERALLPRICINGINCOMPLETIONSTS sy-vline
WA_ISOFSLSORD_STR-HEADERBILLGINCOMPLETIONSTATUS sy-vline
WA_ISOFSLSORD_STR-OVRLITMGENERALINCOMPLETIONSTS sy-vline
WA_ISOFSLSORD_STR-OVRLITMBILLINGINCOMPLETIONSTS sy-vline
WA_ISOFSLSORD_STR-OVRLITMDELIVINCOMPLETIONSTS sy-vline
WA_ISOFSLSORD_STR-FINDOCCREDITCHECKSTATUS sy-vline
WA_ISOFSLSORD_STR-EXPRTINSURCREDITCHECKSTATUS sy-vline
WA_ISOFSLSORD_STR-PAYTAUTHSNCREDITCHECKSTS sy-vline
WA_ISOFSLSORD_STR-CENTRALCREDITCHECKSTATUS sy-vline
WA_ISOFSLSORD_STR-CONTROLLINGOBJECT sy-vline
WA_ISOFSLSORD_STR-CUSTOMERPROJECTUUID sy-vline
WA_ISOFSLSORD_STR-CUSTOMERPROJECT sy-vline
WA_ISOFSLSORD_STR-CUSTOMERPROJECTNAME sy-vline INTO ld_text SEPARATED BY SPACE. *Add any further fields from structure WA_EKKO_STR you want to CONCATENATE... ENDLOOP. ENDFORM.