RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)      42  DECLARATIONS

   (1)      70  RM$UPDATE2 - HIGH LEVEL RELATIVE $UPDATE

   (1)     150  RM$DELETE2 - HIGH LEVEL RELATIVE $DELETE

   (1)     227  UPDDLT2  -  COMMON $UPDATE/$DELETE RELATIVE ROU

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   1

007                                                                                                                              (1)



                                     0000     1 	$BEGIN	RM2UPDDEL,007,$RMS2,<RELATIVE SPECIFIC $UPDATE AND $DELETE>

                                     0000     2 ;

                                     0000     3 ; COPYRIGHT (C) 1977, 1978

                                     0000     4 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000     5 ;

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

                                     0000     7 ; COMPUTER  SYSTEM AND  MAY BE  COPIED ONLY WITH  THE INCLUSION OF THE

                                     0000     8 ; ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE, OR ANY OTHER COPIES THEREOF,

                                     0000     9 ; MAY NOT BE PROVIDED OR  OTHERWISE MADE AVAILABLE TO ANY OTHER PERSON

                                     0000    10 ; EXCEPT FOR USE ON SUCH SYSTEM AND TO ONE WHO AGREES TO THESE LICENSE

                                     0000    11 ; TERMS.  TITLE TO AND  OWNERSHIP OF THE  SOFTWARE  SHALL AT ALL TIMES

                                     0000    12 ; REMAIN IN DEC.

                                     0000    13 ;

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

                                     0000    15 ; AND SHOULD  NOT BE CONSTRUED  AS A COMMITMENT  BY DIGITAL  EQUIPMENT

                                     0000    16 ; CORPORATION.

                                     0000    17 ;

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

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

                                     0000    20 ;

                                     0000    21 ;++

                                     0000    22 ; FACILITY: RMS32

                                     0000    23 ;

                                     0000    24 ; ABSTRACT:

                                     0000    25 ;		THIS MODULE PROVIDES RELATIVE FILE ORGANIZATION

                                     0000    26 ;		SPECIFIC PROCESSING FOR THE $UPDATE AND $DELETE FUNCTIONS.

                                     0000    27 ;

                                     0000    28 ;

                                     0000    29 ; ENVIRONMENT:

                                     0000    30 ;		STAR PROCESSOR RUNNING STARLET EXEC.

                                     0000    31 ;

                                     0000    32 ; AUTHOR: L F LAVERDURE,	 CREATION DATE: 8-NOV-77

                                     0000    33 ;

                                     0000    34 ; MODIFIED BY:

                                     0000    35 ;

                                     0000    36 ;	R A NEWELL,      18-JUL-78  14:33

                                     0000    37 ;	L F LAVERDURE,   17-NOV-77  17:35

                                     0000    38 ;	J A KRYCKA,	  1-AUG-78  13:35

                                     0000    39 ; 01	- 

                                     0000    40 ;--

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   2

007             DECLARATIONS                                                                                                     (1)



                                     0000    42 	.SBTTL	DECLARATIONS

                                     0000    43 ;

                                     0000    44 ; INCLUDE FILES:

                                     0000    45 ;

                                     0000    46 

                                     0000    47 ;

                                     0000    48 ; MACROS:

                                     0000    49 ;

                                     0000    50 	$IFBDEF

                                     0000    51 	$CSHDEF

                                     0000    52 	$DLCDEF

                                     0000    53 	$FABDEF

                                     0000    54 	$RABDEF

                                     0000    55 	$IRBDEF

                                     0000    56 	$BDBDEF

                                     0000    57 	$RMSDEF

                                     0000    58 	.LIST MEB

                                     0000    59 

                                     0000    60 ;

                                     0000    61 ; EQUATED SYMBOLS:

                                     0000    62 ;

                           00000020  0000    63 	ROP=RAB$L_ROP*8		; BIT OFFSET TO ROP FIELD

                                     0000    64 

                                     0000    65 ;

                                     0000    66 ; OWN STORAGE:

                                     0000    67 ;

                                     0000    68 

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   3

007             RM$UPDATE2 - HIGH LEVEL RELATIVE $UPDATE                                                                         (1)



                                     0000    70 	.SBTTL RM$UPDATE2 - HIGH LEVEL RELATIVE $UPDATE

                                     0000    71 ;++

                                     0000    72 ; FUNCTIONAL DESCRIPTION:

                                     0000    73 ;

                                     0000    74 ; THIS ROUTINE PERFORMS THE FOLLOWING FUNCTIONS:

                                     0000    75 ;

                                     0000    76 ;	1. CALLS UPDDLT2 SUBROUTINE TO ACCESS THE BUCKET AND DO RECORD LOCKING

                                     0000    77 ;	   AS REQUIRED

                                     0000    78 ;	2. CALLS RM$PUTUPD2 TO MOVE THE UPDATED RECORD TO THE BUFFER

                                     0000    79 ;	3. RELEASES ACCESS TO THE BUCKET (CAUSING IT TO BE WRITTEN UNLESS

                                     0000    80 ;	   DEFERRED WRITE WAS SPECIFIED AT OPEN TIME) AND EXITS RMS

                                     0000    81 ;

                                     0000    82 ; CALLING SEQUENCE:

                                     0000    83 ;

                                     0000    84 ; ENTERED VIA CASE BRANCH FROM RM$UPDATE AT RM$UPDATE1.

                                     0000    85 ;

                                     0000    86 ; INPUT PARAMETERS:

                                     0000    87 ;

                                     0000    88 ;	R11	IMPURE AREA ADDRESS

                                     0000    89 ;	R10	IFAB ADDR

                                     0000    90 ;	R9	IRAB ADDR

                                     0000    91 ;	R8	RAB ADDR

                                     0000    92 ;

                                     0000    93 ; IMPLICIT INPUTS:

                                     0000    94 ;

                                     0000    95 ;	THE CONTENTS OF THE RAB AND RELATED IRAB AND IFAB.

                                     0000    96 ;

                                     0000    97 ; OUTPUT PARAMETERS:

                                     0000    98 ;

                                     0000    99 ;	R7 THRU R1	DESTROYED

                                     0000   100 ;	R0		STATUS

                                     0000   101 ;

                                     0000   102 ; IMPLICIT OUTPUTS:

                                     0000   103 ;

                                     0000   104 ;	VARIOUS FIELDS OF THE RAB ARE FILLED IN TO REFLECT

                                     0000   105 ;	THE STATUS OF THE OPERATION (SEE FUNCTIONAL SPEC

                                     0000   106 ;	FOR DETAILS).

                                     0000   107 ;

                                     0000   108 ;	THE IRAB IS SIMILARLY UPDATED.

                                     0000   109 ;

                                     0000   110 ; COMPLETION CODES:

                                     0000   111 ;

                                     0000   112 ;	STANDARD RMS (SEE FUNCTIONAL SPEC).

                                     0000   113 ;

                                     0000   114 ; SIDE EFFECTS:

                                     0000   115 ;

                                     0000   116 ;	NONE

                                     0000   117 ;

                                     0000   118 ;--

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   4

