SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)      46  DECLARATIONS

   (1)     207  SATSSF14

   (1)     294  SFLWS10

   (1)     317  SFLWS11

   (1)     344  SFLWS12

   (1)     369  SFLWS13

   (1)     391  SFLWS14

   (1)     414  SFLWS20

   (1)     436  SFLWS21

   (1)     458  SFLWS22

   (1)     481  

   (1)     485  SFUWS10

   (1)     508  SFUWS11

   (1)     534  SFUWS12

   (1)     559  SFUWS13

   (1)     581  SFUWS14

   (1)     604  SFUWS20

   (1)     626  SFUWS21

   (1)     648  SFUWS22

   (1)     671  

   (1)     675  SFLKP10

   (1)     698  SFLKP11

   (1)     725  SFLKP12

   (1)     750  SFLKP13

   (1)     772  SFLKP14

   (1)     795  SFLKP20

   (1)     817  SFLKP21

   (1)     839  SFLKP22

   (1)     862  

   (1)     866  SFULP10

   (1)     889  SFULP11

   (1)     915  SFULP12

   (1)     940  SFULP13

   (1)     962  SFULP14

   (1)     985  SFULP20

   (1)    1007  SFULP21

   (1)    1029  SFULP22

   (1)    1052  

   (1)    1131  EXECUTE & CLEANUP

   (1)    1143  TC_CONTROL

   (1)    1224  SUBROUTINES

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   1

1.0                                                                                                                              (1)



                                     0000     1 	.TITLE	SATSSF14 - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)

                                     0000     2 	.IDENT	/1.0/

                                     0000     3 

                                     0000     4 ;

                                     0000     5 ;			  COPYRIGHT (c) 1977,1978 BY

                                     0000     6 ;	      DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.

                                     0000     7 ;

                                     0000     8 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND  COPIED

                                     0000     9 ; ONLY  IN  ACCORDANCE  WITH  THE  TERMS  OF  SUCH  LICENSE AND WITH THE

                                     0000    10 ; INCLUSION OF THE ABOVE COPYRIGHT NOTICE.  THIS SOFTWARE OR  ANY  OTHER

                                     0000    11 ; COPIES  THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY

                                     0000    12 ; OTHER PERSON.  NO TITLE TO AND OWNERSHIP OF  THE  SOFTWARE  IS  HEREBY

                                     0000    13 ; TRANSFERRED.

                                     0000    14 ;

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

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

                                     0000    17 ; CORPORATION.

                                     0000    18 ;

                                     0000    19 ; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR  RELIABILITY  OF  ITS

                                     0000    20 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.

                                     0000    21 ;

                                     0000    22 

                                     0000    23 ;++

                                     0000    24 ; FACILITY:	SATS SYSTEM SERVICE TESTS

                                     0000    25 ;

                                     0000    26 ; ABSTRACT:	THE SATSSF14 MODULE TESTS THE EXECUTION OF CERTAIN

                                     0000    27 ; VMS SYSTEM SERVICES, INVOKED IN SUCH A WAY AS TO EXPECT FAILING

                                     0000    28 ; STATUS CODES. THE SYSTEM SERVICES TESTED AND THE STATUS CODES

                                     0000    29 ; EXPECTED ARE SUMMARIZED AS ARGUMENTS TO THE TESTSERV MACROS

                                     0000    30 ; WHICH APPEAR NEAR THE END OF THIS LISTING. SUCCESSFUL STATUS

                                     0000    31 ; CODES ARE TESTED IN OTHER MODULES.

                                     0000    32 ;

                                     0000    33 ;

                                     0000    34 ; ENVIRONMENT:	USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE,

                                     0000    35 ;		DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED.

                                     0000    36 ;

                                     0000    37 ; AUTHOR: THOMAS L. CAFARELLA,		CREATION DATE: MMM, 1978

                                     0000    38 ;	  PAUL D. FAY (DISPSERV & TESTSERV MACROS)

                                     0000    39 ;

                                     0000    40 ; MODIFIED BY:

                                     0000    41 ;

                                     0000    42 ;	, : VERSION

                                     0000    43 ; 01	- 

                                     0000    44 ;--

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   2

1.0             DECLARATIONS                                                                                                     (1)



                                     0000    46 	.SBTTL	DECLARATIONS

                                     0000    47 ;

                                     0000    48 ; INCLUDE FILES:

                                     0000    49 ;

                                     0000    50 	$PHDDEF				; PROCESS HEADER OFFSET SYMBOLS

                                     0000    51 	$PCBDEF				; PROCESS CONTROL BLOCK OFFSET SYMBS

                                     0000    52 	$STSDEF				; STATUS MESSAGE SYMBOLS

                           00000003  0000    53 	.MDELETE ($PHDDEF,$PCBDEF,$STSDEF) ; GET RID OF MACRO DEFINITIONS

                                     0000    54 	$PRVDEF				; SYMBOL DEFS FOR PRIVILEGES

                                     0000    55 	$UETPDEF			; UETP MSG CODE DEFINITIONS

                                     0000    56 	$SHR_MESSAGES UETP,116,<<TEXT,INFO>> 

                                     0000    57 					; DEFINE UETP$_TEXT

                           00000004  0000    58 	.MDELETE ($PRVDEF,$UETPDEF,$SHR_MESSAGES,$SHRDEF)

                                     0000    59 					; GET RID OF MACRO DEFINITIONS

                                     0000    60 	$PSLDEF				; ACCESS MODE SYMBOLS

                                     0000    61 ;

                                     0000    62 ; MACROS:

                                     0000    63 ;

                                     0000    64 ;

                                     0000    65 ; EQUATED SYMBOLS:

                                     0000    66 ;

                           00000000  0000    67 WARNING		= 0			; WARNING SEVERITY VALUE FOR MSGS

                           00000001  0000    68 SUCCESS		= 1			; SUCCESS SEVERITY VALUE FOR MSGS

                           00000002  0000    69 ERROR		= 2			; ERROR SEVERITY VALUE FOR MSGS

                           00000003  0000    70 INFO		= 3			; INFORMATIONAL SEV VALUE FOR MSGS

                           00000004  0000    71 SEVERE		= 4			; SEVERE (FATAL) SEV VALUE FOR MSGS

                           00000000  0000    72 TCG_NO		=  0			; INITIALIZE TEST CASE GROUP NUMBER

                           00000000  0000    73 GRP_TOTAL	=  0			; INITIALIZE TEST CASE GROUP TOTAL

                           00007FFF  0000    74 R0_THRU_SP	= ^M<R0,R1,R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,AP,FP,SP>

                           00000000  0000    75 INADR_LWS12	= 0			; INADR ARG FOR LKWSET (LOCATION 0)

                           00000001  0000    76 RETADR_LWS20	= 1			; RETADR ARG FOR LKWSET (LOCATION 1)

                           00000000  0000    77 INADR_UWS12	= 0			; INADR ARG FOR ULWSET (LOCATION 0)

                           00000001  0000    78 RETADR_UWS20	= 1			; RETADR ARG FOR ULWSET (LOCATION 1)

                           00000000  0000    79 INADR_LKP12	= 0			; INADR ARG FOR LCKPAG (LOCATION 0)

                           00000001  0000    80 RETADR_LKP20	= 1			; RETADR ARG FOR LCKPAG (LOCATION 1)

                           00000000  0000    81 INADR_ULP12	= 0			; INADR ARG FOR ULKPAG (LOCATION 0)

                           00000001  0000    82 RETADR_ULP20	= 1			; RETADR ARG FOR ULKPAG (LOCATION 1)

                                     0000    83 ;

                                     0000    84 ; OWN STORAGE:

                                     0000    85 ;

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   3

