RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   0

TABLE OF CONTENTS   



   (2)      44  RSX$ABRT - RSX11M ABRT$ DIRECTIVE

   (3)      89  RSX$ALTP - RSX11M ALTP$ DIRECTIVE

   (4)     122  RSX$CSRQ - RSX11M CSRQ$ DIRECTIVE

   (5)     165  RSX$EXTK - RSX11M EXTK$ DIRECTIVE

   (6)     246  RSX$RQST - RSX11M RQST$ DIRECTIVE

   (7)     297  RSX$RSUM - RSX11M RSUM$ DIRECTIVE

   (8)     343  RSX$RUN - RSX11M RUN$ DIRECTIVE

   (9)     416  RSX$SPND - RSX11M SPND$ DIRECTIVE		

   (10)    455  RSX$DSCP - RSX11M DSCP$ DIRECTIVE

   (11)    499  RSX$ENCP - RSX11M ENCP$ DIRECTIVE

   (12)    543  MAPDSW - MAP DSW RETURN AFTER TASK CONTROL SERI

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   1

V06.0                                                                                                                            (1)



                                     0000     1 	.TITLE	RSXTSKCTL - RSX AME TASK CONTROL DIRECTIVES

                                     0000     2 	.IDENT	/V06.0/		;

                                     0000     3 ;

                                     0000     4 ; COPYRIGHT (C) 1978

                                     0000     5 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS 01754

                                     0000     6 ;

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

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

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

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

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

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

                                     0000    13 ; REMAIN IN DEC.

                                     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 ; DEC ASSUMES  NO  RESPONSIBILITY  FOR  THE USE OR  RELIABILITY OF ITS

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

                                     0000    21 

                                     0000    22 ;++

                                     0000    23 ; FACILITY:

                                     0000    24 ;

                                     0000    25 ;	VAX/VMS RSX AME.

                                     0000    26 ;

                                     0000    27 ; ABSTRACT:

                                     0000    28 ;

                                     0000    29 ;	RSX TASK CONTROL DIRECTIVES.

                                     0000    30 ;

                                     0000    31 ; AUTHOR:

                                     0000    32 ;

                                     0000    33 ;	R.HEINEN 29-SEPT-76

                                     0000    34 ;--

                                     0000    35 ;

                                     0000    36 ; EXTERNAL SYMBOLS

                                     0000    37 ;

                                     0000    38 	$RSXDEF			; DEFINE RSX SYMBOLS

                                     0000    39 	DRERR$			; DEFINE RSX11M DIRECTIVE ERROR CODES

                                     0000    40 	IOERR$			; DEFINE I/O ERROR CODES

                                     0000    41  

                                 00000000    42 	.PSECT	RSXCODE,NOWRT,SHR,PIC

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   2

V06.0           RSX$ABRT - RSX11M ABRT$ DIRECTIVE                                                                                (2)



                                     0000    44 	.SBTTL	RSX$ABRT - RSX11M ABRT$ DIRECTIVE

                                     0000    45 ;++

                                     0000    46 ; RSX$ABRT - RSX11M ABORT TASK DIRECTIVE

                                     0000    47 ;

                                     0000    48 ; FUNCTIONAL DESCRIPTION:

                                     0000    49 ;

                                     0000    50 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     0000    51 ; "ABRT$" DIRECTIVE. THE SPECIFIED TASK NAME IS CONVERTED TO ASCII

                                     0000    52 ; AND A "$FORCEX" IS DONE TO AFFECT THE DIRECTIVE. 

                                     0000    53 ;

                                     0000    54 ; INPUT PARAMETERS:

                                     0000    55 ;

                                     0000    56 ;	R5 = ADDRESS OF DPB+2

                                     0000    57 ;	R6 = CM IMAGE STACK ADDRESS

                                     0000    58 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     0000    59 ;	R11 = ADDRESS OF IMAGE HEADER

                                     0000    60 ;

                                     0000    61 ; OUTPUT PARAMETERS:

                                     0000    62 ;

                                     0000    63 ;	R10,R11 ARE PRESERVED

                                     0000    64 ;

                                     0000    65 ; IMPLICIT OUTPUTS:

                                     0000    66 ;

                                     0000    67 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     0000    68 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     0000    69 ;

                                     0000    70 ; DSW RETURN CODES:

                                     0000    71 ;

                                     0000    72 ;	IS.SUC	SUCCESSFUL

                                     0000    73 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     0000    74 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     0000    75 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     0000    76 ;	IE.PRI	PRIVILEGE VIOLATION

                                     0000    77 ;	IE.INS	UNKNOWN PROCESS

                                     0000    78 ;--

                                     0000    79 RSX$ABRT::				; ABORT TASK DIRECTIVE

                          FFFD'  30  0000    80 	BSBW	RSX$CVTNAME		; CONVERT R50 NAME TO ASCII

            50         28 AA     9E  0003    81 	MOVAB	I_SCRATCH(R10),R0	; ADDRESS NAME STRING

                          60     95  0007    82 	TSTB	(R0)			; ANY DATA?

                          02     12  0009    83 	BNEQ	10$			; IF NEQ THEN YES

                          50     D4  000B    84 	CLRL	R0			; SET NO TASK NAME

                                     000D    85 10$:

                                     000D    86 	$FORCEX_S	,(R0),#SS$_ABORT; FORCE TERMINATION

                          01DE   31  001E    87 	BRW	MAPDSW			; MAP THE PROPER DSW RETURN

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   3

V06.0           RSX$ALTP - RSX11M ALTP$ DIRECTIVE                                                                                (3)



                                     0021    89 	.SBTTL	RSX$ALTP - RSX11M ALTP$ DIRECTIVE

                                     0021    90 ;++

                                     0021    91 ; RSX$ALTP - RSX11M ALTER PRIORITY DIRECTIVE

                                     0021    92 ;

                                     0021    93 ; FUNCTIONAL DESCRIPTION:

                                     0021    94 ;

                                     0021    95 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     0021    96 ; "ALTP$" DIRECTIVE.

                                     0021    97 ;

                                     0021    98 ; THIS DIRECTIVE IN THE VAX/VMS ENVIRONMENT IS A NOOP.

                                     0021    99 ;

                                     0021   100 ; INPUT PARAMETERS:

                                     0021   101 ;

                                     0021   102 ;	R5 = ADDRESS OF DPB+2

                                     0021   103 ;	R6 = CM IMAGE STACK ADDRESS

                                     0021   104 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     0021   105 ;	R11 = ADDRESS OF IMAGE HEADER

                                     0021   106 ;

                                     0021   107 ; OUTPUT PARAMETERS:

                                     0021   108 ;

                                     0021   109 ;	R10,R11 ARE PRESERVED

                                     0021   110 ; IMPLICIT OUTPUTS:

                                     0021   111 ;

                                     0021   112 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     0021   113 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     0021   114 ;

                                     0021   115 ; DSW RETURN CODES:

                                     0021   116 ;

                                     0021   117 ;	IS.SUC	SUCCESSFUL

                                     0021   118 ;--

                                     0021   119 RSX$ALTP::				; ALTER PRIORITY DIRECTIVE

                                 05  0021   120 	RSB				; RETURN 

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   4

