Form Collect_data.
Refresh Tabl.

*{ Replace Sbxk900051 1
*\ Open Dataset Parcom For Input In Text Mode.
Open Dataset Parcom For Input In Text Mode Encoding Default.
*} Replace
If Sy-subrc Ne 0.
Message I703 With Parcom.
Error = 1.
Exit.
Endif.

Do.
Read Dataset Parcom Into Tabl.
If Sy-subrc Ne 0.
Exit.
Else.
Append Tabl.
Endif.
Enddo.
Endform.