1.0             DECLARATIONS                                                                                                     (1)



                                 00000000    87 	.PSECT	RODATA,RD,NOWRT,NOEXE,LONG

                                     0000    88 REG_COMP_MASK:	.WORD	^M<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,AP,FP> ! ^X8000 -

                               BFFC  0000    89 					; REG COMPARE MASK (HIGH-ORDER ... 

                                     0002    90 					; ... BIT MUST BE ON

                                     0002    91 ERR_MSG_FAOCTL:	STRING	I,<!/!AC!1ZB!1ZB: REGISTER !2UW CONTENTS ALTERED>, -

                                     0002    92 		<;  BEFORE SERVICE CALL: !8XL   AFTER SERVICE CALL: !8XL>

                                     006E    93 TEST_MOD_NAME:	STRING	C,<SATSSF14>	; TEST MODULE NAME

                                     0077    94 TEST_MOD_BEG:	STRING	C,<begun>	; DISPOSITION FIELD OF TEST MOD MSG

                                     007D    95 TEST_MOD_SUCC:	STRING	C,<successful>	; DISPOSITION FIELD OF TEST MOD MSG

                                     0088    96 TEST_MOD_FAIL:	STRING	C,<failed>	; DISPOSITION FIELD OF TEST MOD MSG

                                     008F    97 TEST_MOD_NAME_D: STRING	I,<SATSSF14>	; TEST MODULE NAME DESCRIPTOR

                                     009F    98 TTNAME:     	STRING  I,<TT>		; TERMINAL LOGICAL NAME

                  00000000'00000000' 00A9    99 INADR:		.LONG	NOACCESS,NOACCESS ; PAGE ADDRESS OF NOACCESS PSECT

                           00000000' 00B1   100 PROT:		.LONG	PRT$C_NA	; PROTECTION CODE FOR NOACCESS PSECT

                  FFFFFFFF FFFFFFFF  00B5   101 ONES:		.LONG	-1,-1		; A QUADWORD OF 1-BITS

                                     00BD   102 INADR_LWS10:				; INADR ARGUMENT FOR LKWSET

                                     00BD   103 INADR_UWS10:				; INADR ARGUMENT FOR ULWSET

                           80000000' 00BD   104 		.ADDRESS ^X80000000 	; ......

                           8F000000' 00C1   105 		.ADDRESS ^X8F000000	; .......

                                     00C5   106 INADR_LKP10:				; INADR ARGUMENT FOR LCKPAG

                  000000C9'000000C5' 00C5   107 		.ADDRESS .,.		; ..... THIS PAGE

                                     00CD   108 RETADR_LWS21:				; RETADR ARGUMENT FOR LKWSET

                                     00CD   109 RETADR_UWS21:				; RETADR ARGUMENT FOR ULWSET

                                     00CD   110 RETADR_LKP21:				; RETADR ARGUMENT FOR LCKPAG

                                     00CD   111 RETADR_ULP21:				; RETADR ARGUMENT FOR ULKPAG

                           000000D5  00CD   112 		.BLKL	2

                                     00D5   113 ACMODE_LWS:				; ACMODE ARGUMENT FOR LKWSET

                                     00D5   114 ACMODE_UWS:				; ACMODE ARGUMENT FOR ULWSET

                           00000003  00D5   115 		.LONG	PSL$C_USER

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   4

1.0             DECLARATIONS                                                                                                     (1)



                                 00000000   117 	.PSECT	RWDATA,RD,WRT,NOEXE

                           00000004  0000   118 TPID:		.BLKL	1		; PROCESS ID FOR THIS PROCESS

                           00000008  0004   119 CURRENT_TC:	.BLKL	1 		; PTR TO CURRENT TEST CASE

                           00000044  0008   120 REG_SAVE_AREA:	.BLKL	15		; SAVE AREA FOR ALL REGS (SANS PC)

                           007480D9  0044   121 MOD_MSG_CODE:	.LONG	UETP$_SATSMS	; TEST MODULE MSG CODE FOR PUTMSG

                           0000004C  0048   122 CLOB_REG_NO:	.BLKL	1		; CLOBBERED REG NO (FOR FAO ERR MSG)

                           00000050  004C   123 REG_BEFORE_SS:	.BLKL	1		; REG CONTENTS BEFORE S.S. 

                                     0050   124 					; ... (FOR FAO ERROR MSG)

                           00000054  0050   125 REG_AFTER_SS:	.BLKL	1		; REG CONTENTS AFTER S.S. 

                                     0054   126 					; ... (FOR FAO ERROR MSG)

                                     0054   127 $$TSTN$$:	STRING	C,<  SF   >	; ASCII PORTION OF TEST CASE NAME

                           0000006E' 005C   128 TMN_ADDR:	.ADDRESS TEST_MOD_NAME	; ADDR OF TEST MOD NAME FOR FAO

                           00000077' 0060   129 TMD_ADDR:	.ADDRESS TEST_MOD_BEG	; ADDR OF T.M. DISP FIELD FOR FAO

                           00000068  0064   130 TS_EP:		.BLKL	1		; ENTRY PNT FOR CURR TESTSERV MACRO

                           00000070  0068   131 RETADR:		.BLKL	2		; RETURN LONGWORDS FOR SETPRT

                           00000071  0070   132 PRVPRT:		.BLKB	1		; PROT RETURN BYTE FOR SETPRT

                           00000079  0071   133 PRIVMASK:	.BLKQ	1		; ADDR OF PRIVILEGE MASK (IN PHD)

                           0000007D  0079   134 CHM_CONT:	.BLKL	1		; CHANGE MODE CONTINUE ADDRESS

                           00000091  007D   135 REGS:		.BLKL	5		; AREA FOR COND INDEX REGS (R2-R6)

                           00000099  0091   136 INADR_LWS:	.BLKL	2		; INADR ARGUMENT FOR LKWSET SERVICE

                           000000A1  0099   137 INADR_LWS11:	.BLKL	2		; INADR ARGUMENT FOR LKWSET SERVICE

                           000000A9  00A1   138 RETADR_LWS:	.BLKL	2		; RETADR ARGUMENT FOR LKWSET SERVICE

                           000000B1  00A9   139 INADR_UWS:	.BLKL	2		; INADR ARGUMENT FOR ULWSET SERVICE

                           000000B9  00B1   140 INADR_UWS11:	.BLKL	2		; INADR ARGUMENT FOR ULWSET SERVICE

                           000000C1  00B9   141 RETADR_UWS:	.BLKL	2		; RETADR ARGUMENT FOR ULWSET SERVICE

                           000000C9  00C1   142 INADR_LKP:	.BLKL	2		; INADR ARGUMENT FOR LCKPAG SERVICE

                           000000D1  00C9   143 INADR_LKP11:	.BLKL	2		; INADR ARGUMENT FOR LCKPAG SERVICE

                           000000D9  00D1   144 RETADR_LKP:	.BLKL	2		; RETADR ARGUMENT FOR LCKPAG SERVICE

                           000000E1  00D9   145 INADR_ULP:	.BLKL	2		; INADR ARGUMENT FOR ULKPAG SERVICE

                           000000E9  00E1   146 INADR_ULP11:	.BLKL	2		; INADR ARGUMENT FOR ULKPAG SERVICE

                           000000F1  00E9   147 RETADR_ULP:	.BLKL	2		; RETADR ARGUMENT FOR ULKPAG SERVICE

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   5

1.0             DECLARATIONS                                                                                                     (1)



                                 00000000   149 	.PSECT	SATS_ACCVIO_1,RD,WRT,NOEXE,PAGE

                           00000200  0000   150 EMPTY:		.BLKB	512		; RESERVE A PAGE OF SPACE

                                     0200   151 ;

                                     0200   152 ; + 

                                     0200   153 ; ******************************************************************

                                     0200   154 ; *                                                                *

                                     0200   155 ; * 	THE ORDER OF STATEMENTS IN THIS PSECT IS CRITICAL.         *

                                     0200   156 ; *	DO NOT RE-ARRANGE THE VARIABLES. CONSULT SATS              *

                                     0200   157 ; *	FUNCTIONAL SPECIFICATION FOR A DESCRIPTION OF THE USE      *

                                     0200   158 ; *	OF THE EMPTY PSECT (AND ITS COMPANION PSECT, NOACCESS).    *

                                     0200   159 ; *                                                                *

                                     0200   160 ; ******************************************************************

                                     0200   161 ; -

                                     0200   162 ;

                                     0200   163 ; TYPE AAAAA_SSSX1 (TYPE AAAAA_SSSX2 IF NOT DESC) GO HERE:

                           000001FF  0200   164 INADR_ULP10	= . - 1			; INADR ARG FOR ULKPAG (LAST BYTE IN PAGE)

                           000001F9  0200   165 INADR_LWS14	= . - 7			; INADR ARGUMENT FOR LKWSET

                           000001F9  0200   166 RETADR_LWS22	= . - 7			; RETADR ARGUMENT FOR LKWSET

                           000001F9  0200   167 INADR_UWS14	= . - 7			; INADR ARGUMENT FOR ULWSET

                           000001F9  0200   168 RETADR_UWS22	= . - 7			; RETADR ARGUMENT FOR ULWSET

                           000001F9  0200   169 INADR_LKP14	= . - 7			; INADR ARGUMENT FOR LCKPAG

                           000001F9  0200   170 RETADR_LKP22	= . - 7			; RETADR ARGUMENT FOR LCKPAG

                           000001F9  0200   171 INADR_ULP14	= . - 7			; INADR ARGUMENT FOR ULKPAG

                           000001F9  0200   172 RETADR_ULP22	= . - 7			; RETADR ARGUMENT FOR ULKPAG

                           000001F3  0200   173 		. = . - 13		; ALLOW ROOM FOR STRING DESCRIPTOR

                                     01F3   174 ; TYPE AAAAA_SSSX5 GO HERE:

                           00000006  01F3   175 		.LONG	6		; STRING LENGTH (WILL CROSS PSECT BOUNDARY)

                           000001FB' 01F7   176 		.ADDRESS .+4		; STRING ADDRESS

                                     01FB   177 ; TYPE AAAAA_SSSX3 GO HERE:

                           000001FC  01FB   178 		.BLKB	1		; LOW-ORDER BYTE OF STRING LENGTH

                                     01FC   179 ; TYPE AAAAA_SSSX2 GO HERE:

                           00000200  01FC   180 		.BLKL	1		; STRING LENGTH

                                     0200   181 ;

                                     0200   182 ;

                                     0200   183 ;

                                     0200   184 ;

                                 00000000   185 	.PSECT	SATS_ACCVIO_2,RD,WRT,NOEXE,PAGE

                           00000200  0000   186 NOACCESS:	.BLKB	512		; RESERVE A PAGE OF SPACE

                           00000000  0200   187 		. = . - 512		; RETURN LOC CTR TO BEGINNING OF PSECT

                           00000000' 0000   188 		.ADDRESS EMPTY		; ADDRESS OF ACCESSIBLE STRING

                           00000000' 0004   189 		.ADDRESS EMPTY/^X100 	; ADDRESS OF ACCESSIBLE STRING

                                     0008   190 ;+

                                     0008   191 ; *** NOTE -- DO NOT CHANGE LOCATION OR SEQUENCE OF ABOVE STATEMENTS!

                                     0008   192 ; ***         THIS PSECT (NOACCESS) MUST APPEAR IN MEMORY IMMEDIATELY

                                     0008   193 ; ***         FOLLOWING THE EMPTY PSECT. PSECT NAMES AND OPTIONS WILL BE 

                                     0008   194 ; ***         CHOSEN TO FORCE THE DESIRED PSECT ORDERING.

                                     0008   195 ;-

                                     0008   196 ;

                           00000010  0008   197 INADR_LWS13:	.BLKL	2		; INADR ARGUMENT FOR LKWSET

                           00000018  0010   198 INADR_UWS13:	.BLKL	2		; INADR ARGUMENT FOR ULWSET

                           00000020  0018   199 INADR_LKP13:	.BLKL	2		; INADR ARGUMENT FOR LCKPAG

                           00000028  0020   200 INADR_ULP13:	.BLKL	2		; INADR ARGUMENT FOR ULKPAG

                                     0028   201 ;

                                     0028   202 ;

                                     0028   203 ;

                           00000001  0028   204 	.MDELETE (STRING)		; NO LONGER NEED MACRO DEFINITION

                                 00000000   205 	.PSECT	SATSSF14,RD,WRT,EXE,LONG

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   6

1.0             SATSSF14                                                                                                         (1)



                                     0000   207 	.SBTTL	SATSSF14

                                     0000   208 ;++

                                     0000   209 ; FUNCTIONAL DESCRIPTION:

                                     0000   210 ;

                                     0000   211 ;		AFTER PERFORMING SOME INITIAL HOUSEKEEPING, SUCH AS

                                     0000   212 ; PRINTING THE MODULE BEGIN MESSAGE AND ACQUIRING ALL PRIVILEGES,

                                     0000   213 ; THE SATSSF14 ROUTINE EXECUTES THE TEST_SERV_EXEC MACRO TO RUN

                                     0000   214 ; ALL TEST CASES. WHEN THE MACRO COMPLETES ITS EXECUTION, SATSSF14

                                     0000   215 ; PRINTS A TEST MODULE SUCCESS OR FAIL MESSAGE AND EXITS TO THE

                                     0000   216 ; OPERATING SYSTEM. TEST_SERV_EXEC CALLS THE TC_CONTROL/TESTSERV

                                     0000   217 ; CO-ROUTINE PAIR ONCE PER TEST CASE GROUP TO EXECUTE ALL TEST

                                     0000   218 ; CASES IN THAT GROUP. EACH TEST CASE GROUP IS DEFINED BY BOUNDING

                                     0000   219 ; ITS TEST CASES WITH A TC_GROUP MACRO BEFORE THE FIRST TEST CASE

                                     0000   220 ; AND A TCEND MACRO AFTER THE LAST ONE. THE TEST CASES THEMSELVES

                                     0000   221 ; ARE DEFINED WITHIN THESE BOUNDS BY PRECEDING EACH WITH A

                                     0000   222 ; NEXT_TEST_CASE MACRO. TC_CONTROL/TESTSERV EXECUTES THE CODE 

                                     0000   223 ; FOLLOWING EACH NEXT_TEST_CASE MACRO IMMEDIATELY BEFORE ISSUING

                                     0000   224 ; THE SYSTEM SERVICE AS REQUESTED IN THE TESTSERV MACRO. TC_CONTROL/

                                     0000   225 ; TESTSERV ALSO CHECKS THE RESULTS OF THE SERVICE WITH RESPECT

                                     0000   226 ; TO ITS EXPECTED STATUS CODE AND PRINTS ANY REQUIRED FAILURE

                                     0000   227 ; MESSAGES FOR THE TEST CASE. THE CODE APPEARING AFTER EACH

                                     0000   228 ; NEXT_TEST_CASE MACRO IS MERELY TO SET UP CONDITIONS REQUIRED

                                     0000   229 ; FOR THE SYSTEM SERVICE AND TO CLEAN UP ANY RESOURCES ACQUIRED

                                     0000   230 ; BY THE PREVIOUS TEST CASE.

                                     0000   231 ;

                                     0000   232 ; CALLING SEQUENCE:

                                     0000   233 ;

                                     0000   234 ;	$ RUN SATSSF14  ...  (DCL COMMAND)

                                     0000   235 ;

                                     0000   236 ; INPUT PARAMETERS:

                                     0000   237 ;

                                     0000   238 ;	NONE

                                     0000   239 ;

                                     0000   240 ; IMPLICIT INPUTS:

                                     0000   241 ;

                                     0000   242 ;	NONE

                                     0000   243 ;

                                     0000   244 ; OUTPUT PARAMETERS:

                                     0000   245 ;

                                     0000   246 ;	NONE

                                     0000   247 ;

                                     0000   248 ; IMPLICIT OUTPUTS:

                                     0000   249 ;

                                     0000   250 ;	MESSAGES TO SYS$OUTPUT ARE THE ONLY OUTPUT FROM SATSSF14.

                                     0000   251 ;	THEY ARE OF THE FORM:

                                     0000   252 ;

                                     0000   253 ;		%UETP-S-SATSMS, TEST MODULE SATSSF14 BEGUN ... (BEGIN MSG)

                                     0000   254 ;		%UETP-S-SATSMS, TEST MODULE SATSSF14 SUCCESSFUL ... (END MSG)

                                     0000   255 ;		%UETP-E-SATSMS, TEST MODULE SATSSF14 FAILED ... (END MSG)

                                     0000   256 ;		%UETP-I-TEXT, ... (VARIABLE INFORMATION ABOUT A TEST MODULE FAILURE)

                                     0000   257 ;

                                     0000   258 ; COMPLETION CODES:

                                     0000   259 ;

                                     0000   260 ;	THE SATSSF14 ROUTINE TERMINATES WITH A $EXIT TO THE

                                     0000   261 ;	OPERATING SYSTEM WITH A STATUS CODE DEFINED BY UETP$_SATSMS.

                                     0000   262 ;

                                     0000   263 ; SIDE EFFECTS:

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   7

1.0             SATSSF14                                                                                                         (1)



                                     0000   264 ;

                                     0000   265 ;	NONE

                                     0000   266 ;

                                     0000   267 ;--

                                     0000   268 

                                     0000   269 

                                     0000   270 

                                     0000   271 SATSSF14:

                               0FFC  0000   272 	.WORD	^M<R2,R3,R4,R5,R6,R7,R8,R9,R10,R11>

                                     0002   273 					; ENTRY MASK

                                     0002   274 	$WAKE_S  TPID			; GET PID OF THIS PROCESS

                                     0011   275 	$HIBER_S			; UNDO WAKE

                                     0018   276 	$SETPRN_S TEST_MOD_NAME_D 	; SET PROCESS NAME

                          0EF3   30  0025   277 	BSBW	MOD_MSG_PRINT		; PRINT TEST MODULE BEGIN MSG

   00000060'EF   0000007D'EF     DE  0028   278 	MOVAL	TEST_MOD_SUCC,TMD_ADDR	; ASSUME END MSG WILL SHOW SUCCESS

            00            01     F0  0033   279 	INSV	#SUCCESS,#0,#3,MOD_MSG_CODE ; ADJUST STATUS CODE FOR SUCCESS

   00000044'EF            03         0036       

                                     003C   280 	MODE	TO,10$,KRNL,NOREGS 	; KERNEL MODE TO ACCESS PHD

            59   00000000'9F     D0  0059   281 	MOVL	@#CTL$GL_PHD,R9		; GET PROCESS HEADER ADDRESS

   00000071'EF            69     DE  0060   282 	MOVAL	PHD$Q_PRIVMSK(R9),PRIVMASK ; GET PRIV MASK ADDRESS

                                     0067   283 	MODE	FROM,10$		; GET BACK TO USER MODE

                                     0068   284 	PRIV	ADD,ALL			; GET ALL PRIVILEGES

                                     0091   285 	DISPSERV			; SET UP DISPLAY INFO FOR TESTSERV

                                     0226   286 	$SETPRT_S INADR=INADR, RETADR=RETADR, -

                                     0226   287 		  PROT=PROT, PRVPRT=PRVPRT

                                     0247   288 					; SET NOACCESS PSECT ...

                                     0247   289 					; ... FOR NO USER ACCESS

                          0B6E   31  0247   290 	BRW	EXECUTE			; GO EXECUTE ALL TEST CASES

                                     024A   291 ;

                                     024A   292 	TC_GROUP	LWS,1,TS1

                                     0271   293 ;

                                     0271   294 	NEXT_TEST_CASE	SFLWS10

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   8

1.0             SFLWS10                                                                                                          (1)



                                     0271   295 ;

                                     0271   296 ;++

                                     0271   297 ; ******************************************************

                                     0271   298 ; *

                                     0271   299 ; *  TEST CASE NAME:		SFLWS10      

                                     0271   300 ; *

                                     0271   301 ; *  SYSTEM SERVICE:		LKWSET               

                                     0271   302 ; *

                                     0271   303 ; *  ARGUMENT UNDER TEST: 	INADR_LWS10         

                                     0271   304 ; *

                                     0271   305 ; *  INPUT CONDITIONS:

                                     0271   306 ; *	ISSUE LKWSET WITH RANGE OF ADDRESSES IN

                                     0271   307 ; *	  SYSTEM SPACE.

                                     0271   308 ; *

                                     0271   309 ; *  EXPECTED RESULTS:

                                     0271   310 ; *	1) SYSTEM STATUS CODE:	NOPRIV

                                     0271   311 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0271   312 ; *

                                     0271   313 ; ******************************************************

                                     0271   314 ;--

                                     0271   315 ;

                                     0271   316 ;

                                     0271   317 	NEXT_TEST_CASE	SFLWS11

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page   9

