RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   1

02                                                                                                                               (1)



                           00000001  0000     1 RMSSWITCH=1			;GENERATE RMS SERVICE CASE BRANCH TABLE

                                     0000     1 	.IF	NDF,RMSSWITCH

                                     0000     2 	.IF	NDF,LIBSWITCH

                                     0000     3 	.TITLE	CMODSSDSP - CHANGE MODE SYSTEM SERVICE DISPATCHER

                                     0000     4 	.IFF

                                     0000     5 	.TITLE	SYSVECTOR - SYSTEM SERVICE VECTOR DEFINITIONS

                                     0000     6 	.ENDC

                                     0000     7 	.IFF

                                     0000     8 	.TITLE	RMSVECTOR - RMS SERVICE VECTOR DEFINITIONS

                                     0000     9 	.ENDC

                                     0000    10 	.IDENT	/02/

                                     0000    11  

                                     0000    12 ;

                                     0000    13 ; COPYRIGHT (C) 1978

                                     0000    14 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.

                                     0000    15 ;

                                     0000    16 ; THIS SOFTWARE IS FURNISHED UNDER  A LICENSE FOR USE ONLY  ON  A

                                     0000    17 ; SINGLE COMPUTER SYSTEM AND MAY BE  COPIED ONLY WITH  THE INCLU-

                                     0000    18 ; SION OF  THE  ABOVE  COPYRIGHT NOTICE.  THIS SOFTWARE,  OR  ANY

                                     0000    19 ; OTHER COPIES THEREOF, MAY NOT BE  PROVIDED  OR  OTHERWISE  MADE

                                     0000    20 ; AVAILABLE TO ANY OTHER PERSON EXCEPT  FOR  USE  ON  SUCH SYSTEM

                                     0000    21 ; AND TO  ONE WHO AGREES  TO  THESE LICENSE  TERMS.  TITLE TO AND

                                     0000    22 ; OWNERSHIP OF THE SOFTWARE SHALL AT ALL TIMES REMAIN IN DEC.

                                     0000    23 ;

                                     0000    24 ; THE INFORMATION IN THIS SOFTWARE  IS  SUBJECT TO CHANGE WITHOUT

                                     0000    25 ; NOTICE AND SHOULD NOT BE CONSTRUED  AS  A COMMITMENT BY DIGITAL

                                     0000    26 ; EQUIPMENT CORPORATION.

                                     0000    27 ;

                                     0000    28 ; DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS

                                     0000    29 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.

                                     0000    30 ;

                                     0000    31 ; D. N. CUTLER 22-JUN-76

                                     0000    32 ;

                                     0000    33 ;  MODIFIED:	L F LAVERDURE 15-AUG-77, 15-MAY-78

                                     0000    34 ;

                                     0000    35 ; CHANGE MODE SYSTEM SERVICE DISPATCHER

                                     0000    36 ;

                                     0000    37 ; MACRO LIBRARY CALLS

                                     0000    38 ;

                                     0000    39  

                                     0000    40 	.IF	DF,LIBSWITCH		;DEFINE GLOBALLY FOR LIBRARY

                                     0000    41 

                                     0000    42 	.DSABL	TBK			;DO NOT OUTPUT TRACEBACK SYMBOLS

                                     0000    43 					;FOR THE SYSVECTOR MODULE IN ORDER TO

                                     0000    44 					;AVOID GARBAGE IN DEBUG SYMBOL TABLE

                                     0000    45 

                                     0000    46 	$DCDEF	GLOBAL			;DEFINE DEVICE TYPE CODES

                                     0000    47 	$DEVDEF	GLOBAL			;DEFINE DEVICE CHARACTERISTICS BITS

                                     0000    48 	$IODEF	GLOBAL			;DEFINE I/O FUNCTION CODES

                                     0000    49 	$MSGDEF	GLOBAL			;DEFINE SYSTEM MESSAGE TYPES

                                     0000    50 	$PRDEF	GLOBAL			;DEFINE PROCESSOR REGISTERS

                                     0000    51 	$PRTDEF	GLOBAL			;DEFINE PROTECTION CODES

                                     0000    52 	$SSDEF	GLOBAL			;DEFINE SYSTEM SERVICE STATUS CODES

                                     0000    53 	$TTDEF	GLOBAL			;TT TERMINATION SPECIFIERS

                                     0000    54 	.IFF				;LOCALLY IF NOT LIBRARY VERSION

                                     0000    55 	$PCBDEF				;DEFINE PCB OFFSETS

                                     0000    56 	$PHDDEF				;DEFINE PHD OFFSETS

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   2

02                                                                                                                               (1)



                                     0000    57 	$PRDEF				;DEFINE PROCESSOR REGISTERS

                                     0000    58 	$PSLDEF				;DEFINE PROCESSOR STATUS FIELDS

                                     0000    59 	$SSDEF				;DEFINE SYSTEM STATUS VALUES

                                     0000    60 	.ENDC				;

                                     0000    61  

                                     0000    62 	$SGNDEF				;DEFINE SYSGEN PARAMETERS

                                     0000    63 ;

                                     0000    64 ; LOCAL MACROS

                                     0000    65 ;

                                     0000    66 ;	GSYSSRV	- GENERATE SYSTEM SERVICE ENTRY VECTOR

                                     0000    67 ;

                                     0000    68 ;	GSYSSRV	SRVNAME,MODE,NARG,REGISTERS,NOSYNC

                                     0000    69 ;

                                     0000    70 ;	WHERE:

                                     0000    71 ;		SRVNAME - SERVICE NAME LESS ANY PREFIX (SYS$,EXE$,RMS$$)

                                     0000    72 ;		MODE - MODE DESIGNATOR FOR SERVICE (K,E,ALL,R)

                                     0000    73 ;		NARG - REQUIRED NUMBER OF ARGUMENTS

                                     0000    74 ;		REGISTERS - REGISTER SAVE LIST

                                     0000    75 ;		NOSYNC - NON-ZERO IF RMS SYNCHRONIZATION CODE NOT TO BE INCLUDED

                                     0000    76 ;

                                     0000    77 

                                     0000    78 	.MACRO	GSYSSRV,SRVNAME,MODE,NARG,REGS,NOSYNC

                                     0000    79 	.IF	NDF,RMSSWITCH

                                     0000    80 	.IF	DF,LIBSWITCH

                                     0000    81 	.PSECT	$$$0000,QUAD

                                     0000    82 	.IFF

                                     0000    83 	.PSECT	$$$000,QUAD

                                     0000    84 	.ENDC

                                     0000    85 	.ALIGN	QUAD

                                     0000    86 	.IF DF	LIBSWITCH

                                     0000    87 SYS$'SRVNAME::

                                     0000    88 	.IFF

                                     0000    89 	.WORD	^M<REGS>

                                     0000    90 	SRV'MODE	SRVNAME,NARG,NOSYNC

                                     0000    91 	.IFT

                                     0000    92 	.BLKL	2	

                                     0000    93 	.ENDC

                                     0000    94 	.IFF

                                     0000    95 	SRV'MODE	SRVNAME,NARG

                                     0000    96 	.ENDC

                                     0000    97 	.ENDM	GSYSSRV

                                     0000    98 

                                     0000    99 ;

                                     0000   100 ;	SRVK - GENERATE ENTRY FOR KERNEL MODE SERVICE

                                     0000   101 ;

                                     0000   102 ;	SRVK	SRVNAME,NARG

                                     0000   103 ;

                                     0000   104  

                                     0000   105 	.MACRO	SRVK,SRVNAME,NARG

                                     0000   106 	.IF	NDF,RMSSWITCH

                                     0000   107 	CHMK	#SRVNAME

                                     0000   108 	RET

                                     0000   109 	.PSECT	Y$CMODKN,BYTE

                                     0000   110 	.BYTE	NARG

                                     0000   111 	.PSECT	Y$CMODK,BYTE

                                     0000   112 	.WORD	EXE$'SRVNAME-KCASE+2

                                     0000   113 SRVNAME=KCASCTR

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   3

