Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Closing All Files Opened with FOpen
Message
 
 
To
21/11/2001 11:34:27
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00584535
Message ID:
00584550
Views:
30
>Following is a snip of code from an app the guy before me wrote. Dots just mean that there was irrelevant code between the lines. He issues a Close All in order to make sure the ASCII files are closed before continuing the process. This causes problems for me - both in reality and my sense of order. How do I handle closing any files that were opened with FOpen/FCreate do this is not an issue? Thanks!
>
>Regards, Renoir
>
>
>* - not closing all left some ascii files open, causing conflicts
>
>Close ALL
>.
>.
>.
>m.filein2='C:\SFW\DATA\'+m.filein
>.
>.
>.
>m.fileout=SUBSTR(m.filein,1,AT('.',m.filein))+'ERR'
>m.handlein = FOPEN(m.filein2,0)
>m.handleout= FCREATE(m.fileout,0)
>
Create an array of all Open Files handles, e.g.
dimension aOpenHandls[1]
aOpenHandls[1]=fopen(m.filein2,0)


Then just iterate through this array and do fclose(aOpenHandls[i])
If it's not broken, fix it until it is.


My Blog
Previous
Reply
Map
View

Click here to load this message in the networking platform