1.0             SFLWS11                                                                                                          (1)



                                     027D   318 ;

                                     027D   319 ;++

                                     027D   320 ; ******************************************************

                                     027D   321 ; *

                                     027D   322 ; *  TEST CASE NAME:		SFLWS11      

                                     027D   323 ; *

                                     027D   324 ; *  SYSTEM SERVICE:		LKWSET               

                                     027D   325 ; *

                                     027D   326 ; *  ARGUMENT UNDER TEST: 	INADR_LWS11         

                                     027D   327 ; *

                                     027D   328 ; *  INPUT CONDITIONS:

                                     027D   329 ; *	LOCK INTO WORKING SET A PAGE ALREADY 

                                     027D   330 ; *	  OWNED BY EXEC MODE.

                                     027D   331 ; *

                                     027D   332 ; *  EXPECTED RESULTS:

                                     027D   333 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     027D   334 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     027D   335 ; *

                                     027D   336 ; ******************************************************

                                     027D   337 ;--

                                     027D   338 ;

                                     027D   339 	MODE	TO,10$,EXEC,NOREGS	; GET INTO EXEC MODE FOR EXPREG

                                     029A   340 	$EXPREG_S PAGCNT=#1, RETADR=INADR_LWS11

                                     02AD   341 					; GET A 1-PAGE REGION OWNED BY EXEC MODE

                                     02AD   342 	MODE	FROM,10$		; BACK TO USER MODE

                                     02AE   343 ;

                                     02AE   344 	NEXT_TEST_CASE	SFLWS12

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  10

1.0             SFLWS12                                                                                                          (1)



                                     02BA   345 ;

                                     02BA   346 ;++

                                     02BA   347 ; ******************************************************

                                     02BA   348 ; *

                                     02BA   349 ; *  TEST CASE NAME:		SFLWS12      

                                     02BA   350 ; *

                                     02BA   351 ; *  SYSTEM SERVICE:		LKWSET               

                                     02BA   352 ; *

                                     02BA   353 ; *  ARGUMENT UNDER TEST: 	INADR_LWS12         

                                     02BA   354 ; *

                                     02BA   355 ; *  INPUT CONDITIONS:

                                     02BA   356 ; *	INPUT ADDRESS FIELD AT LOCATION 0.

                                     02BA   357 ; *

                                     02BA   358 ; *  EXPECTED RESULTS:

                                     02BA   359 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     02BA   360 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     02BA   361 ; *

                                     02BA   362 ; ******************************************************

                                     02BA   363 ;--

                                     02BA   364 ;

                                     02BA   365 	MODE	TO,20$,EXEC,NOREGS	; INTO EXEC MODE FOR CNTREG

                                     02D7   366 	$CNTREG_S PAGCNT=#1		; GIVE BACK PAGE ACQUIRED BY SFLWS11

                                     02E6   367 	MODE	FROM,20$		; BACK TO USER MODE

                                     02E7   368 ;

                                     02E7   369 	NEXT_TEST_CASE	SFLWS13

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  11

1.0             SFLWS13                                                                                                          (1)



                                     02F3   370 ;

                                     02F3   371 ;++

                                     02F3   372 ; ******************************************************

                                     02F3   373 ; *

                                     02F3   374 ; *  TEST CASE NAME:		SFLWS13      

                                     02F3   375 ; *

                                     02F3   376 ; *  SYSTEM SERVICE:		LKWSET               

                                     02F3   377 ; *

                                     02F3   378 ; *  ARGUMENT UNDER TEST: 	INADR_LWS13         

                                     02F3   379 ; *

                                     02F3   380 ; *  INPUT CONDITIONS:

                                     02F3   381 ; *	INPUT ADDRESS FIELD IN NON-ACCESSIBLE PSECT.

                                     02F3   382 ; *

                                     02F3   383 ; *  EXPECTED RESULTS:

                                     02F3   384 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     02F3   385 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     02F3   386 ; *

                                     02F3   387 ; ******************************************************

                                     02F3   388 ;--

                                     02F3   389 ;

                                     02F3   390 ;

                                     02F3   391 	NEXT_TEST_CASE	SFLWS14

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  12

1.0             SFLWS14                                                                                                          (1)



                                     02FF   392 ;

                                     02FF   393 ;++

                                     02FF   394 ; ******************************************************

                                     02FF   395 ; *

                                     02FF   396 ; *  TEST CASE NAME:		SFLWS14      

                                     02FF   397 ; *

                                     02FF   398 ; *  SYSTEM SERVICE:		LKWSET               

                                     02FF   399 ; *

                                     02FF   400 ; *  ARGUMENT UNDER TEST: 	INADR_LWS14         

                                     02FF   401 ; *

                                     02FF   402 ; *  INPUT CONDITIONS:

                                     02FF   403 ; *	SECOND LONGWORD OF INPUT ADDRESS FIELD BEGINS IN

                                     02FF   404 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     02FF   405 ; *

                                     02FF   406 ; *  EXPECTED RESULTS:

                                     02FF   407 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     02FF   408 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     02FF   409 ; *

                                     02FF   410 ; ******************************************************

                                     02FF   411 ;--

                                     02FF   412 ;

                                     02FF   413 ;

                                     02FF   414 	NEXT_TEST_CASE	SFLWS20

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  13

1.0             SFLWS20                                                                                                          (1)



                                     030B   415 ;

                                     030B   416 ;++

                                     030B   417 ; ******************************************************

                                     030B   418 ; *

                                     030B   419 ; *  TEST CASE NAME:		SFLWS20      

                                     030B   420 ; *

                                     030B   421 ; *  SYSTEM SERVICE:		LKWSET               

                                     030B   422 ; *

                                     030B   423 ; *  ARGUMENT UNDER TEST: 	RETADR_LWS20         

                                     030B   424 ; *

                                     030B   425 ; *  INPUT CONDITIONS:

                                     030B   426 ; *	RETURN ADDRESS FIELD AT LOCATION 1.

                                     030B   427 ; *

                                     030B   428 ; *  EXPECTED RESULTS:

                                     030B   429 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     030B   430 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     030B   431 ; *

                                     030B   432 ; ******************************************************

                                     030B   433 ;--

                                     030B   434 ;

                                     030B   435 ;

                                     030B   436 	NEXT_TEST_CASE	SFLWS21

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  14

1.0             SFLWS21                                                                                                          (1)



                                     0317   437 ;

                                     0317   438 ;++

                                     0317   439 ; ******************************************************

                                     0317   440 ; *

                                     0317   441 ; *  TEST CASE NAME:		SFLWS21      

                                     0317   442 ; *

                                     0317   443 ; *  SYSTEM SERVICE:		LKWSET               

                                     0317   444 ; *

                                     0317   445 ; *  ARGUMENT UNDER TEST: 	RETADR_LWS21         

                                     0317   446 ; *

                                     0317   447 ; *  INPUT CONDITIONS:

                                     0317   448 ; *	RETURN ADDRESS FIELD IN READ-ONLY PSECT.

                                     0317   449 ; *

                                     0317   450 ; *  EXPECTED RESULTS:

                                     0317   451 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0317   452 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0317   453 ; *

                                     0317   454 ; ******************************************************

                                     0317   455 ;--

                                     0317   456 ;

                                     0317   457 ;

                                     0317   458 	NEXT_TEST_CASE	SFLWS22

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  15

1.0             SFLWS22                                                                                                          (1)



                                     0323   459 ;

                                     0323   460 ;++

                                     0323   461 ; ******************************************************

                                     0323   462 ; *

                                     0323   463 ; *  TEST CASE NAME:		SFLWS22      

                                     0323   464 ; *

                                     0323   465 ; *  SYSTEM SERVICE:		LKWSET               

                                     0323   466 ; *

                                     0323   467 ; *  ARGUMENT UNDER TEST: 	RETADR_LWS22         

                                     0323   468 ; *

                                     0323   469 ; *  INPUT CONDITIONS:

                                     0323   470 ; *	SECOND LONGWORD OF RETURN ADDRESS FIELD BEGINS IN

                                     0323   471 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     0323   472 ; *

                                     0323   473 ; *  EXPECTED RESULTS:

                                     0323   474 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0323   475 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0323   476 ; *

                                     0323   477 ; ******************************************************

                                     0323   478 ;--

                                     0323   479 ;

                                     0323   480 ;

                                     0323   481 	TCEND

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  16

1.0                                                                                                                              (1)



                                     0324   482 ;

                                     0324   483 	TC_GROUP	UWS,1,TS2

                                     034B   484 ;

                                     034B   485 	NEXT_TEST_CASE	SFUWS10

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  17

1.0             SFUWS10                                                                                                          (1)



                                     034B   486 ;

                                     034B   487 ;++

                                     034B   488 ; ******************************************************

                                     034B   489 ; *

                                     034B   490 ; *  TEST CASE NAME:		SFUWS10      

                                     034B   491 ; *

                                     034B   492 ; *  SYSTEM SERVICE:		ULWSET               

                                     034B   493 ; *

                                     034B   494 ; *  ARGUMENT UNDER TEST: 	INADR_UWS10         

                                     034B   495 ; *

                                     034B   496 ; *  INPUT CONDITIONS:

                                     034B   497 ; *	ISSUE ULWSET WITH RANGE OF ADDRESSES IN

                                     034B   498 ; *	  SYSTEM SPACE.

                                     034B   499 ; *

                                     034B   500 ; *  EXPECTED RESULTS:

                                     034B   501 ; *	1) SYSTEM STATUS CODE:	NOPRIV

                                     034B   502 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     034B   503 ; *

                                     034B   504 ; ******************************************************

                                     034B   505 ;--

                                     034B   506 ;

                                     034B   507 ;

                                     034B   508 	NEXT_TEST_CASE	SFUWS11

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  18

1.0             SFUWS11                                                                                                          (1)



                                     0357   509 ;

                                     0357   510 ;++

                                     0357   511 ; ******************************************************

                                     0357   512 ; *

                                     0357   513 ; *  TEST CASE NAME:		SFUWS11      

                                     0357   514 ; *

                                     0357   515 ; *  SYSTEM SERVICE:		ULWSET               

                                     0357   516 ; *

                                     0357   517 ; *  ARGUMENT UNDER TEST: 	INADR_UWS11         

                                     0357   518 ; *

                                     0357   519 ; *  INPUT CONDITIONS:

                                     0357   520 ; *	UNLOCK A PAGE ALREADY OWNED BY EXEC MODE.

                                     0357   521 ; *

                                     0357   522 ; *  EXPECTED RESULTS:

                                     0357   523 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0357   524 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0357   525 ; *

                                     0357   526 ; ******************************************************

                                     0357   527 ;--

                                     0357   528 ;

                                     0357   529 	MODE	TO,10$,EXEC,NOREGS	; GET INTO EXEC MODE FOR EXPREG

                                     0374   530 	$EXPREG_S PAGCNT=#1, RETADR=INADR_UWS11

                                     0387   531 					; GET A 1-PAGE REGION OWNED BY EXEC MODE

                                     0387   532 	MODE	FROM,10$		; BACK TO USER MODE

                                     0388   533 ;

                                     0388   534 	NEXT_TEST_CASE	SFUWS12

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  19

1.0             SFUWS12                                                                                                          (1)



                                     0394   535 ;

                                     0394   536 ;++

                                     0394   537 ; ******************************************************

                                     0394   538 ; *

                                     0394   539 ; *  TEST CASE NAME:		SFUWS12      

                                     0394   540 ; *

                                     0394   541 ; *  SYSTEM SERVICE:		ULWSET               

                                     0394   542 ; *

                                     0394   543 ; *  ARGUMENT UNDER TEST: 	INADR_UWS12         

                                     0394   544 ; *

                                     0394   545 ; *  INPUT CONDITIONS:

                                     0394   546 ; *	INPUT ADDRESS FIELD AT LOCATION 0.

                                     0394   547 ; *

                                     0394   548 ; *  EXPECTED RESULTS:

                                     0394   549 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0394   550 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0394   551 ; *

                                     0394   552 ; ******************************************************

                                     0394   553 ;--

                                     0394   554 ;

                                     0394   555 	MODE	TO,20$,EXEC,NOREGS	; INTO EXEC MODE FOR CNTREG

                                     03B1   556 	$CNTREG_S PAGCNT=#1		; GIVE BACK PAGE ACQUIRED BY SFUWS11

                                     03C0   557 	MODE	FROM,20$		; BACK TO USER MODE

                                     03C1   558 ;

                                     03C1   559 	NEXT_TEST_CASE	SFUWS13

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  20

1.0             SFUWS13                                                                                                          (1)



                                     03CD   560 ;

                                     03CD   561 ;++

                                     03CD   562 ; ******************************************************

                                     03CD   563 ; *

                                     03CD   564 ; *  TEST CASE NAME:		SFUWS13      

                                     03CD   565 ; *

                                     03CD   566 ; *  SYSTEM SERVICE:		ULWSET               

                                     03CD   567 ; *

                                     03CD   568 ; *  ARGUMENT UNDER TEST: 	INADR_UWS13         

                                     03CD   569 ; *

                                     03CD   570 ; *  INPUT CONDITIONS:

                                     03CD   571 ; *	INPUT ADDRESS FIELD IN NON-ACCESSIBLE PSECT.

                                     03CD   572 ; *

                                     03CD   573 ; *  EXPECTED RESULTS:

                                     03CD   574 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     03CD   575 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     03CD   576 ; *

                                     03CD   577 ; ******************************************************

                                     03CD   578 ;--

                                     03CD   579 ;

                                     03CD   580 ;

                                     03CD   581 	NEXT_TEST_CASE	SFUWS14

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  21

