SATSUT03        SATS SYSTEM SERVICE TESTS                        22-AUG-1978 04:21:37   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (1)       2  MACROS, DATA

   (1)      17  EXECUTABLE CODE

SATSUT03        SATS SYSTEM SERVICE TESTS                        22-AUG-1978 04:21:37   VAX-11 MACRO X0.3-11               Page   1

SATSUT03                                                                                                                         (1)



                                     0000     1 	.TITLE	SATSUT03	SATS SYSTEM SERVICE TESTS

                                     0000     2 	.SBTTL	MACROS, DATA

                                     0000     3 	.IDENT	/SATSUT03/

SATSUT03        SATS SYSTEM SERVICE TESTS                        22-AUG-1978 04:21:37   VAX-11 MACRO X0.3-11               Page   2

SATSUT03        MACROS, DATA                                                                                                     (1)



                                 00000000     5 	.PSECT	RODATA,RD,NOWRT,NOEXE

                                     0000     6 ; *

                                     0000     7 ; *	THIS ROUTINE RUNS IN A DETACHED PROCESS, CREATED BY

                                     0000     8 ; *	A PROCESS RUNNING THE SATSSF07 IMAGE.  THIS PROCESS

                                     0000     9 ; *	MERELY WAITS ON AN EVENT FLAG (DETFLAG) WHICH WILL

                                     0000    10 ; *	BE SET BY THE CREATING PROCESS, AFTER THAT PROCESS

                                     0000    11 ; *	HAS ISSUED A SYSTEM SERVICE WHICH REQUIRES THE EXIST-

                                     0000    12 ; *	ENCE OF THIS PROCESS.

                                     0000    13 ; *

                                     0000    14 DETNAME:	STRING I,<SATSSF07_DET> ; PRCNAM & CLUSTER NAME 

                           00000040  0014    15 DETFLAG		= 64			; EVENT FLAG 64

SATSUT03        SATS SYSTEM SERVICE TESTS                        22-AUG-1978 04:21:37   VAX-11 MACRO X0.3-11               Page   3

SATSUT03        EXECUTABLE CODE                                                                                                  (1)



                                     0014    17 	.SBTTL	EXECUTABLE CODE

                                 00000000    18 	.PSECT	SATSUT03,RD,WRT,EXE

                               0000  0000    19 START:	.WORD	0	; ENTRY MASK

                                     0002    20 SATSUT03:

                                     0002    21 	$SETPRN_S DETNAME	; SET PROCESS NAME FOR CREATOR

                                     000F    22 	$ASCEFC_S EFN=#DETFLAG, NAME=DETNAME ; ASSOCIATE A CLUSTER

                                     0026    23 	$CLREF_S #DETFLAG	; ... CLEAR AN EVENT FLAG

                                     0033    24 	$WAITFR_S #DETFLAG	; ... AND WAIT FOR CREATOR TO ISSUE A SERVICE

                                     0040    25 	$DACEFC_S #DETFLAG	; CREATOR IS FINISHED; DISASSOCIATE CLUSTER

                                 04  004D    26 	RET

                                     004E    27 	.END	START

SATSUT03        SATS SYSTEM SERVICE TESTS                        22-AUG-1978 04:21:37   VAX-11 MACRO X0.3-11               Page   4

SYMBOL TABLE                                                                                                                     (1)



$$$CHARS       = 0000000C            

$$$STRINGS     = 00000000            

DETFLAG        = 00000040            

DETNAME          00000000 R     02   

SATSUT03         00000002 R     03   

START            00000000 R     03   

SYS$ASCEFC       ********   X   03   

SYS$CLREF        ********   X   03   

SYS$DACEFC       ********   X   03   

SYS$SETPRN       ********   X   03   

SYS$WAITFR       ********   X   03   





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  

RODATA           00000014      02     NOPIC   USR   CON   REL   LCL NOSHR NOEXE   RD  NOWRT BYTE  

SATSUT03         0000004E      03     NOPIC   USR   CON   REL   LCL NOSHR   EXE   RD    WRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

26944. BYTES LEFT IN FREE MEMORY POOL.

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

14 MLB DIR RDS - 73 GETS TO DEFINE 7 MACROS. 1 INTER. FILE WRITES. 