007             RM$UPDATE2 - HIGH LEVEL RELATIVE $UPDATE                                                                         (1)



                                     0000   120 RM$UPDATE2::

                                     0000   121 	$TSTPT	UPDATE2

                 00000200'9F     D6  0000       		INCL	@#PIO$GL_FMLH+512+TPT$L_UPDATE2

            6A            3E     E0  0006   122 	BBS	#IFB$V_DAP,(R10),NTUPD		; BRANCH IF NETWORK FUNCTION

                          20         0009       

                          42     10  000A   123 	BSBB	UPDDLT2				; ACCESS BKT AND DO LOCKING

            15            50     E9  000C   124 	BLBC	R0,CLEAN			; GET OUT ON ERROR

         10 A8            51     D0  000F   125 	MOVL	R1,RAB$W_RFA(R8)		; SET RFA

                       14 A8     B4  0013   126 	CLRW	RAB$W_RFA+4(R8)			; BE NEAT

                          5C     D4  0016   127 	CLRL	AP				; FLAG TO RM$PUTUPD2 FOR $UPDATE

                          FFE5'  30  0018   128 	BSBW	RM$PUTUPD2			; GO MOVE THE RECORD

            09            57     E9  001B   129 	BLBC	R7,CLEAN1			; GET OUT ON ERROR

                                     001E   130 

                       34 A9     D4  001E   131 RLSXIT:	CLRL	IRB$L_RP(R9)			; SAY NO CURRENT RECORD

                          FFDC'  31  0021   132 	BRW	RM$RLS2				; GO RELEASE BUCKET

                                     0024   133 ;

                                     0024   134 ;  HANDLE ERROR

                                     0024   135 ;

            57            50     D0  0024   136 CLEAN:	MOVL	R0,R7				; GET STATUS CODE TO R7

                          FFD6'  31  0027   137 CLEAN1:	BRW	RM$CLN2_UPD			; GO CLEAN UP

                                     002A   138 ;++

                                     002A   139 ;

                                     002A   140 ;  PERFORM NETWORK UPDATE FUNCTION

                                     002A   141 ;

                                     002A   142 ;--

                                     002A   143 NTUPD:	$PSECT_BR	NF$NETWORK

                          FFD3'  31  002A       		BRW	NF$NETWORK0

                                     002D       		.SAVE

                                 00000000       		.PSECT	NF$NETWORK,GBL,NOWRT

                                     0000       NF$NETWORK0:

                          FFFD'  30  0000   144 	BSBW	NT$UPDATE2			; PERFORM UPDATE AT REMOTE NODE

            03            50     E9  0003   145 	BLBC	R0,10$				; BRANCH ON ERROR

                          0015'  31  0006   146 	BRW	RLSXIT				; JOIN MAINLINE

                          0018'  31  0009   147 10$:	BRW	CLEAN				; BRANCH AID

                                     000C   148 	$PSECT_RESTORE

                                 0000002D       		.RESTORE

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   5

007             RM$DELETE2 - HIGH LEVEL RELATIVE $DELETE                                                                         (1)



                                     002D   150 	.SBTTL RM$DELETE2 - HIGH LEVEL RELATIVE $DELETE

                                     002D   151 ;++

                                     002D   152 ; FUNCTIONAL DESCRIPTION:

                                     002D   153 ;

                                     002D   154 ; THIS ROUTINE PERFORMS THE FOLLOWING FUNCTIONS:

                                     002D   155 ;

                                     002D   156 ;	1. CALLS UPDDLT2 SUBROUTINE TO ACCESS THE BUCKET AND DO RECORD LOCKING

                                     002D   157 ;	   AS REQUIRED

                                     002D   158 ;	2. SETS THE RECORD DELETED FLAG IN THE CONTROL BYTE AND DECLARES THE 

                                     002D   159 ;	   BUFFER DIRTY.

                                     002D   160 ;	3. RELEASES ACCESS TO THE BUCKET (CAUSING IT TO BE WRITTEN UNLESS

                                     002D   161 ;	   DEFERRED WRITE WAS SPECIFIED AT OPEN TIME) AND EXITS RMS

                                     002D   162 ;

                                     002D   163 ; CALLING SEQUENCE:

                                     002D   164 ;

                                     002D   165 ; ENTERED VIA CASE BRANCH FROM RM$DELETE AT RM$DELETE1.

                                     002D   166 ;

                                     002D   167 ; INPUT PARAMETERS:

                                     002D   168 ;

                                     002D   169 ;	R11	IMPURE AREA ADDRESS

                                     002D   170 ;	R10	IFAB ADDR

                                     002D   171 ;	R9	IRAB ADDR

                                     002D   172 ;	R8	RAB ADDR

                                     002D   173 ;

                                     002D   174 ; IMPLICIT INPUTS:

                                     002D   175 ;

                                     002D   176 ;	THE CONTENTS OF THE RAB AND RELATED IRAB AND IFAB.

                                     002D   177 ;

                                     002D   178 ; OUTPUT PARAMETERS:

                                     002D   179 ;

                                     002D   180 ;	R7 THRU R1	DESTROYED

                                     002D   181 ;	R0		STATUS

                                     002D   182 ;

                                     002D   183 ; IMPLICIT OUTPUTS:

                                     002D   184 ;

                                     002D   185 ;	VARIOUS FIELDS OF THE RAB ARE FILLED IN TO REFLECT

                                     002D   186 ;	THE STATUS OF THE OPERATION (SEE FUNCTIONAL SPEC

                                     002D   187 ;	FOR DETAILS).

                                     002D   188 ;

                                     002D   189 ;	THE IRAB IS SIMILARLY DELETED.

                                     002D   190 ;

                                     002D   191 ; COMPLETION CODES:

                                     002D   192 ;

                                     002D   193 ;	STANDARD RMS (SEE FUNCTIONAL SPEC).

                                     002D   194 ;

                                     002D   195 ; SIDE EFFECTS:

                                     002D   196 ;

                                     002D   197 ;	NONE

                                     002D   198 ;

                                     002D   199 ;--

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   6

