topic Re: error executing read data set in Application Development and Automation Discussions

error executing read data set

Former Member — Mon, 24 Aug 2009 10:12:40 GMT

Dear all,

i have to read data from dataset using read data set. but i got error in executing this program .i included the code for your reference.

regards,

suresh.

data l_item(100) type c.

data: lv_times type i.

data: p_file1(50).

data: x_item

*Open the .DAT file for reading

open dataset p_file1 for input in text mode encoding utf-8." MESSAGE x_error.

if sy-subrc ne 0.

*An error occured during opening the dataset !

*message 'x_error' type 'S'.

message 'x_error' type 'E'.

CLEAR x_error.

endif.

do.

*Read the .DAT file into an internal table

read dataset p_file1 into l_item.

if sy-subrc eq 0.

*split the records into data fields based on delimiter ','

*then append the current record to an internal table

split l_item at ',' into

x_item-inv_item_id

x_item-intl_aa_nbr

x_item-intl_pba_nbr

x_item-intl_ta_nbr

x_item-intl_product_code

x_item-descr254

x_item-intl_stck_id

x_item-awr_disallowed_flg

x_item-returnable_flg

x_item-fulfillment_flg

x_item-refund_only_flg

x_item-prod_returnable_flg

x_item-stock_cat_id.

append x_item to i_item.

clear x_item.

lv_times = lv_times + 1.

if lv_times = 100.

process records here.

clear x_items.

refresh x_items.

endif.

else.

*Data was read and the end of the file was reached

message i006.

exit.

endif.

enddo.

Re: error executing read data set

Former Member — Mon, 24 Aug 2009 10:27:29 GMT

Dear Suresh,

Use application server to use Read Data set .

With Regards,

Baskaran

Re: error executing read data set

Former Member — Mon, 24 Aug 2009 10:33:49 GMT

Hi,

CLOSE DATASET.

is missing here.

Regards,

Vijay

Re: error executing read data set

Former Member — Mon, 24 Aug 2009 10:39:40 GMT

This message was moderated.

Re: error executing read data set

Former Member — Mon, 24 Aug 2009 10:44:12 GMT

This message was moderated.

Re: error executing read data set

Former Member — Mon, 24 Aug 2009 11:18:43 GMT

Hi,

Refer the code to read the data from application server:

DATA: lv_app_server_file TYPE string.

lv_app_server_file = pa_afile.

To read file from Application server

OPEN DATASET lv_app_server_file FOR INPUT IN TEXT MODE ENCODING DEFAULT.

DO.

READ DATASET lv_app_server_file INTO wa_file_data.

IF sy-subrc = 0.

APPEND wa_file_data TO gi_file_data.

ELSE.

EXIT.

ENDIF.

ENDDO.

CLOSE DATASET lv_app_server_file.

Hope it helps.

Regards,

Rajesh Kumar