topic Re: code reading second line in Application Development and Automation Discussions

code reading second line

Former Member — Mon, 31 Mar 2008 12:42:04 GMT

hi,

how to read the second line of file placed in application server in to the internal table

Re: code reading second line

Former Member — Mon, 31 Mar 2008 12:45:29 GMT

hi,

Read the entire file into an in internal table and use statement..


READ TABLE ITAB INDEX 2.

Regards,

Santosh

Re: code reading second line

Former Member — Mon, 31 Mar 2008 12:46:15 GMT


*    To get the data from application server file
    OPEN DATASET p_filename IN TEXT MODE FOR INPUT ENCODING DEFAULT.
    IF sy-subrc <> 0.
      MESSAGE e001 WITH p_filename.
    ENDIF.
    CLEAR: wa_local.

    DO.
      READ DATASET p_filename INTO wa_local.
      IF sy-subrc <> 0.
        EXIT.
      ENDIF.

      APPEND wa_local TO p_local_table.
      CLEAR: wa_local.
    ENDDO.
    CLOSE DATASET p_filename.

To read the second recode:



    DO.
     
      IF sy-tabix EQ 2.
         READ DATASET p_filename INTO wa_local.
         IF sy-subrc  0.
             EXIT.
         ENDIF.
 
         APPEND wa_local TO p_local_table.
        CLEAR: wa_local.
     ENDIF.
    ENDDO.

Re: code reading second line

Former Member — Mon, 31 Mar 2008 12:46:33 GMT

Hi,

Try using index.

Thanks,

Sriram Ponna.

Re: code reading second line

asik_shameem — Mon, 31 Mar 2008 12:48:44 GMT

Hi,

Try like this.

DO. 

  READ DATASET file INTO line. 
  IF sy-index = 2. 
    lv_line = line.
    EXIT. 
  ENDIF. 
  
ENDDO.

Re: code reading second line

Former Member — Mon, 31 Mar 2008 12:53:14 GMT

Hi,

Please use the following code.

*Open the File in READ mode

open dataset <filename> for input in text mode encoding default.

Read the File.

read dataset <filename> to it_data.

if sy-subrc eq 0.

append it_data.

clear it_data.

endif.

Close the File

close dataset <filename>.