ibm:vm370-lib:cms:dmssyn.assemble_abs
Table of Contents
DMSSYN Abstract
Statistics
Type ASSEMBLE
Source Lines : 656
Fixes Applied : 0
Most Recent Version : Tuesday, December 12, 1978
Last Fix ID : [Unmodified]
Synopsis
Module
DMSSYN (SYNONYM)
Function
PROGRAM TO SET UP USER DEFINED COMMAND NAMES AND ABBREVIATIONS FOR CMS COMMANDS.
Attributes
TRANSIENT (WITH SYSTEM OPTION); SERIALLY REUSABLE.
Operation
SYNONYM CHECKS IF THERE ARE ANY PARAMETERS OR OPTIONS, IF NONE AND THE NOABBREV FLAG IN THE NUCLEUS IS NOT ON SYSTEM ABBREVIATIONS ARE TYPED; IF ANY USER SYNONYMS, THOSE ARE TYPED ALSO. IF A FILE NAME IS GIVEN IT IS SAVED AND FLAGS ARE SET FOR ANY OPTIONS. IF GIVEN, THE FILEID SPECIFIED IS CHECKED (VIA STATE) FOR A FIXED 80 CHARACTER FORMAT. THE STORAGE FOR AN OLD USERS SYNONYM TABLE IS RELEASED IF ANY, AND STORAGE IS OBTAINED (VIA DMSFRE) FOR THE USER COMMAND NAMES. EACH USER SYNONYM IS READ (DMSBRD) AND THE RECORD IS FORMATTED (VIA A COPY OF SCAN) FOR EASE IN HAND- LING. THEN EACH COMMAND NAME, SYNONYM AND COUNT IS MOVED TO THE FREE STORAGE BLOCK. AT END-OF-FILE THE FILE IS CLOSED (FINIS) AND A POINTER TO THE FREE STORAGE BLOCK IS SET IN DMSINA. NEXT THE OPTIONS ARE HANDLED AS FOLLOWS: CLEAR - RELEASE (DMSFRE) THE OLD USER SYNOMYM TABLE, IF ANY NOTE: THIS HAS NO EFFECT IF A FILEID IS SPECIFIED SINCE THE OLD TABLE IS ALWAYS ERASED BEFORE THE NEW ONE IS BUILT STD - CLEAR NOABBREV FLAG IN NUCON NOSTD - SET NOABBREV FLAB IN NUCON FINALLY RETURN TO CALLER WITH RETURN CODE IN REGISTER 15.
Calls to Other Routines
DMSFRE, DMSSTT, DMSRDB, DMSFNS, DMSCWR
ibm/vm370-lib/cms/dmssyn.assemble_abs.txt ยท Last modified: 2023/08/06 13:36 by Site Administrator