An SAP Consultant

REPORT ztest_notepad.
DATA:it_nfal     TYPE STANDARD TABLE OF nfal WITH HEADER LINE.
DATA:c1          TYPE cursor.
DATA:flag        TYPE c.
DATA:no_of_lines TYPE i VALUE '1000'.

START-OF-SELECTION.
  OPEN CURSOR:c1 FOR SELECT * FROM nfal.
  DO.
    IF flag NE 'X'.
      FETCH NEXT CURSOR c1 APPENDING TABLE it_nfal PACKAGE SIZE no_of_lines.
      IF sy-subrc <> 0.
        CLOSE CURSOR c1.
        flag = 'X'.
      ENDIF.
    ENDIF.
    IF flag = 'X'.
      EXIT.
    ENDIF.
  ENDDO.