V06.0           RSX$CSRQ - RSX11M CSRQ$ DIRECTIVE                                                                                (4)



                                     0022   122 	.SBTTL	RSX$CSRQ - RSX11M CSRQ$ DIRECTIVE

                                     0022   123 ;++

                                     0022   124 ; RSX$CSRQ -  RSX11M CANCEL TIME BASED INITIATION REQUESTS DIRECTIVE

                                     0022   125 ;

                                     0022   126 ; FUNCTIONAL DESCRIPTION:

                                     0022   127 ;

                                     0022   128 ; THIS ROUTINE IMPLEMENTS THE RSX11M CANCEL TIMED INITIATION DIRECTIVE.

                                     0022   129 ; THE SPECIFIED TASK NAME IS CONVERTED TO ASCII FOLLOWED BY A "$CANWAK".

                                     0022   130 ;

                                     0022   131 ; INPUTS:

                                     0022   132 ;

                                     0022   133 ;	R5 = ADDRESS OF THE DPB+2

                                     0022   134 ;	R10 = ADDRESS OF THE IMAGE DATA BASE

                                     0022   135 ;	R11 = ADDRESS OF IMAGE HEADER

                                     0022   136 ;

                                     0022   137 ; OUTPUTS:

                                     0022   138 ;

                                     0022   139 ;	R10,R11 ARE PRESERVED.

                                     0022   140 ;

                                     0022   141 ; IMPLICIT OUTPUTS:

                                     0022   142 ;

                                     0022   143 ;	THE PROPER DIRECTIVE STATUS IS SET IN THE DSW ALONG WITH

                                     0022   144 ;	THE PROPER SETTING OF THE C-BIT.

                                     0022   145 ;

                                     0022   146 ; DSW RETURN CODES:

                                     0022   147 ;

                                     0022   148 ;	IS.SUC	SUCCESSFUL

                                     0022   149 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     0022   150 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     0022   151 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     0022   152 ;	IE.PRI	PRIVILEGE VIOLATION

                                     0022   153 ;	IE.INS	UNKNOWN PROCESS

                                     0022   154 ;--

                                     0022   155 RSX$CSRQ::				; CANCEL TIMED INITIATION

                          FFDB'  30  0022   156 	BSBW	RSX$CVTNAME		; CONVERT R50 TASK NAME TO ASCII

            50         28 AA     9E  0025   157 	MOVAB	I_SCRATCH(R10),R0	; ADDRESS NAME STRING

                          60     95  0029   158 	TSTB	(R0)			; ANY DATA?

                          02     12  002B   159 	BNEQ	10$			; IF NEQ THEN YES

                          50     D4  002D   160 	CLRL	R0			; SET NO TASK NAME

                                     002F   161 10$:	

                                     002F   162 	$CANWAK_S	,(R0)		; CANCEL WAKEUP FOR PROCESS

                          01C2   31  003A   163 	BRW	MAPDSW			; MAP THE PROPER DSW RETURN

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   5

V06.0           RSX$EXTK - RSX11M EXTK$ DIRECTIVE                                                                                (5)



                                     003D   165 	.SBTTL	RSX$EXTK - RSX11M EXTK$ DIRECTIVE

                                     003D   166 ;++

                                     003D   167 ; RSX$EXTK - RSX11M EXTEND TASK DIRECTIVE

                                     003D   168 ;

                                     003D   169 ; FUNCTIONAL DESCRIPTION:

                                     003D   170 ;

                                     003D   171 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     003D   172 ; "EXTK$" DIRECTIVE.

                                     003D   173 ;

                                     003D   174 ; INPUT PARAMETERS:

                                     003D   175 ;

                                     003D   176 ;	R5 = ADDRESS OF DPB+2

                                     003D   177 ;	R6 = CM IMAGE STACK ADDRESS

                                     003D   178 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     003D   179 ;	R11 = ADDRESS OF IMAGE HEADER

                                     003D   180 ;

                                     003D   181 ; OUTPUT PARAMETERS:

                                     003D   182 ;

                                     003D   183 ;	R10,R11 ARE PRESERVED

                                     003D   184 ;

                                     003D   185 ; IMPLICIT OUTPUTS:

                                     003D   186 ;

                                     003D   187 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     003D   188 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     003D   189 ;

                                     003D   190 ; DSW RETURN CODES:

                                     003D   191 ;

                                     003D   192 ;	IS.SUC	SUCCESSFUL

                                     003D   193 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     003D   194 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     003D   195 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     003D   196 ;	IE.ALG	INVALID EXTENSION OR CONTRACTION

                                     003D   197 ;--

                                     003D   198 RSX$EXTK::				; EXTEND TASK DIRECTIVE

            54         28 AA     9E  003D   199 	MOVAB	I_SCRATCH(R10),R4	; ADDRESS ARGLIST

            55            65     32  0041   200 	CVTWL	(R5),R5			;

            55            06     78  0044   201 	ASHL	#6,R5,R5		; MAKE BYTES

                          55         0047       

                          41     14  0048   202 	BGTR	50$			; IF GTRU THEN EXPAND

                          15     12  004A   203 	BNEQ	10$			; IF NEQ THEN CONTRACT

                                     004C   204 ;

                                     004C   205 ; MAKE INITIAL SIZE

                                     004C   206 ;

            64       00F0 CA     D0  004C   207 	MOVL	I_INISIZE(R10),(R4)	; SET UP LOWER LIMIT

         04 A4       0100 CA     D0  0051   208 	MOVL	I_ADR0+ADR_HIGHLIM(R10),4(R4); SET UP UPPER LIMIT

            64         04 A4     C3  0057   209 	SUBL3	4(R4),(R4),R5		; GET DIFFERENCE

                          55         005B       

                          03     19  005C   210 	BLSS	10$			; IF LSS THEN CONTRACT

                          2B     14  005E   211 	BGTR	50$			; IF GTR THEN EXPAND

                                 05  0060   212 	RSB				; IF EQL THEN NO CHANGE

       0100 CA            55     C1  0061   213 10$:	ADDL3	R5,I_ADR0+ADR_HIGHLIM(R10),(R4); SET UP LOW LIMIT BY FUNNY SUBTRACT

                          64         0066       

         04 A4       0100 CA     D0  0067   214 15$:	MOVL	I_ADR0+ADR_HIGHLIM(R10),4(R4);

            55            64     D0  006D   215 	MOVL	(R4),R5			; SAVE BOT AS NEW HIGH SIZE

            55       00EC CA     B1  0070   216 	CMPW	I_GARD(R10),R5		; DELETE TOO MUCH?

                          42     1A  0075   217 	BGTRU	75$			; IF GTRU THEN ERROR

                          4A     10  0077   218 	BSBB	100$			; CHECK AND ROUND PARAMS

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   6

