Ignore this one. It was a bad piece of test code I have as an example.
Sorry.

Thanks, Matt
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Tyler, Matt
Sent: Monday, April 02, 2012 10:30 AM
To: Midrange Systems Technical Discussion
Subject: RE: How many members in a file?

f$$arcsrc$$if e disk Rename($$arcsrc$$ :$$ARCSRCrf)
f Infds(infds)
D Infds ds
D Num_Mems 395 396i 0

/Free


*Inlr = *On;
/End-Free

Replace $$ARCSRC$$ with your file.

Thanks, Matt

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Tom Hightower
Sent: Monday, April 02, 2012 10:05 AM
To: Midrange Systems Technical Discussion
Subject: How many members in a file?


Is there a field in the INFDS to tell me how many members are in a file?
If
not, is there something else I can do to quickly return the count?

The reason I'm asking is that we have an EDI file that fills up to max
members every so often (3rd party package), and things go south real
quick
when that happens. I'd like to write a monitor that will report when
the
file is nearing capacity, giving us a chance to archive and cleanup
before
we run into issues.

Tom

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2019 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].