02                                                                                                                               (1)



                                     0000   114 KCASCTR=KCASCTR+1

                                     0000   115 	.ENDC

                                     0000   116 	.ENDM	SRVK

                                     0000   117 

                                     0000   118 ;

                                     0000   119 ;	SRVE - GENERATE ENTRY FOR EXECUTIVE MODE SERVICE

                                     0000   120 ;

                                     0000   121  

                                     0000   122 	.MACRO	SRVE,SRVNAME,NARG

                                     0000   123 	.IF	NDF,RMSSWITCH

                                     0000   124 	CHME	#SRVNAME

                                     0000   125 	RET

                                     0000   126 	.PSECT	Y$CMODEN,BYTE

                                     0000   127 	.BYTE	NARG

                                     0000   128 	.PSECT	Y$CMODE,BYTE

                                     0000   129 	.WORD	EXE$'SRVNAME-ECASE+2

                                     0000   130 	.ENDC

                                     0000   131 SRVNAME=ECASCTR

                                     0000   132 ECASCTR=ECASCTR+1

                                     0000   133 	.ENDM	SRVE

                                     0000   134 ;

                                     0000   135 ;

                                     0000   136 ;    MACROS FOR GENERATING RMS SYSTEM VECTORS

                                     0000   137 ;

                                     0000   138 	.MACRO	RMSSRV	SRVNAME	NARG=1,REGS=<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11>,-

                                     0000   139 			NOSYNC=0

                                     0000   140 	GSYSSRV	SRVNAME,R,NARG,<REGS>,NOSYNC

                                     0000   141 	.ENDM	RMSSRV

                                     0000   142 ;

                                     0000   143 ;  SRVR - GENERATE ENTRY FOR RMS SERVICE (EXEC MODE)

                                     0000   144 ;

                                     0000   145 	.MACRO	SRVR	SRVNAME,NARG,NOSYNC

                                     0000   146 	.IF	NDF,RMSSWITCH

                                     0000   147 	CHME	#SRVNAME

                                     0000   148 	.IF EQ NOSYNC

                                     0000   149 	.IIF GT <.+2-RMSSYNC>-127, RMSSYNC=RMSWBR	;RESET BRANCH DESTINATION

                                     0000   150 RMSWBR=.

                                     0000   151 	BRB	RMSSYNC

                                     0000   152 	.IFF

                                     0000   153 	RET

                                     0000   154 	.ENDC

                                     0000   155 	.PSECT	Y$CMODEN,BYTE

                                     0000   156 	.BYTE	NARG

                                     0000   157 	.IFF

                                     0000   158 	.PSECT	$$$RMSVEC,BYTE,NOWRT

                                     0000   159 	.WORD	RMS$'SRVNAME-RCASE+2

                                     0000   160 	.ENDC

                                     0000   161 SRVNAME=RCASCTR

                                     0000   162 RCASCTR=RCASCTR+1

                                     0000   163 	.ENDM	SRVR

                                     0000   164 

                                     0000   165 ;

                                     0000   166 ;	SRVALL - GENERATE ENTRY FOR ALL MODE SERVICE

                                     0000   167 ;

                                     0000   168  

                                     0000   169 	.MACRO	SRVALL,SRVNAME,NARG

                                     0000   170 	.IF NDF,RMSSWITCH

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   4

02                                                                                                                               (1)



                                     0000   171 	JMP	@#EXE$'SRVNAME+2

                                     0000   172 	.ENDC

                                     0000   173 	.ENDM	SRVALL

                                     0000   174 

                                     0000   178 	.NLIST	CND

                           00000000  0000   179 ECASCTR=0

                                     0000   456  

                                     0000   457 ;

                                     0000   458 ;	DEFINE REMAINING SERVICES

                                     0000   459 ;

                                     0000   460 

                                     0000   461 	GSYSSRV	ADJSTK,K,3,-		;ADJUST OUTER MODE STACK POINTER

                                     0000   462 		<R2,R3,R4,R5,R6>	;REGISTERS R2-R6

                                     0000   463 	GSYSSRV	ADJWSL,K,2,-		;ADJUST WORKING SET LIMIT

                                     0000   464 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   465 	GSYSSRV	ALCDNP,K,4,-		;ALLOCATE DIAGNOSTIC PAGE

                                     0000   466 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   467 	GSYSSRV	ALLOC,K,4,-		;ALLOCATE DEVICE

                                     0000   468 		<R2,R3,R4,R5,R6>	;REGISTERS R2-R6

                                     0000   469 	GSYSSRV	ASCEFC,K,4,-		;ASSOCIATE COMMON EVENT FLAG CLUSTER

                                     0000   470 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   471 	GSYSSRV	ASCTIM,ALL,3,-		;CONVERT TO ASCII TIME

                                     0000   472 		<R2,R3,R4,R5,R6>	;REGISTERS R2-R6

                                     0000   473 	GSYSSRV	ASSIGN,K,4,-		;ASSIGN I/O CHANNEL

                                     0000   474 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   475 	GSYSSRV	BINTIM,ALL,2,-		;CONVERT TO BINARY TIME

                                     0000   476 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   477 	GSYSSRV	CANCEL,K,1,-		;CANCEL I/O ON CHANNEL

                                     0000   478 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   479 	GSYSSRV	CANTIM,K,2,-		;CANCEL TIMER REQUEST

                                     0000   480 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   481 	GSYSSRV	CANWAK,K,2,-		;CANCEL WAKE UP REQUESTS

                                     0000   482 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   483 ;

                                     0000   484 ; ***** THE FOLLOWING IS OUT OF ALPHABETIC ORDER AS ITS NAME WAS CHANGED

                                     0000   485 ;

                                     0000   486 	GSYSSRV	CRMPSC,K,12,-		;CREATE AND MAP SECTION

                                     0000   487 		<R2,R3,R4,R5,R6,R7,R8,R9,R10> ;REGISTERS R2-R10

                                     0000   488 	GSYSSRV	CLRPAR,K,2,-		;CLEAR HARD PARITY ERROR

                                     0000   489 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   490 	GSYSSRV	CMEXEC,E,2,-		;CHANGE MODE TO EXECUTIVE

                                     0000   491 		<R4>			;REGISTER R4

                                     0000   492 	GSYSSRV	CMKRNL,K,2,-		;CHANGE MODE TO KERNEL

                                     0000   493 		<R4>			;REGISTER R4

                                     0000   494 	GSYSSRV	CLREF,K,1,-		;CLEAR EVENT FLAG

                                     0000   495 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   496 	GSYSSRV	CNTREG,K,4,-		;CONTRACT REGION

                                     0000   497 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   498 	GSYSSRV	GETPTI,K,5,-		;GET PAGE TABLE INFORMATION

                                     0000   499 		<R2,R3,R4,R5,R6,R7,R8,R9,R10> ;REGISTERS R2-R10

                                     0000   500 	GSYSSRV	CRELOG,K,4,-		;CREATE LOGICAL NAME

                                     0000   501 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   502 	GSYSSRV	CREMBX,K,7,-		;CREATE MAILBOX

                                     0000   503 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   504 	GSYSSRV	CREPRC,K,12,-		;CREATE PROCESS

                                     0000   505 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   506 	GSYSSRV	CRETVA,K,3,-		;CREATE VIRTUAL ADDRESS

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   5

