TPCDIR is a program to make directory listings
of TPC container files made from FLX format tapes. In these
listings, file name, type, UIC, protection code, and length
will be given (but not date of creation). Output may be
to any dataset and input is from any dataset. However, TPCDIR
uses FORTRAN reads from the console and is not well suited
to use from indirect command files. A summary of total files
and blocks is also output at the end of the listing. The
DOS protection code is listed, and DOS-11 syntax is used
for the output. This program makes it somewhat practical
to keep DOS tape images around as archives and to move them
to tape several at a time with BRU, or to avoid extra passes
over a tape when making copies, just to make a directory.
	TPCDIR can also dump out a file from the tape image
if the .DOS container file name is followed by a "/" character
when given. TPCDIR will then prompt for filename, type, and
UIC separately. It's command input is pretty crude, but it
works. The output file needs to be passed through TECO
(when source) to turn it into a bit more reasonable file
structure; EDI or EDT won't be able to touch it, since
the data is just dumped out in blocks of 100 bytes or less
with no carriage control. The result for binary files may
be harder to unscramble. Maybe someday someone will polish
it up. For now, though, it's a basic capability.
		Glenn Everhart
N.B.: This version compiles OK under F4P V03; it uses some
keywords in OPEN statements that earlier versions will
no doubt reject. Edit to suit.	- GCE