topic Re: Read dataset in Application Development and Automation Discussions

Read dataset

Former Member — Tue, 22 Jan 2008 19:43:14 GMT

hi all,

I would like to know how this code is working.

I have give the parameter name for the file as p_flname and total it got 3 records.

In the first loop of DO it fetches the first record from p_flanme, its ok.

but, in the second Do loop how its knows that it has to fetch the second record as we have'nt given any condition in the READ statement.

This code is working porperly.

OPEN DATASET P_FLNAME FOR INPUT IN TEXT MODE ENCODING DEFAULT.

IF SY-SUBRC = 0.

DO.

CLEAR L_LINE.

READ DATASET P_FLNAME INTO L_LINE.

IF SY-SUBRC <> 0.

EXIT.

ENDIF.

SPLIT L_LINE AT ',' INTO W_UPLOAD-BUKRS

W_UPLOAD-EKORG

W_UPLOAD-KTOKK

W_UPLOAD-ANRED

W_UPLOAD-NAME1

W_UPLOAD-SORTL

W_UPLOAD-LAND1

W_UPLOAD-AKONT

W_UPLOAD-FDGRV

W_UPLOAD-WAERS.

APPEND W_UPLOAD TO T_UPLOAD.

CLEAR W_UPLOAD.

ENDDO.

ENDIF.

thanks & regards

shashikanth naram.

Re: Read dataset

uwe_schieferstein — Tue, 22 Jan 2008 19:45:01 GMT

Hello

The READ DATASET statement reads an entire record of the file except you specify a fixed length.

Regards,

Uwe

Re: Read dataset

Former Member — Tue, 22 Jan 2008 19:48:34 GMT

hi ,

thanks for reply,

Then what is the use of DO and ENDDO , when it reads the whole record.

regards

shashikanth naram

Re: Read dataset

Former Member — Tue, 22 Jan 2008 19:51:51 GMT

Shashi,

READ DATASET statement - The content is read from the file starting from the current file pointer. After the data transfer, the file pointer is positioned after the section that was read.

Regards,

Shaik

Re: Read dataset

uwe_schieferstein — Tue, 22 Jan 2008 20:15:00 GMT

Hello


OPEN DATASET P_FLNAME FOR INPUT IN TEXT MODE ENCODING DEFAULT.
IF SY-SUBRC = 0.  " ensure that the file exists and can be opened

  DO.
    CLEAR: l_line.
    READ DATASET p_flname INTO l_line.  " read one record of file (EOF)

    IF ( syst-subrc NE '0' ).  " no record read -> end of file
      EXIT.
    ENDIF.

     " process read record
     ...
  ENDDO.  " continue reading next record until EOF

ENDIF.

Regards,

Uwe

Re: Read dataset

Former Member — Tue, 22 Jan 2008 20:23:20 GMT

It would probably help you a lot if you put your cursor on a READ statement and press F1. The documentation is quite good.

Rob