CREATE CURSOR cursor1 (resultrow M) **************************************************************************** * Open HL7 Message (File) and do low level reads for each line of data * insert each row into a new row in the temp database **************************************************************************** lnHan=FOPEN(lcFile,0) DO WHILE !FEOF(lnHan) lcString=FGETS(lnHan,2000) APPEND BLANK replace resultrow WITH lcString ENDDO FCLOSE(lnHan)Kirk