V06.0           RSX$EXTK - RSX11M EXTK$ DIRECTIVE                                                                                (5)



                                     0079   219 	$DELTVA_S	(R4)		; DELETE THE SPACE

            30            50     E9  0086   220 	BLBC	R0,75$			; IF LOW CLEAR THEN ERROR

                          28     11  0089   221 	BRB	60$			; CONTINUE

            64       0100 CA     D0  008B   222 50$:	MOVL	I_ADR0+ADR_HIGHLIM(R10),(R4); INSERT HIGH LIMIT

            64            55     C1  0090   223 	ADDL3	R5,(R4),4(R4)		;

                       04 A4         0093       

            55         04 A4     D0  0095   224 	MOVL	4(R4),R5		; SAVE TOP AS NEW HIGH LIM

                          28     10  0099   225 	BSBB	100$			; ROUND SIZE

       00F4 CA         04 A4     D1  009B   226 	CMPL	4(R4),I_HIGHSIZE(R10)	; IN RANGE?

                          16     1E  00A1   227 	BGEQU	75$			; BR IF ERROR

                                     00A3   228 	$CRETVA_S	(R4)

            06            50     E9  00B0   229 	BLBC	R0,75$

       0100 CA            55     D0  00B3   230 60$:	MOVL	R5,I_ADR0+ADR_HIGHLIM(R10)

                                 05  00B8   231 	RSB

                                     00B9   232 75$:	$DSW	#IE.ALG			; SET ALLOCATION FAILURE

                                     00C3   233 ;

                                     00C3   234 ; SUBROUTINE TO CHECK AND ROUND PARAMETERS

                                     00C3   235 ;

                                     00C3   236 100$:	

            64       01FF 8F     AA  00C3   237 	BICW	#511,(R4)

         04 A4       01FF 8F     AA  00C8   238 	BICW	#511,4(R4)

         04 A4            64     D1  00CE   239 	CMPL	(R4),4(R4)		; IF EQL THEN NO CHANGE NEEDED

                          07     12  00D2   240 	BNEQ	110$

       0100 CA            55     D0  00D4   241 	MOVL	R5,I_ADR0+ADR_HIGHLIM(R10); ASSUME SUCCESS

                          01     BA  00D9   242 	POPR	#^M<R0>

            64       0200 8F     A0  00DB   243 110$:	ADDW	#512,(R4)		; ROUND LOWER LIMIT UP TO NEXT PAGE

                                 05  00E0   244 	RSB

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   7

V06.0           RSX$RQST - RSX11M RQST$ DIRECTIVE                                                                                (6)



                                     00E1   246 	.SBTTL	RSX$RQST - RSX11M RQST$ DIRECTIVE

                                     00E1   247 ;++

                                     00E1   248 ; RSX$RQST - RSX11M REQUEST DIRECTIVE

                                     00E1   249 ;

                                     00E1   250 ; FUNCTIONAL DESCRIPTION:

                                     00E1   251 ;

                                     00E1   252 ; THIS ROUTINE IMPLEMENTS THE RSX11M RQST$ DIRECTIVE.

                                     00E1   253 ; THE SPECIFIED PROCESS NAME IS COMVERTED TO ASCII AND THEN "$WAKE"'D.

                                     00E1   254 ;

                                     00E1   255 ; INPUTS:

                                     00E1   256 ;

                                     00E1   257 ;	R5 = ADDRESS OF DPB+2

                                     00E1   258 ;	R6 = CM IMAGE STACK POINTER

                                     00E1   259 ;	R10 = ADDRESS OF IMAGE DATA

                                     00E1   260 ;	R11 = ADDRESS OF IMAGE HEADER

                                     00E1   261 ;

                                     00E1   262 ; IMPLICIT INPUTS:

                                     00E1   263 ;

                                     00E1   264 ;	THE DPB IS ALREADY VALIDATED FOR READ ACCESS.

                                     00E1   265 ;	THE DPB SIZE AND TYPE ARE CORRECT.

                                     00E1   266 ;

                                     00E1   267 ; OUTPUTS:

                                     00E1   268 ;

                                     00E1   269 ;	R10,R11 ARE PRESERVED.

                                     00E1   270 ;

                                     00E1   271 ; IMPLICIT OUTPUTS:

                                     00E1   272 ;

                                     00E1   273 ;	THE REQUESTED PROCESS IS "$WAKE"'D AND "RSX$MAPDSW" IS ENTERED.

                                     00E1   274 ;

                                     00E1   275 ; DSW RETURN CODES:

                                     00E1   276 ;

                                     00E1   277 ;	IS.SUC	SUCCESSFUL

                                     00E1   278 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     00E1   279 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     00E1   280 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     00E1   281 ;	IE.PRI	PRIVILEGE VIOLATION

                                     00E1   282 ;	IE.INS	UNKNOWN PROCESS

                                     00E1   283 ;--

                                     00E1   284 RSX$RQST::				; REQUEST DIRECTIVE

   B37C66E4 8F            65     D1  00E1   285 	CMPL	(R5),#^X0B37C66E4	; PRT...?

                          23     13  00E8   286 	BEQL	11$			; IF EQL THEN SUCCESS

                          FF13'  30  00EA   287 	BSBW	RSX$CVTNAME		; CONVERT TASK NAME TO ASCII

            50         28 AA     9E  00ED   288 	MOVAB	I_SCRATCH(R10),R0	; ADDRESS NAME STRING

                          60     95  00F1   289 	TSTB	(R0)			; ANY DATA?

                          0A     12  00F3   290 	BNEQ	10$			; IF NEQ THEN YES

                                     00F5   291 	$DSW	#IE.INS

                                     00FF   292 10$:	

                                     00FF   293 	$WAKE_S	,(R0)			; WAKE PROCESS

                          00F2   31  010A   294 	BRW	MAPDSW			; MAP RETURN STATUS

                                 05  010D   295 11$:	RSB

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   8

