General information
Category:
Coding, syntax & commands
Here it is:
***************************
SET PROCEDURE TO C:\myprog\program\nohabc.prg ADDITIVE
use C:\myprog\data\helyseg.dbf exclusive
FOR nCount = 1 TO 254
IF !EMPTY(TAG(nCount))
IF SUBSTR(KEY(nCount),1,5) $ "HABC("
ALTER TABLE helyseg drop foreign KEY TAG NEV
ENDIF
ENDIF
ENDFOR
RELEASE PROCEDURE C:\myprog\program\nohabc.prg
SELECT helyseg
USE -- this command wont work if this .prg is called by another, but if it
runs alone, it works fine!!!!
>>Hi all,
>>I have a .prg file that calls another small file to get rid of the UDF on an index expression. It works fine, but if I want to close the altered table within this small file, it looks as if the "USE" command is skipped and ignored and the table stays open.
>>If this small file is not called, run by itself, the command "USE" works.
>>Why?
>>
>>Thanks
>>
>>Tamas Szigeti
>
>Hi Tamas. Can you post the code of the small file for everyone to review?
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