02                                                                                                                               (1)



                                     0000   507 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   508 	GSYSSRV	DACEFC,K,1,-		;DISASSOCIATE EVENT FLAG CLUSTER

                                     0000   509 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   510 	GSYSSRV	DALLOC,K,2,-		;DEALLOCATE DEVICE

                                     0000   511 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   512 	GSYSSRV	DASSGN,K,1,-		;DEASSIGN I/O CHANNEL

                                     0000   513 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   514 	GSYSSRV	DCLAST,K,3,-		;DECLARE AST SYSTEM SERVICE

                                     0000   515 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   516 	GSYSSRV	DCLEXH,K,1,-		;DECLARE EXIT HANDLER

                                     0000   517 		<R2,R3,R4>		;REGISTERS R2-R4

                                     0000   518 	GSYSSRV	DELLOG,K,3,-		;DELETE LOGICAL NAME

                                     0000   519 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   520 	GSYSSRV	DELMBX,K,1,-		;DELETE MAILBOX

                                     0000   521 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   522 	GSYSSRV	DELPRC,K,2,-		;DELETE PROCESS

                                     0000   523 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R5

                                     0000   524 	GSYSSRV	DELTVA,K,3,-		;DELETE VIRTUAL ADDRESS

                                     0000   525 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   526 	GSYSSRV	DGBLSC,K,3,-		;DELETE GLOBAL SECTION

                                     0000   527 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   528 	GSYSSRV	DLCDNP,K,2,-		;DEALLOCATE DIAGNOSTIC PAGE

                                     0000   529 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   530 	GSYSSRV	DLCEFC,K,1,-		;DELETE COMMON EVENT CLUSTER

                                     0000   531 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   532 	GSYSSRV	UPDSEC,K,8,-		;UPDATE SECTION FILE

                                     0000   533 		<R2,R3,R4,R5,R6,R7,R8>	;R2-R8

                                     0000   534 	GSYSSRV	SNDERR,K,1,-		;SEND MSG TO ERROR LOGGER

                                     0000   535 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   536 	GSYSSRV	EXIT,K,1,-		;IMAGE EXIT

                                     0000   537 		<R4>			;REGISTER R4

                                     0000   538 	GSYSSRV	EXPREG,K,4,-		;EXPAND PROGRAM REGION

                                     0000   539 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   540 	GSYSSRV	FAO,ALL,0,-		;FORMAT ASCII OUTPUT

                                     0000   541 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ; REGISTERS R2-R11

                                     0000   542 	GSYSSRV	FAOL,ALL,0,-		;FORMAT ASCII OUTPUT WITH VALUE LIST

                                     0000   543 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   544 	GSYSSRV	FORCEX,K,3,-		;FORCE EXIT

                                     0000   545 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   546 	GSYSSRV	IMGSTA,ALL,6,-		;IMAGE STARTUP

                                     0000   547 		<>			;REGISTERS NONE

                                     0000   548 	GSYSSRV	GETJPP,K,2,-		;GET JOB/PROCESS PARAMETERS

                                     0000   549 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   550 	GSYSSRV	GETTIM,E,1,-		;GET TIME

                                     0000   551 		<>			;NO REGISTERS

                                     0000   552 	GSYSSRV	GTCHAN,K,5,-		;GET I/O CHANNEL DEVICE INFORMATION

                                     0000   553 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   554 	GSYSSRV	HIBER,K,0,-		;HIBERNATE

                                     0000   555 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   556 	GSYSSRV	IMGACT,E,4,-		;IMAGE ACTIVATION

                                     0000   557 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   558 	GSYSSRV	LCKPAG,K,3,-		;LOCK PAGE IN MEMORY

                                     0000   559 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   560 	GSYSSRV	LKWSET,K,3,-		;LOCK PAGES IN WORKING SET

                                     0000   561 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   562 	GSYSSRV	MGBLSC,K,7,-		;MAP GLOBAL SECTION

                                     0000   563 		<R2,R3,R4,R5,R6,R7,R8,R9,R10> ;REGISTERS R2-R10

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   6

