I have been assigned to diddle with parcing a text file. I am able to get it into the proper fields in my databases however I keep erroring out when I get to the replace command. Any help would be great.

SELECT QPDATA
USE IN 0
GOTO TOP
SET STEP ON 
SCAN WHILE !EOF()
QFLD =QPDATA.FIELD    &&FIELD MARKER TO FIND
XDATA =LXPOS.INPUT   &&FIELD TO MATCH TO
ORPL =LXPOS.DATA  &&DATA INTO THE LX FILE
QPLACE = QPDATA.DATA  &&DATA FROM THE QP FILE
SET ORDER TO FIELD    && FIELD 
SEEK QFLD
	IF FOUND()
	REPLACE &ORPL WITH &QPLACE WHERE &XDATA = &QFLD
ENDIF
ENDSCAN