007             RM$DELETE2 - HIGH LEVEL RELATIVE $DELETE                                                                         (1)



                                     002D   201 RM$DELETE2::

                                     002D   202 	$TSTPT	DELETE2

                 00000200'9F     D6  002D       		INCL	@#PIO$GL_FMLH+512+TPT$L_DELETE2

            6A            3E     E0  0033   203 	BBS	#IFB$V_DAP,(R10),NTDEL		; BRANCH IF NETWORK FUNCTION

                          14         0036       

                          15     10  0037   204 	BSBB	UPDDLT2				; ACCESS BUCKET AND DO LOCKING

            57            50     D0  0039   205 	MOVL	R0,R7				; COPY STATUS CODE

            09            50     E9  003C   206 	BLBC	R0,CLEAN2			; GET OUT ON ERROR

            65            0C     90  003F   207 	MOVB	#DLC$M_REC!DLC$M_DELETED,(R5)	; SET DELETE FLAG

         0A A4            03     88  0042   208 	BISB2	#BDB$M_VAL!BDB$M_DRT,BDB$B_FLGS(R4)	; SAY BUFFER DIRTY

                          D6     11  0046   209 	BRB	RLSXIT				; GO RELEASE BKT AND EXIT

                                     0048   210 ;

                                     0048   211 ;  HANDLE ERROR

                                     0048   212 ;

                          FFB5'  31  0048   213 CLEAN2:	BRW	RM$CLN2_DEL			; GO CLEAN UP

                                     004B   214 ;++

                                     004B   215 ;

                                     004B   216 ;  PERFORM NETWORK DELETE FUNCTION

                                     004B   217 ;

                                     004B   218 ;--

                                     004B   219 NTDEL:	$PSECT_BR	NF$NETWORK

                          FFBE'  31  004B       		BRW	NF$NETWORK1

                                     004E       		.SAVE

                                 0000000C       		.PSECT	NF$NETWORK,GBL,NOWRT

                                     000C       NF$NETWORK1:

                          FFF1'  30  000C   220 	BSBW	NT$DELETE2			; PERFORM DELETE AT REMOTE NODE

            03            50     E9  000F   221 	BLBC	R0,10$				; BRANCH ON ERROR

                          0009'  31  0012   222 	BRW	RLSXIT				; JOIN MAINLINE

            57            50     D0  0015   223 10$:	MOVL	R0,R7				; COPY STATUS CODE

                          FFE5'  31  0018   224 	BRW	RM$CLN2_DEL			; CLEAN UP AND EXIT

                                     001B   225 	$PSECT_RESTORE

                                 0000004E       		.RESTORE

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   7

007             UPDDLT2  -  COMMON $UPDATE/$DELETE RELATIVE ROU                                                                  (1)



                                     004E   227 	.SBTTL	UPDDLT2  -  COMMON $UPDATE/$DELETE RELATIVE ROUTINE

                                     004E   228 ;++

                                     004E   229 ;  FUNCTIONAL DESCRIPTION:

                                     004E   230 ;

                                     004E   231 ;  THIS ROUTINE PERFORMS THE FOLLOWING FUNCTIONS:

                                     004E   232 ;

                                     004E   233 ;	1. CHECKS THAT THERE IS A CURRENT RECORD.

                                     004E   234 ;	2. ACCESSES THE BUCKET WITH LOCK.

                                     004E   235 ;	3. VERIFIES THAT THE RECORD IS LOCKED.

                                     004E   236 ;	4. UNLOCKS THE RECORD UNLESS MANUAL LOCKING IS SPECIFIED (RAB$V_ULK = 1)

                                     004E   237 ;

                                     004E   238 ;  CALLING SEQUENCE:

                                     004E   239 ;

                                     004E   240 ;	BSBB	UPDDLT2

                                     004E   241 ;

                                     004E   242 ;  INPUT PARAMETERS:

                                     004E   243 ;

                                     004E   244 ;	AS FOR RM$UPDATE2

                                     004E   245 ;

                                     004E   246 ;  IMPLICIT INPUTS:

                                     004E   247 ;

                                     004E   248 ;  THE FIELDS OF THE VARIOUS CONTROL BLOCKS, INCLUDING:

                                     004E   249 ;

                                     004E   250 ;	IRB$L_RP	RECORD #

                                     004E   251 ;	IRB$L_CURVBN	STARTING VBN FOR BUCKET

                                     004E   252 ;	IRB$L_RP_OFF	OFFSET TO RECORD IN BUCKET

                                     004E   253 ;	RAB$V_ULK	MANUAL LOCKING FLAG

                                     004E   254 ;

                                     004E   255 ;  OUTPUT PARAMETERS:

                                     004E   256 ;

                                     004E   257 ;	R5		RECORD ADDRESS IN BUFFER

                                     004E   258 ;	R4		BDB ADDRESS

                                     004E   259 ;	R1		RECORD #

                                     004E   260 ;	R0		STATUS CODE

                                     004E   261 ;	R2_R3,AP	DESTROYED

                                     004E   262 ;

                                     004E   263 ;  IMPLICIT OUTPUTS:

                                     004E   264 ;

                                     004E   265 ;	NONE.

                                     004E   266 ;

                                     004E   267 ;  COMPLETION CODES:

                                     004E   268 ;

                                     004E   269 ;	STANDARD RMS.

                                     004E   270 ;

                                     004E   271 ;  SIDE EFFECTS:

                                     004E   272 ;

                                     004E   273 ;	MAY HAVE SWITCHED TO RUNNING AT AST LEVEL.

                                     004E   274 ;--

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   8