1.0             SFUWS14                                                                                                          (1)



                                     03D9   582 ;

                                     03D9   583 ;++

                                     03D9   584 ; ******************************************************

                                     03D9   585 ; *

                                     03D9   586 ; *  TEST CASE NAME:		SFUWS14      

                                     03D9   587 ; *

                                     03D9   588 ; *  SYSTEM SERVICE:		ULWSET               

                                     03D9   589 ; *

                                     03D9   590 ; *  ARGUMENT UNDER TEST: 	INADR_UWS14         

                                     03D9   591 ; *

                                     03D9   592 ; *  INPUT CONDITIONS:

                                     03D9   593 ; *	SECOND LONGWORD OF INPUT ADDRESS FIELD BEGINS IN

                                     03D9   594 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     03D9   595 ; *

                                     03D9   596 ; *  EXPECTED RESULTS:

                                     03D9   597 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     03D9   598 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     03D9   599 ; *

                                     03D9   600 ; ******************************************************

                                     03D9   601 ;--

                                     03D9   602 ;

                                     03D9   603 ;

                                     03D9   604 	NEXT_TEST_CASE	SFUWS20

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  22

1.0             SFUWS20                                                                                                          (1)



                                     03E5   605 ;

                                     03E5   606 ;++

                                     03E5   607 ; ******************************************************

                                     03E5   608 ; *

                                     03E5   609 ; *  TEST CASE NAME:		SFUWS20      

                                     03E5   610 ; *

                                     03E5   611 ; *  SYSTEM SERVICE:		ULWSET               

                                     03E5   612 ; *

                                     03E5   613 ; *  ARGUMENT UNDER TEST: 	RETADR_UWS20         

                                     03E5   614 ; *

                                     03E5   615 ; *  INPUT CONDITIONS:

                                     03E5   616 ; *	RETURN ADDRESS FIELD AT LOCATION 1.

                                     03E5   617 ; *

                                     03E5   618 ; *  EXPECTED RESULTS:

                                     03E5   619 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     03E5   620 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     03E5   621 ; *

                                     03E5   622 ; ******************************************************

                                     03E5   623 ;--

                                     03E5   624 ;

                                     03E5   625 ;

                                     03E5   626 	NEXT_TEST_CASE	SFUWS21

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  23

1.0             SFUWS21                                                                                                          (1)



                                     03F1   627 ;

                                     03F1   628 ;++

                                     03F1   629 ; ******************************************************

                                     03F1   630 ; *

                                     03F1   631 ; *  TEST CASE NAME:		SFUWS21      

                                     03F1   632 ; *

                                     03F1   633 ; *  SYSTEM SERVICE:		ULWSET               

                                     03F1   634 ; *

                                     03F1   635 ; *  ARGUMENT UNDER TEST: 	RETADR_UWS21         

                                     03F1   636 ; *

                                     03F1   637 ; *  INPUT CONDITIONS:

                                     03F1   638 ; *	RETURN ADDRESS FIELD IN READ-ONLY PSECT.

                                     03F1   639 ; *

                                     03F1   640 ; *  EXPECTED RESULTS:

                                     03F1   641 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     03F1   642 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     03F1   643 ; *

                                     03F1   644 ; ******************************************************

                                     03F1   645 ;--

                                     03F1   646 ;

                                     03F1   647 ;

                                     03F1   648 	NEXT_TEST_CASE	SFUWS22

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  24

1.0             SFUWS22                                                                                                          (1)



                                     03FD   649 ;

                                     03FD   650 ;++

                                     03FD   651 ; ******************************************************

                                     03FD   652 ; *

                                     03FD   653 ; *  TEST CASE NAME:		SFUWS22      

                                     03FD   654 ; *

                                     03FD   655 ; *  SYSTEM SERVICE:		ULWSET               

                                     03FD   656 ; *

                                     03FD   657 ; *  ARGUMENT UNDER TEST: 	RETADR_UWS22         

                                     03FD   658 ; *

                                     03FD   659 ; *  INPUT CONDITIONS:

                                     03FD   660 ; *	SECOND LONGWORD OF RETURN ADDRESS FIELD BEGINS IN

                                     03FD   661 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     03FD   662 ; *

                                     03FD   663 ; *  EXPECTED RESULTS:

                                     03FD   664 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     03FD   665 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     03FD   666 ; *

                                     03FD   667 ; ******************************************************

                                     03FD   668 ;--

                                     03FD   669 ;

                                     03FD   670 ;

                                     03FD   671 	TCEND

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  25

1.0                                                                                                                              (1)



                                     03FE   672 ;

                                     03FE   673 	TC_GROUP	LKP,1,TS3

                                     0425   674 ;

                                     0425   675 	NEXT_TEST_CASE	SFLKP10

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  26

1.0             SFLKP10                                                                                                          (1)



                                     0425   676 ;

                                     0425   677 ;++

                                     0425   678 ; ******************************************************

                                     0425   679 ; *

                                     0425   680 ; *  TEST CASE NAME:		SFLKP10      

                                     0425   681 ; *

                                     0425   682 ; *  SYSTEM SERVICE:		LCKPAG               

                                     0425   683 ; *

                                     0425   684 ; *  ARGUMENT UNDER TEST: 	INADR_LKP10         

                                     0425   685 ; *

                                     0425   686 ; *  INPUT CONDITIONS:

                                     0425   687 ; *	LOCK PAGE INTO MEMORY WITHOUT PROPER PRIVILEGE.

                                     0425   688 ; *

                                     0425   689 ; *  EXPECTED RESULTS:

                                     0425   690 ; *	1) SYSTEM STATUS CODE:	NOPRIV

                                     0425   691 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0425   692 ; *

                                     0425   693 ; ******************************************************

                                     0425   694 ;--

                                     0425   695 ;

                                     0425   696 	PRIV	REM,PSWAPM		; REMOVE PRIV REQUIRED TO LOCK PAGES

                                     044C   697 ;

                                     044C   698 	NEXT_TEST_CASE	SFLKP11

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  27

1.0             SFLKP11                                                                                                          (1)



                                     0458   699 ;

                                     0458   700 ;++

                                     0458   701 ; ******************************************************

                                     0458   702 ; *

                                     0458   703 ; *  TEST CASE NAME:		SFLKP11      

                                     0458   704 ; *

                                     0458   705 ; *  SYSTEM SERVICE:		LCKPAG               

                                     0458   706 ; *

                                     0458   707 ; *  ARGUMENT UNDER TEST: 	INADR_LKP11         

                                     0458   708 ; *

                                     0458   709 ; *  INPUT CONDITIONS:

                                     0458   710 ; *	LOCK A PAGE ALREADY OWNED BY EXEC MODE.

                                     0458   711 ; *

                                     0458   712 ; *  EXPECTED RESULTS:

                                     0458   713 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0458   714 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0458   715 ; *

                                     0458   716 ; ******************************************************

                                     0458   717 ;--

                                     0458   718 ;

                                     0458   719 	PRIV	ADD,PSWAPM		; GET BACK PRIVILEGE REMOVED BY SFLKP10

                                     047F   720 	MODE	TO,10$,EXEC,NOREGS	; GET INTO EXEC MODE FOR EXPREG

                                     049C   721 	$EXPREG_S PAGCNT=#1, RETADR=INADR_LKP11

                                     04AF   722 					; GET A 1-PAGE REGION OWNED BY EXEC MODE

                                     04AF   723 	MODE	FROM,10$		; BACK TO USER MODE

                                     04B0   724 ;

                                     04B0   725 	NEXT_TEST_CASE	SFLKP12

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  28

1.0             SFLKP12                                                                                                          (1)



                                     04BC   726 ;

                                     04BC   727 ;++

                                     04BC   728 ; ******************************************************

                                     04BC   729 ; *

                                     04BC   730 ; *  TEST CASE NAME:		SFLKP12      

                                     04BC   731 ; *

                                     04BC   732 ; *  SYSTEM SERVICE:		LCKPAG               

                                     04BC   733 ; *

                                     04BC   734 ; *  ARGUMENT UNDER TEST: 	INADR_LKP12         

                                     04BC   735 ; *

                                     04BC   736 ; *  INPUT CONDITIONS:

                                     04BC   737 ; *	INPUT ADDRESS FIELD AT LOCATION 0.

                                     04BC   738 ; *

                                     04BC   739 ; *  EXPECTED RESULTS:

                                     04BC   740 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     04BC   741 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     04BC   742 ; *

                                     04BC   743 ; ******************************************************

                                     04BC   744 ;--

                                     04BC   745 ;

                                     04BC   746 	MODE	TO,20$,EXEC,NOREGS	; INTO EXEC MODE FOR CNTREG

                                     04D9   747 	$CNTREG_S PAGCNT=#1		; GIVE BACK PAGE ACQUIRED BY SFLKP11

                                     04E8   748 	MODE	FROM,20$		; BACK TO USER MODE

                                     04E9   749 ;

                                     04E9   750 	NEXT_TEST_CASE	SFLKP13

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  29

1.0             SFLKP13                                                                                                          (1)



                                     04F5   751 ;

                                     04F5   752 ;++

                                     04F5   753 ; ******************************************************

                                     04F5   754 ; *

                                     04F5   755 ; *  TEST CASE NAME:		SFLKP13      

                                     04F5   756 ; *

                                     04F5   757 ; *  SYSTEM SERVICE:		LCKPAG               

                                     04F5   758 ; *

                                     04F5   759 ; *  ARGUMENT UNDER TEST: 	INADR_LKP13         

                                     04F5   760 ; *

                                     04F5   761 ; *  INPUT CONDITIONS:

                                     04F5   762 ; *	INPUT ADDRESS FIELD IN NON-ACCESSIBLE PSECT.

                                     04F5   763 ; *

                                     04F5   764 ; *  EXPECTED RESULTS:

                                     04F5   765 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     04F5   766 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     04F5   767 ; *

                                     04F5   768 ; ******************************************************

                                     04F5   769 ;--

                                     04F5   770 ;

                                     04F5   771 ;

                                     04F5   772 	NEXT_TEST_CASE	SFLKP14

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  30

1.0             SFLKP14                                                                                                          (1)



                                     0501   773 ;

                                     0501   774 ;++

                                     0501   775 ; ******************************************************

                                     0501   776 ; *

                                     0501   777 ; *  TEST CASE NAME:		SFLKP14      

                                     0501   778 ; *

                                     0501   779 ; *  SYSTEM SERVICE:		LCKPAG               

                                     0501   780 ; *

                                     0501   781 ; *  ARGUMENT UNDER TEST: 	INADR_LKP14         

                                     0501   782 ; *

                                     0501   783 ; *  INPUT CONDITIONS:

                                     0501   784 ; *	SECOND LONGWORD OF INPUT ADDRESS FIELD BEGINS IN

                                     0501   785 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     0501   786 ; *

                                     0501   787 ; *  EXPECTED RESULTS:

                                     0501   788 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0501   789 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0501   790 ; *

                                     0501   791 ; ******************************************************

                                     0501   792 ;--

                                     0501   793 ;

                                     0501   794 ;

                                     0501   795 	NEXT_TEST_CASE	SFLKP20

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  31

1.0             SFLKP20                                                                                                          (1)



                                     050D   796 ;

                                     050D   797 ;++

                                     050D   798 ; ******************************************************

                                     050D   799 ; *

                                     050D   800 ; *  TEST CASE NAME:		SFLKP20      

                                     050D   801 ; *

                                     050D   802 ; *  SYSTEM SERVICE:		LCKPAG               

                                     050D   803 ; *

                                     050D   804 ; *  ARGUMENT UNDER TEST: 	RETADR_LKP20         

                                     050D   805 ; *

                                     050D   806 ; *  INPUT CONDITIONS:

                                     050D   807 ; *	RETURN ADDRESS FIELD AT LOCATION 1.

                                     050D   808 ; *

                                     050D   809 ; *  EXPECTED RESULTS:

                                     050D   810 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     050D   811 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     050D   812 ; *

                                     050D   813 ; ******************************************************

                                     050D   814 ;--

                                     050D   815 ;

                                     050D   816 ;

                                     050D   817 	NEXT_TEST_CASE	SFLKP21

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  32

1.0             SFLKP21                                                                                                          (1)



                                     0519   818 ;

                                     0519   819 ;++

                                     0519   820 ; ******************************************************

                                     0519   821 ; *

                                     0519   822 ; *  TEST CASE NAME:		SFLKP21      

                                     0519   823 ; *

                                     0519   824 ; *  SYSTEM SERVICE:		LCKPAG               

                                     0519   825 ; *

                                     0519   826 ; *  ARGUMENT UNDER TEST: 	RETADR_LKP21         

                                     0519   827 ; *

                                     0519   828 ; *  INPUT CONDITIONS:

                                     0519   829 ; *	RETURN ADDRESS FIELD IN READ-ONLY PSECT.

                                     0519   830 ; *

                                     0519   831 ; *  EXPECTED RESULTS:

                                     0519   832 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0519   833 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0519   834 ; *

                                     0519   835 ; ******************************************************

                                     0519   836 ;--

                                     0519   837 ;

                                     0519   838 ;

                                     0519   839 	NEXT_TEST_CASE	SFLKP22

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  33

1.0             SFLKP22                                                                                                          (1)



                                     0525   840 ;

                                     0525   841 ;++

                                     0525   842 ; ******************************************************

                                     0525   843 ; *

                                     0525   844 ; *  TEST CASE NAME:		SFLKP22      

                                     0525   845 ; *

                                     0525   846 ; *  SYSTEM SERVICE:		LCKPAG               

                                     0525   847 ; *

                                     0525   848 ; *  ARGUMENT UNDER TEST: 	RETADR_LKP22         

                                     0525   849 ; *

                                     0525   850 ; *  INPUT CONDITIONS:

                                     0525   851 ; *	SECOND LONGWORD OF RETURN ADDRESS FIELD BEGINS IN

                                     0525   852 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     0525   853 ; *

                                     0525   854 ; *  EXPECTED RESULTS:

                                     0525   855 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0525   856 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0525   857 ; *

                                     0525   858 ; ******************************************************

                                     0525   859 ;--

                                     0525   860 ;

                                     0525   861 ;

                                     0525   862 	TCEND

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  34

1.0                                                                                                                              (1)



                                     0526   863 ;

                                     0526   864 	TC_GROUP	ULP,1,TS4

                                     054D   865 ;

                                     054D   866 	NEXT_TEST_CASE	SFULP10

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  35