02                                                                                                                               (1)



                                     0000   564 	GSYSSRV	PURGWS,K,1,-		;PURGE WORKING SET

                                     0000   565 		<R2,R3,R4,R5,R6,R7,R8>	;R2-R8

                                     0000   566 	GSYSSRV	NUMTIM,E,2,-		;CONVERT TIME TO NUMERIC

                                     0000   567 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   568 	GSYSSRV	SNDOPR,E,2,-		;SEND MSG TO OPERATOR

                                     0000   569 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11>	;REGISTERS R2-R11

                                     0000   570 	GSYSSRV	QIO,K,11,-		;QUEUE I/O REQUEST

                                     0000   571 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   572 	GSYSSRV	READEF,K,2,-		;READ EVENT FLAG

                                     0000   573 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   574 	GSYSSRV	RESUME,K,2,-		;RESUME PROCESS

                                     0000   575 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   576 	GSYSSRV	RUNDWN,K,1,-		;RUNDOWN

                                     0000   577 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   578 	GSYSSRV	SNDSMB,E,2,-		;SEND MSG TO SYMBIONT MANAGER

                                     0000   579 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11>	;REGISTERS R2-R11

                                     0000   580 	GSYSSRV	SCHDWK,K,4,-		;SCHEDULE WAKEUP

                                     0000   581 		<R2,R3,R4,R5,R6,R7,R8,R9> ;REGISTERS R2-R9

                                     0000   582 	GSYSSRV	SETAST,K,1,-		;SET AST ENABLE SERVICE

                                     0000   583 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   584 	GSYSSRV	SETEF,K,1,-		;SET EVENT FLAG

                                     0000   585 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   586 	GSYSSRV	SETEXV,K,4,-		;SET EXCEPTION VECTOR

                                     0000   587 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   588 	GSYSSRV	SETPRN,K,1,-		;SET PROCESS  NAME

                                     0000   589 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   590 	GSYSSRV	SETPRA,K,2,-		;SET POWER RECOVERY AST

                                     0000   591 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   592 	GSYSSRV	SETIMR,K,4,-		;SET TIMER

                                     0000   593 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   594 	GSYSSRV	SETPRI,K,4,-		;SET PROCESS PRIORITY

                                     0000   595 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   596 	GSYSSRV	SETPRT,K,5,-		;SET PAGE PROTECTION

                                     0000   597 		<R2,R3,R4,R5,R6,R7,R8,R9> ;REGISTERS R2-R9

                                     0000   598 	GSYSSRV	SETRWM,K,1,-		;SET RESOURCE WAIT MODE

                                     0000   599 		<R4>			;REGISTER R4

                                     0000   600 	GSYSSRV	SETSFM,K,1,-		;SET SYSTEM SERVICE FAILURE MODE

                                     0000   601 		<R4>			;REGISTER R4

                                     0000   602 	GSYSSRV	SETSWM,K,1,-		;SET PROCESS SWAP MODE

                                     0000   603 		<R4>			;REGISTER R4

                                     0000   604 	GSYSSRV	SUSPND,K,2,-		;SUSPEND PROCESS

                                     0000   605 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   606 	GSYSSRV	TRNLOG,K,6,-		;TRANSLATE LOGICAL NAME

                                     0000   607 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   608 	GSYSSRV	ULKPAG,K,3,-		;UNLOCK PAGE FROM MEMORY

                                     0000   609 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   610 	GSYSSRV	ULWSET,K,3,-		;UNLOCK PAGES FROM WORKING SET

                                     0000   611 		<R2,R3,R4,R5,R6,R7,R8>	;REGISTERS R2-R8

                                     0000   612 	GSYSSRV	UNWIND,ALL,2,-		;UNWIND PROCEDURE CALL STACK

                                     0000   613 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   614 	GSYSSRV	WAITFR,K,1,-		;WAIT FOR EVENT FLAG

                                     0000   615 		<R2,R3,R4,R5,R6>	;REGISTERS R2-R6

                                     0000   616 	GSYSSRV	WAKE,K,2,-		;WAKE PROCESS

                                     0000   617 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   618 	GSYSSRV	WFLAND,K,2,-		;WAIT FOR LOGICAL AND OF EVENT FLAGS

                                     0000   619 		<R2,R3,R4,R5,R6>	;REGISTERS R2-R6

                                     0000   620 	GSYSSRV	WFLOR,K,2,-		;WAIT FOR LOGICAL OR OF EVENT FLAGS

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   7

02                                                                                                                               (1)



                                     0000   621 		<R2,R3,R4,R5,R6>	;REGISTERS R2-R5

                                     0000   622 	GSYSSRV	BRDCST,K,2,-		;BROADCAST TO TERMINALS

                                     0000   623 		<R2,R3,R4,R5,R6,R7>	;REGISTERS R2-R7

                                     0000   624 	GSYSSRV	DCLCMH,K,3,-		;DECLARE CHANGE MODE HANDLER

                                     0000   625 		<R4>			;SAVE R4

                                     0000   626 	GSYSSRV	SETPFM,K,1,-		;SET PAGE FAULT MONITORING

                                     0000   627 		<R2,R3,R4,R5,R6>	;REGISTERS R2-R6

                                     0000   628 	GSYSSRV	GETMSG,ALL,5,-		;GET MESSAGE

                                     0000   629 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   630 	GSYSSRV	DERLMB,K,1,-		;DECLARE ERROR LOG MAILBOX

                                     0000   631 		<R2,R3,R4,R5>		;REGISTERS R2-R5

                                     0000   632 	GSYSSRV	CANEXH,K,1,-		;CANCEL EXIT HANDLER

                                     0000   633 		<R2,R3,R4>		;REGISTERS R2-R4

                                     0000   634 	GSYSSRV	GETCHN,K,5,-		;GET CHANNEL INFORMATION

                                     0000   635 		<R2,R3,R4,R5,R6,R7,R8,R9> ;REGISTERS R2-R9

                                     0000   636 	GSYSSRV	GETDEV,K,5,-		;GET DEVICE INFORMATION

                                     0000   637 		<R2,R3,R4,R5,R6,R7,R8,R9> ;REGISTERS R2-R9

                                     0000   638 	GSYSSRV	GETJPI,K,7,-		;GET JOB PROCESS INFORMATION

                                     0000   639 		<R2,R3,R4,R5,R6,R7,R8,R9> ;REGISTERS R2-R9

                                     0000   640 	GSYSSRV	PUTMSG,ALL,3,-		;PUT FORMATTED ERROR MESSAGE

                                     0000   641 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   642 	GSYSSRV	EXCMSG,ALL,2,-		;OUTPUT EXCEPTION SUMMARY MESSAGE

                                     0000   643 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   644 	GSYSSRV	SNDACC,E,2,-		;SEND MSG TO ACOUNTING MANAGER

                                     0000   645 		<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11> ;REGISTERS R2-R11

                                     0000   646 

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   8

