Posted by Grant Foraker (208.57.82.141) on November 30, 2004 at 08:07:45:
ACOSEQ is 6.0
----------------------------------------------------
LENGTH 12 & LOCAL FILENAME$, ARCNAME$
----------------------------------------------------
EXTRACT (7,2619) KEY = '*ACO'
LET ACOSEQ = ACOSEQ + 1
WRITE (7,2619) KEY = '*ACO'
LET ARCNAME$ = 'SD' + STR(ACOSEQ) + '.CSV'
RENAME FILENAME$, DIR = ZDIR3$, ARCNAME$, DIR = ZDIR2$
---------------------------------------------------------
FILE TYPE RECORD KEY CREATE UPDATE TIME SIZE DIR: DEL
SD100001.CS TXT VARY 11-26-04 11-17-04 21:17
SD100002.CS TXT VARY 11-26-04 11-17-04 21:18
SD100003.CS TXT VARY 11-26-04 11-17-04 21:19 20611
SD100004.CS TXT VARY 11-26-04 11-18-04 07:42 25184
SD100005.CS TXT VARY 11-26-04 11-18-04 07:56 25319
SD100006.CS TXT VARY 11-26-04 11-18-04 07:59 25323
SD100007.CS TXT VARY 11-26-04 11-18-04 10:37 25143
----------------------------------------------------------------
Checked file names in Windows Explorer. They match above.