1.0             SFULP10                                                                                                          (1)



                                     054D   867 ;

                                     054D   868 ;++

                                     054D   869 ; ******************************************************

                                     054D   870 ; *

                                     054D   871 ; *  TEST CASE NAME:		SFULP10      

                                     054D   872 ; *

                                     054D   873 ; *  SYSTEM SERVICE:		ULKPAG               

                                     054D   874 ; *

                                     054D   875 ; *  ARGUMENT UNDER TEST: 	INADR_ULP10         

                                     054D   876 ; *

                                     054D   877 ; *  INPUT CONDITIONS:

                                     054D   878 ; *	FIRST LONGWORD OF INPUT ADDRESS ARRAY BEGINS IN

                                     054D   879 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     054D   880 ; *

                                     054D   881 ; *  EXPECTED RESULTS:

                                     054D   882 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     054D   883 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     054D   884 ; *

                                     054D   885 ; ******************************************************

                                     054D   886 ;--

                                     054D   887 ;

                                     054D   888 ;

                                     054D   889 	NEXT_TEST_CASE	SFULP11

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  36

1.0             SFULP11                                                                                                          (1)



                                     0559   890 ;

                                     0559   891 ;++

                                     0559   892 ; ******************************************************

                                     0559   893 ; *

                                     0559   894 ; *  TEST CASE NAME:		SFULP11      

                                     0559   895 ; *

                                     0559   896 ; *  SYSTEM SERVICE:		ULKPAG               

                                     0559   897 ; *

                                     0559   898 ; *  ARGUMENT UNDER TEST: 	INADR_ULP11         

                                     0559   899 ; *

                                     0559   900 ; *  INPUT CONDITIONS:

                                     0559   901 ; *	UNLOCK A PAGE ALREADY OWNED BY EXEC MODE.

                                     0559   902 ; *

                                     0559   903 ; *  EXPECTED RESULTS:

                                     0559   904 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0559   905 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0559   906 ; *

                                     0559   907 ; ******************************************************

                                     0559   908 ;--

                                     0559   909 ;

                                     0559   910 	MODE	TO,10$,EXEC,NOREGS	; GET INTO EXEC MODE FOR EXPREG

                                     0576   911 	$EXPREG_S PAGCNT=#1, RETADR=INADR_ULP11

                                     0589   912 					; GET A 1-PAGE REGION OWNED BY EXEC MODE

                                     0589   913 	MODE	FROM,10$		; BACK TO USER MODE

                                     058A   914 ;

                                     058A   915 	NEXT_TEST_CASE	SFULP12

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  37

1.0             SFULP12                                                                                                          (1)



                                     0596   916 ;

                                     0596   917 ;++

                                     0596   918 ; ******************************************************

                                     0596   919 ; *

                                     0596   920 ; *  TEST CASE NAME:		SFULP12      

                                     0596   921 ; *

                                     0596   922 ; *  SYSTEM SERVICE:		ULKPAG               

                                     0596   923 ; *

                                     0596   924 ; *  ARGUMENT UNDER TEST: 	INADR_ULP12         

                                     0596   925 ; *

                                     0596   926 ; *  INPUT CONDITIONS:

                                     0596   927 ; *	INPUT ADDRESS FIELD AT LOCATION 0.

                                     0596   928 ; *

                                     0596   929 ; *  EXPECTED RESULTS:

                                     0596   930 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     0596   931 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     0596   932 ; *

                                     0596   933 ; ******************************************************

                                     0596   934 ;--

                                     0596   935 ;

                                     0596   936 	MODE	TO,20$,EXEC,NOREGS	; INTO EXEC MODE FOR CNTREG

                                     05B3   937 	$CNTREG_S PAGCNT=#1		; GIVE BACK PAGE ACQUIRED BY SFULP11

                                     05C2   938 	MODE	FROM,20$		; BACK TO USER MODE

                                     05C3   939 ;

                                     05C3   940 	NEXT_TEST_CASE	SFULP13

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  38

1.0             SFULP13                                                                                                          (1)



                                     05CF   941 ;

                                     05CF   942 ;++

                                     05CF   943 ; ******************************************************

                                     05CF   944 ; *

                                     05CF   945 ; *  TEST CASE NAME:		SFULP13      

                                     05CF   946 ; *

                                     05CF   947 ; *  SYSTEM SERVICE:		ULKPAG               

                                     05CF   948 ; *

                                     05CF   949 ; *  ARGUMENT UNDER TEST: 	INADR_ULP13         

                                     05CF   950 ; *

                                     05CF   951 ; *  INPUT CONDITIONS:

                                     05CF   952 ; *	INPUT ADDRESS FIELD IN NON-ACCESSIBLE PSECT.

                                     05CF   953 ; *

                                     05CF   954 ; *  EXPECTED RESULTS:

                                     05CF   955 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     05CF   956 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     05CF   957 ; *

                                     05CF   958 ; ******************************************************

                                     05CF   959 ;--

                                     05CF   960 ;

                                     05CF   961 ;

                                     05CF   962 	NEXT_TEST_CASE	SFULP14

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  39

1.0             SFULP14                                                                                                          (1)



                                     05DB   963 ;

                                     05DB   964 ;++

                                     05DB   965 ; ******************************************************

                                     05DB   966 ; *

                                     05DB   967 ; *  TEST CASE NAME:		SFULP14      

                                     05DB   968 ; *

                                     05DB   969 ; *  SYSTEM SERVICE:		ULKPAG               

                                     05DB   970 ; *

                                     05DB   971 ; *  ARGUMENT UNDER TEST: 	INADR_ULP14         

                                     05DB   972 ; *

                                     05DB   973 ; *  INPUT CONDITIONS:

                                     05DB   974 ; *	SECOND LONGWORD OF INPUT ADDRESS FIELD BEGINS IN

                                     05DB   975 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     05DB   976 ; *

                                     05DB   977 ; *  EXPECTED RESULTS:

                                     05DB   978 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     05DB   979 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     05DB   980 ; *

                                     05DB   981 ; ******************************************************

                                     05DB   982 ;--

                                     05DB   983 ;

                                     05DB   984 ;

                                     05DB   985 	NEXT_TEST_CASE	SFULP20

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  40

1.0             SFULP20                                                                                                          (1)



                                     05E7   986 ;

                                     05E7   987 ;++

                                     05E7   988 ; ******************************************************

                                     05E7   989 ; *

                                     05E7   990 ; *  TEST CASE NAME:		SFULP20      

                                     05E7   991 ; *

                                     05E7   992 ; *  SYSTEM SERVICE:		ULKPAG               

                                     05E7   993 ; *

                                     05E7   994 ; *  ARGUMENT UNDER TEST: 	RETADR_ULP20         

                                     05E7   995 ; *

                                     05E7   996 ; *  INPUT CONDITIONS:

                                     05E7   997 ; *	RETURN ADDRESS FIELD AT LOCATION 1.

                                     05E7   998 ; *

                                     05E7   999 ; *  EXPECTED RESULTS:

                                     05E7  1000 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     05E7  1001 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     05E7  1002 ; *

                                     05E7  1003 ; ******************************************************

                                     05E7  1004 ;--

                                     05E7  1005 ;

                                     05E7  1006 ;

                                     05E7  1007 	NEXT_TEST_CASE	SFULP21

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  41

1.0             SFULP21                                                                                                          (1)



                                     05F3  1008 ;

                                     05F3  1009 ;++

                                     05F3  1010 ; ******************************************************

                                     05F3  1011 ; *

                                     05F3  1012 ; *  TEST CASE NAME:		SFULP21      

                                     05F3  1013 ; *

                                     05F3  1014 ; *  SYSTEM SERVICE:		ULKPAG               

                                     05F3  1015 ; *

                                     05F3  1016 ; *  ARGUMENT UNDER TEST: 	RETADR_ULP21         

                                     05F3  1017 ; *

                                     05F3  1018 ; *  INPUT CONDITIONS:

                                     05F3  1019 ; *	RETURN ADDRESS FIELD IN READ-ONLY PSECT.

                                     05F3  1020 ; *

                                     05F3  1021 ; *  EXPECTED RESULTS:

                                     05F3  1022 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     05F3  1023 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     05F3  1024 ; *

                                     05F3  1025 ; ******************************************************

                                     05F3  1026 ;--

                                     05F3  1027 ;

                                     05F3  1028 ;

                                     05F3  1029 	NEXT_TEST_CASE	SFULP22

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  42

1.0             SFULP22                                                                                                          (1)



                                     05FF  1030 ;

                                     05FF  1031 ;++

                                     05FF  1032 ; ******************************************************

                                     05FF  1033 ; *

                                     05FF  1034 ; *  TEST CASE NAME:		SFULP22      

                                     05FF  1035 ; *

                                     05FF  1036 ; *  SYSTEM SERVICE:		ULKPAG               

                                     05FF  1037 ; *

                                     05FF  1038 ; *  ARGUMENT UNDER TEST: 	RETADR_ULP22         

                                     05FF  1039 ; *

                                     05FF  1040 ; *  INPUT CONDITIONS:

                                     05FF  1041 ; *	SECOND LONGWORD OF RETURN ADDRESS FIELD BEGINS IN

                                     05FF  1042 ; *	  ACCESSIBLE PSECT, ENDS IN NON-ACCESSIBLE PSECT.

                                     05FF  1043 ; *

                                     05FF  1044 ; *  EXPECTED RESULTS:

                                     05FF  1045 ; *	1) SYSTEM STATUS CODE:	ACCVIO

                                     05FF  1046 ; *	2) REGISTERS R2 THROUGH FP UNCHANGED

                                     05FF  1047 ; *

                                     05FF  1048 ; ******************************************************

                                     05FF  1049 ;--

                                     05FF  1050 ;

                                     05FF  1051 ;

                                     05FF  1052 	TCEND

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  43

1.0                                                                                                                              (1)



                                     0600  1053 TS1:

                                     0600  1054 	TESTSERV	LKWSET,ERR,SATS,				-

                                     0600  1055                                           				-

                                     0600  1056 	   <1,INADR_LWS,						-

                                     0600  1057 	        	INADR_LWS10,NOPRIV,	-  ; SFLWS10

                                     0600  1058 	        	INADR_LWS11,ACCVIO,	-  ; SFLWS11

                                     0600  1059 	        	INADR_LWS12,ACCVIO,	-  ; SFLWS12

                                     0600  1060 	        	INADR_LWS13,ACCVIO,	-  ; SFLWS13

                                     0600  1061 	        	INADR_LWS14,ACCVIO,	-  ; SFLWS14

                                     0600  1062                                                   >,			-

                                     0600  1063                                           				-

                                     0600  1064 	   <1,RETADR_LWS,						-

                                     0600  1065 	        	RETADR_LWS20,ACCVIO,	-  ; SFLWS20

                                     0600  1066 	        	RETADR_LWS21,ACCVIO,	-  ; SFLWS21

                                     0600  1067 	        	RETADR_LWS22,ACCVIO,	-  ; SFLWS22

                                     0600  1068                                                   >,			-

                                     0600  1069                                           				-

                                     0600  1070 	   <1,ACMODE_LWS,						-

                                     0600  1071                                                   >,			-

                                     0600  1072  

                                     0812  1073 	TS_CLEANUP		; CLEAN UP & RETURN TO TEST_SERV_EXEC

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  44

1.0                                                                                                                              (1)



                                     0832  1074 TS2:

                                     0832  1075 	TESTSERV	ULWSET,ERR,SATS,				-

                                     0832  1076                                           				-

                                     0832  1077 	   <1,INADR_UWS,						-

                                     0832  1078 	        	INADR_UWS10,NOPRIV,	-  ; SFUWS10

                                     0832  1079 	        	INADR_UWS11,ACCVIO,	-  ; SFUWS11

                                     0832  1080 	        	INADR_UWS12,ACCVIO,	-  ; SFUWS12

                                     0832  1081 	        	INADR_UWS13,ACCVIO,	-  ; SFUWS13

                                     0832  1082 	        	INADR_UWS14,ACCVIO,	-  ; SFUWS14

                                     0832  1083                                                   >,			-

                                     0832  1084                                           				-

                                     0832  1085 	   <1,RETADR_UWS,						-

                                     0832  1086 	        	RETADR_UWS20,ACCVIO,	-  ; SFUWS20

                                     0832  1087 	        	RETADR_UWS21,ACCVIO,	-  ; SFUWS21

                                     0832  1088 	        	RETADR_UWS22,ACCVIO,	-  ; SFUWS22

                                     0832  1089                                                   >,			-

                                     0832  1090                                           				-

                                     0832  1091 	   <1,ACMODE_UWS,						-

                                     0832  1092                                                   >,			-

                                     0832  1093  

                                     0A44  1094 	TS_CLEANUP		; CLEAN UP & RETURN TO TEST_SERV_EXEC

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  45

1.0                                                                                                                              (1)



                                     0A64  1095 TS3:

                                     0A64  1096 	TESTSERV	LCKPAG,ERR,SATS,				-

                                     0A64  1097                                           				-

                                     0A64  1098 	   <1,INADR_LKP,						-

                                     0A64  1099 	        	INADR_LKP10,NOPRIV,	-  ; SFLKP10

                                     0A64  1100 	        	INADR_LKP11,ACCVIO,	-  ; SFLKP11

                                     0A64  1101 	        	INADR_LKP12,ACCVIO,	-  ; SFLKP12

                                     0A64  1102 	        	INADR_LKP13,ACCVIO,	-  ; SFLKP13

                                     0A64  1103 	        	INADR_LKP14,ACCVIO,	-  ; SFLKP14

                                     0A64  1104                                                   >,			-

                                     0A64  1105                                           				-

                                     0A64  1106 	   <1,RETADR_LKP,						-

                                     0A64  1107 	        	RETADR_LKP20,ACCVIO,	-  ; SFLKP20

                                     0A64  1108 	        	RETADR_LKP21,ACCVIO,	-  ; SFLKP21

                                     0A64  1109 	        	RETADR_LKP22,ACCVIO,	-  ; SFLKP22

                                     0A64  1110                                                   >,			-

                                     0A64  1111  

                                     0BEE  1112 	TS_CLEANUP		; CLEAN UP & RETURN TO TEST_SERV_EXEC

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  46