02                                                                                                                               (1)



                                     0000   650 ;

                                     0000   651 ;  CASE DISPATCHER FOR RMS SERVICES

                                     0000   652 ;

                                     0000   653 ;	R0 HAS SERVICE DISPATCH CODE.

                                     0000   654 ;	IF IN RANGE DISPATCHES TO APPROPRIATE RMS SERVICE,

                                     0000   655 ;	ELSE SIMPLY DOES AN RSB

                                     0000   656 ;

                                 00000000   657 	.PSECT	$$$RMSVEC,BYTE,NOWRT	;MUST BE FIRST PSECT IN RMS

                                     0000   658 RMS$DISPATCH:				;MUST BE FIRST CODE IN FIRST RMS PSECT

            07'           50     AF  0000   659 	CASEW	R0,S^#RCASMIN,S^#RCASMAX

                          27'        0003       

                                     0004   660 

                                     0004   661 RCASE:

                                     0004   753 ;

                                     0004   754 ;  HIGH USE RECORD OPERATIONS

                                     0004   755 ;

                                     0004   756 	RMSSRV	DELETE		;DELETE A RECORD

                                     0006   757 	RMSSRV	FIND		;FIND RECORD

                                     0008   758 	RMSSRV	FREE		;RELEASE LOCK ON ALL RECORDS

                                     000A   759 	RMSSRV	GET		;GET A RECORD

                                     000C   760 	RMSSRV	PUT		;PUT A RECORD

                                     000E   761 	RMSSRV	READ		;READ A BLOCK

                                     0010   762 	RMSSRV	RELEASE		;RELEASE LOCK ON NAMED RECORD

                                     0012   763 	RMSSRV	UPDATE		;REWRITE EXISTING RECORD

                                     0014   767 	RMSSRV	WAIT		;STALL FOR RECORD OPERATION COMPLETE

                                     0016   771 	RMSSRV	WRITE		;WRITE BLOCK

                                     0018   772 ;

                                     0018   773 ;  LOWER USAGE OPERATIONS

                                     0018   774 ;

                                     0018   775 	RMSSRV	CLOSE		;CLOSE FILE

                                     001A   776 	RMSSRV	CONNECT		;CONNECT RAB

                                     001C   777 	RMSSRV	CREATE		;CREATE FILE

                                     001E   778 	RMSSRV	DISCONNECT	;DISCONNECT RAB

                                     0020   779 	RMSSRV	DISPLAY		;DISPLAY FILE INFORMATION

                                     0022   780 	RMSSRV	ERASE		;ERASE (DELETE) FILE

                                     0024   781 	RMSSRV	EXTEND		;EXTEND FILE ALLOCATION

                                     0026   782 	RMSSRV	FLUSH		;FINISH I/O ACTIVITY FOR STREAM

                                     0028   783 	RMSSRV	MODIFY		;MODIFY FILE ATTRIBUTES

                                     002A   784 	RMSSRV	NXTVOL		;NEXT VOLUME

                                     002C   785 	RMSSRV	OPEN		;OPEN FILE

                                     002E   786 	RMSSRV	REWIND		;REWIND FILE

                                     0030   787 	RMSSRV	SPACE		;POSITION FOR TRANSFER

                                     0032   788 	RMSSRV	TRUNCATE	;TRUNCATE FILE

                                     0034   789 	RMSSRV	ENTER		;ENTER FILENAME INTO DIRECTORY

                                     0036   790 	RMSSRV	PARSE		;PARSE FILENAME SPECIFICATION

                                     0038   791 	RMSSRV	REMOVE		;REMOVE FILENAME FROM DIRECTORY

                                     003A   792 	RMSSRV	RENAME,NARG=4	;RENAME A FILE

                                     003C   793 	RMSSRV	SEARCH		;SEARCH A FILE DIRECTORY

                                     003E   794 	RMSSRV	SETDDIR,REGS=<R2,R3,R4,R5>,NARG=3,NOSYNC=1

                                     0040   795 				;SET DEFAULT DIRECTORY STRING

                                     0040   796 	RMSSRV	SETDFPROT,REGS=<R2,R3>,NARG=2,NOSYNC=1

                                     0042   797 				;SET DEFAULT FILE PROTECTION MASK

                                     0042   798 	RMSSRV	SSVEXC,REGS=<>,NOSYNC=1

                                     0044   799 				;GENERATE SYS SERV EXCEPTION

                                     0044   800 	RMSSRV	RMSRUNDWN,NARG=2,NOSYNC=1

                                     0046   801 				;PERFORM RUNDOWN ON RMS FILES

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page   9

02                                                                                                                               (1)



                                 00000046   915 	.PSECT	$$$RMSVEC,BYTE,NOWRT

                                 05  0046   916 	RSB				;NOT AN RMS EXEC MODE SERVICE

                                     0047   917 ;

                                     0047   918 ;  SERVICE TO MERELY MOVE RMS STATUS CODE IN R2 TO R0 AND RET,

                                     0047   919 ;  THUS GENERATING A SYSTEM SERVICE FAILURE EXCEPTION IF ENABLED

                                     0047   920 ;

                           00000045  0047   921 RMS$SSVEXC=.-2

            50            52     D0  0047   922 	MOVL	R2,R0			;MOVE STATUS CODE TO R0

                                 04  004A   923 	RET				;AND LET RET DO THE REST

                                     004B   925 	.END

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page  10

SYMBOL TABLE                                                                                                                     (1)



BIT...         = 00000000            PCB$V_LOGIN    = 00000014            PHD$L_PAGEFLTS   0000004C            

CLOSE          = 00000011            PCB$V_NETWRK   = 00000015            PHD$L_PAGFIL     0000001C            

CMEXEC         = 00000000            PCB$V_NOACNT   = 0000000F            PHD$L_PC         000000C0            

CONNECT        = 00000012            PCB$V_NODELET  = 00000017            PHD$L_PCB        00000078            

CREATE         = 00000013            PCB$V_PHDRES   = 00000012            PHD$L_PGFLCNT    00000034            

DELETE         = 00000007            PCB$V_PSWAPM   = 00000004            PHD$L_PGFLQUOTA  0000005C            

DISCONNECT     = 00000014            PCB$V_PWRAST   = 00000016            PHD$L_PSL        000000C4            

DISPLAY        = 00000015            PCB$V_RES      = 00000000            PHD$L_PSTBASOFF  00000020            

ECASCTR        = 00000007            PCB$V_RESPEN   = 00000005            PHD$L_PTWSLELCK  00000064            

ENTER          = 0000001F            PCB$V_SSFEXC   = 00000006            PHD$L_PTWSLEVAL  00000068            

ERASE          = 00000016            PCB$V_SSFEXCE  = 00000007            PHD$L_R0         00000088            

EXTEND         = 00000017            PCB$V_SSFEXCS  = 00000008            PHD$L_R1         0000008C            

FIND           = 00000008            PCB$V_SSFEXCU  = 00000009            PHD$L_R10        000000B0            

FLUSH          = 00000018            PCB$V_SSRWAIT  = 0000000A            PHD$L_R11        000000B4            

FREE           = 00000009            PCB$V_SUSPEN   = 0000000B            PHD$L_R12        000000B8            

GBL...         = 00000000            PCB$V_SWPVBN   = 00000010            PHD$L_R13        000000BC            

GET            = 0000000A            PCB$V_WAKEPEN  = 0000000C            PHD$L_R2         00000090            

GETTIM         = 00000001            PCB$V_WALL     = 0000000D            PHD$L_R3         00000094            

IMGACT         = 00000002            PCB$W_APTCNT     00000034            PHD$L_R4         00000098            

MODIFY         = 00000019            PCB$W_ASTCNT     0000003C            PHD$L_R5         0000009C            

NUMTIM         = 00000003            PCB$W_BIOCNT     0000003E            PHD$L_R6         000000A0            

NXTVOL         = 0000001A            PCB$W_BIOLM      00000040            PHD$L_R7         000000A4            

OPEN           = 0000001B            PCB$W_BYTCNT     00000042            PHD$L_R8         000000A8            