007             UPDDLT2  -  COMMON $UPDATE/$DELETE RELATIVE ROU                                                                  (1)



                                     004E   276 UPDDLT2:

            51         30 A9     D0  004E   277 	MOVL	IRB$L_CURVBN(R9),R1		; GET CURRENT VBN

                          31     13  0052   278 	BEQL	ERRCUR				; ERROR IF NONE

                                     0054   279 	$CSHFLAGS	LOCK			; GET LOCK ON BUCKET

            53            01     D0  0054       		MOVL #$$.TMP,R3

                          FFA6'  30  0057   280 	BSBW	RM$READBKT2			; ACCESS THE BUCKET

            24            50     E9  005A   281 	BLBC	R0,50$				; GET OUT ON ERROR

            51         34 A9     D0  005D   282 	MOVL	IRB$L_RP(R9),R1			; GET RECORD #

                          22     13  0061   283 	BEQL	ERRCUR				; ERROR IF NONE

            6A            33     E0  0063   284 	BBS	#IFB$V_NORECLK,(R10),50$	; BRANCH IF NO LOCKING

                          1A         0066       

            69            2D     E5  0067   285 	BBCC	#IRB$V_UNLOCK_RP,(R9),30$	; CLEAR AUTO UNLOCK FLAG 

                          09         006A       

                                     006B   286 						; IF MANUAL LOCK, DON'T UNLOCK

                                     006B   287 ;

                                     006B   288 ;  RECORD LOCKING REQUIRED.  IF RECORD LOCKED VIA AUTOMATIC LOCKING

                                     006B   289 ;  (IRB$V_UNLOCK_RP = 1), UNLOCK THE RECORD, GIVING AN ERROR IF IT WAS NOT

                                     006B   290 ;  LOCKED.  SINCED THE BUCKET IS STILL LOCKED, NO OTHER USER CAN LOCK THE

                                     006B   291 ;  RECORD BEFORE THE BUCKET IS RELEASED.  

                                     006B   292 ;

                                     006B   293 ;  IF MANUAL LOCKING (IRB$V_UNLOCK_RP = 0) NEED MERELY CHECK THAT THE

                                     006B   294 ;  RECORD IS LOCKED.

                                     006B   295 ;

                          52     D4  006B   296 	CLRL	R2				; CLEAR HIGH ORDER RP

                          FF90'  30  006D   297 	BSBW	RM$UNLOCK			; UNLOCK RECORD

            0F            50     E9  0070   298 	BLBC	R0,ERRRNL			; BRANCH IF NOT LOCKED

                                 05  0073   299 	RSB					; ALL SET

                          FF89'  30  0074   300 30$:	BSBW	RM$QUERY_LCK			; IS RECORD LOCKED?

       8039 8F            50     B1  0077   301 	CMPW	R0,#RMS$_OK_ALK&^XFFFF		; WELL IS IT?

                          04     12  007C   302 	BNEQ	ERRRNL				; BRANCH IF NOT

                                     007E   303 	RMSSUC					; VANILLA SUCCESS

            50            01     D0  007E       		MOVL	#1,R0

                                 05  0081   304 50$:	RSB					; ALL SET

                                     0082   305 ;

                                     0082   306 ;  HANDLE ERRORS

                                     0082   307 ;

                                     0082   308 ERRRNL:	$PSECT_BR	L$RMS2

                          FF7B'  31  0082       		BRW	L$RMS22

                                     0085       		.SAVE

                                 00000000       		.PSECT	L$RMS2,GBL,NOWRT

                                     0000       L$RMS22:

         0C A8   000181A0 8F     D0  0000   309 	MOVL	#RMS$_RNL,RAB$L_STV(R8)		; SUB ERROR CODE OF RECORD NOT

                                     0008   310 						; LOCKED

                                     0008   311 						; AND FALL THRU TO ERRCUR1

                                     0008   312 ERRCUR1:

                                     0008   313 	RMSERR	CUR				; NO CURRENT RECORD

            50       84B4 8F     3C  0008       		MOVZWL	#<RMS$_CUR&^XFFFF>,R0

                                 05  000D   314 	RSB

                                     000E   315 	$PSECT_RESTORE

                                 00000085       		.RESTORE

                                     0085   316 ;

                          FF80'  31  0085   317 ERRCUR:	BRW	ERRCUR1				; GO SET ERROR CODE AND RETURN

                                     0088   318 

                                     0088   319 

                                     0088   320 	.END

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page   9

SYMBOL TABLE                                                                                                                     (1)



$$.PSECT_EP    = 00000003            CSH$V_READAHEAD= 00000003            FAB$M_ESC      = 08000000            

$$.TMP         = 00000001            DLC$M_DELETED  = 00000004            FAB$M_EXE      = 00000080            

$$RMSTEST      = 0000001A            DLC$M_REC      = 00000008            FAB$M_FTN      = 00000001            

$$RMS_PBUGCHK  = 00000010            DLC$V_DELETED  = 00000002            FAB$M_GET      = 00000002            

$$RMS_TBUGCHK  = 00000008            DLC$V_REC      = 00000003            FAB$M_INP      = 00080000            

$$RMS_UMODE    = 00000004            ERRCUR           00000085 R     02   FAB$M_JNL      = 00400000            

BDB$B_BID        00000008            ERRCUR1          00000008 R     05   FAB$M_KFO      = 40000000            

BDB$B_BLN        00000009            ERRRNL           00000082 R     02   FAB$M_MSE      = 00000010            

BDB$B_FLGS       0000000A            FAB$B_BID        00000000            FAB$M_MXV      = 00000002            

BDB$B_POST_CCTL  00000023            FAB$B_BKS        0000003E            FAB$M_NAM      = 01000000            

BDB$B_PRE_CCTL   00000022            FAB$B_BLN        00000001            FAB$M_NEF      = 00000400            

BDB$B_REL_VBN    00000020            FAB$B_DNS        00000035            FAB$M_NFS      = 00010000            

BDB$B_USECNT     0000000B            FAB$B_FAC        00000016            FAB$M_NIL      = 00000020            

BDB$B_VAL_VBNS   00000021            FAB$B_FNS        00000034            FAB$M_OFP      = 20000000            

BDB$C_BID      = 0000000C            FAB$B_FSZ        0000003F            FAB$M_POS      = 00000100            

BDB$C_BLN        00000028            FAB$B_ORG        0000001D            FAB$M_PPF      = 00040000            

BDB$K_BLN        00000028            FAB$B_RAT        0000001E            FAB$M_PPF_IND  = 00004000            

BDB$L_ADDR       00000014            FAB$B_RFM        0000001F            FAB$M_PPF_RAT  = 00003FC0            

BDB$L_BLINK      00000004            FAB$B_RTV        0000001C            FAB$M_PRN      = 00000004            

BDB$L_CURBUFADR  00000024            FAB$B_SHR        00000017            FAB$M_PUT      = 00000001            

BDB$L_FLINK      00000000            FAB$C_BID      = 00000003            FAB$M_RCK      = 00800000            

BDB$L_IOSB       00000020            FAB$C_BLN        00000050            FAB$M_RWC      = 00000800            

BDB$L_OWN        0000000C            FAB$C_FIX      = 00000001            FAB$M_RWO      = 00000080            

BDB$L_VBN        00000018            FAB$C_HSH      = 00000030            FAB$M_SCF      = 00004000            

BDB$L_WAIT       0000001C            FAB$C_IDX      = 00000020            FAB$M_SHRDEL   = 00000004            

BDB$L_WK1        00000020            FAB$C_MAXRFM   = 00000003            FAB$M_SHRGET   = 00000002            

BDB$M_AST_DCL  = 00000040            FAB$C_REL      = 00000010            FAB$M_SHRPUT   = 00000001            

BDB$M_DRT      = 00000002            FAB$C_RFM_DFLT = 00000002            FAB$M_SHRUPD   = 00000008            

BDB$M_IOP      = 00000004            FAB$C_SEQ      = 00000000            FAB$M_SPL      = 00002000            

BDB$M_LKDINWS  = 00000080            FAB$C_UDF      = 00000000            FAB$M_SQO      = 00000040            

BDB$M_NOLOCATE = 00000010            FAB$C_VAR      = 00000002            FAB$M_SUP      = 00000004            