1.0                                                                                                                              (1)



                                     0C0E  1113 TS4:

                                     0C0E  1114 	TESTSERV	ULKPAG,ERR,SATS,				-

                                     0C0E  1115                                           				-

                                     0C0E  1116 	   <1,INADR_ULP,						-

                                     0C0E  1117 	        	INADR_ULP10,ACCVIO,	-  ; SFULP10

                                     0C0E  1118 	        	INADR_ULP11,ACCVIO,	-  ; SFULP11

                                     0C0E  1119 	        	INADR_ULP12,ACCVIO,	-  ; SFULP12

                                     0C0E  1120 	        	INADR_ULP13,ACCVIO,	-  ; SFULP13

                                     0C0E  1121 	        	INADR_ULP14,ACCVIO,	-  ; SFULP14

                                     0C0E  1122                                                   >,			-

                                     0C0E  1123                                           				-

                                     0C0E  1124 	   <1,RETADR_ULP,						-

                                     0C0E  1125 	        	RETADR_ULP20,ACCVIO,	-  ; SFULP20

                                     0C0E  1126 	        	RETADR_ULP21,ACCVIO,	-  ; SFULP21

                                     0C0E  1127 	        	RETADR_ULP22,ACCVIO,	-  ; SFULP22

                                     0C0E  1128                                                   >,			-

                                     0C0E  1129  

                                     0D98  1130 	TS_CLEANUP		; CLEAN UP & RETURN TO TEST_SERV_EXEC

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  47

1.0             EXECUTE & CLEANUP                                                                                                (1)



                                     0DB8  1131 	.SBTTL	EXECUTE & CLEANUP

                                     0DB8  1132 EXECUTE:

                                     0DB8  1133 	TEST_SERV_EXEC			; EXECUTE ALL T. CASES IN ALL GROUPS

                                     0DE0  1134 	.MDELETE (PRIV,TC_GROUP,NEXT_TEST_CASE, -

                           0000000D  0DE0  1135 		  TCEND,TESTSERV,TS_CLEANUP,TEST_SERV_EXEC)

                                     0DE0  1136 					; DELETE MACRO DEFINITIONS

                                     0DE0  1137 CLEANUP:

                          0138   30  0DE0  1138 	BSBW	MOD_MSG_PRINT		; PRINT TEST MODULE END MSG

            1C            01     F0  0DE3  1139 	INSV	#1,#STS$V_INHIB_MSG,#1,MOD_MSG_CODE 

   00000044'EF            01         0DE6       

                                     0DEC  1140 					; INHIBIT PRINTING

                                     0DEC  1141 	$EXIT_S	MOD_MSG_CODE		; EXIT TO OP SYS WITH MSG CODE

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  48

1.0             TC_CONTROL                                                                                                       (1)



                                     0DF9  1143 	.SBTTL	TC_CONTROL

                                     0DF9  1144 ;++

                                     0DF9  1145 ; FUNCTIONAL DESCRIPTION:

                                     0DF9  1146 ;

                                     0DF9  1147 ;		THE TC_CONTROL SUBROUTINE IS CALLED BY THE TEST_SERV_EXEC

                                     0DF9  1148 ; MACRO TO EXECUTE A GROUP OF TEST CASES. A GROUP IS DEFINED BY A TC_GROUP

                                     0DF9  1149 ; MACRO. FOR EACH TC_GROUP MACRO, THERE IS A CORRESPONDING TESTSERV MACRO.

                                     0DF9  1150 ; TESTSERV CONTAINS CODE TO EXECUTE SYSTEM SERVICES AND CHECK THE RETURNED

                                     0DF9  1151 ; STATUS CODE VALUES. TESTSERV ARGUMENTS ARE CODED TO SPECIFY ALL THE SYSTEM

                                     0DF9  1152 ; SERVICE ARGUMENT VALUES AND THE EXPECTED STATUS CODE FOR EACH TEST CASE

                                     0DF9  1153 ; DEFINED BY A NEXT_TEST_CASE MACRO WITHIN THE GROUP. TC_CONTROL USES A

                                     0DF9  1154 ; CO-ROUTINE INTERFACE TO ENTER THE CODE OF THE APPROPRIATE TESTSERV MACRO

                                     0DF9  1155 ; IN VARIOUS PLACES. THE FIRST ENTRY OCCURS ONCE PER GROUP TO ALLOW TESTSERV

                                     0DF9  1156 ; TO DO SOME INITIALIZATION. THEN TWO ENTRIES ARE MADE FOR EACH TEST CASE IN

                                     0DF9  1157 ; THE GROUP. THE FIRST ALLOWS TESTSERV TO ISSUE THE SUBJECT SYSTEM SERVICE.

                                     0DF9  1158 ; THE SECOND ENTRY FOR THE TEST CASE CAUSES TESTSERV TO CHECK THE RETURNED

                                     0DF9  1159 ; STATUS CODE, PRINTING A FAILURE MESSAGE IF IT IS NOT THE EXPECTED CODE.

                                     0DF9  1160 ; IF THERE ARE NO MORE TEST CASES IN THE CURRENT GROUP, TESTSERV (NOT TC_CONTROL)

                                     0DF9  1161 ; RETURNS DIRECTLY TO TEST_SERV_EXEC (RSB ACTUALLY ISSUED IN TS_CLEANUP MACRO)

                                     0DF9  1162 ; FROM THIS SECOND ENTRY; OTHERWISE, CONTROL RETURNS TO TC_CONTROL WHICH

                                     0DF9  1163 ; IN TURN ENTERS TESTSERV AGAIN FOR THE NEXT TEST CASE. THE FAILURE OF A

                                     0DF9  1164 ; TEST CASE DOES NOT CAUSE TERMINATION OF THE TEST MODULE.

                                     0DF9  1165 ;

                                     0DF9  1166 ; CALLING SEQUENCE:

                                     0DF9  1167 ;

                                     0DF9  1168 ;	BSBW TC_CONTROL (ISSUED WITHIN THE TEST_SERV_EXEC MACRO)

                                     0DF9  1169 ;			(RSB IS ISSUED WITHIN THE TS_CLEANUP MACRO)

                                     0DF9  1170 ;

                                     0DF9  1171 ; INPUT PARAMETERS:

                                     0DF9  1172 ;

                                     0DF9  1173 ;	NONE

                                     0DF9  1174 ;

                                     0DF9  1175 ; IMPLICIT INPUTS:

                                     0DF9  1176 ;

                                     0DF9  1177 ;	ARGUMENTS SPECIFIED ON EACH TESTSERV MACRO MAY BE VIEWED AS

                                     0DF9  1178 ;	INPUTS, SINCE TC_CONTROL AND TESTSERV ACT AS CO-ROUTINES.

                                     0DF9  1179 ;

                                     0DF9  1180 ; OUTPUT PARAMETERS:

                                     0DF9  1181 ;

                                     0DF9  1182 ;	SEVERITY CODE FIELD OF MOD_MSG_CODE (BITS 0,1,2) IS SET TO ERROR

                                     0DF9  1183 ;	IF ANY TEST CASE IN THE CURRENT GROUP FAILS; OTHERWISE IT REMAINS

                                     0DF9  1184 ;	SET TO SUCCESSFUL.

                                     0DF9  1185 ;

                                     0DF9  1186 ; IMPLICIT OUTPUTS:

                                     0DF9  1187 ;

                                     0DF9  1188 ;	%UETP-I-TEXT,   ERROR MESSAGES ARE WRITTEN TO SYS$OUTPUT BY

                                     0DF9  1189 ;			THE TESTSERV MACRO (CO-ROUTINE WITH TC_CONTROL)

                                     0DF9  1190 ;

                                     0DF9  1191 ; COMPLETION CODES:

                                     0DF9  1192 ;

                                     0DF9  1193 ;	NONE

                                     0DF9  1194 ;

                                     0DF9  1195 ; SIDE EFFECTS:

                                     0DF9  1196 ;

                                     0DF9  1197 ;	NONE

                                     0DF9  1198 ;

                                     0DF9  1199 ;--

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  49

1.0             TC_CONTROL                                                                                                       (1)



                                     0DF9  1200 

                                     0DF9  1201 

                                     0DF9  1202 

                                     0DF9  1203 TC_CONTROL:

                 00000064'EF     DD  0DF9  1204 	PUSHL	TS_EP			; PUSH TESTSERV ENTRY POINT

                          9E     16  0DFF  1205 	JSB	@(SP)+			; ENTER TESTSERV INITIALIZATION

                                     0E01  1206 10$:					; PROCESS NEXT TEST CASE

   00000056'EF            20     90  0E01  1207 	MOVB	#^A/ /,$$TSTN$$+2 	; MAKE SURE T.C. NAME HAS A BLANK

                          002F   30  0E08  1208 	BSBW	REG_SAVE		; SAVE REGISTERS

                 00000004'FF     16  0E0B  1209 	JSB	@CURRENT_TC		; JUMP TO CURRENT TEST CASE

                          0037   30  0E11  1210 	BSBW	REG_REST		; RESTORE REGS FOR TESTSERV

                          9E     16  0E14  1211 	JSB	@(SP)+			; LET TESTSERV ISSUE SYSTEM SERVICE

                          0042   30  0E16  1212 	BSBW	REG_COMP		; COMPARE REGS TO SEE IF ...

                                     0E19  1213 					; ... SYSTEM SERVICE CHANGED ANY

                          9E     16  0E19  1214 	JSB	@(SP)+			; LET TESTSERV CHEK S.S. STATUS CODE

   00000056'EF            2A     91  0E1B  1215 	CMPB	#^A/*/,$$TSTN$$+2	; HAS TESTSERV INDICATED FAILURE ?

                          DD     12  0E22  1216 	BNEQU	10$			; NO -- PROCESS NEXT TEST CASE

   00000060'EF   00000088'EF     DE  0E24  1217 	MOVAL	TEST_MOD_FAIL,TMD_ADDR	; YES -- INDICATE FAILED IN END MSG

            00            02     F0  0E2F  1218 	INSV	#ERROR,#0,#3,MOD_MSG_CODE ; ADJUST STATUS CODE FOR ERROR

   00000044'EF            03         0E32       

                          C7     11  0E38  1219 	BRB	10$			; LOOP BAK TO PROCESS NEXT TEST CASE

                                     0E3A  1220 ;

                                     0E3A  1221 ;   TC_CONTROL RETURNS TO TEST_SERV_EXEC VIA TESTSERV (IN TS_CLEANUP MACRO)

                                     0E3A  1222 ;

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  50

1.0             SUBROUTINES                                                                                                      (1)



                                     0E3A  1224 	.SBTTL	SUBROUTINES

                                     0E3A  1225 REG_SAVE:

                                     0E3A  1226 ;

                                     0E3A  1227 ;  *****************************************************************

                                     0E3A  1228 ;  *                                                               *

                                     0E3A  1229 ;  *  SAVES R0 THRU SP IN REG_SAVE_AREA                            *

                                     0E3A  1230 ;  *                                                               *

                                     0E3A  1231 ;  *****************************************************************

                                     0E3A  1232 ;

                     7FFF 8F     BB  0E3A  1233 	PUSHR	#R0_THRU_SP		; SAVE ALL REGS ON STACK

            6E            3C     28  0E3E  1234 	MOVC3	#60,(SP),REG_SAVE_AREA	; SAVE REGS (BEFORE S.S.)

                 00000008'EF         0E41       

                     7FFF 8F     BA  0E46  1235 	POPR	#R0_THRU_SP		; CLEAN UP STACK

                                 05  0E4A  1236 	RSB				; .... AND RETURN

                                     0E4B  1237 ;

                                     0E4B  1238 ;

                                     0E4B  1239 ;

                                     0E4B  1240 ;

                                     0E4B  1241 REG_REST:

                                     0E4B  1242 ;

                                     0E4B  1243 ;

                                     0E4B  1244 ;  *****************************************************************

                                     0E4B  1245 ;  *                                                               *

                                     0E4B  1246 ;  *  RESTORES R0 THRU SP FROM REG_SAVE_AREA                       *

                                     0E4B  1247 ;  *                                                               *

                                     0E4B  1248 ;  *****************************************************************

                                     0E4B  1249 ;

            5E            3C     C2  0E4B  1250 	SUBL2	#60,SP			; MOVE SP TO MAKE ROOM FOR REGS

   00000008'EF            3C     28  0E4E  1251 	MOVC3	#60,REG_SAVE_AREA,(SP)	; MOVE REGS ONTO STACK FOR POP

                          6E         0E55       

                     7FFF 8F     BA  0E56  1252 	POPR	#R0_THRU_SP		; RESTORE ALL REGS FOR TESTSERV

                                 05  0E5A  1253 	RSB				; ... AND RETURN

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  51

