Google
 

Trailing-Edge - PDP-10 Archives - bb-x141b-bb - pip.lst
There are 2 other files named pip.lst in the archive. Click here to see a list.
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40
TABLE OF CONTENTS

     7-    1	**** PIP VERSION M1321 ****
     8-   45	ASSEMBLY PARAMETERS
     9-   89	READ/WRITE DATA AND WORKING STORAGE
    10-  185	READ ONLY TABLES
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 7


      1						.TITLE	PIP M1321, RSX FILE UTILITY
						.SBTTL	**** PIP VERSION M1321 ****
						.IDENT	/M1321/
      2					; ALTERED:
      3					; ANDREW C. GOLDSTEIN  17 JUL 75  16:35
      4					;
      5					; COPYRIGHT 1975, DIGITAL EQUIPMENT CORP., MAYNARD MASS.
      6					; COPYRIGHT 1974, DIGITAL EQUIPMENT CORP., MAYNARD MASS.
      7
      8					; THIS SOFTWARE IS FURNISHED TO PURCHASER UNDER A LICENSE FOR USE
      9					; ON A SINGLE COMPUTER SYSTEM AND CAN BE COPIED (WITH INCLUSION
     10					; OF DEC'S COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT
     11					; AS MAY OTHERWISE BE PROVIDED IN WRITING BY DEC.
     12
     13					; THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT
     14					; NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL
     15					; EQUIPMENT CORPORATION.
     16
     17					; DEC ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY
     18					; OF ITS SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DEC.
     19					;
     20					; PETER H. LIPMAN 4-JAN-73;
     21					;
     22					; MACROS
     23					;
     24					; INVOKE FCS MACROS
     25					;
     26	000000					FLDSOF			;DEFINE THE FILE DESCRIPTOR OFFSETS
     27						.MCALL	FDOFF$,CSI$,GCMLD$,FCSBT$
     28	000000					FDOFF$	DEF$L
     29	000000					CSI$			;DEFINE THE CSI BLOCK OFFSETS
     30	000000					GCMLD$			;DEFINE THE GET COMMAND LINE OFFSETS
     31	000000					FCSBT$	DEF$L
     32					;
     33						.MCALL	CSI$SV,CSI$SW,CSI$ND,GCMLB$
     34						.MCALL	FDAT$A,FDBDF$,FDOP$A,FDRC$A,FSRSZ$,NMBLK$
     35					;
     36					; DEFINE THE COMMAND BITS, THE FIRST ARGUMENT IS THE ROUTINE
     37					; ADDRESS TO JMP OFF TO.  THE SECOND IS THE BIT NAME
     38					; BITVAL IS ASSUMED SET UP TO THE FIRST BIT NUMBER TO BE USED.
     39						.MACRO	CMDBIT	ROUTIN,BITNAM
     40						.WORD	ROUTIN
     41						BITNAM==BITVAL
     42						BITVAL=BITVAL*2
     43						.ENDM	CMDBIT
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 8
ASSEMBLY PARAMETERS

     45						.SBTTL	ASSEMBLY PARAMETERS
     46					;
     47		000003 				INLUN==3		;LUN FOR INPUT FILE
     48		000004 				OUTLUN==4		;LUN FOR OUTPUT FILE
     49		000002 				CMOLUN==2		;LUN FOR COMMAND OUTPUT
     50		000001 				FNAEFN==1		;EVENT FLAG USED FOR FIND IN DIR LIST
     51		000002 				RATEFN==2		;EVENT FLAG USED FOR READ ATTRIBUTES (/LI)
     52		000003 				RWEFN==3		;EVENT FLAG FOR READ WRITE MODE COPY
     53		000011 				DFDRSZ==9.		;SIZE OF LARGEST DEFAULT DIR STRING
     54		000011 				TAB=='I-100		;TAB CHARACTER
     55		054523 				SYDEV=="SY		;SYSTEM DEVICE
     56		000000 				SYUNIT==0		;SYSTEM UNIT NO.
     57		000054 				S.WUIC==S.FNB+14.	;SIZE OF WILD UIC SCRATCH STORAGE
     58		001400 				NB.SDI==NB.SD1!NB.SD2	;WILD CARD DIRECTORY
     59		001470 				NB.SFL==NB.SVR!NB.STP!NB.SNM!NB.SDI ;* IN NAME, TYPE, VERS, DIR
     60		000070 				NB.SFN==NB.SNM!NB.STP!NB.SVR ;* IN NAME, TYPE, VER
     61
     62
     63					;
     64					; COPY CONTROL WORD BITS- LOCAL SWITCHES ON EACH FILE SPECIFIER
     65		000004 				CNTGBT==4		;SET TO FORCE CONTIGUOUS OUTPUT FILE
     66		000010 				MFDBIT==10		;OPERATE ON THE MFD
     67					; ***** THE FOLLOWING FOUR VALUES MUST REMAIN IN THEIR CURRENT ORDER
     68		000020 				WOPROB==20		;WORLD PROTECTION SPECIFIED
     69		000040 				GRPROB==40		;GROUP PROTECTION SPECIFIED
     70		000100 				OWPROB==100		;OWNER PROTECTION SPECIFED
     71		000200 				SYPROB==200		;SYSTEM PROTECTION SPECIFIED
     72					; ***** THE PRECEEDING FOUR VALUES MUST REMAIN IN THEIR CURRENT ORDER
     73		001000 				FIDBIT==1000		;FILE ID MANUALLY SPECIFIED
     74		002000 				BLKBIT==2000		;SIZE OF OUTPUT FILE SPECIFIED TO COPY
     75		004000 				NTCNTG==4000		;NOT CONTIGUOUS CONTROL BIT (COPY)
     76		010000 				NVERBT==10000		;SET IF NOT PRESERVING VERSION ON COPY
     77		020000 				SPSDBT==20000		;SET IF SUPERSEDE FILE ON COPY
     78		040000 				FOWNBT==40000		;SET TO FORCE FILE OWNER TO OUTPUT UIC
     79		100000 				FRSTIM==100000		;FIRST TIME THROUGH A GIVEN OPERATION
     80					;
     81					; DEFINITIONS OF OFFSETS USED IN  FILE HEADER
     82		001001 				HA.UI==2*400+1		;WRITE USER ATTRIBUTES
     83		001002 				HA.FP==2*400+2		;SET FILE PROTECTION ATTRIBUTE CODE
     84		000403 				HA.CHU==1*400+3		;SET FILE CHARACTERISTICS ATTRIBUTE CODE
     85									;FOR WRITING THE USER CHARACTERISTICS
     86		000012 				S.STBK==10.		;SIZE OF STATISTICS BLOCK IN BYTES
     87		004000 				ILCLSW==NTCNTG		;INIT LOCAL SWITCHES TO THIS
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 9
READ/WRITE DATA AND WORKING STORAGE

     89						.SBTTL	READ/WRITE DATA AND WORKING STORAGE
     90	000000					.PSECT
     91	000000					FSRSZ$	0		;FILE STORAGE REGION IS DYNAMICALLY SET UP
     92									;GET CMD LINE NOW CLOSES FILE EACH TIME
     93	000000					IMPURE
     94					;
     95					;
     96	000000				FDBOUT::FDBDF$			;ALLOCATE SPACE FOR THE OUTPUT FDB
     97	000140					FDOP$A	OUTLUN,OFNPT	;LUN, FNPT
     98
     99	000140				FDBIN::	FDBDF$
    100	000300					FDRC$A	FD.PLC		;PARTIAL LOCATE MODE
    101	000300					FDOP$A	INLUN,IFNPT	;LUN, FNPT
    102
    103	000300				STBLK::	.BLKB	S.STBK
    104	000312				IOSTBK::.BLKW	2		;I/O STATUS BLOCK FOR READ/WRITE MD COPY
    105	000316				FNASTS::.BLKW	2		;I/O STATUS BLOCK FOR FIND QI/O (/LI)
    106					;
    107					; ***** DO NOT SEPARATE THE FOLLOWING LINES
    108					;
    109	000322				CODEV::	.BLKW	1		;SAVED CMD OUTPUT DEVICE NAME
    110	000324				COUNIT::.BLKW	1		;CMD OUTPUT UNIT
    111	000326				LINBUF::.BLKB	144.		;LINE BUFFER USED BY DIR LIST
    112									;UP TO 2 TTY LINES LONG
    113		000220 				LINBFS==.-LINBUF
    114					;
    115					; ***** DO NOT SEPARATE THE PRECEEDING LINES
    116					;
    117
    118					; ***** DO NOT SEPARATE THE FOLLOWING LINES
    119	000546				IFNPT::	.BLKB	S.FIDS+S.APPD	;INPUT FILE AND DEVICE DESIGNATORS
    120		000562'				INSPEC==IFNPT+N.SPEC
    121	000572				IWUIC::	.BLKB	S.WUIC		;SCRATCH STORAGE FOR WILD UIC LOGIC
    122	000646				OFNPT::	.BLKB	S.FIDS+S.APPD	;OUTPUT FILE AND DEVICE DESIGNATORS
    123		000662'				OUSPEC==OFNPT+N.SPEC
    124	000672				OWUIC::	.BLKB	S.WUIC
    125					; ***** DO NOT SEPARATE THE PRECEEDING LINES
    126
    127	000746				SYDFLT::NMBLK$			;DEFAULT DEVICE = SYSTEM DEVICE
    128	001004				NAMBLK::NMBLK$			;SCRATCH NAME BLOCK
    129	001042				NMBLK1::NMBLK$
    130					;
    131	001100				GCMLCB::GCMLB$	4,PIP		;CONTROL BLOCK FOR GET COMMAND LINE
    132									;UP TO 4 LEVELS OF INDIRECTION
    133	001566				CSIBLK::.BLKB	C.SIZE		;CONTROL BLK FOR CMD STRING INTERPRETER
    134					;
    135					; OTHER SCRATCH LOCATIONS
    136	001642				CMDWRD::.BLKW	2		;COMMAND BITS ARE HERE
    137	001646				CPYCTL::.BLKW	1		;CONTROLLING BITS ARE HERE
    138	001650				SAVSP::	.BLKW	1		;SAVE THE STACK POINTER
    139	001652				VERSAV::.BLKW	1		;SAVE VERSION NUMBER FROM PARSE
    140	001654				INRACC::.BLKW	1		;F.RACC FOR THE INPUT FDB
    141	001656				OURACC::.BLKW	1		;F.RACC FOR THE OUTPUT FDB
    142	001660				DEFDIR::.BLKB	DFDRSZ		;DEFAULT DIRECTORY STRING STORED HERE
    143						.EVEN
    144					;
    145					; ***** DO NOT SEPARATE OR REORDER THE FOLLOWING
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 9-1
READ/WRITE DATA AND WORKING STORAGE

    146	001672				WORPRO::.BLKB	4
    147	001676				GROPRO::.BLKB	4
    148	001702				OWNPRO::.BLKB	4
    149	001706				SYSPRO::.BLKB	4
    150	001712	177777 			PROWRD::.WORD	-1
    151					; ***** DO NOT SEPARATE OR REORDER THE PRECEEDING LINES
    152					;
    153	001714	000001 			PURGCT::.WORD	1		;NO. OF VERSIONS TO PRESERVE
    154	001716	000120 			LPTLEN::.WORD	80.		;DEFAULT DIRECTORY LISTING WIDTH
    155	001720				BLKCNT::.BLKW	1		;NO. OF BLOCKS TO ALLOCATE TO OUT FILE
    156	001722				.LCLSW::.BLKW	1		;INITIAL VALUE FOR LOCAL SWITCHES
    157	001724				.OULCL::.BLKW	1		;LOCAL SWITCHES ON 1ST OUTPUT SPEC
    158	001726	054523 			.DEFDV::.WORD	SYDEV		;DEFAULT DEVICE
    159	001730	000000 			.DEFUN::.WORD	SYUNIT		;DEFAULT UNIT
    160	001732				.EXTSZ::.BLKW	1		;SIZE OF INPUT FILE (+ CONTIG, - = NOT)
    161	001734				.FOWNR::.BLKW	1		;UIC FOR THE FILE OWNER IF /FO SWITCH
    162	001736	000000 	000000 		.DYBLK::.LIMIT			;BLOCKS OF DYNAMIC MEMORY AVAILABLE
    163		001740'				.TOPAD==.DYBLK+2	;ADDRESS OF DYNAMIC MEMORY BUFFER(S)
    164	001742				.DYSIZ::.BLKW	1		;SIZE IN BYTES OF DYNAMIC MEMORY REGION
    165	001744				.DYBUF::.BLKW	1		;ADDRESS OF DYNAMIC BUFFER IN USE
    166	001746				.DYBYT::.BLKW	1		;SIZE IN BYTES OF DYNAMIC BUFFER IN USE
    167					;
    168					; READ ATTRIBUTE CONTROL BLOCK
    169					;
    170						.IF	GT,R$$DPB	;IF NEW DPB FORMATS
    171	001750	   367 	   012 		RATCTL::.BYTE	-9.,S.STBK	;READ ATTRIBUTES - STATISTICS BLOCK
    172	001752	000300'				.WORD	STBLK
    173	001754	   366 	   000 			.BYTE	-10.,0		;FILE HEADER
    174	001756	000000 			.HDRAD::.WORD	0
    175	001760	000000 				.WORD	0		;END OF ATTRIBUTE LIST
    176						.ENDC
    177
    178						.IF	EQ,R$$DYM	;IF NO DYNAMIC MEMORY FACILITY
    179						.PSECT	$$DYB1,D
    180					DYB1::
    181						.PSECT	$$DYB2,D
    182					DYB2::
    183						.ENDC
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 10
READ ONLY TABLES

    185						.SBTTL	READ ONLY TABLES
    186	001762					PURE.D
    187					;
    188					; READ ONLY TABLES AND CONTROL BLOCKS
    189					; COMMAND TABLE - FORMAT COMMAND,BIT
    190		000001 				BITVAL=1
    191	000036				CMDTBL::
    192	000036					CMDBIT	DIRLST,LSTBIT	;ON IF LISTING DIRECTORY
    193	000040					CMDBIT	DIRLST,SHTLST	;ON IF LISTING DIRECTORY BRIEF MODE
    194	000042					CMDBIT	DIRLST,EVRYBT	;ON IF LISTING DIRECTORY FULL MODE
    195	000044					CMDBIT	DIRLST,TOTLBT	;ON IF LISTING DIRECTORY TOTAL BLOCKS ONLY
    196	000046					CMDBIT	DELETE,DELBIT	;ON IF DELETING THE OUTPUT FILE(S)
    197	000050					CMDBIT	DELETE,PURGBT	;ON IF PURGING FILES
    198	000052					CMDBIT	REMOVE,RMVBIT	;REMOVE A DIRECTORY ENTRY
    199	000054					CMDBIT	PIPID,IDBIT	;TYPE THE PIP IDENTIFIER
    200	000056					CMDBIT	.SETDF,DFLTBT	;CHANGE DEFAULT DEVICE OR UIC
    201	000060					CMDBIT	UNLOCK,UNLKBT	;UNLOCK A LOCKED FILE
    202	000062					CMDBIT	PROTCT,PROTBT	;SET FILE  PROTECTION
    203					;
    204					; TABLE FOR COMMAND BITS IN SECOND WORD
    205					;
    206		000001 				BITVAL=1
    207	000064				CMDTB2::
    208	000064					CMDBIT	SPOOL,SPLBIT	;SPOOL FOR PRINTING AND DELETE
    209	000066					CMDBIT	RENAME,RNMBIT	;RENAME INPUT FILE TO OUTPUT NAME
    210	000070					CMDBIT	ENTER,ENTRBT	;ENTER A DIRECTORY ENTRY
    211	000072					CMDBIT	COPY,MERGBT	;MERGE COMMAND
    212	000074					CMDBIT	COPY,APPDBT	;APPEND FILES
    213	000076					CMDBIT	COPY,UPDTBT	;UPDATE (REWRITE) FILE
    214	000100					CMDBIT	.FREE,FREEBT	;PRINT FREE SPACE ON VOLUME
    215					;
    216					; COMMAND STRING INTERPRETER SWITCH TABLE
    217	000102				CSISWT::CSI$SW	DI,LSTBIT,CMDWRD,SET,,0 ;DIRECTORY LISTING SWITCH
    218	000112					CSI$SW	LI,LSTBIT,CMDWRD,SET,,0 ;SYNONYM FOR DIR LISTING CMD
    219	000122					CSI$SW	BR,SHTLST,CMDWRD,SET,,0 ;SHORT FORM DIRECTORY LISTING
    220	000132					CSI$SW	FU,EVRYBT,CMDWRD,SET,,FULVAL ;FULL DIRECTORY LISTING
    221	000142					CSI$SW	TB,TOTLBT,CMDWRD,SET,,0 ;LIST DIRECTORY TOTALS ONLY
    222	000152					CSI$SW	DE,DELBIT,CMDWRD,SET,,0 ;DELETE SWITCH
    223	000162					CSI$SW	PU,PURGBT,CMDWRD,SET,,PURGVL ;PURGE ALL BUT NEWEST VERSION
    224	000172					CSI$SW	RM,RMVBIT,CMDWRD,SET,,0 ;REMOVE A DIRECTORY ENTRY
    225	000202					CSI$SW	ID,IDBIT,CMDWRD,SET,,0 ;ID SWITCH - TYPE PIP'S IDENT
    226	000212					CSI$SW	DF,DFLTBT,CMDWRD,SET,,0 ;SET DEFAULT DEVICE OR UIC
    227	000222					CSI$SW	UI,DFLTBT,CMDWRD,SET,,0 ;SET DEFAULT UIC
    228	000232					CSI$SW	UN,UNLKBT,CMDWRD,SET,,0 ;UNLOCK A LOCKED FILE
    229	000242					CSI$SW	PR,PROTBT,CMDWRD,SET,,PRVAL ;SET FILE PROTECTION
    230	000252					CSI$SW	SP,SPLBIT,CMDWRD+2,SET,,0 ;SPOOL THE FILES FOR PRINTING
    231	000262					CSI$SW	RE,RNMBIT,CMDWRD+2,SET,,0 ;RENAME SWITCH
    232	000272					CSI$SW	EN,ENTRBT,CMDWRD+2,SET,,0 ;ENTER A DIRECTORY ENTRY
    233	000302					CSI$SW	ME,MERGBT,CMDWRD+2,SET,,0 ;MERGE INPUT FILES
    234	000312					CSI$SW	AP,APPDBT,CMDWRD+2,SET,,0 ;APPEND COMMAND
    235	000322					CSI$SW	UP,UPDTBT,CMDWRD+2,SET,,0 ;UPDATE (REWRITE) CMD
    236	000332					CSI$SW	FR,FREEBT,CMDWRD+2,SET,,0 ;FREE SPACE ON VOLUME
    237					;
    238					; CPYCTL SWITCHES, MODIFY COMMANDS, LOCAL TO THE SPECIFIER
    239	000342					CSI$SW	CO,CNTGBT!NTCNTG,CPYCTL,SET,NEG,0 ;FORCE CONTIGUOUS COPY
    240	000352					CSI$SW	MF,MFDBIT,CPYCTL,SET,,0 ;LIST THE MFD FOR SPECIFIED DEVICE
    241	000362					CSI$SW	WO,WOPROB,CPYCTL,SET,,WOVAL ;WORLD PROTECTION
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 10-1
READ ONLY TABLES

    242	000372					CSI$SW	GR,GRPROB,CPYCTL,SET,,GRVAL ;GROUP PROTECTION
    243	000402					CSI$SW	OW,OWPROB,CPYCTL,SET,,OWVAL ;OWNER PROTECTION
    244	000412					CSI$SW	SY,SYPROB,CPYCTL,SET,,SYVAL ;SYSTEM PROTECTION
    245	000422					CSI$SW	FI,FIDBIT,CPYCTL,SET,,FIDVAL ;FILE ID SPECIFIED
    246	000432					CSI$SW	BL,BLKBIT,CPYCTL,SET,,BLKVAL ;NO OF BLOCKS TO ALLOCATE
    247	000442					CSI$SW	NV,NVERBT,CPYCTL,SET,,0 ;COPY TO NEW VERSION
    248	000452					CSI$SW	SU,SPSDBT,CPYCTL,SET,,0 ;SUPERSEDE EXISTING FILES ON COPY
    249	000462					CSI$SW	FO,FOWNBT,CPYCTL,SET,,0 ;FORCE FILE OWNER TO OUTPUT UIC
    250	000472					CSI$ND			;END OF SWITCHES
    251					; VALUE TABLES FOR PROTECTION CODES
    252	000474				WOVAL::	CSI$SV	ASCII,WORPRO,4
    253	000500					CSI$ND
    254	000502				GRVAL::	CSI$SV	ASCII,GROPRO,4
    255	000506					CSI$ND
    256	000510				OWVAL::	CSI$SV	ASCII,OWNPRO,4
    257	000514					CSI$ND
    258	000516				SYVAL::	CSI$SV	ASCII,SYSPRO,4
    259	000522					CSI$ND
    260	000524				PRVAL::	CSI$SV	NUMERIC,PROWRD,2
    261	000530					CSI$ND
    262					;
    263					; VALUE TABLE FOR PURGE SWITCH, NO OF VERSIONS TO PRESERVE
    264	000532				PURGVL::CSI$SV	NUMERIC,PURGCT,2
    265	000536					CSI$ND
    266					;
    267					; VALUE TABLE FOR FILE ID SWITCH
    268	000540				FIDVAL::CSI$SV	NUMERIC,FILID,2
    269	000544					CSI$SV	NUMERIC,FILID+2,2
    270	000550					CSI$SV	NUMERIC,FILID+4,2
    271	000554					CSI$ND
    272					;
    273					; VALUE TABLE FOR /FULL DIRECTORY LISTING SWITCH (OUTPUT WIDTH)
    274	000556				FULVAL::CSI$SV	NUMERIC,LPTLEN,2
    275	000562					CSI$ND
    276					;
    277					; VALUE TABLE FOR /BLOCK SWITCH TO COPY (SPECIFY OUTPUT FILE SIZE)
    278	000564				BLKVAL::CSI$SV	NUMERIC,BLKCNT,2
    279	000570					CSI$ND
    280
    281	000572	000000 			SSTTAB::.WORD	0		;ODD ADDRESS TRAP
    282	000574	000000 				.WORD	0		;MEMORY PROTECTION VIOLATION
    283	000576	000000 				.WORD	0		;T BIT OR BPT INSTRUCTION
    284	000600	000000 				.WORD	0		;IOT INSTRUCTION
    285	000602	000000 				.WORD	0		;RESERVED INSTRUCTION
    286	000604	000000 				.WORD	0		;NON RSX EMT
    287	000606	000000G				.WORD	.ERTRP		;TRAP INSTRUCTION
    288
    289		000007 				SSTENT=<.-SSTTAB>/2	;NO. OF SST ENTRIES IN TABLE
    290
    291	000610	000000G			.ABORT::.WORD	.RSTAR		;ERRPX AND ERROUX RETURN BY JMP @ .ABORT
    292
    293	000612					PURE.I
    294	000000	000167 	000000G		START::	JMP	.INIT
    295	000004				CLOSX::
    296	000004	000167 	000000G		AGAIN::	JMP	.RSTAR
    297					;
    298					;
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 10-2
READ ONLY TABLES

    299		000000'				.END	START
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 10-3
SYMBOL TABLE

AGAIN   000004RG    006	FD.CCL= 000002   	F.NRBD= 000024   	NB.DIR= 000100   	R.FIX = 000001
APPDBT= 000020 G 	FD.CR = 000002   	F.NREC= 000030   	NB.NAM= 000004   	R.VAR = 000002
BITVAL= 000200   	FD.DIR= 000010   	F.OVBS= 000030   	NB.SDI= 001400 G 	SAVSP   001650RG    005
BLKBIT= 002000 G 	FD.FTN= 000001   	F.RACC= 000016   	NB.SD1= 000400   	SHTLST= 000002 G
BLKCNT  001720RG    005	FD.INS= 000010   	F.RATT= 000001   	NB.SD2= 001000   	SPLBIT= 000001 G
BLKVAL  000564RG    003	FD.PLC= 000004   	F.RCNM= 000034   	NB.SFL= 001470 G 	SPOOL = ****** GX
CLOSX   000004RG    006	FD.RAH= 000001   	F.RCTL= 000017   	NB.SFN= 000070 G 	SPSDBT= 020000 G
CMDTBL  000036RG    003	FD.RAN= 000002   	F.RSIZ= 000002   	NB.SNM= 000040   	SSTENT= 000007
CMDTB2  000064RG    003	FD.REC= 000001   	F.RTYP= 000000   	NB.STP= 000020   	SSTTAB  000572RG    003
CMDWRD  001642RG    005	FD.RWM= 000001   	F.STBK= 000036   	NB.SVR= 000010   	START   000000RG    006
CMOLUN= 000002 G 	FD.SDI= 000020   	F.UNIT= 000136   	NB.TYP= 000002   	STBLK   000300RG    005
CNTGBT= 000004 G 	FD.SQD= 000040   	F.URBD= 000020   	NB.VER= 000001   	SYDEV = 054523 G
CODEV   000322RG    005	FD.TTY= 000004   	F.VBN = 000064   	NMBLK1  001042RG    005	SYDFLT  000746RG    005
COPY  = ****** GX	FD.WBH= 000002   	F.VBSZ= 000060   	NTCNTG= 004000 G 	SYPROB= 000200 G
COUNIT  000324RG    005	FIDBIT= 001000 G 	GCMLCB  001100RG    005	NVERBT= 010000 G 	SYSPRO  001706RG    005
CPYCTL  001646RG    005	FIDVAL  000540RG    003	GE.BIF= 177775   	N.DEVD= 000000   	SYUNIT= 000000 G
CSIBLK  001566RG    005	FILID = ****** GX	GE.CLO= 000004   	N.DID = 000024   	SYVAL   000516RG    003
CSISWT  000102RG    003	FNAEFN= 000001 G 	GE.COM= 000001   	N.DIRD= 000004   	S.APPD= 000010
CS.DIF= 000002   	FNASTS  000316RG    005	GE.EOF= 177766   	N.DVNM= 000032   	S.BFHD= 000020
CS.DVF= 000004   	FOWNBT= 040000 G 	GE.IND= 000002   	N.FID = 000000   	S.FATT= 000016
CS.EQU= 000040   	FO.APD= 000106   	GE.IOR= 177777   	N.FLID= 000016   	S.FDB = 000140
CS.INP= 000001   	FO.MFY= 000002   	GE.LC = 000010   	N.FNAM= 000006   	S.FIDS= 000014
CS.MOR= 000020   	FO.RD = 000001   	GE.MDE= 177774   	N.FNMD= 000010   	S.FNAM= 000006
CS.NMF= 000001   	FO.UPD= 000006   	GE.OPR= 177776   	N.FTYP= 000014   	S.FNB = 000036
CS.OUT= 000002   	FO.WRT= 000016   	GROPRO  001676RG    005	N.FVER= 000016   	S.FNBW= 000017
CS.WLD= 000010   	FREEBT= 000100 G 	GRPROB= 000040 G 	N.NEXT= 000022   	S.FNTY= 000004
C.CMLD= 000002   	FRSTIM= 100000 G 	GRVAL   000502RG    003	N.SPEC= 000014   	S.FTYP= 000002
C.DEVD= 000006   	FULVAL  000556RG    003	G.CMLD= 000146   	N.STAT= 000020   	S.NFEN= 000020
C.DIRD= 000012   	F.ALOC= 000040   	G.DPRM= 000160   	N.UNIT= 000034   	S.STBK= 000012 G
C.DSDS= 000006   	F.BBFS= 000062   	G.ERR = 000140   	OFNPT   000646RG    005	S.WUIC= 000054 G
C.FILD= 000016   	F.BDB = 000070   	G.ISIZ= 000020   	OURACC  001656RG    005	TAB   = 000011 G
C.MKW1= 000024   	F.BGBC= 000057   	G.LPDL= 000120   	OUSPEC= 000662RG    005	TOTLBT= 000010 G
C.MKW2= 000026   	F.BKDN= 000026   	G.MODE= 000141   	OUTLUN= 000004 G 	UNLKBT= 001000 G
C.SIZE= 000054   	F.BKDS= 000020   	G.PSDS= 000142   	OWNPRO  001702RG    005	UNLOCK= ****** GX
C.STAT= 000001   	F.BKEF= 000050   	HA.CHU= 000403 G 	OWPROB= 000100 G 	UPDTBT= 000040 G
C.SWAD= 000022   	F.BKP1= 000051   	HA.FP = 001002 G 	OWUIC   000672RG    005	VERSAV  001652RG    005
C.TYPR= 000000   	F.BKST= 000024   	HA.UI = 001001 G 	OWVAL   000510RG    003	WOPROB= 000020 G
DEFDIR  001660RG    005	F.BKVB= 000064   	IDBIT = 000200 G 	PIPID = ****** GX	WORPRO  001672RG    005
DELBIT= 000020 G 	F.CNTG= 000034   	IDNTMG= 000000RG    002	PROTBT= 002000 G 	WOVAL   000474RG    003
DELETE= ****** GX	F.DFNB= 000046   	IDNTSZ= 000021 G 	PROTCT= ****** GX	$$    = 000000
DFDRSZ= 000011 G 	F.DSPT= 000044   	IFNPT   000546RG    005	PROWRD  001712RG    005	$$$   = 001260R     005
DFLTBT= 000400 G 	F.DVNM= 000134   	ILCLSW= 004000 G 	PRVAL   000524RG    003	.ABORT  000610RG    003
DIRLST= ****** GX	F.EFBK= 000010   	INLUN = 000003 G 	PURGBT= 000040 G 	.DEFDV  001726RG    005
ENTER = ****** GX	F.EFN = 000050   	INRACC  001654RG    005	PURGCT  001714RG    005	.DEFUN  001730RG    005
ENTRBT= 000004 G 	F.EOBB= 000032   	INSPEC= 000562RG    005	PURGVL  000532RG    003	.DYBLK  001736RG    005
EVRYBT= 000004 G 	F.ERR = 000052   	IOSTBK  000312RG    005	RATCTL  001750RG    005	.DYBUF  001744RG    005
FA.APD= 000100   	F.FACC= 000043   	IWUIC   000572RG    005	RATEFN= 000002 G 	.DYBYT  001746RG    005
FA.CRE= 000010   	F.FFBY= 000014   	LINBFS= 000220 G 	REMOVE= ****** GX	.DYSIZ  001742RG    005
FA.EXT= 000004   	F.FNAM= 000110   	LINBUF  000326RG    005	RENAME= ****** GX	.ERTRP= ****** GX
FA.NSP= 000100   	F.FNB = 000102   	LPTLEN  001716RG    005	RMVBIT= 000100 G 	.EXTSZ  001732RG    005
FA.RD = 000001   	F.FTYP= 000116   	LSTBIT= 000001 G 	RNMBIT= 000002 G 	.FOWNR  001734RG    005
FA.SHR= 000040   	F.FVER= 000120   	MERGBT= 000010 G 	RWEFN = 000003 G 	.FREE = ****** GX
FA.TMP= 000020   	F.HIBK= 000004   	MFDBIT= 000010 G 	R$$DPB= 000001   	.FSRCB= ****** G
FA.WRT= 000002   	F.LUN = 000042   	MOIDMG= 000021RG    002	R$$DYM= 000001   	.HDRAD  001756RG    005
FDBIN   000140RG    005	F.MBCT= 000054   	MOIDSZ= 000007 G 	R$$EIS= 000000   	.INIT = ****** GX
FDBOUT  000000RG    005	F.MBC1= 000055   	NAMBLK  001004RG    005	R$$MSG= 000000   	.LCLSW  001722RG    005
FD.BLK= 000010   	F.MBFG= 000056   	NB.DEV= 000200   	R$$11M= 000001   	.MSGFN  000000RG    003
PIP M1321, RSX FILE UTILITY	MACRO M1113  14-APR-81 12:40  PAGE 10-4
SYMBOL TABLE

.OULCL  001724RG    005	.SETDF= ****** GX	...GBL= 000000   	...PC2= 001302R     005	...TPC= 000020
.RSTAR= ****** GX	.TOPAD= 001740RG    005	...PC1= 001100R     005	...PC3= 001100R     005

. ABS.	000000	   000
      	000000	   001
MSGSTR	000030	   002
PURE$D	000612	   003
$$FSR1	000000	   004
IMPURE	001762	   005
PURE$I	000010	   006
ERRORS DETECTED:  0

VIRTUAL MEMORY USED:  6098 WORDS  ( 24 PAGES)
DYNAMIC MEMORY:  6742 WORDS  ( 25 PAGES)
ELAPSED TIME:  00:00:30
[43,10]PIP,[43,20]PIP/-SP/CR=[43,30]PIPMAC,PIP
PIP        CREATED BY  MACRO  ON 14-APR-81 AT 12:40	PAGE 1

SYMBOL CROSS REFERENCE                                  CREF         

SYMBOL	VALUE		REFERENCES

AGAIN 	  000004 RG	#10-296    
APPDBT	= 000020  G	#10-212     10-234    
BITVAL	= 000200	#10-190     10-192     10-192    #10-192     10-193     10-193    #10-193     10-194     10-194    
                        #10-194     10-195     10-195    #10-195     10-196     10-196    #10-196     10-197     10-197    
                        #10-197     10-198     10-198    #10-198     10-199     10-199    #10-199     10-200     10-200    
                        #10-200     10-201     10-201    #10-201     10-202     10-202    #10-202    #10-206     10-208    
                         10-208    #10-208     10-209     10-209    #10-209     10-210     10-210    #10-210     10-211    
                         10-211    #10-211     10-212     10-212    #10-212     10-213     10-213    #10-213     10-214    
                         10-214    #10-214    
BLKBIT	= 002000  G	#8-74       10-246    
BLKCNT	  001720 RG	#9-155      10-278    
BLKVAL	  000564 RG	 10-246    #10-278    
CLOSX 	  000004 RG	#10-295    
CMDTBL	  000036 RG	#10-191    
CMDTB2	  000064 RG	#10-207    
CMDWRD	  001642 RG	#9-136      10-217     10-218     10-219     10-220     10-221     10-222     10-223     10-224    
                         10-225     10-226     10-227     10-228     10-229     10-230     10-231     10-232     10-233    
                         10-234     10-235     10-236    
CMOLUN	= 000002  G	#8-49      
CNTGBT	= 000004  G	#8-65       10-239    
CODEV 	  000322 RG	#9-109     
COPY  	= ******  GX	 10-211     10-212     10-213    
COUNIT	  000324 RG	#9-110     
CPYCTL	  001646 RG	#9-137      10-239     10-240     10-241     10-242     10-243     10-244     10-245     10-246    
                         10-247     10-248     10-249    
CSIBLK	  001566 RG	#9-133     
CSISWT	  000102 RG	#10-217    
C.SIZE	= 000054	 9-133     
DEFDIR	  001660 RG	#9-142     
DELBIT	= 000020  G	#10-196     10-222    
DELETE	= ******  GX	 10-196     10-197    
DFDRSZ	= 000011  G	#8-53       9-142     
DFLTBT	= 000400  G	#10-200     10-226     10-227    
DIRLST	= ******  GX	 10-192     10-193     10-194     10-195    
ENTER 	= ******  GX	 10-210    
ENTRBT	= 000004  G	#10-210     10-232    
EVRYBT	= 000004  G	#10-194     10-220    
FDBIN 	  000140 RG	#9-99      
FDBOUT	  000000 RG	#9-96      
FD.CCL	= 000002	 9-131     
FD.PLC	= 000004	 9-100     
FD.REC	= 000001	 9-131     
FD.TTY	= 000004	 9-131     
FIDBIT	= 001000  G	#8-73       10-245    
FIDVAL	  000540 RG	 10-245    #10-268    
FILID 	= ******  GX	 10-268     10-269     10-270    
FNAEFN	= 000001  G	#8-50      
FNASTS	  000316 RG	#9-105     
FOWNBT	= 040000  G	#8-78       10-249    
FREEBT	= 000100  G	#10-214     10-236    
FRSTIM	= 100000  G	#8-79      
FULVAL	  000556 RG	 10-220    #10-274    
PIP        CREATED BY  MACRO  ON 14-APR-81 AT 12:40	PAGE 2

SYMBOL CROSS REFERENCE                                  CREF         

SYMBOL	VALUE		REFERENCES

F.DFNB	= 000046	 9-131     
F.DSPT	= 000044	 9-97       9-101     
F.LUN 	= 000042	 9-97       9-101      9-131     
F.MBCT	= 000054	 9-131     
F.RACC	= 000016	 9-100     
F.RCTL	= 000017	 9-131     
F.RTYP	= 000000	 9-131     
GCMLCB	  001100 RG	#9-131     
GE.CLO	= 000004	 9-131     
GE.COM	= 000001	 9-131     
GE.IND	= 000002	 9-131     
GROPRO	  001676 RG	#9-147      10-254    
GRPROB	= 000040  G	#8-69       10-242    
GRVAL 	  000502 RG	 10-242    #10-254    
G.LPDL	= 000120	#9-131      9-131     
HA.CHU	= 000403  G	#8-84      
HA.FP 	= 001002  G	#8-83      
HA.UI 	= 001001  G	#8-82      
IDBIT 	= 000200  G	#10-199     10-225    
IDNTMG	= 000000 RG	#7-1        7-1        7-1       
IDNTSZ	= 000021  G	#7-1        7-1       
IFNPT 	  000546 RG	 9-101     #9-119      9-120     
ILCLSW	= 004000  G	#8-87      
INLUN 	= 000003  G	#8-47       9-101     
INRACC	  001654 RG	#9-140     
INSPEC	= 000562 RG	#9-120     
IOSTBK	  000312 RG	#9-104     
IWUIC 	  000572 RG	#9-121     
LINBFS	= 000220  G	#9-113     
LINBUF	  000326 RG	#9-111      9-113     
LPTLEN	  001716 RG	#9-154      10-274    
LSTBIT	= 000001  G	#10-192     10-217     10-218    
MERGBT	= 000010  G	#10-211     10-233    
MFDBIT	= 000010  G	#8-66       10-240    
MOIDMG	= 000021 RG	#7-1        7-1        7-1       
MOIDSZ	= 000007  G	#7-1        7-1       
MSGBL.	= ******	 7-1        7-1       
NAMBLK	  001004 RG	#9-128     
NB.SDI	= 001400  G	#8-58       8-59      
NB.SD1	= 000400	 8-58      
NB.SD2	= 001000	 8-58      
NB.SFL	= 001470  G	#8-59      
NB.SFN	= 000070  G	#8-60      
NB.SNM	= 000040	 8-59       8-60      
NB.STP	= 000020	 8-59       8-60      
NB.SVR	= 000010	 8-59       8-60      
NMBLK1	  001042 RG	#9-129     
NTCNTG	= 004000  G	#8-75       8-87       10-239    
NVERBT	= 010000  G	#8-76       10-247    
N.DEVD	= 000000	#7-26      
N.DIRD	= 000004	#7-26      
N.DVNM	= 000032	 7-1       
PIP        CREATED BY  MACRO  ON 14-APR-81 AT 12:40	PAGE 3

SYMBOL CROSS REFERENCE                                  CREF         

SYMBOL	VALUE		REFERENCES

N.FLID	= 000016	#7-26      
N.FNAM	= 000006	 7-1        9-127      9-128      9-129      9-131     
N.FNMD	= 000010	#7-26      
N.FTYP	= 000014	 7-1        9-127      9-128      9-129      9-131     
N.SPEC	= 000014	#7-26       9-120      9-123     
N.UNIT	= 000034	 7-1       
OFNPT 	  000646 RG	 9-97      #9-122      9-123     
OURACC	  001656 RG	#9-141     
OUSPEC	= 000662 RG	#9-123     
OUTLUN	= 000004  G	#8-48       9-97      
OWNPRO	  001702 RG	#9-148      10-256    
OWPROB	= 000100  G	#8-70       10-243    
OWUIC 	  000672 RG	#9-124     
OWVAL 	  000510 RG	 10-243    #10-256    
PIPID 	= ******  GX	 10-199    
PROTBT	= 002000  G	#10-202     10-229    
PROTCT	= ******  GX	 10-202    
PROWRD	  001712 RG	#9-150      10-260    
PRVAL 	  000524 RG	 10-229    #10-260    
PURGBT	= 000040  G	#10-197     10-223    
PURGCT	  001714 RG	#9-153      10-264    
PURGVL	  000532 RG	 10-223    #10-264    
RATCTL	  001750 RG	#9-171     
RATEFN	= 000002  G	#8-51      
REMOVE	= ******  GX	 10-198    
RENAME	= ******  GX	 10-209    
RMVBIT	= 000100  G	#10-198     10-224    
RNMBIT	= 000002  G	#10-209     10-231    
RONLY$	= ******	 7-1        7-1        7-1        7-1        7-1        7-1        10-186     10-186     10-293    
                         10-293    
RWEFN 	= 000003  G	#8-52      
R$$DPB	= 000001	#1-27       9-170     
R$$DYM	= 000001	#1-29       9-178     
R$$EIS	= 000000	#1-28       1-38      
R$$MSG	= 000000	 7-1        7-1        7-1        7-1       
R$$11M	= 000001	#1-25       1-26       7-1        7-1        7-1       
SAVSP 	  001650 RG	#9-138     
SHTLST	= 000002  G	#10-193     10-219    
SPLBIT	= 000001  G	#10-208     10-230    
SPOOL 	= ******  GX	 10-208    
SPSDBT	= 020000  G	#8-77       10-248    
SSTENT	= 000007	#10-289    
SSTTAB	  000572 RG	#10-281     10-289    
START 	  000000 RG	#10-294     10-299    
STBLK 	  000300 RG	#9-103      9-172     
SYDEV 	= 054523  G	#8-55       9-158     
SYDFLT	  000746 RG	#9-127     
SYPROB	= 000200  G	#8-71       10-244    
SYSPRO	  001706 RG	#9-149      10-258    
SYS40$	= ******	 1-67       7-1        7-1        7-1        7-1        7-1        7-1        9-93       9-93      
                         10-186     10-186     10-293     10-293    
SYUNIT	= 000000  G	#8-56       9-159     
PIP        CREATED BY  MACRO  ON 14-APR-81 AT 12:40	PAGE 4

SYMBOL CROSS REFERENCE                                  CREF         

SYMBOL	VALUE		REFERENCES

SYVAL 	  000516 RG	 10-244    #10-258    
S.APPD	= 000010	#7-26       9-119      9-122     
S.BFHD	= 000020	 9-91       9-91      
S.FDB 	= 000140	 9-96       9-96       9-99       9-99       9-131      9-131     
S.FIDS	= 000014	#7-26       9-119      9-122     
S.FNAM	= 000006	 7-1        7-1        9-127      9-127      9-128      9-128      9-129      9-129      9-131     
                         9-131     
S.FNB 	= 000036	 7-1        8-57       9-127      9-128      9-129      9-131     
S.FTYP	= 000002	 7-1        7-1        9-127      9-127      9-128      9-128      9-129      9-129      9-131     
                         9-131     
S.STBK	= 000012  G	#8-86       9-103      9-171     
S.WUIC	= 000054  G	#8-57       9-121      9-124     
TAB   	= 000011  G	#8-54      
TOTLBT	= 000010  G	#10-195     10-221    
UNLKBT	= 001000  G	#10-201     10-228    
UNLOCK	= ******  GX	 10-201    
UPDTBT	= 000040  G	#10-213     10-235    
VERSAV	  001652 RG	#9-139     
WOPROB	= 000020  G	#8-68       10-241    
WORPRO	  001672 RG	#9-146      10-252    
WOVAL 	  000474 RG	 10-241    #10-252    
$$    	= 000000 R	#10-217     10-217    #10-217     10-217    #10-217     10-217    #10-218     10-218    #10-218    
                         10-218    #10-218     10-218    #10-219     10-219    #10-219     10-219    #10-219     10-219    
                        #10-220     10-220    #10-220     10-220    #10-220     10-220    #10-221     10-221    #10-221    
                         10-221    #10-221     10-221    #10-222     10-222    #10-222     10-222    #10-222     10-222    
                        #10-223     10-223    #10-223     10-223    #10-223     10-223    #10-224     10-224    #10-224    
                         10-224    #10-224     10-224    #10-225     10-225    #10-225     10-225    #10-225     10-225    
                        #10-226     10-226    #10-226     10-226    #10-226     10-226    #10-227     10-227    #10-227    
                         10-227    #10-227     10-227    #10-228     10-228    #10-228     10-228    #10-228     10-228    
                        #10-229     10-229    #10-229     10-229    #10-229     10-229    #10-230     10-230    #10-230    
                         10-230    #10-230     10-230    #10-231     10-231    #10-231     10-231    #10-231     10-231    
                        #10-232     10-232    #10-232     10-232    #10-232     10-232    #10-233     10-233    #10-233    
                         10-233    #10-233     10-233    #10-234     10-234    #10-234     10-234    #10-234     10-234    
                        #10-235     10-235    #10-235     10-235    #10-235     10-235    #10-236     10-236    #10-236    
                         10-236    #10-236     10-236    #10-239     10-239    #10-239     10-239    #10-239    #10-239    
                         10-239    #10-240     10-240    #10-240     10-240    #10-240     10-240    #10-241     10-241    
                        #10-241     10-241    #10-241     10-241    #10-242     10-242    #10-242     10-242    #10-242    
                         10-242    #10-243     10-243    #10-243     10-243    #10-243     10-243    #10-244     10-244    
                        #10-244     10-244    #10-244     10-244    #10-245     10-245    #10-245     10-245    #10-245    
                         10-245    #10-246     10-246    #10-246     10-246    #10-246     10-246    #10-247     10-247    
                        #10-247     10-247    #10-247     10-247    #10-248     10-248    #10-248     10-248    #10-248    
                         10-248    #10-249     10-249    #10-249     10-249    #10-249     10-249    
$$$   	= 001260 R	#9-131      9-131     
.ABORT	  000610 RG	#10-291    
.DEFDV	  001726 RG	#9-158     
.DEFUN	  001730 RG	#9-159     
.DYBLK	  001736 RG	#9-162      9-163     
.DYBUF	  001744 RG	#9-165     
.DYBYT	  001746 RG	#9-166     
.DYSIZ	  001742 RG	#9-164     
.ERTRP	= ******  GX	 10-287    
.EXTSZ	  001732 RG	#9-160     
PIP        CREATED BY  MACRO  ON 14-APR-81 AT 12:40	PAGE 5

SYMBOL CROSS REFERENCE                                  CREF         

SYMBOL	VALUE		REFERENCES

.FOWNR	  001734 RG	#9-161     
.FREE 	= ******  GX	 10-214    
.FSRCB	= ******  G	 9-91      
.HDRAD	  001756 RG	#9-174     
.INIT 	= ******  GX	 10-294    
.LCLSW	  001722 RG	#9-156     
.MSGFN	  000000 RG	#7-1       
.OULCL	  001724 RG	#9-157     
.RSTAR	= ******  GX	 10-291     10-296    
.SETDF	= ******  GX	 10-200    
.TOPAD	= 001740 RG	#9-163     
...PC1	= 001100 R	 7-1        7-1       #7-1        7-1        7-1        7-1        7-1        7-1       #7-1       
                        #9-96       9-97       9-97      #9-99       9-100      9-101      9-101      9-127      9-127     
                        #9-127      9-127      9-127      9-127     #9-127      9-128      9-128     #9-128      9-128     
                         9-128      9-128     #9-128      9-129      9-129     #9-129      9-129      9-129      9-129     
                        #9-129     #9-131      9-131      9-131      9-131      9-131      9-131      9-131      9-131     
                        #9-131      9-131      9-131      9-131     #9-131     
...PC2	= 001302 R	#7-1        7-1        7-1       #7-1        7-1        7-1       #7-1        7-1       #9-97      
                         9-97      #9-97       9-97      #9-100      9-100     #9-101      9-101     #9-101      9-101     
                        #9-127      9-127      9-127     #9-127      9-127      9-127     #9-128      9-128      9-128     
                        #9-128      9-128      9-128     #9-129      9-129      9-129     #9-129      9-129      9-129     
                        #9-131      9-131     #9-131      9-131     #9-131      9-131     #9-131      9-131     #9-131     
                         9-131     #9-131      9-131      9-131     #9-131      9-131      9-131     
...PC3	= 001100 R	#7-1        7-1       #9-127      9-127     #9-128      9-128     #9-129      9-129     #9-131     
                         9-131     
PIP        CREATED BY  MACRO  ON 14-APR-81 AT 12:40	PAGE 6

MACRO CROSS REFERENCE                                   CREF         

MACRO NAME	REFERENCES

ASH   		#1-64      
ASHC  		#1-64      
BDOFF$		#9-91      
CBYTE$		#9-97       9-97       9-97      #9-100      9-100     #9-101      9-101      9-101     #9-131     #9-131     
                 9-131      9-131     #9-131      9-131      9-131     #9-131      9-131      9-131      9-131      9-131     
CMDBIT		#7-39       10-192     10-193     10-194     10-195     10-196     10-197     10-198     10-199     10-200    
                 10-201     10-202     10-208     10-209     10-210     10-211     10-212     10-213     10-214    
CSI$  		#7-27      #7-29      
CSI$ND		#7-33       10-250     10-253     10-255     10-257     10-259     10-261     10-265     10-271     10-275    
                 10-279    
CSI$SV		#7-33       10-252     10-254     10-256     10-258     10-260     10-264     10-268     10-269     10-270    
                 10-274     10-278    
CSI$SW		#7-33      #10-217    #10-218    #10-219    #10-220    #10-221    #10-222    #10-223    #10-224    #10-225    
                #10-226    #10-227    #10-228    #10-229    #10-230    #10-231    #10-232    #10-233    #10-234    #10-235    
                #10-236    #10-239    #10-240    #10-241    #10-242    #10-243    #10-244    #10-245    #10-246    #10-247    
                #10-248    #10-249    
CWORD$		#7-1        7-1        7-1       #9-97       9-97       9-97      #9-100      9-100      9-100     #9-101     
                 9-101      9-101     #9-127      9-127      9-127     #9-128      9-128      9-128     #9-129      9-129     
                 9-129     #9-131      9-131      9-131      9-131     #9-131      9-131      9-131     #9-131      9-131     
                #9-131      9-131      9-131     
DEF$L 		#9-91      
DIV   		#1-64      
ERRINI		#4-307     
ERROUT		#3-215     
ERROUX		#3-222     
ERROU1		#3-225     
ERRP  		#3-247     
ERRPX 		#3-253     
ERRP1 		#3-256     
ERR1  		#3-273     
FCSBT$		#7-27      #7-31      
FDAT$A		#7-34      #9-131     #9-131     
FDBDF$		#7-34       9-96       9-99      #9-131      9-131     
FDBF$A		#9-131      9-131     
FDBSZ$		#9-96      #9-96      #9-99      #9-99      #9-131     #9-131     
FDOFF$		#7-27      #7-28      #9-97      #9-97      #9-100     #9-100     #9-101     #9-101     #9-131     #9-131     
                #9-131     #9-131     #9-131     #9-131     
FDOP$A		#7-34       9-97       9-101     #9-131      9-131     
FDRC$A		#7-34      #9-100     
FLDSOF		#5-382     #7-26      #7-26      
FSRSZ$		#7-34       9-91      
GCMLB$		#7-33      #9-131     
GCMLD$		#7-27       7-30      #9-131      9-131     
IDENT 		#5-339     #7-1       
IDENT1		#5-347      7-1       
IDTITL		#5-356      7-1       
ILLOP 		#1-52      #1-64       1-64      
IMPURE		#1-75      #9-93      
MARK  		#1-64      
MSG   		#2-124     #7-1       #7-1       
MSGZ  		#2-129     
MSG1  		#2-133     #7-1       #7-1       
PIP        CREATED BY  MACRO  ON 14-APR-81 AT 12:40	PAGE 7

MACRO CROSS REFERENCE                                   CREF         

MACRO NAME	REFERENCES

MUL   		#1-64      
NBOFF$		#7-1        7-1       #9-127      9-127     #9-128      9-128     #9-129      9-129     #9-131      9-131     
NMBLK$		#7-1       #7-1       #7-34      #9-127     #9-128     #9-129     #9-131     #9-131     
NOEIS$		#1-39       1-64      
PURE. 		#1-84       7-1        7-1        7-1        10-186     10-293    
PURE.D		#1-102      7-1        10-186    
PURE.I		#1-98       10-293    
RAD50$		#7-1        7-1        7-1       #9-127      9-127      9-127     #9-128      9-128      9-128     #9-129     
                 9-129      9-129     #9-131      9-131      9-131     
RTT   		#1-64      
SOB   		#1-64      
SXT   		#1-64      
XOR   		#1-64