PARSE          = 00000020            PCB$W_BYTLM      00000068            PHD$L_R9         000000AC            

PCB$B_ASTACT     0000000C            PCB$W_DIOCNT     00000044            PHD$L_REFERFLT   00000014            

PCB$B_ASTEN      0000000D            PCB$W_DIOLM      00000046            PHD$L_SSP        00000080            

PCB$B_PRI        0000000B            PCB$W_FILCNT     00000048            PHD$L_USP        00000084            

PCB$B_PRIB       00000033            PCB$W_GPGCNT     00000038            PHD$L_WSL        00000118            

PCB$B_TYPE       0000000A            PCB$W_GRP        00000022            PHD$M_DALCSTX  = 00000002            

PCB$B_WEFC       00000032            PCB$W_MEM        00000020            PHD$M_PFMFLG   = 00000001            

PCB$C_LENGTH     0000007C            PCB$W_MTXCNT     0000000E            PHD$M_WSPEAKCHK= 00000004            

PCB$K_LENGTH     0000007C            PCB$W_PPGCNT     0000003A            PHD$Q_PRIVMSK    00000000            

PCB$L_ASTQBL     00000014            PCB$W_PRCCNT     0000006A            PHD$S_ASTLVL   = 00000008            

PCB$L_ASTQFL     00000010            PCB$W_SIZE       00000008            PHD$S_P0LR     = 00000018            

PCB$L_EFC2P      00000058            PCB$W_STATE      00000030            PHD$V_ASTLVL   = 00000018            

PCB$L_EFC3P      0000005C            PCB$W_TMBU       00000036            PHD$V_DALCSTX  = 00000001            

PCB$L_EFCS       00000050            PCB$W_TQCNT      0000004A            PHD$V_P0LR     = 00000000            

PCB$L_EFCU       00000054            PHD$B_ASTLVL     000000CF            PHD$V_PFMFLG   = 00000000            

PCB$L_EFWM       0000004C            PHD$B_DFPFC      00000038            PHD$V_WSPEAKCHK= 00000002            

PCB$L_OWNER      0000001C            PHD$B_PAGFIL     0000001F            PHD$W_ASTLM      00000044            

PCB$L_PHD        00000064            PHD$B_PGTBPFC    00000039            PHD$W_BAK        00000048            

PCB$L_PHYPCB     00000018            PHD$C_LENGTH     00000118            PHD$W_DFWSCNT    0000001A            

PCB$L_PID        00000060            PHD$C_PHDPAGCTX= 00000008            PHD$W_EMPTPG     000000D8            

PCB$L_PQB        0000004C            PHD$K_LENGTH     00000118            PHD$W_EXTDYNWS   00000076            

PCB$L_SQBL       00000004            PHD$L_BIOCNT     00000054            PHD$W_FILLM      00000060            

PCB$L_SQFL       00000000            PHD$L_CPULIM     00000058            PHD$W_FLAGS      0000003A            

PCB$L_STS        00000028            PHD$L_CPUTIM     0000003C            PHD$W_PHVINDEX   00000046            

PCB$L_UIC        00000020            PHD$L_DIOCNT     00000050            PHD$W_PRCLM      00000042            

PCB$L_WSSWP      00000024            PHD$L_ESP        0000007C            PHD$W_PST        00000020            

PCB$L_WTIME      0000002C            PHD$L_FREP0VA    00000028            PHD$W_PSTBASMAX  0000004A            

PCB$T_LNAME      0000006C            PHD$L_FREP1VA    00000030            PHD$W_PSTFREE    00000026            

PCB$V_ASTPEN   = 00000011            PHD$L_FREPTECNT  0000002C            PHD$W_PSTLAST    00000024            

PCB$V_BATCH    = 0000000E            PHD$L_KSP        00000078            PHD$W_PTCNTACT   00000070            

PCB$V_DELPEN   = 00000001            PHD$L_P0BR       000000C8            PHD$W_PTCNTLCK   0000006C            

PCB$V_FORCPEN  = 00000002            PHD$L_P0LRASTL   000000CC            PHD$W_PTCNTMAX   00000072            

PCB$V_HIBER    = 00000013            PHD$L_P1BR       000000D0            PHD$W_PTCNTVAL   0000006E            

PCB$V_INQUAN   = 00000003            PHD$L_P1LR       000000D4            PHD$W_QUANT      00000040            

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page  11

SYMBOL TABLE                                                                                                                     (1)



PHD$W_TQLM       00000062            PSL$M_DV       = 00000080            RMS$REWIND       ********   X   03   

PHD$W_WSAUTH     0000000A            PSL$M_FPD      = 08000000            RMS$RMSRUNDWN    ********   X   03   

PHD$W_WSDYN      0000000E            PSL$M_FU       = 00000040            RMS$SEARCH       ********   X   03   

PHD$W_WSFLUID    00000074            PSL$M_IPL      = 001F0000            RMS$SETDDIR      ********   X   03   

PHD$W_WSLAST     00000012            PSL$M_IS       = 04000000            RMS$SETDFPROT    ********   X   03   

PHD$W_WSLIST     00000008            PSL$M_IV       = 00000020            RMS$SPACE        ********   X   03   

PHD$W_WSLOCK     0000000C            PSL$M_PRVMOD   = 00C00000            RMS$SSVEXC     = 00000045 R     03   

PHD$W_WSLX       0000004A            PSL$M_SAFBITS  = 000037FF            RMS$TRUNCATE     ********   X   03   

PHD$W_WSNEXT     00000010            PSL$M_TBIT     = 00000010            RMS$UPDATE       ********   X   03   

PHD$W_WSQUOTA    00000018            PSL$M_TP       = 40000000            RMS$WAIT         ********   X   03   

PR$_ACCR       = 00000029            PSL$S_CURMOD   = 00000002            RMS$WRITE        ********   X   03   

PR$_ACCS       = 00000028            PSL$S_IPL      = 00000005            RMSRUNDWN      = 00000027            

PR$_ASTLVL     = 00000013            PSL$S_PRVMOD   = 00000002            RMSSWITCH      = 00000001            

PR$_ESP        = 00000001            PSL$V_CM       = 0000001F            SEARCH         = 00000023            

PR$_ICCS       = 00000018            PSL$V_CURMOD   = 00000018            SETDDIR        = 00000024            

PR$_ICR        = 0000001A            PSL$V_DV       = 00000007            SETDFPROT      = 00000025            

PR$_IPL        = 00000012            PSL$V_FPD      = 0000001B            SGN$C_BALSETCNT= 00000018            

PR$_ISP        = 00000004            PSL$V_FU       = 00000006            SGN$C_DFWSCNT  = 00000064            

PR$_KSP        = 00000000            PSL$V_IPL      = 00000010            SGN$C_DFWSQUOTA= 00000078            

PR$_MAPEN      = 00000038            PSL$V_IS       = 0000001A            SGN$C_GBLSECCNT= 00000028            