1.0             SUBROUTINES                                                                                                      (1)



                                     0E5B  1255 REG_COMP:

                                     0E5B  1256 ;

                                     0E5B  1257 ;  *****************************************************************

                                     0E5B  1258 ;  *                                                               *

                                     0E5B  1259 ;  *  1) PUSHES ALL REGS ONTO STACK                                *

                                     0E5B  1260 ;  *  2) COMPARES REGISTER IMAGES FROM STACK WITH CORRESPONDING    *

                                     0E5B  1261 ;  *       IMAGES FROM REG_SAVE_AREA FOR ALL REGISTERS SPECIFIED   *

                                     0E5B  1262 ;  *       IN REG_COMP_MASK.                                       *

                                     0E5B  1263 ;  *  3) FOR EACH UNEQUAL COMPARE, AN ERROR MESSAGE IS PRINTED     *

                                     0E5B  1264 ;  *       (USING $FAO AND $OUTPUT SYSTEM SERVICES).               *

                                     0E5B  1265 ;  *  4) POPS ALL REGS OFF OF STACK                                *

                                     0E5B  1266 ;  *                                                               *

                                     0E5B  1267 ;  *****************************************************************

                                     0E5B  1268 ;

                     7FFF 8F     BB  0E5B  1269 	PUSHR	#R0_THRU_SP		; SAVE ALL REGISTERS ON STACK

            56   00000008'EF     DE  0E5F  1270 	MOVAL	REG_SAVE_AREA,R6 	; POINT R6 TO BEG OF ...

                                     0E66  1271 					; ... REGS (BEFORE S.S.)

            54            5E     D0  0E66  1272 	MOVL	SP,R4			; POINT R4 TO BEG OF

                                     0E69  1273 					; ... REGS (AFTER S.S.)

            53         FF 8F     98  0E69  1274 	CVTBL	#-1,R3			; INITIALIZE REG_COMP_MASK INDEX

                                     0E6D  1275 REG_COMP_NEXT:

                          53     D6  0E6D  1276 	INCL	R3			; POINT TO NEXT BIT IN MASK

            53            0F     91  0E6F  1277 	CMPB	#15,R3			; END OF THE MASK ?

                          03     1A  0E72  1278 	BGTRU	REG_COMP_CONT		; NO -- CONTINUE

                          009F   31  0E74  1279 	BRW	REG_COMP_RSB		; YES -- GO TO COMMON RETURN

                                     0E77  1280 REG_COMP_CONT:

            84            86     D1  0E77  1281 	CMPL	(R6)+,(R4)+		; REG BEFORE = REG AFTER ?

                          F1     13  0E7A  1282 	BEQLU	REG_COMP_NEXT		; YES -- LOOK FOR NEXT REG

   00000000'EF            53     E1  0E7C  1283 	BBC	R3,REG_COMP_MASK,REG_COMP_NEXT

                          E9         0E83       

                                     0E84  1284 					; NO -- GET NEXT IF BIT NOT SET

   00000048'EF            53     D0  0E84  1285 	MOVL	R3,CLOB_REG_NO		; NO -- GIVE REG NUMBER TO FAO

   0000004C'EF         FC A6     D0  0E8B  1286 	MOVL	-4(R6),REG_BEFORE_SS 	; GIVE "BEFORE" CONTENTS TO FAO

   00000050'EF         FC A4     D0  0E93  1287 	MOVL	-4(R4),REG_AFTER_SS  	; GIVE "AFTER" CONTENTS TO FAO

   00000056'EF            2A     90  0E9B  1288 	MOVB	#^A/*/,$$TSTN$$+2 	; GIVE FAILURE INDIC'N IN ERROR MSG

                                     0EA2  1289 ;

                                     0EA2  1290 	$FAO_S	ERR_MSG_FAOCTL,OUTL,OUTD,$$SNAD$$,  -

                                     0EA2  1291 		$$ASEQ$$,$$PSEQ$$,CLOB_REG_NO,REG_BEFORE_SS,REG_AFTER_SS

                                     0ED5  1292 ;

       F241 CF       F20B CF     B0  0ED5  1293 	MOVW	OUTL,OUTD		; ACTUAL OUTPUT LEN IN STRING DESC'R

                                     0EDC  1294 	PUTMSG	<#UETP$_TEXT,#1,#OUTD>	; PRINT THE MSG

       F225 CF       0084 8F     B0  0EF1  1295 	MOVW	#OUTE-OUTB,OUTD		; GET MAX LEN BACK INTO DESCRIPTOR

   00000056'EF            20     90  0EF8  1296 	MOVB	#^A/ /,$$TSTN$$+2 	; REMOVE FAIL INDIC'N FOR NEXT MSG

   00000060'EF   00000088'EF     DE  0EFF  1297 	MOVAL	TEST_MOD_FAIL,TMD_ADDR	; INDICATE FAILED IN END MSG

            00            02     F0  0F0A  1298 	INSV	#ERROR,#0,#3,MOD_MSG_CODE ; ADJUST STATUS CODE FOR ERROR

   00000044'EF            03         0F0D       

                          FF57   31  0F13  1299 	BRW	REG_COMP_NEXT		; GO LOOK FOR NEXT REG TO COMPARE

                                     0F16  1300 REG_COMP_RSB:

                     7FFF 8F     BA  0F16  1301 	POPR	#R0_THRU_SP		; CLEAN UP STACK

                                 05  0F1A  1302 	RSB				; RETURN TO CALLER

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  52

1.0             SUBROUTINES                                                                                                      (1)



                                     0F1B  1304 MOD_MSG_PRINT:

                                     0F1B  1305 ;

                                     0F1B  1306 ;  *****************************************************************

                                     0F1B  1307 ;  *                                                               *

                                     0F1B  1308 ;  *  PRINTS THE TEST MODULE BEGUN/SUCCESSFUL/FAILED MESSAGES      *

                                     0F1B  1309 ;  *	   (USING THE PUTMSG MACRO).                               *

                                     0F1B  1310 ;  *                                                               *

                                     0F1B  1311 ;  *****************************************************************

                                     0F1B  1312 ;

                                     0F1B  1313 	PUTMSG	<MOD_MSG_CODE,#2,TMN_ADDR,TMD_ADDR> ; PRINT MSG

                                 05  0F36  1314 	RSB				; ... AND RETURN TO CALLER

                                     0F37  1315 ;

                                     0F37  1316 CHMRTN:

                                     0F37  1317 ; **********************************************************

                                     0F37  1318 ; *

                                     0F37  1319 ; *	CHANGE MODE ROUTINE. THIS ROUTINE GETS CONTROL WHENEVER

                                     0F37  1320 ; *	A CMKRNL, CMEXEC, OR CMSUP SYSTEM SERVICE IS ISSUED

                                     0F37  1321 ; *	BY THE MODE MACRO ('TO' OPTION).  IT MERELY DOES 

                                     0F37  1322 ; *	A JUMP INDIRECT ON A FIELD SET UP BY MODE. IT HAS 

                                     0F37  1323 ; *	THE EFFECT OF RETURNING TO THE END OF THE MODE

                                     0F37  1324 ; *	MACRO EXPANSION.

                                     0F37  1325 ; *

                                     0F37  1326 ; *************************************************************

                                     0F37  1327 ;

                               0000  0F37  1328 	.WORD	0			; ENTRY MASK

                 00000079'FF     17  0F39  1329 	JMP	@CHM_CONT		; RETURN TO MODE MACRO IN NEW MODE

                                     0F3F  1330 ;

                                     0F3F  1331 ; *	RET INSTR WILL BE ISSUED IN EXPANSION OF 'MODE FROM, ....' MACRO

                                     0F3F  1332 ;

                                     0F3F  1333 	.END	SATSSF14

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  53

SYMBOL TABLE                                                                                                                     (1)



$$$CHARS       = 00000048            INFO           = 00000003            PCB$V_SSFEXCU  = 00000009            

$$$FIRSTTC$$$  = 00000000            LIB$SIGNAL       ********   X   07   PCB$V_SSRWAIT  = 0000000A            

$$$STRINGS     = 00000000            MEXIT          = 00000000            PCB$V_SUSPEN   = 0000000B            

$$ACT$$          000000FC R     07   MOD_MSG_CODE     00000044 R     04   PCB$V_SWPVBN   = 00000010            

$$ARG$$          00000104 R     07   MOD_MSG_PRINT    00000F1B R     07   PCB$V_WAKEPEN  = 0000000C            

$$ASEQ$$         000000F4 R     07   NARGS          = 00000014            PCB$V_WALL     = 0000000D            

$$CALL$$         000000E8 R     07   NOACCESS         00000000 R     06   PCB$W_APTCNT     00000034            

$$DISP$$         000001EF R     07   ONES             000000B5 R     03   PCB$W_ASTCNT     0000003C            

$$ERR$$          000001A9 R     07   OUTB             00000125 R     07   PCB$W_BIOCNT     0000003E            

$$EXP$$          00000100 R     07   OUTD             0000011D R     07   PCB$W_BIOLM      00000040            

$$INIT$$         000000EC R     07   OUTE             000001A9 R     07   PCB$W_BYTCNT     00000042            

$$MAXP$$       = 00000005            OUTL             000000E4 R     07   PCB$W_BYTLM      00000068            

$$PSEQ$$         000000F8 R     07   PCB$B_ASTACT     0000000C            PCB$W_DIOCNT     00000044            

$$SNAD$$         000000F0 R     07   PCB$B_ASTEN      0000000D            PCB$W_DIOLM      00000046            

$$T1           = 00000004            PCB$B_PRI        0000000B            PCB$W_FILCNT     00000048            

$$T2           = 00000009            PCB$B_PRIB       00000033            PCB$W_GPGCNT     00000038            

$$TSTN$$         00000054 R     04   PCB$B_TYPE       0000000A            PCB$W_GRP        00000022            

ACMODE_LWS       000000D5 R     03   PCB$B_WEFC       00000032            PCB$W_MEM        00000020            

ACMODE_UWS       000000D5 R     03   PCB$C_LENGTH     0000007C            PCB$W_MTXCNT     0000000E            

BIT...         = 00000000            PCB$K_LENGTH     0000007C            PCB$W_PPGCNT     0000003A            

CHMRTN           00000F37 R     07   PCB$L_ASTQBL     00000014            PCB$W_PRCCNT     0000006A            

CHM_CONT         00000079 R     04   PCB$L_ASTQFL     00000010            PCB$W_SIZE       00000008            

CLEANUP          00000DE0 R     07   PCB$L_EFC2P      00000058            PCB$W_STATE      00000030            

CLOB_REG_NO      00000048 R     04   PCB$L_EFC3P      0000005C            PCB$W_TMBU       00000036            

CTL$GL_PHD       ********   X   07   PCB$L_EFCS       00000050            PCB$W_TQCNT      0000004A            

CURRENT_TC       00000004 R     04   PCB$L_EFCU       00000054            PHD$B_ASTLVL     000000CF            

EMPTY            00000000 R     05   PCB$L_EFWM       0000004C            PHD$B_DFPFC      00000038            

ERROR          = 00000002            PCB$L_OWNER      0000001C            PHD$B_PAGFIL     0000001F            

ERR_MSG_FAOCTL   00000002 R     03   PCB$L_PHD        00000064            PHD$B_PGTBPFC    00000039            

EXECUTE          00000DB8 R     07   PCB$L_PHYPCB     00000018            PHD$C_LENGTH     00000118            

GBL...         = 00000000            PCB$L_PID        00000060            PHD$C_PHDPAGCTX= 00000008            

GRP_TOTAL      = 00000004            PCB$L_PQB        0000004C            PHD$K_LENGTH     00000118            

INADR            000000A9 R     03   PCB$L_SQBL       00000004            PHD$L_BIOCNT     00000054            

INADR_LKP        000000C1 R     04   PCB$L_SQFL       00000000            PHD$L_CPULIM     00000058            

INADR_LKP10      000000C5 R     03   PCB$L_STS        00000028            PHD$L_CPUTIM     0000003C            

INADR_LKP11      000000C9 R     04   PCB$L_UIC        00000020            PHD$L_DIOCNT     00000050            

INADR_LKP12    = 00000000            PCB$L_WSSWP      00000024            PHD$L_ESP        0000007C            

INADR_LKP13      00000018 R     06   PCB$L_WTIME      0000002C            PHD$L_FREP0VA    00000028            

INADR_LKP14    = 000001F9 R     05   PCB$T_LNAME      0000006C            PHD$L_FREP1VA    00000030            

INADR_LWS        00000091 R     04   PCB$V_ASTPEN   = 00000011            PHD$L_FREPTECNT  0000002C            

INADR_LWS10      000000BD R     03   PCB$V_BATCH    = 0000000E            PHD$L_KSP        00000078            

INADR_LWS11      00000099 R     04   PCB$V_DELPEN   = 00000001            PHD$L_P0BR       000000C8            

INADR_LWS12    = 00000000            PCB$V_FORCPEN  = 00000002            PHD$L_P0LRASTL   000000CC            

INADR_LWS13      00000008 R     06   PCB$V_HIBER    = 00000013            PHD$L_P1BR       000000D0            

INADR_LWS14    = 000001F9 R     05   PCB$V_INQUAN   = 00000003            PHD$L_P1LR       000000D4            

INADR_ULP        000000D9 R     04   PCB$V_LOGIN    = 00000014            PHD$L_PAGEFLTS   0000004C            

INADR_ULP10    = 000001FF R     05   PCB$V_NETWRK   = 00000015            PHD$L_PAGFIL     0000001C            

INADR_ULP11      000000E1 R     04   PCB$V_NOACNT   = 0000000F            PHD$L_PC         000000C0            

INADR_ULP12    = 00000000            PCB$V_NODELET  = 00000017            PHD$L_PCB        00000078            

INADR_ULP13      00000020 R     06   PCB$V_PHDRES   = 00000012            PHD$L_PGFLCNT    00000034            

INADR_ULP14    = 000001F9 R     05   PCB$V_PSWAPM   = 00000004            PHD$L_PGFLQUOTA  0000005C            

INADR_UWS        000000A9 R     04   PCB$V_PWRAST   = 00000016            PHD$L_PSL        000000C4            

INADR_UWS10      000000BD R     03   PCB$V_RES      = 00000000            PHD$L_PSTBASOFF  00000020            

INADR_UWS11      000000B1 R     04   PCB$V_RESPEN   = 00000005            PHD$L_PTWSLELCK  00000064            

INADR_UWS12    = 00000000            PCB$V_SSFEXC   = 00000006            PHD$L_PTWSLEVAL  00000068            

INADR_UWS13      00000010 R     06   PCB$V_SSFEXCE  = 00000007            PHD$L_R0         00000088            

INADR_UWS14    = 000001F9 R     05   PCB$V_SSFEXCS  = 00000008            PHD$L_R1         0000008C            

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  54

SYMBOL TABLE                                                                                                                     (1)



PHD$L_R10        000000B0            PRT$C_NA         ********   X   03   PSL$V_TP       = 0000001E            

PHD$L_R11        000000B4            PRV$V_ALLSPOOL = 00000004            R0_THRU_SP     = 00007FFF            

PHD$L_R12        000000B8            PRV$V_BUGCHK   = 00000017            REGS             0000007D R     04   