V06.0           RSX$RSUM - RSX11M RSUM$ DIRECTIVE                                                                                (7)



                                     010E   297 	.SBTTL	RSX$RSUM - RSX11M RSUM$ DIRECTIVE

                                     010E   298 ;++

                                     010E   299 ; RSX$RSUM - RSX11M RESUME TASK DIRECTIVE

                                     010E   300 ;

                                     010E   301 ; FUNCTIONAL DESCRIPTION:

                                     010E   302 ;

                                     010E   303 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     010E   304 ; "RSUM$" DIRECTIVE. THE SPECIFIED TASK NAME IS CONVERTED TO ASCII

                                     010E   305 ; AND A "$WAKE" IS DONE TO AFFECT THE DIRECTIVE. 

                                     010E   306 ; NOTE THE DIFFERENCE BETWEEN VAX/VMS'S RESUME AND 11M'S.

                                     010E   307 ;

                                     010E   308 ; INPUT PARAMETERS:

                                     010E   309 ;

                                     010E   310 ;	R5 = ADDRESS OF DPB+2

                                     010E   311 ;	R6 = CM IMAGE STACK ADDRESS

                                     010E   312 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     010E   313 ;	R11 = ADDRESS OF IMAGE HEADER

                                     010E   314 ;

                                     010E   315 ; OUTPUT PARAMETERS:

                                     010E   316 ;

                                     010E   317 ;	R10,R11 ARE PRESERVED

                                     010E   318 ;

                                     010E   319 ; IMPLICIT OUTPUTS:

                                     010E   320 ;

                                     010E   321 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     010E   322 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     010E   323 ;

                                     010E   324 ; DSW RETURN CODES:

                                     010E   325 ;

                                     010E   326 ;	IS.SUC	SUCCESSFUL

                                     010E   327 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     010E   328 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     010E   329 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     010E   330 ;	IE.PRI	PRIVILEGE VIOLATION

                                     010E   331 ;	IE.INS	UNKNOWN PROCESS

                                     010E   332 ;--

                                     010E   333 RSX$RSUM::				; RESUME DIRECTIVE

                          FEEF'  30  010E   334 	BSBW	RSX$CVTNAME		; CONVERT TASK NAME

            50         28 AA     9E  0111   335 	MOVAB	I_SCRATCH(R10),R0	; ADDRESS NAME STRING

                          60     95  0115   336 	TSTB	(R0)			; ANY DATA?

                          02     12  0117   337 	BNEQ	10$			; IF NEQ THEN YES

                          50     D4  0119   338 	CLRL	R0			; SET NO TASK NAME

                                     011B   339 10$:	

                                     011B   340 	$WAKE_S	,(R0)			; WAKE PROCESS

                          00D6   31  0126   341 	BRW	MAPDSW			; MAP RETURN STATUS

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page   9

V06.0           RSX$RUN - RSX11M RUN$ DIRECTIVE                                                                                  (8)



                                     0129   343 	.SBTTL	RSX$RUN - RSX11M RUN$ DIRECTIVE

                                     0129   344 ;++

                                     0129   345 ; RSX$RUN - RSX11M RUN TASK DIRECTIVE

                                     0129   346 ;

                                     0129   347 ; FUNCTIONAL DESCRIPTION:

                                     0129   348 ;

                                     0129   349 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     0129   350 ; "RUN$" DIRECTIVE. THE SPECIFIED TASK NAME IS CONVERTED TO ASCII

                                     0129   351 ; AND A "$SCHDWK" IS DONE TO AFFECT THE DIRECTIVE. 

                                     0129   352 ;

                                     0129   353 ; INPUT PARAMETERS:

                                     0129   354 ;

                                     0129   355 ;	R5 = ADDRESS OF DPB+2

                                     0129   356 ;	R6 = CM IMAGE STACK ADDRESS

                                     0129   357 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     0129   358 ;	R11 = ADDRESS OF IMAGE HEADER

                                     0129   359 ;

                                     0129   360 ; OUTPUT PARAMETERS:

                                     0129   361 ;

                                     0129   362 ;	R10,R11 ARE PRESERVED

                                     0129   363 ;

                                     0129   364 ; IMPLICIT OUTPUTS:

                                     0129   365 ;

                                     0129   366 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     0129   367 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     0129   368 ;

                                     0129   369 ; DSW RETURN CODES:

                                     0129   370 ;

                                     0129   371 ;	IS.SUC	SUCCESSFUL

                                     0129   372 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     0129   373 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     0129   374 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     0129   375 ;	IE.PRI	PRIVILEGE VIOLATION

                                     0129   376 ;	IE.INS	UNKNOWN PROCESS

                                     0129   377 ;	IE.ITI	INVALID TIME PARAMETER

                                     0129   378 ;--

                                     0129   379 RSX$RUN::				; ABORT TASK DIRECTIVE

                          FED4'  30  0129   380 	BSBW	RSX$CVTNAME		; CONVERT TASK NAME TO ASCII

                       28 AA     95  012C   381 	TSTB	I_SCRATCH(R10)		; ANY NAME?

                          0A     12  012F   382 	BNEQ	10$			; IF NEQ THEN YES

                                     0131   383 	$DSW	#IE.INS			; BAD NAME

            55            0C     C0  013B   384 10$:	ADDL	#12,R5			; POINT TO SCHEDULE MAG.

            52            85     3C  013E   385 	MOVZWL	(R5)+,R2		; GET THE SCHEDULE MAGNITUDE

                          50     13  0141   386 	BEQL	100$			; IF EQL THEN ILLEGAL

            50            85     3C  0143   387 	MOVZWL	(R5)+,R0		; GET UNITS OF SCHEDULE MAG.

                          4B     13  0146   388 	BEQL	100$			; IF EQL THEN ILLEGAL

                          FEB5'  30  0148   389 	BSBW	RSX$TIMEMAG		; CONVERT TIME PARAMS

            45            52     E9  014B   390 	BLBC	R2,100$			; IF LOW CLEAR THEN ERROR

         38 AA            50     7D  014E   391 	MOVQ	R0,I_SCRATCH+16(R10)	; SAVE VALUE

                       40 AA     7C  0152   392 	CLRQ	I_SCRATCH+24(R10)	; SET NO RESCHEDULE

                          57     D4  0155   393 	CLRL	R7			; ASSUME NO RESCHD

            52            85     3C  0157   394 	MOVZWL	(R5)+,R2		; GET RESCHEDULE MAGNITUDE

                          13     13  015A   395 	BEQL	50$			; IF EQL THEN NONE

            50            65     3C  015C   396 	MOVZWL	(R5),R0			; GET THE UNITS FOR THE MAG.

                          32     13  015F   397 	BEQL	100$			; IF EQL THEN ILLEGAL

                          FE9C'  30  0161   398 	BSBW	RSX$TIMEMAG		; CONVERT TIME PARAMS

            2C            52     E9  0164   399 	BLBC	R2,100$			; IF LOW CLEAR THEN ERROR

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  10