PR$_NICR       = 00000019            PSL$V_IV       = 00000005            SGN$C_MAXGPGCNT= 00000800            

PR$_P0BR       = 00000008            PSL$V_PRVMOD   = 00000016            SGN$C_MAXPAGCNT= 00004000            

PR$_P0LR       = 00000009            PSL$V_TBIT     = 00000004            SGN$C_MAXPGFL  = 00001000            

PR$_P1BR       = 0000000A            PSL$V_TP       = 0000001E            SGN$C_MAXPSTCNT= 00000005            

PR$_P1LR       = 0000000B            PUT            = 0000000B            SGN$C_MAXVPGCNT= 00002000            

PR$_PCBB       = 00000010            RCASCTR        = 00000028            SGN$C_MAXWSCNT = 00000400            

PR$_PME        = 0000003D            RCASE            00000004 R     03   SGN$C_MINWSCNT = 0000000A            

PR$_RXCS       = 00000020            RCASMAX        = 00000027            SGN$C_NPAGEDYN = 00006800            

PR$_RXDB       = 00000021            RCASMIN        = 00000007            SGN$C_NPROCS   = 00000040            

PR$_SBIER      = 00000034            READ           = 0000000C            SGN$C_PAGEDYN  = 00004000            

PR$_SBIFS      = 00000030            RELEASE        = 0000000D            SGN$C_PHYPAGCNT= 00001000            

PR$_SBIMT      = 00000033            REMOVE         = 00000021            SGN$C_SFTMAX   = 00000003            

PR$_SBIQC      = 00000036            RENAME         = 00000022            SGN$C_SYSDWSCNT= 00000028            

PR$_SBIS       = 00000031            REWIND         = 0000001C            SGN$C_SYSVECPGS= 00000003            

PR$_SBISC      = 00000032            RMS$CLOSE        ********   X   03   SGN$C_SYSWSCNT = 00000060            

PR$_SBITA      = 00000035            RMS$CONNECT      ********   X   03   SNDACC         = 00000006            

PR$_SBR        = 0000000C            RMS$CREATE       ********   X   03   SNDOPR         = 00000004            

PR$_SCBB       = 00000011            RMS$DELETE       ********   X   03   SNDSMB         = 00000005            

PR$_SID        = 0000003E            RMS$DISCONNECT   ********   X   03   SPACE          = 0000001D            

PR$_SIRR       = 00000014            RMS$DISPATCH     00000000 R     03   SS$_ABORT      = 0000002C            

PR$_SISR       = 00000015            RMS$DISPLAY      ********   X   03   SS$_ACCONFLICT = 00000800            

PR$_SLR        = 0000000D            RMS$ENTER        ********   X   03   SS$_ACCVIO     = 0000000C            

PR$_SSP        = 00000002            RMS$ERASE        ********   X   03   SS$_ACPVAFUL   = 000002FC            

PR$_TBIA       = 00000039            RMS$EXTEND       ********   X   03   SS$_ARTRES     = 00000474            

PR$_TBIS       = 0000003A            RMS$FIND         ********   X   03   SS$_ASTFLT     = 0000040C            

PR$_TODR       = 0000001B            RMS$FLUSH        ********   X   03   SS$_BADATTRIB  = 00000034            

PR$_TXCS       = 00000022            RMS$FREE         ********   X   03   SS$_BADCHKSUM  = 00000808            

PR$_TXDB       = 00000023            RMS$GET          ********   X   03   SS$_BADESCAPE  = 0000003C            

PR$_USP        = 00000003            RMS$MODIFY       ********   X   03   SS$_BADFILEHDR = 00000810            

PR$_WCSA       = 0000002C            RMS$NXTVOL       ********   X   03   SS$_BADFILENAME= 00000818            

PR$_WCSD       = 0000002D            RMS$OPEN         ********   X   03   SS$_BADFILEVER = 00000820            

PSL$C_EXEC     = 00000001            RMS$PARSE        ********   X   03   SS$_BADIMGHDR  = 00000044            

PSL$C_KERNEL   = 00000000            RMS$PUT          ********   X   03   SS$_BADIRECTORY= 00000828            

PSL$C_SUPER    = 00000002            RMS$READ         ********   X   03   SS$_BADPARAM   = 00000014            

PSL$C_USER     = 00000003            RMS$RELEASE      ********   X   03   SS$_BADSTACK   = 000002B4            

PSL$M_CM       = 80000000            RMS$REMOVE       ********   X   03   SS$_BEGOFFILE  = 00000938            

PSL$M_CURMOD   = 03000000            RMS$RENAME       ********   X   03   SS$_BLOCKCNTERR= 00000940            

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page  12

SYMBOL TABLE                                                                                                                     (1)



SS$_BREAK      = 00000414            SS$_FORMAT     = 000000BC            SS$_NONEXPR    = 000008E8            

SS$_BUFBYTALI  = 0000030C            SS$_GPTFULL    = 000000C4            SS$_NONLOCAL   = 000008F0            

SS$_BUFFEROVF  = 00000601            SS$_GSDFULL    = 000000CC            SS$_NOPRIV     = 00000024            

SS$_BUGCHECK   = 000002A4            SS$_HANGUP     = 000002CC            SS$_NORMAL     = 00000001            

SS$_CANCEL     = 00000830            SS$_HEADERFULL = 000008C8            SS$_NOSIGNAL   = 00000900            

SS$_CHANINTLK  = 0000004C            SS$_IDXFILEFULL= 000008D0            SS$_NOSOLICIT  = 00000284            

SS$_CLIFRCEXT  = 00000980            SS$_ILLBLKNUM  = 000000DC            SS$_NOSUCHDEV  = 00000908            

SS$_CMODSUPR   = 0000041C            SS$_ILLCNTRFUNC= 000000E4            SS$_NOSUCHFILE = 00000910            

SS$_CMODUSER   = 00000424            SS$_ILLEFC     = 000000EC            SS$_NOSUCHNODE = 0000028C            

SS$_COMPAT     = 0000042C            SS$_ILLIOFUNC  = 000000F4            SS$_NOSUCHSEC  = 00000978            

SS$_CONTINUE   = 00000001            SS$_ILLLBLAST  = 00000968            SS$_NOTAPEOP   = 00000264            

SS$_CONTROLC   = 00000651            SS$_ILLPAGCNT  = 000000FC            SS$_NOTFILEDEV = 000001CC            

SS$_CONTROLO   = 00000609            SS$_ILLSEQOP   = 000002DC            SS$_NOTINTBLSZ = 000001D4            

SS$_CONTROLY   = 00000611            SS$_ILLSER     = 00000104            SS$_NOTLABELMT = 000001DC            

SS$_CREATED    = 00000619            SS$_ILLUSRLBLRD= 00000958            SS$_NOTMODIFIED= 00000659            