PHD$L_R13        000000BC            PRV$V_CMEXEC   = 00000001            REG_AFTER_SS     00000050 R     04   

PHD$L_R2         00000090            PRV$V_CMKRNL   = 00000000            REG_BEFORE_SS    0000004C R     04   

PHD$L_R3         00000094            PRV$V_DETACH   = 00000005            REG_COMP         00000E5B R     07   

PHD$L_R4         00000098            PRV$V_DIAGNOSE = 00000006            REG_COMP_CONT    00000E77 R     07   

PHD$L_R5         0000009C            PRV$V_EXQUOTA  = 00000013            REG_COMP_MASK    00000000 R     03   

PHD$L_R6         000000A0            PRV$V_GROUP    = 00000008            REG_COMP_NEXT    00000E6D R     07   

PHD$L_R7         000000A4            PRV$V_GRPNAM   = 00000003            REG_COMP_RSB     00000F16 R     07   

PHD$L_R8         000000A8            PRV$V_LOG_IO   = 00000007            REG_REST         00000E4B R     07   

PHD$L_R9         000000AC            PRV$V_MOUNT    = 00000011            REG_SAVE         00000E3A R     07   

PHD$L_REFERFLT   00000014            PRV$V_NETMBX   = 00000014            REG_SAVE_AREA    00000008 R     04   

PHD$L_SSP        00000080            PRV$V_NOACNT   = 00000009            RETADR           00000068 R     04   

PHD$L_USP        00000084            PRV$V_OPER     = 00000012            RETADR_LKP       000000D1 R     04   

PHD$L_WSL        00000118            PRV$V_PHY_IO   = 00000016            RETADR_LKP20   = 00000001            

PHD$M_DALCSTX  = 00000002            PRV$V_PRMCEB   = 0000000A            RETADR_LKP21     000000CD R     03   

PHD$M_PFMFLG   = 00000001            PRV$V_PRMGBL   = 00000018            RETADR_LKP22   = 000001F9 R     05   

PHD$M_WSPEAKCHK= 00000004            PRV$V_PRMMBX   = 0000000B            RETADR_LWS       000000A1 R     04   

PHD$Q_PRIVMSK    00000000            PRV$V_PSWAPM   = 0000000C            RETADR_LWS20   = 00000001            

PHD$S_ASTLVL   = 00000008            PRV$V_SETPRI   = 0000000D            RETADR_LWS21     000000CD R     03   

PHD$S_P0LR     = 00000018            PRV$V_SETPRV   = 0000000E            RETADR_LWS22   = 000001F9 R     05   

PHD$V_ASTLVL   = 00000018            PRV$V_SYSGBL   = 00000019            RETADR_ULP       000000E9 R     04   

PHD$V_DALCSTX  = 00000001            PRV$V_SYSNAM   = 00000002            RETADR_ULP20   = 00000001            

PHD$V_P0LR     = 00000000            PRV$V_TMPMBX   = 0000000F            RETADR_ULP21     000000CD R     03   

PHD$V_PFMFLG   = 00000000            PRV$V_VOLPRO   = 00000015            RETADR_ULP22   = 000001F9 R     05   

PHD$V_WSPEAKCHK= 00000002            PRV$V_WORLD    = 00000010            RETADR_UWS       000000B9 R     04   

PHD$W_ASTLM      00000044            PRVPRT           00000070 R     04   RETADR_UWS20   = 00000001            

PHD$W_BAK        00000048            PSL$C_EXEC     = 00000001            RETADR_UWS21     000000CD R     03   

PHD$W_DFWSCNT    0000001A            PSL$C_KERNEL   = 00000000            RETADR_UWS22   = 000001F9 R     05   

PHD$W_EMPTPG     000000D8            PSL$C_SUPER    = 00000002            SATSSF14         00000000 R     07   

PHD$W_EXTDYNWS   00000076            PSL$C_USER     = 00000003            SEVERE         = 00000004            

PHD$W_FILLM      00000060            PSL$M_CM       = 80000000            SHR$K_SHRDEF   = 00000001            

PHD$W_FLAGS      0000003A            PSL$M_CURMOD   = 03000000            SHR$_ABEND     = 000010D8            

PHD$W_PHVINDEX   00000046            PSL$M_DV       = 00000080            SHR$_ABENDD    = 000010E0            

PHD$W_PRCLM      00000042            PSL$M_FPD      = 08000000            SHR$_ABENDT    = 000010E8            

PHD$W_PST        00000020            PSL$M_FU       = 00000040            SHR$_APPENDEDB = 00001000            

PHD$W_PSTBASMAX  0000004A            PSL$M_IPL      = 001F0000            SHR$_APPENDEDR = 00001008            

PHD$W_PSTFREE    00000026            PSL$M_IS       = 04000000            SHR$_ATPC      = 00001158            

PHD$W_PSTLAST    00000024            PSL$M_IV       = 00000020            SHR$_BADBYTE   = 00001010            

PHD$W_PTCNTACT   00000070            PSL$M_PRVMOD   = 00C00000            SHR$_BADCOPIES = 00001160            

PHD$W_PTCNTLCK   0000006C            PSL$M_SAFBITS  = 000037FF            SHR$_BADDELIM  = 00001118            

PHD$W_PTCNTMAX   00000072            PSL$M_TBIT     = 00000010            SHR$_BADFIELD  = 00001018            

PHD$W_PTCNTVAL   0000006E            PSL$M_TP       = 40000000            SHR$_BADFORM   = 00001168            

PHD$W_QUANT      00000040            PSL$S_CURMOD   = 00000002            SHR$_BADJOBID  = 00001170            

PHD$W_TQLM       00000062            PSL$S_IPL      = 00000005            SHR$_BADJOBNAME= 00001178            

PHD$W_WSAUTH     0000000A            PSL$S_PRVMOD   = 00000002            SHR$_BADKEY    = 00001108            

PHD$W_WSDYN      0000000E            PSL$V_CM       = 0000001F            SHR$_BADLOGIC  = 00001120            

PHD$W_WSFLUID    00000074            PSL$V_CURMOD   = 00000018            SHR$_BADLOGICPC= 00001150            

PHD$W_WSLAST     00000012            PSL$V_DV       = 00000007            SHR$_BADLONG   = 00001020            

PHD$W_WSLIST     00000008            PSL$V_FPD      = 0000001B            SHR$_BADPRTY   = 00001180            

PHD$W_WSLOCK     0000000C            PSL$V_FU       = 00000006            SHR$_BADQNAME  = 00001188            

PHD$W_WSLX       0000004A            PSL$V_IPL      = 00000010            SHR$_BADTIME   = 00001190            

PHD$W_WSNEXT     00000010            PSL$V_IS       = 0000001A            SHR$_BADVALUE  = 00001110            

PHD$W_WSQUOTA    00000018            PSL$V_IV       = 00000005            SHR$_BADWORD   = 00001028            

PRIVMASK         00000071 R     04   PSL$V_PRVMOD   = 00000016            SHR$_BEGIN     = 00001030            

PROT             000000B1 R     03   PSL$V_TBIT     = 00000004            SHR$_BEGIND    = 00001038            

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  55

SYMBOL TABLE                                                                                                                     (1)



SHR$_BEGINT    = 00001040            STS$K_WARNING  = 00000000            TEST_MOD_SUCC    0000007D R     03   

SHR$_CLICB     = 00001048            STS$M_CODE     = 00007FF8            TMD_ADDR         00000060 R     04   

SHR$_CLOSEDEL  = 00001218            STS$M_COND_ID  = 0FFFFFF8            TMN_ADDR         0000005C R     04   

SHR$_CLOSEIN   = 00001050            STS$M_CONTROL  = F0000000            TPID             00000000 R     04   

SHR$_CLOSEOUT  = 00001058            STS$M_CUST_DEF = 08000000            TS1              00000600 R     07   

SHR$_CONFDEL   = 000011F8            STS$M_FAC_NO   = 0FFF0000            TS2              00000832 R     07   

SHR$_COPIEDB   = 00001060            STS$M_FAC_SP   = 00008000            TS3              00000A64 R     07   

SHR$_COPIEDR   = 00001068            STS$M_INHIB_MSG= 10000000            TS4              00000C0E R     07   

SHR$_CREATED   = 00001070            STS$M_MSG_NO   = 0000FFF8            TS_EP            00000064 R     04   

SHR$_DELETED   = 00001200            STS$M_SEVERITY = 00000007            TTNAME           0000009F R     03   

SHR$_DELINTERR = 00001240            STS$M_SUCCESS  = 00000001            UETP$_ABORTC   = 0074832B            

SHR$_DELVER    = 00001208            STS$S_CODE     = 0000000C            UETP$_CONF     = 007480D1            

SHR$_DIRTOOBUS = 00001220            STS$S_COND_ID  = 00000019            UETP$_DATAER   = 00748010            

SHR$_ENDED     = 00001078            STS$S_CONTROL  = 00000004            UETP$_DDB      = 007480E1            

SHR$_ENDEDD    = 00001080            STS$S_CUST_DEF = 00000001            UETP$_DENOSU   = 00748333            

SHR$_ENDEDT    = 00001088            STS$S_FAC_NO   = 0000000C            UETP$_DESTP    = 007481A2            

SHR$_FILNOTDEL = 000011F0            STS$S_FAC_SP   = 00000001            UETP$_DEUNUS   = 0074819A            

SHR$_FILNOTPUR = 00001230            STS$S_INHIB_MSG= 00000001            UETP$_ERBOX    = 00748008            

SHR$_FILPURGED = 00001250            STS$S_MSG_NO   = 0000000D            UETP$_SATSMS   = 007480D9            

SHR$_HASHCONCAT= 000011D8            STS$S_SEVERITY = 00000003            UETP$_TEXT     = 00741133            

SHR$_HIGHVER   = 00001148            STS$S_SUCCESS  = 00000001            UETP$_UCB      = 007480E9            

SHR$_IDXCONCAT = 00001138            STS$V_CODE     = 00000003            UETP$_USER     = 0074833B            

SHR$_INCOMPAT  = 000011E0            STS$V_COND_ID  = 00000003            WARNING        = 00000000            

SHR$_NEWFILES  = 00001090            STS$V_CONTROL  = 0000001C            

SHR$_NOFILPURG = 00001228            STS$V_CUST_DEF = 0000001B            

SHR$_NOJOBID   = 000011A0            STS$V_FAC_NO   = 00000010            

SHR$_NOJOBNAME = 000011A8            STS$V_FAC_SP   = 0000000F            

SHR$_NOQUEUE   = 00001198            STS$V_INHIB_MSG= 0000001C            

SHR$_NOTCMPLT  = 000011C0            STS$V_MSG_NO   = 00000003            

SHR$_NOTCOPIED = 000011B8            STS$V_SEVERITY = 00000000            

SHR$_NOVALUE   = 00001100            STS$V_SUCCESS  = 00000000            

SHR$_NOWILD    = 00001128            SUCCESS        = 00000001            

SHR$_OPENIN    = 00001098            SYS$CMEXEC       ********   X   07   

SHR$_OPENOUT   = 000010A0            SYS$CMKRNL       ********   X   07   

SHR$_OVERLAY   = 000010A8            SYS$CNTREG       ********   X   07   

SHR$_PARSEFAIL = 00001248            SYS$EXIT         ********   X   07   

SHR$_PURGEVER  = 00001210            SYS$EXPREG       ********   X   07   

SHR$_READERR   = 000010B0            SYS$FAO          ********   X   07   

SHR$_RELCONCAT = 00001140            SYS$FAOL         ********   X   07   

SHR$_REPLACED  = 000010B8            SYS$HIBER        ********   X   07   

SHR$_RMSERROR  = 000011C8            SYS$LCKPAG       ********   X   07   

SHR$_SEARCHFAIL= 00001238            SYS$LKWSET       ********   X   07   

SHR$_SYNTAX    = 000010F8            SYS$SETPRN       ********   X   07   

SHR$_SYSERROR  = 000011B0            SYS$SETPRT       ********   X   07   

SHR$_SYSERRORPC= 000010F0            SYS$ULKPAG       ********   X   07   

SHR$_TEXT      = 00001130            SYS$ULWSET       ********   X   07   

SHR$_UNXPCTSTS = 000011D0            SYS$WAKE         ********   X   07   

SHR$_VALERR    = 000011E8            TC1              0000024A R     07   

SHR$_WILDCONCAT= 000010C0            TC2              00000324 R     07   

SHR$_WILDOUTVER= 000010C8            TC3              000003FE R     07   

SHR$_WRITEERR  = 000010D0            TC4              00000526 R     07   

SS$_ACCVIO       ********   X   07   TCG_NO         = 00000004            

SS$_NOPRIV       ********   X   07   TC_CONTROL       00000DF9 R     07   

STS$K_ERROR    = 00000002            TEST_MOD_BEG     00000077 R     03   

STS$K_INFO     = 00000003            TEST_MOD_FAIL    00000088 R     03   

STS$K_SEVERE   = 00000004            TEST_MOD_NAME    0000006E R     03   

STS$K_SUCCESS  = 00000001            TEST_MOD_NAME_D  0000008F R     03   

SATSSF14        - SATS SYSTEM SERVICE TESTS  (FAILING S.C.)      22-AUG-1978 03:54:30   VAX-11 MACRO X0.3-11               Page  56

PROGRAM SECTION SYNOPSIS                                                                                                         (1)







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  

RODATA           000000D9      03     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD  NOWRT LONG  

RWDATA           000000F1      04     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD    WRT BYTE  

SATS_ACCVIO_1    00000200      05     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD    WRT PAGE  

SATS_ACCVIO_2    00000200      06     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD    WRT PAGE  

SATSSF14         00000F3F      07     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT LONG  





THERE WERE NO ERRORS OR WARNINGS.

2562. BYTES LEFT IN FREE MEMORY POOL.

3016. BYTES OF RECLAIMED MEMORY.

OBJ$:SATSSF14,LIS$:SATSSF14/-SP=EXECML$/ML,LIB$:SYSTST.MLB/ML,SRC$:SATSSF14

78 MLB DIR RDS - 1282 GETS TO DEFINE 51 MACROS. 89 INTER. FILE WRITES. 