BDB$M_PRM      = 00000008            FAB$C_VFC      = 00000003            FAB$M_TEF      = 10000000            

BDB$M_VAL      = 00000001            FAB$K_BLN        00000050            FAB$M_TMD      = 00000010            

BDB$M_WFO      = 00000020            FAB$L_ALQ        00000010            FAB$M_TMP      = 00000008            

BDB$V_AST_DCL  = 00000006            FAB$L_CTX        00000018            FAB$M_TRN      = 00000010            

BDB$V_DRT      = 00000001            FAB$L_DEV        00000040            FAB$M_UFM      = 04000000            

BDB$V_IOP      = 00000002            FAB$L_DNA        00000030            FAB$M_UFO      = 00020000            

BDB$V_LKDINWS  = 00000007            FAB$L_FNA        0000002C            FAB$M_UPD      = 00000008            

BDB$V_NOLOCATE = 00000004            FAB$L_FOP        00000004            FAB$M_UPI      = 00000040            

BDB$V_PRM      = 00000003            FAB$L_JNL        00000020            FAB$M_WCK      = 00000200            

BDB$V_VAL      = 00000000            FAB$L_MRN        00000038            FAB$S_ORG      = 00000004            

BDB$V_WFO      = 00000005            FAB$L_NAM        00000028            FAB$S_PPF_RAT  = 00000008            

BDB$W_NUMB       00000010            FAB$L_SDC        00000044            FAB$V_BIO      = 00000005            

BDB$W_SIZE       00000012            FAB$L_STS        00000008            FAB$V_BLK      = 00000003            

BIT...         = 0001C134            FAB$L_STV        0000000C            FAB$V_BRO      = 00000006            

CLEAN            00000024 R     02   FAB$L_XAB        00000024            FAB$V_CBT      = 00000015            

CLEAN1           00000027 R     02   FAB$M_BIO      = 00000020            FAB$V_CIF      = 00000019            

CLEAN2           00000048 R     02   FAB$M_BLK      = 00000008            FAB$V_CR       = 00000001            

CSH$M_LOCK     = 00000001            FAB$M_BRO      = 00000040            FAB$V_CTG      = 00000014            

CSH$M_NOBUFFER = 00000010            FAB$M_CBT      = 00200000            FAB$V_DEL      = 00000002            

CSH$M_NOREAD   = 00000004            FAB$M_CIF      = 02000000            FAB$V_DFW      = 00000005            

CSH$M_NOWAIT   = 00000002            FAB$M_CR       = 00000002            FAB$V_DLT      = 0000000F            

CSH$M_READAHEAD= 00000008            FAB$M_CTG      = 00100000            FAB$V_DMO      = 0000000C            

CSH$V_LOCK     = 00000000            FAB$M_DEL      = 00000004            FAB$V_ESC      = 0000001B            

CSH$V_NOBUFFER = 00000004            FAB$M_DFW      = 00000020            FAB$V_EXE      = 00000007            

CSH$V_NOREAD   = 00000002            FAB$M_DLT      = 00008000            FAB$V_FTN      = 00000000            

CSH$V_NOWAIT   = 00000001            FAB$M_DMO      = 00001000            FAB$V_GET      = 00000001            

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page  10

SYMBOL TABLE                                                                                                                     (1)



FAB$V_INP      = 00000013            IFB$B_UBUFSZ     0000005B            IFB$V_BUSY     = 00000020            

FAB$V_JNL      = 00000016            IFB$C_BID      = 0000000B            IFB$V_CREATE   = 00000032            

FAB$V_KFO      = 0000001E            IFB$C_BLN        00000060            IFB$V_DAP      = 0000003E            

FAB$V_MSE      = 00000004            IFB$C_BLN_IDX    00000060            IFB$V_DAP_OPEN = 0000003D            

FAB$V_MXV      = 00000001            IFB$C_BLN_REL    00000060            IFB$V_DEL      = 00000002            

FAB$V_NAM      = 00000018            IFB$C_BLN_SEQ    0000005C            IFB$V_DFW      = 0000002C            

FAB$V_NEF      = 0000000A            IFB$C_DIR      = 00000003            IFB$V_DLT      = 0000002B            

FAB$V_NFS      = 00000010            IFB$C_FHAEND     00000050            IFB$V_DMO      = 00000028            

FAB$V_NIL      = 00000005            IFB$C_IDX      = 00000002            IFB$V_EOF      = 00000021            

FAB$V_OFP      = 0000001D            IFB$C_MAXORG   = 00000002            IFB$V_EXE      = 00000007            

FAB$V_ORG      = 00000004            IFB$C_REL      = 00000001            IFB$V_GET      = 00000001            

FAB$V_POS      = 00000008            IFB$C_SEQ      = 00000000            IFB$V_MSE      = 00000031            

FAB$V_PPF      = 00000012            IFB$K_BLN        00000060            IFB$V_NORECLK  = 00000033            

FAB$V_PPF_IND  = 0000000E            IFB$K_BLN_IDX    00000060            IFB$V_NSP      = 0000003F            

FAB$V_PPF_RAT  = 00000006            IFB$K_BLN_REL    00000060            IFB$V_NWA      = 0000003C            

FAB$V_PRN      = 00000002            IFB$K_BLN_SEQ    0000005C            IFB$V_ORG      = 00000004            

FAB$V_PUT      = 00000000            IFB$K_FHAEND     00000050            IFB$V_PPF_IMAGE= 00000022            

FAB$V_RCK      = 00000017            IFB$L_ARGLST     00000018            IFB$V_PPF_INPUT= 0000002E            

FAB$V_RWC      = 0000000B            IFB$L_ASBADDR    00000014            IFB$V_PUT      = 00000000            

FAB$V_RWO      = 00000007            IFB$L_AS_DEV     00000054            IFB$V_RFM      = 00000000            

FAB$V_SCF      = 0000000E            IFB$L_BDB_BLNK   00000034            IFB$V_RWC      = 00000027            

FAB$V_SHRDEL   = 00000002            IFB$L_BDB_FLNK   00000030            IFB$V_RW_ATTR  = 00000034            

FAB$V_SHRGET   = 00000001            IFB$L_BKPBITS    00000004            IFB$V_SCF      = 0000002A            

FAB$V_SHRPUT   = 00000000            IFB$L_BWB        0000000C            IFB$V_SPL      = 00000029            

FAB$V_SHRUPD   = 00000003            IFB$L_DVBN       00000058            IFB$V_SQO      = 0000002D            

FAB$V_SPL      = 0000000D            IFB$L_EBK        00000044            IFB$V_TEF      = 00000036            

FAB$V_SQO      = 00000006            IFB$L_FRB_PTR    00000028            IFB$V_TMP      = 00000035            

FAB$V_SUP      = 00000002            IFB$L_FWA_BDB    00000050            IFB$V_TRN      = 00000004            

