Type ASSEMBLE
Source Lines : 645
Fixes Applied : 0
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [Unmodified]
Module
DMSLLU ( LISTIO )
Function
PROVIDE THE FACILITY TO LIST I/O ASSIGNMENTS OF ONE,
SOME, OR ALL LOGICAL UNITS IN THE CMS/DOS SUPPORT.
OUTPUT OF THE COMMAND WILL BE DIRECTED TO THE USER'S
CONSOLE, OR TO A CMS DISK FILE (EXEC) IF THE 'EXEC'
OR 'APPEND' OPTION IS SPECIFIED.
Attributes
DISK RESIDENT MODULE
SERIALLY REUSABLE
EXECUTES IN TRANSIENT AREA
Operation
1. SET UP NECESSARY ADDRESSABILITIES AND SAVE
THE RETURN REGISTER. ACQUIRE SUPERVISOR KEY
AND INITIALIZE REUSABILITY FIELDS. VERIFY IF
IN CMS/DOS ENVIRONMENT.
2. CHECK THE COMMAND LINE FOR VALID ARGUMENTS
AND OPTIONS. ENSURE THAT IF AN ARGUMENT WAS
SPECIFIED, IT IS EITHER 'SYS', 'PROG', 'ALL',
OR 'SYSXXX'. IF NO ARGUMENT SPECIFIED, ASSUME
'ALL'. VERIFY THAT IF ANY OPTION IS SPECIFIED
IT IS 'EXEC' OR 'APPEND'.
3. IF EITHER 'EXEC' OR 'APPEND' WAS SPECIFIED, CHECK
THAT THE 'A' DISK IS READ/WRITE. IF 'EXEC' WAS
SPECIFIED, AN ERASE OF ANY OLD '$LISTIO EXEC' ON
THE 'A' DISK IS ATTEMPTED.
4. IF EITHER 'SYS' OR 'PROG' WAS SPECIFIED, THE NO.
OF LOGICAL UNITS (SYSTEM OR PROGRMR) IS ACQUIRED
FROM THE NICL TABLE. THEN, USING THE INFORMATION
ON THE LUB AND PUB TABLES, THE OUTPUT BUFFER IS
BUILT AND WRITTEN OUT.
IF 'ALL' WAS SPECIFIED, THE TOTAL NUMBER OF UNITS
(SYSTEM + PROGRMR) IS COMPUTED .
IF 'SYSXXX' WAS SPECIFIED, ONLY THAT PARTICULAR
LOGICAL UNIT IS LISTED.
5. WHEN ALL PROCESSING HAS BEEN DONE, THE '$LISTIO
EXEC' FILE IS CLOSED (IF 'DISK' OR 'APPEND' WAS
SPECIFIED.
6. A SWITCH TO PROBLEM PROGRAM KEY IS DONE, AND A
RETURN TO THE CALLER IS MADE PASSING IN REG. 15
THE RETURN CODE OF THE COMMAND.
Calls to Other Routines
DMSLAD, DMSERR, DMSERS, DMSKEY
DMSBWR, DMSCWR, DMSFNS