SS$_CTRLERR    = 00000054            SS$_ILLUSRLBLWT= 00000960            SS$_NOTNETDEV  = 000002EC            

SS$_DATACHECK  = 0000005C            SS$_INCVOLLABEL= 0000010C            SS$_NOTRAN     = 00000629            

SS$_DATAOVERUN = 00000838            SS$_INSFARG    = 00000114            SS$_NOTSQDEV   = 000001E4            

SS$_DEBUG      = 0000046C            SS$_INSFMEM    = 00000124            SS$_OPCCUS     = 00000434            

SS$_DECOVF     = 000004A4            SS$_INSFRAME   = 0000012C            SS$_OPCDEC     = 0000043C            

SS$_DEVACTIVE  = 000002C4            SS$_INSFWSL    = 0000011C            SS$_OPINCOMPL  = 000002D4            

SS$_DEVALLOC   = 00000840            SS$_INTDIV     = 00000484            SS$_PAGOWNVIO  = 000001EC            

SS$_DEVALRALLOC= 00000641            SS$_INTOVF     = 0000047C            SS$_PAGRDERR   = 00000444            

SS$_DEVASSIGN  = 00000848            SS$_IVADDR     = 00000134            SS$_PARITY     = 000001F4            

SS$_DEVFOREIGN = 00000064            SS$_IVCHAN     = 0000013C            SS$_PARTESCAPE = 000001FC            

SS$_DEVICEFULL = 00000850            SS$_IVCHNLSEC  = 0000026C            SS$_PFMBSY     = 00000204            

SS$_DEVMOUNT   = 0000006C            SS$_IVDEVNAM   = 00000144            SS$_PLHLDR     = 00000404            

SS$_DEVNOTALLOC= 00000858            SS$_IVGSDNAM   = 0000014C            SS$_PSTFULL    = 0000020C            

SS$_DEVNOTMBX  = 00000074            SS$_IVLOGNAM   = 00000154            SS$_RADRMOD    = 0000044C            

SS$_DEVNOTMOUNT= 0000007C            SS$_IVLOGTAB   = 0000015C            SS$_REJECT     = 00000294            

SS$_DEVOFFLINE = 00000084            SS$_IVPROTECT  = 000002F4            SS$_REMOTE     = 00000649            

SS$_DIRFULL    = 00000860            SS$_IVQUOTAL   = 00000164            SS$_RESIGNAL   = 00000918            

SS$_DRVERR     = 0000008C            SS$_IVSECFLG   = 0000016C            SS$_RESULTOVF  = 00000214            

SS$_DUPFILENAME= 00000868            SS$_IVSECIDCTL = 000002E4            SS$_ROPRAND    = 00000454            

SS$_DUPLNAM    = 00000094            SS$_IVSSRQ     = 00000174            SS$_SECTBLFUL  = 0000021C            

SS$_ENDOFFILE  = 00000870            SS$_IVSTSFLG   = 0000017C            SS$_SSFAIL     = 0000045C            

SS$_ENDOFTAPE  = 00000878            SS$_IVTIME     = 00000184            SS$_SUBRNG     = 000004AC            

SS$_ENDOFUSRLBL= 00000970            SS$_LCKPAGFUL  = 000000D4            SS$_SUPERSEDE  = 00000631            

SS$_EXQUOTA    = 0000001C            SS$_LENVIO     = 0000018C            SS$_TAPEPOSLOST= 00000224            

SS$_EXTIDXFILE = 00000880            SS$_LKWSETFUL  = 00000194            SS$_TBIT       = 00000464            

SS$_FCPREADERR = 00000888            SS$_MBFULL     = 000008D8            SS$_TIMEOUT    = 0000022C            

SS$_FCPREPSTN  = 00000988            SS$_MBTOOSML   = 0000019C            SS$_TOOMANYVER = 00000990            

SS$_FCPREWNDERR= 00000890            SS$_MCHECK     = 000002BC            SS$_TOOMUCHDATA= 0000029C            

SS$_FCPSPACERR = 00000898            SS$_MEDOFL     = 000001A4            SS$_UNASEFC    = 00000234            

SS$_FCPWRITERR = 000008A0            SS$_MSGNOTFND  = 00000621            SS$_UNSAFE     = 0000023C            

SS$_FILACCERR  = 0000009C            SS$_MTLBLLONG  = 00000304            SS$_UNWIND     = 00000920            

SS$_FILALRACC  = 000000A4            SS$_MUSTCLOSEFL= 00000948            SS$_UNWINDING  = 00000928            

SS$_FILELOCKED = 000008A8            SS$_NOAQB      = 00000314            SS$_VASFULL    = 00000244            

SS$_FILENUMCHK = 000008B0            SS$_NODATA     = 000001AC            SS$_VECINUSE   = 0000024C            

SS$_FILESEQCHK = 000008B8            SS$_NOHANDLER  = 000008F8            SS$_VOLINV     = 00000254            

SS$_FILESTRUCT = 000008C0            SS$_NOHOMEBLK  = 000008E0            SS$_WAITUSRLBL = 00000950            

SS$_FILNOTACC  = 000000AC            SS$_NOIOCHAN   = 000001B4            SS$_WASCLR     = 00000001            

SS$_FILNOTCNTG = 000002AC            SS$_NOLINKS    = 0000027C            SS$_WASECC     = 00000639            

SS$_FILNOTEXP  = 000000B4            SS$_NOLOGNAM   = 000001BC            SS$_WASSET     = 00000009            

SS$_FLTDIV     = 00000494            SS$_NOMBX      = 00000274            SS$_WRITLCK    = 0000025C            

SS$_FLTOVF     = 0000048C            SS$_NOMOREFILES= 00000930            SS$_WRONGACP   = 0000031C            

SS$_FLTUND     = 0000049C            SS$_NONEXDRV   = 000001C4            SSVEXC         = 00000026            

RMSVECTOR       - RMS SERVICE VECTOR DEFINITIONS                 21-AUG-1978 20:08:16   VAX-11 MACRO X0.3-11               Page  13

SYMBOL TABLE                                                                                                                     (1)



TRUNCATE       = 0000001E            

UPDATE         = 0000000E            

WAIT           = 0000000F            

WRITE          = 00000010            





PROGRAM SECTION SYNOPSIS



.  ABS  .        00000000      00     NOPIC   USR   CON   ABS   LCL NOSHR NOEXE NORD  NOWRT BYTE  

. BLANK .        00000000      01     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  

$ABS$            0000011C      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

$$$RMSVEC        0000004B      03     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD  NOWRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

11802. BYTES LEFT IN FREE MEMORY POOL.

2524. BYTES OF RECLAIMED MEMORY.

OBJ$:RMSVECTOR,LIS$:RMSVECTOR/-SP=EXECML$/ML,SRC$:RMSW,CMODSSDSP

4 MLB DIR RDS - 740 GETS TO DEFINE 15 MACROS. 93 INTER. FILE WRITES. 