FAB$V_TEF      = 0000001C            IFB$L_HBK        00000040            IFB$V_UPD      = 00000003            

FAB$V_TMD      = 00000004            IFB$L_IDX_PTR    00000054            IFB$V_WRTACC   = 00000030            

FAB$V_TMP      = 00000003            IFB$L_IOS        0000000C            IFB$W_ASDEVBSIZ  0000005A            

FAB$V_TRN      = 00000004            IFB$L_IOS4       00000010            IFB$W_BKS_BYTES  0000005C            

FAB$V_UFM      = 0000001A            IFB$L_IRAB_LNK   0000001C            IFB$W_BKS_RECS   0000005E            

FAB$V_UFO      = 00000011            IFB$L_LAST_FAB   00000024            IFB$W_CHNL       00000020            

FAB$V_UPD      = 00000003            IFB$L_LOCK_BDB   00000050            IFB$W_DEQ        0000004E            

FAB$V_UPI      = 00000006            IFB$L_MRN        00000054            IFB$W_DEVBUFSIZ  00000038            

FAB$V_WCK      = 00000009            IFB$L_NRP_LNK    00000050            IFB$W_EBK0       00000044            

FAB$W_BLS        0000003C            IFB$L_NWA_PTR    00000028            IFB$W_EBK2       00000046            

FAB$W_DEQ        00000014            IFB$L_PRIM_DEV   00000000            IFB$W_FFB        00000048            

FAB$W_IFI        00000002            IFB$L_RLB_LNK    0000002C            IFB$W_IOS2       0000000E            

FAB$W_MRS        00000036            IFB$L_RNS_LEN    00000050            IFB$W_LRL        0000003E            

GBL...         = 00000000            IFB$M_BIO      = 00000020            IFB$W_MRS        0000004C            

IFB$B_AMAX       00000059            IFB$M_BRO      = 00000040            IFB$W_RTDEQ      0000003A            

IFB$B_AVBN       00000058            IFB$M_DEL      = 00000004            IRB$B_BCNT       00000040            

IFB$B_BID        00000008            IFB$M_EXE      = 00000080            IRB$B_BID        00000008            

IFB$B_BKS        0000004A            IFB$M_GET      = 00000002            IRB$B_BLN        00000009            

IFB$B_BLN        00000009            IFB$M_PUT      = 00000001            IRB$B_EFN        0000000B            

IFB$B_EFN        0000000B            IFB$M_TRN      = 00000010            IRB$B_KEYSZ      00000051            

IFB$B_EXTRABUF   0000005D            IFB$M_UPD      = 00000008            IRB$B_MBC        00000041            

IFB$B_FAC        00000022            IFB$S_ORG      = 00000004            IRB$B_MODE       0000000A            

IFB$B_FSZ        0000004B            IFB$S_RFM      = 00000004            IRB$B_NRP_ID     00000030            

IFB$B_KBUFSZ     0000005C            IFB$V_ACCESSED = 00000025            IRB$B_NRP_KREF   00000031            

IFB$B_MODE       0000000A            IFB$V_ANSI_D   = 00000026            IRB$B_NVBNS      00000048            

IFB$B_NUM_KEYS   0000005A            IFB$V_ASYNC    = 00000023            IRB$B_POST_CCTL  00000045            

IFB$B_ORGCASE    00000023            IFB$V_ASYNCWAIT= 00000024            IRB$B_PPF_ISI    0000003E            

IFB$B_RAT        0000003D            IFB$V_BIO      = 00000005            IRB$B_PRE_CCTL   00000044            

IFB$B_RFMORG     0000003C            IFB$V_BRO      = 00000006            IRB$B_RFA_ID     00000058            

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page  11

SYMBOL TABLE                                                                                                                     (1)



IRB$B_RP_ID      00000038            IRB$V_PUTS_LAST= 00000026            RAB$M_CCO      = 80000000            

IRB$B_RP_KREF    00000039            IRB$V_RAHWBH   = 0000002A            RAB$M_CVT      = 04000000            

IRB$B_RRV_ID     00000050            IRB$V_SKIP_NEXT= 0000002B            RAB$M_EOF      = 00000100            

IRB$B_SRCHFLAGS  00000043            IRB$V_SRCHGT   = 00000001            RAB$M_FDL      = 00000040            

IRB$B_STOPLEVEL  00000042            IRB$V_UNLOCK_RP= 0000002D            RAB$M_HSH      = 00000080            

IRB$C_BID      = 0000000A            IRB$V_WRITE    = 00000029            RAB$M_KGE      = 00200000            

IRB$C_BLN_IDX    0000006C            IRB$W_CSIZ       00000042            RAB$M_KGT      = 00400000            

IRB$C_BLN_REL    00000048            IRB$W_DUP_POS    00000032            RAB$M_LIM      = 00004000            

IRB$C_BLN_SEQ    0000004C            IRB$W_IOS2       0000000E            RAB$M_LOA      = 00002000            

IRB$K_BLN_IDX    0000006C            IRB$W_NRP_OFF    00000030            RAB$M_LOC      = 00010000            

IRB$K_BLN_REL    00000048            IRB$W_OWN_ID     0000003C            RAB$M_MAS      = 00000020            

IRB$K_BLN_SEQ    0000004C            IRB$W_OWN_ISI    0000003E            RAB$M_NLK      = 00100000            

IRB$L_ARGLST     00000018            IRB$W_ROVHDSZ    00000044            RAB$M_NXR      = 00800000            

IRB$L_ASBADDR    00000014            IRB$W_RP_OFF     00000038            RAB$M_PMT      = 40000000            

IRB$L_BKPBITS    00000004            IRB$W_RTOTLSZ    00000046            RAB$M_PPF_IND  = 00004000            

IRB$L_BWB        0000000C            IRB$W_SAVE_POS   00000052            RAB$M_PPF_RAT  = 00003FC0            

IRB$L_CURBDB     00000020            L$RMS22          00000000 R     05   RAB$M_PTA      = 20000000            

IRB$L_CURVBN     00000030            NF$NETWORK0      00000000 R     04   RAB$M_RAH      = 00000200            

IRB$L_IFAB_LNK   00000000            NF$NETWORK1      0000000C R     04   RAB$M_RLK      = 00080000            

IRB$L_IOS        0000000C            NT$DELETE2       ********   X   04   RAB$M_RNE      = 01000000            

IRB$L_IOS4       00000010            NT$UPDATE2       ********   X   04   RAB$M_RNF      = 08000000            

IRB$L_IRAB_LNK   0000001C            NTDEL            0000004B R     02   RAB$M_TMO      = 02000000            

IRB$L_KEYBUF     00000048            NTUPD            0000002A R     02   RAB$M_TPT      = 00000002            

