General information
Category:
Coding, syntax & commands
>>I have a procedure which uses the APPEND FROM command to append records from a text file.
>>It works find in Windows 95 and NT, but refuses to work in Windows 2000. Has anyone run into
>>this problem?
>>Thanks,
>>Becky
>
>What does it do? Nothing, throw an error, etc.?
It gives the message Unrecoverable Error: 36, Command contains unrecnognized phrase/keyword.
This is the proc:
PROCEDURE import(gcCurrFile,gcCurrPath)
_screen.mousepointer = 11
*close each file, then open exclusive so it can be emptied
*repoen it, not exclusive, append new data using path supplied
IF USED(gcCurrFile)
SELECT &gcCurrFile
USE
ENDIF
SELECT 0
USE &gcCurrFile EXCLUSIVE
WAIT "Importing " + gcCurrFile WINDOW NOWAIT
ZAP
PACK
USE
SELECT 0
USE &gcCurrFile
APPEND FROM &gcCurrPath SDF
WAIT CLEAR
IF RECCOUNT(gcCurrFile) > 0
glSuccess = .T.
*open import log and add record
IF USED('implog')
SELECT implog
USE
ENDIF
SELECT 0
USE implog IN 0 EXCLUSIVE
SELECT implog
DELETE ALL FOR impfile=gcCurrFile
PACK
INSERT INTO implog(impdate, impfile, imppath, imprecs);
VALUES(DATETIME(), gcCurrFile, gcCurrPath, RECCOUNT(gcCurrFile))
SELECT implog
USE
SELECT &gcCurrFile
USE
ENDIF
_screen.mousepointer = 0
ENDPROC
Any ideas? Thanks loads,
Becky
Previous
Next
Reply
View the map of this thread
View the map of this thread starting from this message only
View all messages of this thread
View all messages of this thread starting from this message only