V06.0           RSX$RUN - RSX11M RUN$ DIRECTIVE                                                                                  (8)



         40 AA            50     7D  0167   400 	MOVQ	R0,I_SCRATCH+24(R10)	; SAVE NEGITIVE OF RETURN VALUE

            57         40 AA     9E  016B   401 	MOVAB	I_SCRATCH+24(R10),R7	;

            50         28 AA     9E  016F   402 50$:	MOVAB	I_SCRATCH(R10),R0	; ADDRESS NAME STRING

                          60     95  0173   403 	TSTB	(R0)			; ANY DATA?

                          02     12  0175   404 	BNEQ	60$			; IF NEQ THEN YES

                          50     D4  0177   405 	CLRL	R0			; SET NO TASK NAME

                                     0179   406 60$:	

                                     0179   407 	$SCHDWK_S  ,(R0),I_SCRATCH+16(R10),(R7); SCHEDULE WAKE UP

       0000'8F            50     B1  0189   408 	CMPW	R0,#SS$_IVTIME		; INVALID TIME PARAMETER?

                          03     13  018E   409 	BEQL	100$			; IF EQL THEN SET ERROR

                          006C   31  0190   410 	BRW	MAPDSW			; MAP RETURN CODE

                                     0193   411 ;

                                     0193   412 ; BAD TIME VALUE

                                     0193   413 ;

                                     0193   414 100$:	$DSW	#IE.ITI			; SET STATUS AND RETURN

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  11

V06.0           RSX$SPND - RSX11M SPND$ DIRECTIVE                                                                                (9)



                                     019D   416 	.SBTTL	RSX$SPND - RSX11M SPND$ DIRECTIVE		

                                     019D   417 ;++

                                     019D   418 ; RSX$SPND - RSX11M SUSPEND TASK DIRECTIVE

                                     019D   419 ;

                                     019D   420 ; FUNCTIONAL DESCRIPTION:

                                     019D   421 ;

                                     019D   422 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     019D   423 ; "SPND$" DIRECTIVE.

                                     019D   424 ;

                                     019D   425 ; THIS DIRECTIVE HIBERNATES THE CURRENT PROCESS. NOTE THE DIFFERENCE

                                     019D   426 ; BETWEEN THE VAX/VMS SUSPEND AND 11M'S.

                                     019D   427 ;

                                     019D   428 ; INPUT PARAMETERS:

                                     019D   429 ;

                                     019D   430 ;	R5 = ADDRESS OF DPB+2

                                     019D   431 ;	R6 = CM IMAGE STACK ADDRESS

                                     019D   432 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     019D   433 ;	R11 = ADDRESS OF IMAGE HEADER

                                     019D   434 ;

                                     019D   435 ; OUTPUT PARAMETERS:

                                     019D   436 ;

                                     019D   437 ;	R10,R11 ARE PRESERVED

                                     019D   438 ;

                                     019D   439 ; IMPLICIT OUTPUTS:

                                     019D   440 ;

                                     019D   441 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     019D   442 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     019D   443 ;

                                     019D   444 ; DSW RETURN CODES:

                                     019D   445 ;

                                     019D   446 ;	IS.SUC	SUCCESSFUL

                                     019D   447 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     019D   448 ;	IE.UPN INSUFICIENT MEMORY -- SS$_INSFMEM

                                     019D   449 ;	IE.NOD QUOTA EXCEEDED -- SS$_EXQUOTA

                                     019D   450 ;--

                                     019D   451 RSX$SPND::				; SUSPEND TASK DIRECTIVE

                                     019D   452 	$HIBER_S			; HIBER THIS IMAGE

                          0058   31  01A4   453 	BRW	MAPDSW			; MAP THE DSW

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  12

V06.0           RSX$DSCP - RSX11M DSCP$ DIRECTIVE                                                                               (10)



                                     01A7   455 	.SBTTL	RSX$DSCP - RSX11M DSCP$ DIRECTIVE

                                     01A7   456 ;++

                                     01A7   457 ; RSX$DSCP - RSX11M DISABLE CHECKPOINTING TASK DIRECTIVE

                                     01A7   458 ;

                                     01A7   459 ; FUNCTIONAL DESCRIPTION:

                                     01A7   460 ;

                                     01A7   461 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     01A7   462 ; "DSCP$ DIRECTIVE.

                                     01A7   463 ;

                                     01A7   464 ; INPUT PARAMETERS:

                                     01A7   465 ;

                                     01A7   466 ;	R5 = ADDRESS OF DPB+2

                                     01A7   467 ;	R6 = CM IMAGE STACK ADDRESS

                                     01A7   468 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     01A7   469 ;	R11 = ADDRESS OF IMAGE HEADER

                                     01A7   470 ;

                                     01A7   471 ; OUTPUT PARAMETERS:

                                     01A7   472 ;

                                     01A7   473 ;	R10,R11 ARE PRESERVED

                                     01A7   474 ;

                                     01A7   475 ; IMPLICIT OUTPUTS:

                                     01A7   476 ;

                                     01A7   477 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     01A7   478 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     01A7   479 ;

                                     01A7   480 ; DSW RETURN CODES:

                                     01A7   481 ;

                                     01A7   482 ;	IS.SUC	SUCCESSFUL

                                     01A7   483 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     01A7   484 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     01A7   485 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     01A7   486 ;	IE.ITS	CHECKPOINTING IS DISABLED ALREADY

                                     01A7   487 ;	IE.PRI	PRIVILEGE VIOLATION

                                     01A7   488 ;--

                                     01A7   489 RSX$DSCP::				; DISABLE CHECKPOINTING TASK DIRECTIVE

                                     01A7   490 	$SETSWM_S	#0		; DISABLE SWAP MODE

       0000'8F            50     B1  01B0   491 	CMPW	R0,#SS$_WASSET		; IF WAS SET THEN NO ERROR

                          1B     13  01B5   492 	BEQL	15$			; IF EQL THEN NO ERROR

       0000'8F            50     B1  01B7   493 	CMPW	R0,#SS$_WASCLR		; IF CLEAR THEN ERROR

                          0A     12  01BC   494 	BNEQ	10$			; IF NEQ THEN PRIVILEGE ERROR

                                     01BE   495 	$DSW	#IE.ITS			; SET ERROR

                                     01C8   496 10$:	$DSWIO	#IE.PRI			; SET ERROR

                                 05  01D2   497 15$:	RSB				;

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  13