IRB$L_LAST_RAB   00000024            PIO$GL_FMLH      ********   X   02   RAB$M_UIF      = 00000010            

IRB$L_LOCK_BDB   0000005C            RAB$B_BID        00000000            RAB$M_ULK      = 00040000            

IRB$L_NRP        0000002C            RAB$B_BLN        00000001            RAB$M_WAT      = 00020000            

IRB$L_NRP_OFF    00000030            RAB$B_KRF        00000035            RAB$M_WBH      = 00000400            

IRB$L_NRP_VBN    0000002C            RAB$B_KSZ        00000034            RAB$S_PPF_RAT  = 00000008            

IRB$L_NXTBDB     00000028            RAB$B_MBC        00000037            RAB$V_ASY      = 00000000            

IRB$L_OWNER_ID   0000003C            RAB$B_MBF        00000036            RAB$V_BIO      = 0000000B            

IRB$L_RFA_VBN    00000054            RAB$B_PSZ        00000034            RAB$V_CCO      = 0000001F            

IRB$L_RLB_ADDR   00000044            RAB$B_RAC        0000001E            RAB$V_CVT      = 0000001A            

IRB$L_RP         00000034            RAB$B_ROP1       00000005            RAB$V_EOF      = 00000008            

IRB$L_RP_OFF     00000038            RAB$B_ROP2       00000006            RAB$V_FDL      = 00000006            

IRB$L_RP_VBN     00000034            RAB$B_ROP3       00000007            RAB$V_HSH      = 00000007            

IRB$L_RRV_VBN    0000004C            RAB$B_TMO        0000001F            RAB$V_KGE      = 00000015            

IRB$L_TEMP0      00000044            RAB$C_BID      = 00000001            RAB$V_KGT      = 00000016            

IRB$L_TEMP1      00000048            RAB$C_BLN        00000044            RAB$V_LIM      = 0000000E            

IRB$V_ASYNC    = 00000023            RAB$C_KEY      = 00000001            RAB$V_LOA      = 0000000D            

IRB$V_ASYNCWAIT= 00000024            RAB$C_RFA      = 00000002            RAB$V_LOC      = 00000010            

IRB$V_BIO_LAST = 00000027            RAB$C_SEQ      = 00000000            RAB$V_MAS      = 00000005            

IRB$V_BRO_SW   = 00000028            RAB$K_BLN        00000044            RAB$V_NLK      = 00000014            

IRB$V_BUSY     = 00000020            RAB$L_BKT        00000038            RAB$V_NXR      = 00000017            

IRB$V_DAP_CONN = 0000003E            RAB$L_CTX        00000018            RAB$V_PMT      = 0000001E            

IRB$V_DAP_FMODE= 0000003F            RAB$L_DCT        00000038            RAB$V_PPF_IND  = 0000000E            

IRB$V_DUP      = 0000002C            RAB$L_FAB        0000003C            RAB$V_PPF_RAT  = 00000006            

IRB$V_EOF      = 00000021            RAB$L_KBF        00000030            RAB$V_PTA      = 0000001D            

IRB$V_FIND     = 00000029            RAB$L_PBF        00000030            RAB$V_RAH      = 00000009            

IRB$V_FIND_LAST= 00000025            RAB$L_RBF        00000028            RAB$V_RLK      = 00000013            

IRB$V_IDX_ERR  = 00000031            RAB$L_RFA0       00000010            RAB$V_RNE      = 00000018            

IRB$V_LOCKABOVE= 00000002            RAB$L_RHB        0000002C            RAB$V_RNF      = 0000001B            

IRB$V_NEW_IDX  = 00000003            RAB$L_ROP        00000004            RAB$V_TMO      = 00000019            

IRB$V_POSINSERT= 00000000            RAB$L_STS        00000008            RAB$V_TPT      = 00000001            

IRB$V_PPF_EOF  = 0000002E            RAB$L_STV        0000000C            RAB$V_UIF      = 00000004            

IRB$V_PPF_FNDSV= 00000030            RAB$L_UBF        00000024            RAB$V_ULK      = 00000012            

IRB$V_PPF_IMAGE= 00000022            RAB$M_ASY      = 00000001            RAB$V_WAT      = 00000011            

IRB$V_PPF_SKIP = 0000002F            RAB$M_BIO      = 00000800            RAB$V_WBH      = 0000000A            

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page  12

SYMBOL TABLE                                                                                                                     (1)



RAB$W_ISI        00000002            RMS$_DEL       = 00018262            RMS$_NID       = 000185EC            

RAB$W_RFA        00000010            RMS$_DEV       = 000184C4            RMS$_NMF       = 000182CA            

RAB$W_RFA4       00000014            RMS$_DIR       = 000184CC            RMS$_NOD       = 000185F4            

RAB$W_RSZ        00000022            RMS$_DME       = 000184D4            RMS$_NORMAL    = 00010001            

RAB$W_USZ        00000020            RMS$_DNA       = 000184DC            RMS$_NPK       = 000185FC            

RLSXIT           0000001E R     02   RMS$_DNF       = 0001C04A            RMS$_OK_ALK    = 00018039            

RM$CLN2_DEL      ********   X   02   RMS$_DNR       = 00018272            RMS$_OK_DEL    = 00018041            

RM$CLN2_UPD      ********   X   02   RMS$_DPE       = 0001C03A            RMS$_OK_DUP    = 00018011            

RM$DELETE2       0000002D RG    02   RMS$_DTP       = 000184E4            RMS$_OK_IDX    = 00018019            

RM$PUTUPD2       ********   X   02   RMS$_DUP       = 000184EC            RMS$_OK_LIM    = 00018051            

RM$QUERY_LCK     ********   X   02   RMS$_DVI       = 000184F4            RMS$_OK_RLK    = 00018021            

RM$READBKT2      ********   X   02   RMS$_ENT       = 0001C01A            RMS$_OK_RNF    = 00018049            

RM$RLS2          ********   X   02   RMS$_ENV       = 00018724            RMS$_OK_RRV    = 00018029            

RM$UNLOCK        ********   X   02   RMS$_EOF       = 0001827A            RMS$_ORD       = 00018604            

RM$UPDATE2       00000000 RG    02   RMS$_ESA       = 000184FC            RMS$_ORG       = 0001860C            

RMS$V_STVSTATUS= 0000000E            RMS$_ESL       = 00018714            RMS$_PBF       = 00018614            

RMS$_ABO       = 000183EC            RMS$_ESS       = 00018504            RMS$_PENDING   = 00018009            

RMS$_ACC       = 0001C002            RMS$_EXP       = 000182C2            RMS$_PLG       = 0001861C            

RMS$_ACT       = 0001825A            RMS$_EXT       = 0001C022            RMS$_PLV       = 0001872C            

