Make the temp table match the file listing, then cursor the filename column. CREATE TEMP TABLE `MyFiles` + (FileDate DATE,+ FileTime TIME,+ AMPM, TEXT (2),+ FileSize INTEGER,+ FileName TEXT 128)
Albert > On Oct 10, 2019, at 11:17, Dan Goldberg <[email protected]> wrote: > > I did the output and it gives me all the info. > > > Volume in drive \ has no label. > Volume Serial Number is N/A > > Directory of \\appserv3\salesdb\ <smb://appserv3/salesdb/> > > 10/02/2119 12:47 PM 594 aa.RMD > 06/04/2118 06:30 AM 5,479 bobsmonthly.rmd > 09/30/2119 08:21 AM 899 bowler.rmd > 09/25/2119 02:46 PM 11,531 dashboard.rmd > 04/03/2118 03:20 PM 5,137 dealerloactorapp.rmd > 07/24/2119 01:03 PM 1,344 DealerLocatorUpdate.rmd > 09/03/2119 10:12 AM 10,227 inv1spnodel.rmd > 7 File(s) 35,211 bytes > 0 Dir(s) 0 bytes free > > Is there a way just to get the file name and not the other info? > > Dan Goldberg > > From: [email protected] <mailto:[email protected]> > <[email protected] <mailto:[email protected]>> On Behalf Of Dan > Goldberg > Sent: Thursday, October 10, 2019 10:06 AM > To: [email protected] <mailto:[email protected]> > Subject: RE: [RBASE-L] - Grab file names in a folder > > Thx Albert. That will work! > > Dan Goldberg > > From: [email protected] <mailto:[email protected]> > <[email protected] <mailto:[email protected]>> On Behalf Of > Albert Berry > Sent: Thursday, October 10, 2019 10:04 AM > To: 'jim schmitt' via RBASE-L <[email protected] > <mailto:[email protected]>> > Subject: Re: [RBASE-L] - Grab file names in a folder > > Dan, Import the file names to a temp table and delete as they are completed. > > Output ThisDir.dat > DIR *.csv > Output screen > Create temp table … > Decl cursor c1 for select from temp table > Proc 1st > Del from … where count= 1 > Sele count(*) into vNumFilesLeft - - when zero, exit > Proc Next > > Albert > > > On Oct 10, 2019, at 10:47, Dan Goldberg <[email protected] > <mailto:[email protected]>> wrote: > > I need to write a routine that will grab a file, import it, process it, > delete it, then grab then next file until they are done in that folder. > > What command do I use to grab the file name if I do not know the name? They > will be csv files. > > TIA > > Dan Goldberg > > -- > For group guidelines, visit > http://www.rbase.com/support/usersgroup_guidelines.php > <http://www.rbase.com/support/usersgroup_guidelines.php> > --- > You received this message because you are subscribed to the Google Groups > "RBASE-L" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to [email protected] > <mailto:[email protected]>. > To view this discussion on the web visit > https://groups.google.com/d/msgid/rbase-l/2E4830CEC16615458329D3D83342F8D0011EBAAD08%40EXCHANGE10 > > <https://groups.google.com/d/msgid/rbase-l/2E4830CEC16615458329D3D83342F8D0011EBAAD08%40EXCHANGE10?utm_medium=email&utm_source=footer>. > > -- > For group guidelines, visit > http://www.rbase.com/support/usersgroup_guidelines.php > <http://www.rbase.com/support/usersgroup_guidelines.php> > --- > You received this message because you are subscribed to the Google Groups > "RBASE-L" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to [email protected] > <mailto:[email protected]>. > To view this discussion on the web visit > https://groups.google.com/d/msgid/rbase-l/CAD6CB61-82A0-4EA4-B98B-7B592EADF864%40albertberry.com > > <https://groups.google.com/d/msgid/rbase-l/CAD6CB61-82A0-4EA4-B98B-7B592EADF864%40albertberry.com?utm_medium=email&utm_source=footer>. > -- > For group guidelines, visit > http://www.rbase.com/support/usersgroup_guidelines.php > <http://www.rbase.com/support/usersgroup_guidelines.php> > --- > You received this message because you are subscribed to the Google Groups > "RBASE-L" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to [email protected] > <mailto:[email protected]>. > To view this discussion on the web visit > https://groups.google.com/d/msgid/rbase-l/2E4830CEC16615458329D3D83342F8D0011EBAAE75%40EXCHANGE10 > > <https://groups.google.com/d/msgid/rbase-l/2E4830CEC16615458329D3D83342F8D0011EBAAE75%40EXCHANGE10?utm_medium=email&utm_source=footer>. > > -- > For group guidelines, visit > http://www.rbase.com/support/usersgroup_guidelines.php > <http://www.rbase.com/support/usersgroup_guidelines.php> > --- > You received this message because you are subscribed to the Google Groups > "RBASE-L" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to [email protected] > <mailto:[email protected]>. > To view this discussion on the web visit > https://groups.google.com/d/msgid/rbase-l/2E4830CEC16615458329D3D83342F8D0011EBAAF4D%40EXCHANGE10 > > <https://groups.google.com/d/msgid/rbase-l/2E4830CEC16615458329D3D83342F8D0011EBAAF4D%40EXCHANGE10?utm_medium=email&utm_source=footer>. -- For group guidelines, visit http://www.rbase.com/support/usersgroup_guidelines.php --- You received this message because you are subscribed to the Google Groups "RBASE-L" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. To view this discussion on the web visit https://groups.google.com/d/msgid/rbase-l/B3BD0826-D2E4-483F-8240-D3A5600ED8AC%40albertberry.com.