V06.0           RSX$ENCP - RSX11M ENCP$ DIRECTIVE                                                                               (11)



                                     01D3   499 	.SBTTL	RSX$ENCP - RSX11M ENCP$ DIRECTIVE

                                     01D3   500 ;++

                                     01D3   501 ; RSX$ENCP - RSX11M ENABLE CHECKPOINTING TASK DIRECTIVE

                                     01D3   502 ;

                                     01D3   503 ; FUNCTIONAL DESCRIPTION:

                                     01D3   504 ;

                                     01D3   505 ; THIS IS A RSX DIRECTIVE HANDLER WHICH IMPLEMENTS AN RSX11M

                                     01D3   506 ; "ENCP$" DIRECTIVE. THE ONLY FUNCTION OF THEI DIRECTIVE, IS TO

                                     01D3   507 ; RETURN THE PROPER STATUS VALUE.

                                     01D3   508 ;

                                     01D3   509 ; INPUT PARAMETERS:

                                     01D3   510 ;

                                     01D3   511 ;	R5 = ADDRESS OF DPB+2

                                     01D3   512 ;	R6 = CM IMAGE STACK ADDRESS

                                     01D3   513 ;	R10 = ADDRESS OF CM IMAGE DATA BASE

                                     01D3   514 ;	R11 = ADDRESS OF IMAGE HEADER

                                     01D3   515 ;

                                     01D3   516 ; OUTPUT PARAMETERS:

                                     01D3   517 ;

                                     01D3   518 ;	R10,R11 ARE PRESERVED

                                     01D3   519 ;

                                     01D3   520 ; IMPLICIT OUTPUTS:

                                     01D3   521 ;

                                     01D3   522 ;	THE PROPER DIRECTIVE STATUS IS PLACED IN THE IMAGE DSW

                                     01D3   523 ;	ALONG WITH THE PROPER SETTING OF THE C-BIT.

                                     01D3   524 ;

                                     01D3   525 ; DSW RETURN CODES:

                                     01D3   526 ;

                                     01D3   527 ;	IS.SUC	SUCCESSFUL

                                     01D3   528 ;	IS.PRI	PRIVILEGE VIOLATION -- SS$_NOPRIV

                                     01D3   529 ;	IE.UPN	INSUFICIENT MEMORY -- SS$_INSFMEM

                                     01D3   530 ;	IE.NOD	QUOTA EXCEEDED -- SS$_EXQUOTA

                                     01D3   531 ;	IE.ITS	CHECKPOINTING IS ALREADY ENABLED

                                     01D3   532 ;--

                                     01D3   533 RSX$ENCP::				; ENABLE CHECKPOINTING TASK DIRECTIVE

                                     01D3   534 	$SETSWM_S	#1		; ENABLE SWAP MODE

       0000'8F            50     B1  01DC   535 	CMPW	R0,#SS$_WASSET		; IF WAS SET THEN NO ERROR

                          1B     13  01E1   536 	BEQL	15$			; IF EQL THEN NO ERROR

       0000'8F            50     B1  01E3   537 	CMPW	R0,#SS$_WASCLR		; IF CLEAR THEN ERROR

                          0A     12  01E8   538 	BNEQ	10$			; IF NEQ THEN PRIVILEGE ERROR

                                     01EA   539 	$DSW	#IE.ITS			; SET ERROR

                                     01F4   540 10$:	$DSWIO	#IE.PRI			; SET ERROR

                                 05  01FE   541 15$:	RSB				;

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  14

V06.0           MAPDSW - MAP DSW RETURN AFTER TASK CONTROL SERI                                                                 (12)



                                     01FF   543 	.SBTTL	MAPDSW - MAP DSW RETURN AFTER TASK CONTROL SERIVCE

                                     01FF   544 ;++

                                     01FF   545 ; MAPDSW - MAP THE PROPER DSW RETURN FOR THE TASK CONTROL DIRECTIVES

                                     01FF   546 ;

                                     01FF   547 ; FUNCTIONAL DESCRIPTION:

                                     01FF   548 ;

                                     01FF   549 ; THIS ROUTINE IS ENTERED AFTER A SYSTEM SERVICE TO MAP THE VAX/VMS

                                     01FF   550 ; RETURN CODE INTO A DSW RETURN CODE.

                                     01FF   551 ; IF THE OPERATION WAS NOT SUCCESSFUL THEN THE POSSIBLE ERRORS

                                     01FF   552 ; ARE:

                                     01FF   553 ;

                                     01FF   554 ;	IE.PRI	PRIVILEGE VIOLATION

                                     01FF   555 ;	IE.INS	UNKNOWN	PROCESS

                                     01FF   556 ;

                                     01FF   557 ; INPUTS:

                                     01FF   558 ;

                                     01FF   559 ;	R0 = STATUS TO MAP

                                     01FF   560 ;	R10 = ADDRESS OF IMAGE DATA BASE

                                     01FF   561 ;	R11 = ADDRESS OF THE IMAGE HEADER

                                     01FF   562 ;

                                     01FF   563 ; OUTPUTS:

                                     01FF   564 ;

                                     01FF   565 ;	R10,R11 ARE PRESERVED

                                     01FF   566 ;

                                     01FF   567 ; IMPLICIT OUTPUTS:

                                     01FF   568 ;

                                     01FF   569 ;	THE IMAGE DSW IS SET UP TO REFLECT THE STATUS OF THE

                                     01FF   570 ;	SYSTEM SERVICE. SUCCESSFUL IS IMPLIED.

                                     01FF   571 ;--

                                     01FF   572 MAPDSW:					; MAP DSW RETURN

            3D            50     E8  01FF   573 	BLBS	R0,20$			; IF LOW SET THEN SUCCESSFUL

       0000'8F            50     B1  0202   574 	CMPW	R0,#SS$_NOPRIV		; PRIVILEGE VIOLATION?

                          0A     12  0207   575 	BNEQ	5$			; IF NEQ THEN NO

                                     0209   576 	$DSWIO	#IE.PRI			; SET STATUS AND RETURN

       0000'8F            50     B1  0213   577 5$:	CMPW	R0,#SS$_INSFMEM		; NO MEMORY?

                          0A     12  0218   578 	BNEQ	10$			; IF NEQ THEN NO

                                     021A   579 	$DSW	#IE.UPN			; SET NO MEMORY ERROR

       0000'8F            50     B1  0224   580 10$:	CMPW	R0,#SS$_EXQUOTA		; QUOTA PROBLEM?

                          0A     12  0229   581 	BNEQ	15$			; IF NEQ THEN NO

                                     022B   582 	$DSWIO	#IE.NOD			; SET QUOTA ERROR

                                     0235   583 15$:	$DSW	#IE.INS			; SET NO SUCH PROCESS ERROR

                                 05  023F   584 20$:	RSB				; RETURN

                                     0240   585 ;

                                     0240   586 	.END

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  15

SYMBOL TABLE                                                                                                                    (12)



$$MSG          = 00000000            H.NLUN           0000003C            IE.HWR         = FFFFFFFA            

...GBL         = 00000000            H.NML            00000031            IE.IBS         = FFFFFFA7            

ACBC_CTLRCAST  = 00000002            H.ODVA           00000012            IE.IDU         = FFFFFFA4            

ACBC_FLOATAST  = 00000003            H.ODVL           00000014            IE.IEF         = FFFFFF9F            

ACBC_PWRAST    = 00000000            H.OVLY           0000002C            IE.IES         = FFFFFFAE            

ACBC_RCVAST    = 00000001            H.PFVA           0000001A            IE.IFC         = FFFFFFFE            

ACBV_INPROG    = 00000001            H.RCVA           0000001E            IE.IFU         = FFFFFFE7            

ACBV_PERM      = 00000000            H.RRVA           00000032            IE.ILL         = FFFFFFD6            

ACBV_TYPE      = 00000008            H.SPRI           00000030            IE.ILU         = FFFFFFA0            