RMS$_AID       = 000183F4            RMS$_FAB       = 0001850C            RMS$_POS       = 00018624            

RMS$_ALN       = 000183FC            RMS$_FAC       = 00018514            RMS$_PRM       = 0001862C            

RMS$_ALQ       = 00018404            RMS$_FEX       = 00018282            RMS$_PRV       = 0001829A            

RMS$_ANI       = 0001840C            RMS$_FLG       = 0001851C            RMS$_QUO       = 00018634            

RMS$_AOP       = 00018414            RMS$_FLK       = 0001828A            RMS$_RAB       = 0001863C            

RMS$_ATR       = 0001C0CC            RMS$_FNA       = 00018524            RMS$_RAC       = 00018644            

RMS$_ATW       = 0001C0D4            RMS$_FND       = 0001C02A            RMS$_RAT       = 0001864C            

RMS$_BKS       = 0001841C            RMS$_FNF       = 00018292            RMS$_RBF       = 00018654            

RMS$_BKZ       = 00018424            RMS$_FNM       = 0001852C            RMS$_RER       = 0001C0F4            

RMS$_BLN       = 0001842C            RMS$_FOP       = 0001853C            RMS$_REX       = 000182A2            

RMS$_BOF       = 00018198            RMS$_FSZ       = 00018534            RMS$_RFA       = 0001865C            

RMS$_BUG       = 00018434            RMS$_FUL       = 00018544            RMS$_RFM       = 00018664            

RMS$_BUG_DAP   = 00018444            RMS$_IAL       = 0001854C            RMS$_RHB       = 0001866C            

RMS$_BUG_DDI   = 0001843C            RMS$_IAN       = 00018554            RMS$_RLF       = 00018674            

RMS$_BUG_XX2   = 0001844C            RMS$_IBF       = 00018754            RMS$_RLK       = 000182AA            

RMS$_BUG_XX3   = 00018454            RMS$_IDX       = 0001855C            RMS$_RMV       = 0001C0FC            

RMS$_BUG_XX4   = 0001845C            RMS$_IFA       = 0001C124            RMS$_RNF       = 000182B2            

RMS$_BUG_XX5   = 00018464            RMS$_IFI       = 00018564            RMS$_RNL       = 000181A0            

RMS$_BUG_XX6   = 0001846C            RMS$_IMX       = 0001856C            RMS$_ROP       = 0001867C            

RMS$_BUG_XX7   = 00018474            RMS$_IOP       = 00018574            RMS$_RPL       = 0001C104            

RMS$_BUG_XX8   = 0001847C            RMS$_IRC       = 0001857C            RMS$_RRV       = 00018684            

RMS$_BUG_XX9   = 00018484            RMS$_ISI       = 00018584            RMS$_RSA       = 000182DA            

RMS$_CAA       = 0001848C            RMS$_KBF       = 0001858C            RMS$_RSL       = 0001873C            

RMS$_CCF       = 0001C0DC            RMS$_KEY       = 00018594            RMS$_RSS       = 00018694            

RMS$_CCR       = 00018494            RMS$_KFF       = 00018031            RMS$_RST       = 0001869C            

RMS$_CDA       = 0001C0E4            RMS$_KRF       = 0001859C            RMS$_RSZ       = 000186A4            

RMS$_CHG       = 0001849C            RMS$_KSZ       = 000185A4            RMS$_RTB       = 000181A8            

RMS$_CHK       = 000184A4            RMS$_LAN       = 000185AC            RMS$_SEQ       = 000186AC            

RMS$_CHN       = 0001C0EC            RMS$_LBL       = 000185B4            RMS$_SHR       = 000186B4            

RMS$_COD       = 000184AC            RMS$_LNE       = 000185BC            RMS$_SIZ       = 000186BC            

RMS$_CONTROLC  = 00010651            RMS$_LOC       = 000185C4            RMS$_SPL       = 0001C042            

RMS$_CONTROLO  = 00010609            RMS$_MBC       = 00018734            RMS$_SQO       = 000186C4            

RMS$_CONTROLY  = 00010611            RMS$_MKD       = 0001C032            RMS$_STALL     = 00018001            

RMS$_CRE       = 0001C00A            RMS$_MRN       = 000185CC            RMS$_STK       = 000186CC            

RMS$_CREATED   = 00010619            RMS$_MRS       = 000185D4            RMS$_SUC       = 00010001            

RMS$_CUR       = 000184B4            RMS$_NAM       = 000185DC            RMS$_SUP       = 000182D2            

RMS$_DAC       = 0001C012            RMS$_NEF       = 000185E4            RMS$_SUPERSEDE = 00010631            

RMS$_DAN       = 000184BC            RMS$_NET       = 0001874C            RMS$_SYN       = 000186D4            

RM2UPDDEL       RELATIVE SPECIFIC $UPDATE AND $DELETE            21-AUG-1978 21:55:53   VAX-11 MACRO X0.3-11               Page  13

SYMBOL TABLE                                                                                                                     (1)



RMS$_SYS       = 0001C10C            

RMS$_TEMP1     = 0001826A            

RMS$_TEMP2     = 0001868C            

RMS$_TMO       = 000181B0            

RMS$_TRE       = 000186DC            

RMS$_TYP       = 000186E4            

RMS$_UBF       = 000186EC            

RMS$_USZ       = 000186F4            

RMS$_VER       = 000186FC            

RMS$_VOL       = 00018704            

RMS$_WBE       = 0001C12C            

RMS$_WER       = 0001C114            

RMS$_WLD       = 00018744            

RMS$_WLK       = 000182BA            

RMS$_WPL       = 0001C11C            

RMS$_WSF       = 0001871C            

RMS$_XAB       = 0001870C            

ROP            = 00000020            

TPT$L_DELETE2    ********   X   02   

TPT$L_UPDATE2    ********   X   02   

UPDDLT2          0000004E R     02   





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  

$RMS2            00000088      02     NOPIC   USR   CON   REL   GBL NOSHR   EXE   RD  NOWRT BYTE  

$ABS$            0000006C      03     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

NF$NETWORK       0000001B      04     NOPIC   USR   CON   REL   GBL NOSHR   EXE   RD  NOWRT BYTE  

L$RMS2           0000000E      05     NOPIC   USR   CON   REL   GBL NOSHR   EXE   RD  NOWRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

7804. BYTES LEFT IN FREE MEMORY POOL.

2584. BYTES OF RECLAIMED MEMORY.

OBJ$:RM2UPDDEL,LIS$:RM2UPDDEL/-SP=EXECML$/ML,LIB$:R/ML,SRC$:RM2UPDDEL

22 MLB DIR RDS - 1145 GETS TO DEFINE 26 MACROS. 84 INTER. FILE WRITES. 

