Open dataset dump.

Question

hi guys,
I am getting OPEN DATASET SHORTDUMP using below code.
can somebody suggest me alteration of code..
Dump says error in READ statement.
DATA : BEGIN OF IT_EDIT OCCURS 0,
         CNO(5)         TYPE C,
         DATE(8)        TYPE C,
         VENDOR(10)     TYPE C,
         MATERIAL(18)   TYPE C,
         STARTDT(8)     TYPE C,
         ENDDT(8)       TYPE C,
         QUANTITY(13)   TYPE N,
       END OF IT_EDIT.
OPEN DATASET P_INFILE FOR INPUT IN TEXT MODE ENCODING DEFAULT.
  DO.
    IF NOT SY-SUBRC IS INITIAL.
      EXIT.
    ELSE.
<b>      READ DATASET P_OUFILE INTO IT_EDIT.</b>
      APPEND IT_EDIT.
    ENDIF.
  ENDDO.
  CLOSE DATASET P_OUFILE.
Regards
Chandra.

Answer 1

hi,
pls chk this sample code.
report zfiles_0001.
Parameters: d1 type localfile default '/usr/sap/TST/SYS/Data1.txt',
            d2 type localfile default '/usr/sap/TST/SYS/Data2.txt'.
data: itab type table of string.
data: wa type string.
start-of-selection.
Read file
  open dataset d1 for input in text mode.
  if sy-subrc = 0.
    do.
      read dataset d1 into wa.
      if sy-subrc <> 0.
        exit.
      endif.
      append wa to itab.
    enddo.
  endif.
  close dataset d1.
Copy to new file
  open dataset d2 for output in text mode.
  loop at itab into wa.
    transfer wa to d2.
  endloop.
  close dataset d2.
Delete the first
  delete dataset d1.
regards
anver
if hlpful pls mark points