dir

Name

dirdb, dir1db, dir2db — Print directory of database

Synopsis

subroutine dirdb(handle)

subroutine dir1db(handle,iprint,ishort,name,status)
integer*4 handle
integer*4 iprint
integer*4 ishort
character*(*) name
integer*4 status

subroutine dir2db(handle,iprint,ishort,ihead,name,status)
integer*4 handle
integer*4 iprint
integer*4 ishort
integer*4 ihead
character*(*) name
integer*4 status

Description

dirdb prints the directory (table of contents) of a database. The output is directed to the default output file handle. dir1db and dir2db perform similar operations as dirdb. In addition a dataset mask and alternate output formats and output handles can be selected.

Parameters

handle: Database handle (input). The file handle handle may not exceed the maximum number of simultaneously open databases.
name: Dataset name to be listed (input). name may be contain pattern-matching characters. The string may not exceed the maximum dataset name length.
iprint: Formatted Fortran output device unit (input). Dummy argument (output is directed to the default output handle).
ishort: Short directory flag (input). If set to 0, all directory information is listed. If set to 1, only dataset name are listed.
ihead: File header print flag (input). If set to 0, the file header information is not printed. If set to 1, a short file header information is printed. If set to 2, the full file header information is printed.
status: Status code returned (output). Upon successful completion of the operation, the status value 0 is returned. A negative value is returned, if an error has been detected. A positive value is returned, if a warning has been issued. See MemCom error codes.

Bugs

Currently dir1db and dir2db perform the same operation as dirdb.