ibm:vm370-lib:cms:dmsllu.assemble_abs
Table of Contents
DMSLLU Abstract
Statistics
Type ASSEMBLE
Source Lines : 645
Fixes Applied : 0
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [Unmodified]
Synopsis
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
ibm/vm370-lib/cms/dmsllu.assemble_abs.txt ยท Last modified: 2023/08/06 13:35 by Site Administrator