ACB_FLAGS        0000000C            H.TKVA           00000016            IE.ILV         = FFFFFFED            

ACB_LINK         00000000            H.TKVL           00000018            IE.INS         = FFFFFFFE            

ACB_UPC          0000000A            H.VEXT           0000002E            IE.IOP         = FFFFFFAD            

ACB_UPRM         00000008            H.WND            00000024            IE.IPR         = FFFFFFA1            

ADR_HIGHLIM      00000004            IE.2DV         = FFFFFFD0            IE.ISQ         = FFFFFFC3            

ADR_LOWLIM       00000000            IE.ABO         = FFFFFFF1            IE.ITI         = FFFFFFA3            

ADR_SIZE         00000008            IE.ACT         = FFFFFFF9            IE.ITP         = FFFFFFA8            

AP_NAME          00000004            IE.ADP         = FFFFFF9E            IE.ITS         = FFFFFFF8            

AST_PARAM        00000004            IE.ALC         = FFFFFFAC            IE.IUI         = FFFFFFA5            

AST_PC           00000010            IE.ALG         = FFFFFFAC            IE.LCK         = FFFFFFE5            

AST_PSL          00000014            IE.ALN         = FFFFFFDE            IE.LNL         = FFFFFFA6            

AST_R0           00000008            IE.AST         = FFFFFFB0            IE.MAP         = FFFFFFAF            

AST_R1           0000000C            IE.BAD         = FFFFFFFF            IE.MOD         = FFFFFFEB            

BIT...         = 0006809C            IE.BBE         = FFFFFFC8            IE.NBF         = FFFFFFD9            

C_CANONPS      = 83C00000            IE.BCC         = FFFFFFBE            IE.NBK         = FFFFFFD7            

C_RCVDSTR      = 44564352            IE.BDI         = FFFFFFCC            IE.NDR         = FFFFFFB8            

FCB_ATTRIBS      0000007C            IE.BDR         = FFFFFFCE            IE.NFI         = FFFFFFC4            

FCB_FIB          0000004C            IE.BDV         = FFFFFFC9            IE.NFW         = FFFFFFBB            

FCB_FID          00000000            IE.BHD         = FFFFFFC0            IE.NLK         = FFFFFFB1            

FCB_FNAME        00000014            IE.BLB         = FFFFFFBA            IE.NLN         = FFFFFFDB            

FCB_FNAMEDESC    0000000C            IE.BLK         = FFFFFFEC            IE.NNC         = FFFFFFB3            

FCB_FNB          00000002            IE.BNM         = FFFFFFCA            IE.NNL         = FFFFFFB2            

FCB_PC           00000078            IE.BTF         = FFFFFFB4            IE.NNN         = FFFFFFBC            

FCB_RESULT       00000030            IE.BTP         = FFFFFFD5            IE.NOD         = FFFFFFE9            

FCB_RESULTDESC   00000004            IE.BVR         = FFFFFFC1            IE.NSF         = FFFFFFE6            

FCB_SIZE         000000B4            IE.BYT         = FFFFFFED            IE.NST         = FFFFFFB0            

FP_AP            00000008            IE.CKP         = FFFFFFF6            IE.NSW         = FFFFFFEE            

FP_FP            0000000C            IE.CKS         = FFFFFFE2            IE.NVR         = FFFFFFAA            

FP_PC            00000010            IE.CLO         = FFFFFFDA            IE.NVW         = FFFFFFA9            

FP_PSL           00000004            IE.CNR         = FFFFFFB7            IE.OFL         = FFFFFFBF            

FP_REGISTERS     00000014            IE.CON         = FFFFFFEA            IE.ONP         = FFFFFFFB            

GBL...         = 00000000            IE.DAA         = FFFFFFF8            IE.OVR         = FFFFFFEE            

H.CSP            00000000            IE.DAO         = FFFFFFF3            IE.PES         = FFFFFFAD            

H.CUIC           00000008            IE.DFU         = FFFFFFE8            IE.PNS         = FFFFFFA2            

H.DSW            00000026            IE.DNA         = FFFFFFF9            IE.PRI         = FFFFFFF0            

H.DUIC           0000000A            IE.DNR         = FFFFFFFD            IE.PTS         = FFFFFFFD            

H.EFLM           00000004            IE.DUN         = FFFFFFF7            IE.RAC         = FFFFFFD4            

H.EFSV           00000020            IE.DUP         = FFFFFFC7            IE.RAT         = FFFFFFD3            

H.FCS            00000028            IE.EOF         = FFFFFFF6            IE.RBG         = FFFFFFD8            

H.FORT           0000002A            IE.EOT         = FFFFFFC2            IE.RBS         = FFFFFFF1            

H.FPSA           00000022            IE.EOV         = FFFFFFF5            IE.RCN         = FFFFFFD2            

H.FPVA           0000001C            IE.EXP         = FFFFFFB5            IE.RER         = FFFFFFE0            

H.GARD           0000003A            IE.FEX         = FFFFFFCF            IE.RNM         = FFFFFFCD            

H.HDLN           00000002            IE.FHE         = FFFFFFC5            IE.RSU         = FFFFFFEF            

H.IPC            0000000E            IE.FIX         = FFFFFFF7            IE.SDP         = FFFFFF9D            

H.IPS            0000000C            IE.FLN         = FFFFFFAF            IE.SNC         = FFFFFFDD            

H.ISP            00000010            IE.FOP         = FFFFFFCB            IE.SPC         = FFFFFFFA            

H.LUN            0000003E            IE.HFU         = FFFFFFE4            IE.SQC         = FFFFFFDC            

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  16

SYMBOL TABLE                                                                                                                    (12)



IE.SRE         = FFFFFFF2            I_INISIZE        000000F0            QIO_FLAGS        0000001A            

IE.STK         = FFFFFFC6            I_LENGTH         000001F0            QIO_IOSB         0000000E            

IE.TCH         = FFFFFFF5            I_LOGNAME        000000E0            QIO_LUT          00000016            

IE.TMM         = FFFFFFB9            I_LUT            00000168            QIO_SECONDBLK    0000001C            

IE.TMO         = FFFFFFB6            I_NLUN           00000164            QIO_SIZE         00000020            

IE.ULK         = FFFFFFAB            I_PC             00000020            RSX$ABRT         00000000 RG    05   

IE.ULN         = FFFFFFFB            I_PPFINDEX       00000162            RSX$ALTP         00000021 RG    05   

IE.UNS         = FFFFFFFC            I_PROCNAME       0000014C            RSX$CSRQ         00000022 RG    05   

IE.UPN         = FFFFFFFF            I_PS             00000024            RSX$CVTNAME      ********   X   05   

IE.VER         = FFFFFFFC            I_PWRAST         000001A0            RSX$C_SUBSYSTEM= 00000006            

IE.WAC         = FFFFFFE3            I_R0             00000000            RSX$DSCP         000001A7 RG    05   

