next up previous index
Next: Z307 Return Details Up: CERNLIB Previous: Z305 IBM VM/CMS

Z306 Find CMS R/W Minidisk with Most Free Space

Routine ID: Z306
Author(s): A. CassLibrary: KERNLIB, IBM VM/CMS only
Submitter: Submitted: 16.01.1989
Language: AssemblerRevised:

OBSOLETE

Please note that this routine has been obsoleted in CNL 219. Users are advised not to use it any longer and to replace it in older programs. No maintenance for it will take place and it will eventually disappear.
Suggested replacement: None

MAXDSK is a Fortran callable routine which returns the mode of the CMS R/W minidisk with the maximum free space.

Structure:

SUBROUTINE and FUNCTION subprograms
User Entry Names: MAXDSK, CMXDSK

Usage:

    DISK = CMXDSK()
sets DISK to the appropriate mode letter, or to blank if no R/W disk could be found. CMXDSK and DISK are of type CHARACTER*1.
    CALL MAXDSK(DISK,NFREE,ISIZE)
DISK
( CHARACTER*1) Contains, on exit, the appropriate mode letter, or blank if no R/W disk could be found.
NFREE
( INTEGER) Contains, on exit, the number of free blocks (if DISK is non-blank).
ISIZE
( INTEGER) Contains, on exit, the disk block size (if DISK is non-blank).

Z307


Janne Saarela
Mon Apr 3 15:06:23 METDST 1995