Type ASSEMBLE
Source Lines : 627
Fixes Applied : 0
Most Recent Version : Wednesday, October 1, 1980
Last Fix ID : [Unmodified]
Module
Function
DMKSSTBL = BUILD SDG TABLES OF CP'S VUAS *
*
DMKSSTFV = FIND AN AVAILABLE VUA TO MOUNT A VOLUME ON *
*
Attributes
Operation
1. BRING IN VUATABLE FROM DMKMSS CENTRAL SERVER. IF ERROR
OCCURS, SET REASON CODE = 13 AND RETURN TO CALLER.
2. OBTAIN BUFFERS FOR TWO SDG TABLES (SHARED AND NON-SHARED).
IF ERROR OCCURS, SET REASON CODE = 13 AND RETURN TO CALLER.
3. LOOP THROUGH VUATABLE, BUILDING ENTRIES IN SDGTABLES:
3A. GET VUA, SDG NUMBER, SHARED STATUS FROM VUA TABLE.
3B. USE SHARED STATUS TO DETERMINE WHICH TABLE TO PUT INFO.
3C. USE SDG NUMBER TO DETERMINE CORRECT ENTRY IN TABLE.
3D. PUT INFORMATION IN NEXT AVAILABLE POSITION IN ENTRY.
3E. UPDATE COUNT OF VUA'S IN THIS ENTRY.
4. GET CCPD OF PREVIOUS NON-SHARED TABLE. IF NO NON-SHARED
VUA'S, RELEASE SLOT. IF NON-SHARED VUA'S PRESENT BUT NO
SLOT, GET A SLOT. WRITE NON-SHARED SDG TABLE TO DASD.
5. GET CCPD OF PREVIOUS SHARED SDG TABLE. IF NO SHARED VUA'S.
RELEASE SLOT. IF SHARED VUA'S PRESENT BUT NO SLOT, GET
A SLOT. WRITE SHARED SDG TABLE TO DASD.
6. SET PROPER RETURN CODE AND EXIT.