Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Problem with APPEND FROM
Message
From
07/11/2000 14:26:26
Rebecca Stottlemire
Kansas State Department of Commerce
Topeka, Kansas, United States
 
 
To
06/11/2000 17:20:14
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00438579
Message ID:
00438952
Views:
11
>>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
Map
View

Click here to load this message in the networking platform