IE.WAT         = FFFFFFE1            I_R1             00000004            RSX$ENCP         000001D3 RG    05   

IE.WCK         = FFFFFFAA            I_R2             00000008            RSX$EXTK         0000003D RG    05   

IE.WER         = FFFFFFDF            I_R3             0000000C            RSX$RQST         000000E1 RG    05   

IE.WLK         = FFFFFFF4            I_R4             00000010            RSX$RSUM         0000010E RG    05   

IE.WOV         = FFFFFFAB            I_R5             00000014            RSX$RUN          00000129 RG    05   

IS.BV          = 00000005            I_R6             00000018            RSX$SPND         0000019D RG    05   

IS.CC          = 00000301            I_RAD50NAME      00000148            RSX$TIMEMAG      ********   X   05   

IS.CLR         = 00000000            I_RCVAST         0000019C            RSX$_ACCVIO    = 00068044            

IS.CR          = 00000D01            I_RCVMAIL        00000160            RSX$_BADLIBREF = 0006806C            

IS.EOT         = 00000401            I_RUNFLAGS       0000018C            RSX$_BADSTACK  = 0006804C            

IS.ESC         = 00001B01            I_SCRATCH        00000028            RSX$_BREAK     = 0006800C            

IS.ESQ         = 00009B01            I_SSTVEC         00000194            RSX$_EXITSTATUS= 00068640            

IS.PES         = 00008001            I_SSTVECL        00000196            RSX$_EXTERNABRT= 0006805C            

IS.PND         = 00000000            I_STATE          00000170            RSX$_ILLINST   = 0006802C            

IS.RDD         = 00000002            I_TYPE           0000001C            RSX$_IMAGETERM = 00068084            

IS.SET         = 00000002            I_UIC            0000013C            RSX$_INSFDYNMEM= 00068054            

IS.SPD         = 00000002            I_WAIT           00000178            RSX$_IOT       = 00068014            

IS.SUC         = 00000001            I_WAITSAVE       00000180            RSX$_LIBNOTFND = 00068074            

IS.TAB         = 00000901            LUTC_CR        = 00000005            RSX$_LOADERROR = 0006807C            

IS.TMO         = 00000002            LUTC_DISK      = 00000002            RSX$_NOCOMM    = 00068094            

I_ADR0           000000FC            LUTC_LP        = 00000004            RSX$_NONRSXEMT = 0006801C            

I_ASCIINAME      00000140            LUTC_RMS       = 00000000            RSX$_NOPMD     = 00068332            

I_ASTPOOL        000000D0            LUTC_TAPE      = 00000003            RSX$_NOSUCHDEV = 00068322            

I_ASTQUEUE       000000C8            LUTC_TRM       = 00000001            RSX$_NOTSKIMG  = 00068064            

I_BAILOUTFP      00000188            LUTV_CTRLC     = 00000002            RSX$_ODDADDR   = 00068034            

I_CMDROUT        000000E8            LUTV_CTRLO     = 00000000            RSX$_PMD       = 0006832A            

I_CURAST         00000198            LUTV_PRM       = 00000003            RSX$_RCVMBXSIZ = 0000012C            

I_DEBVEC         00000190            LUT_CHAN         0000000C            RSX$_REGMSG    = 0006808C            

I_DEBVECL        00000192            LUT_CHAR         00000012            RSX$_RESERVED  = 00068004            

I_FCBPOOL        000000D8            LUT_CTRLC        00000032            RSX$_TBIT      = 0006803C            

I_FCC            000001B4            LUT_FLAGS        0000000A            RSX$_TRAP      = 00068024            

I_FLOATA0        000001C0            LUT_INFONAME     0000002E            RSX$_VERIFYCMD = 00068648            

I_FLOATA1        000001C8            LUT_INFOUNIT     00000030            SS$_ABORT        ********   X   05   

I_FLOATA2        000001D0            LUT_LINK         00000000            SS$_EXQUOTA      ********   X   05   

I_FLOATA3        000001D8            LUT_REALNAME     0000001E            SS$_INSFMEM      ********   X   05   

I_FLOATA4        000001E0            LUT_REF          00000008            SS$_IVTIME       ********   X   05   

I_FLOATA5        000001E8            LUT_RSXNAME      00000010            SS$_NOPRIV       ********   X   05   

I_FLOATADR       000001B0            LUT_SIZE         00000036            SS$_WASCLR       ********   X   05   

I_FLOATAST       000001A4            LUT_TYPE         00000016            SS$_WASSET       ********   X   05   

I_FLOATCSR       000001A8            MAPDSW           000001FF R     05   SV_ASTLVL        00000004            

I_FLOATERR       000001AC            PSL_CC         = 00000000            SV_DCL           00000002            

I_FLOATTMP       000001B8            PSL_CM         = 0000001F            SV_FLOATAST      00000009            

I_GARD           000000EC            PSL_FPD        = 0000001B            SV_NOAST         00000003            

I_HIGHEFN        0000016C            PSL_FU         = 00000006            SV_PENDWAIT      00000005            

I_HIGHSIZE       000000F4            PSL_TBIT       = 00000004            SV_PWRAST        00000008            

I_IMAGEVBN       000000F8            QIOV_FILES     = 00000000            SV_RCVAST        00000007            

RSXTSKCTL       - RSX AME TASK CONTROL DIRECTIVES                22-AUG-1978 05:13:30   VAX-11 MACRO X0.3-11               Page  17

SYMBOL TABLE                                                                                                                    (12)



SV_RESTORE       00000000            

SV_TRANSLATE     00000001            

SV_WAIT          00000006            

SYS$CANWAK       ********   X   05   

SYS$CRETVA       ********   X   05   

SYS$DELTVA       ********   X   05   

SYS$FORCEX       ********   X   05   

SYS$HIBER        ********   X   05   

SYS$SCHDWK       ********   X   05   

SYS$SETSWM       ********   X   05   

SYS$WAKE         ********   X   05   

W.BATT           00000006            

W.BFPD           0000000C            

W.BHVR           00000004            

W.BLGH           00000010            

W.BLPD           0000000E            

W.BLVR           00000002            

W.BNPD           0000000D            

W.BOFF           0000000A            

W.BPCB           00000000            

W.BSIZ           00000008            





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.           00000042      02     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

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

RSXDEF           000001F4      04     NOPIC   USR   CON   ABS   LCL NOSHR   EXE   RD    WRT BYTE  

RSXCODE          00000240      05       PIC   USR   CON   REL   LCL   SHR   EXE   RD  NOWRT BYTE  





THERE WERE NO ERRORS OR WARNINGS.

15950. BYTES LEFT IN FREE MEMORY POOL.

136. BYTES OF RECLAIMED MEMORY.

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

35 MLB DIR RDS - 519 GETS TO DEFINE 26 MACROS. 17 INTER. FILE WRITES. 

