Google
 

Trailing-Edge - PDP-10 Archives - tops10_703a_sys_atpch16_bb-fr67f-bb - catprm.unv
There are 7 other files named catprm.unv in the archive. Click here to see a list.
x
,R6@P BP C\; S(uR

	XLISTSH

X	(TXT,<>)
XSh	(CAT,<^I/@G$APLTT/>)
X	(STR,<^I/@T(G$APLV/ starting>TH)
X	(RMD,<^I/@G$ThGLXN/MDA restart Udetected by ^I/@GU($APLT/>)
X	(ROP,UH<^I/@G$GLXN/OPERAUhTOR restart detecVted by ^I/@G$APLTV(/>)
X	(CTE,<^I/@VHG$APLT/ error>)
VhX	(MDA,<^I/@G$GLXWN/MDA error detecW(ted by ^I/@G$APLTWH/>)
X	(OPR,<^I/@WhG$GLXN/OPERATOR eXrror detected by X(^I/@G$APLT/>)
X	XH(MON,<Monitor errXhor detected by ^IY/@G$APLT/>)
X	(UY(SR,<User error deYHtected by ^I/@G$AYhPLT/>)
X	(CAT,<^ZT/@.CVTXT(C)/ catZ(alog>)

	LIST
og>)

	LIST
C^N [hxH




[X	(STR,LOG,STR,<A[(pplication code =[H ^O/APLCOD/>)
X	\(RST,LOG,CAT,<New\( application code\H = ^O/APLCOD/>)
\hX	(POP,WTO,CTE,<O]pen error on ^F/.](CDPFD(C)/; ^E/[-1]H]/>)
X	(AOP,WTO,]hCTE,<Open error o^n ^F/.CDAFD(C)/; ^(^E/[-1]/>)
X	(LO^HP,WTO,TXT,<Open e^hrror on ^F/.CDLFD(C)/; ^E/[-1]/>)
X	(PPS,WTO,CTE,<_HPositioning error_h on ^F/.CDPFD(C)/`; ^E/[-1]/>)
X	(`(APS,WTO,CTE,<Posi`Htioning error on `h^F/.CDAFD(C)/; ^Ea/[-1]/>)
X	(PIE,a(WTO,CTE,<Input eraHror reading ^F/.CahDPFD(C)/; ^E/[-1]b/>)
X	(AIE,WTO,Cb(TE,<Input error rbHeading ^F/.CDAFD(bhC)/; ^E/[-1]/>)
cX	(POE,WTO,CTE,<Oc(utput error writicHng ^F/.CDPFD(C)/;ch ^E/[-1]/>)
X	(AdOE,WTO,CTE,<Outpud(t error writing ^dHF/.CDAFD(C)/; ^E/dh[-1]/>)
X	(LOE,WeTO,CTE,<Output ere(ror writing ^F/.CeHDLFD(C)/; ^E/[-1]eh/>)
X	(PEF,WTO,CfTE,<Premature EOFf( reading ^F/.CDPFfHD(C)/>)
X	(AEF,WfhTO,CTE,<Prematureg EOF reading ^F/.g(CDAFD(C)/>)
X	(CgHOR,WTO,CTE,<^T/@.ghCVTXT(C)/ core alhlocation failed; h(^E/[-1]/>)
X	(TShHE,WTO,CTE,<^T/@.ChhVTXT(C)/ table seiarch error; ^E/[-i(1]/>)
X	(UIM,WTOiH,CTE,<^I/UNKTXT/>ih)
X	(UPA,WTO,CTEj,<Unexpected procj(ess ACK, ACK codejH = ^O12R0/.MSCOD(jhM)/>)
X	(UTA,WTOk,CTE,<Unexpected k(text ACK: ^T/.OHDkHRS+ARG.DA(M)/>)
khX	(CVT,WTO,CAT,<Flile ^F/.CDPFD(C)/l( converted to forlHmat ^O/.CVFMT(C)/lh>)
X	(CNA,ACK,TXmT,<^T/@.CVTXT(C)/m( catalog is not amHvailable>)
X	(DEmhL,ACK,TXT,<^T/@.CnVTXT(C)/ ^T/(T3)/n( deleted>)
X	(DInHS,ACK,TXT,<^T/@.CnhVTXT(C)/ catalog oupdates disabled>o()
X	(ENA,ACK,TXToH,<^T/@.CVTXT(C)/ ohcatalog updates epnabled>)
X	(INS,p(ACK,TXT,<^T/@.CVTpHXT(C)/ ^T/.CTVSN(phA)/ inserted>)
Xq	(MOD,ACK,TXT,<^Tq(/@.CVTXT(C)/ ^T/.qHCTVSN(A)/ modifieqhd>)
X	(LIS,ACK,TrXT,<^T/@.CVTXT(C)r(/s listed to filerH ^F/.CDLFD(C)/>)




X	(CUD,WsTO,TXT,<Catalog us(pdates by MDA aresH disabled>)
X	(MshDA,WTO,MDA,<Illegtally formatted MDt(A message>)
X	(VtHNF,ACK,TXT,<Volumthe set ^T/(T3)/ isu not in any catalu(og>)
X	(RMI,WTO,uHRMD,<Re-initializuhing catalogs>)
Xv	(RMN,WTO,RMD,<Cav(talogs do not neevHd re-initializingvh>)




X	(ROwP,WTO,ROP,<>)
X	w((APL,WTO,OPR,<IllwHegal application whmessage>)
X	(OPRx,WTO,OPR,<Operatox(r command messagexH error>)
X	(AEV,xhACK,TXT,<Already yexisting volume ^y(T/(T3)/>)
X	(ANLyH,ACK,TXT,<Abbreviyhations are illegazl on DELETE and Mz(ODIFY commands>)
X	(NEV,ACK,TXT,<zhNon-existant volu{me ^T/(T3)/>)
X	{((NVN,ACK,TXT,<No {H^T/@.CVTXT(C)/ na{hme given>)
X	(UN|K,ACK,TXT,<^T/@.C|(VTXT(C)/ ^T/(T3)/|H is not in the ca|htalog>)
X	(AMB,A}CK,TXT,<^T/(T3)/ }(is not a unique ^}HT/@.CVTXT(C)/ nam}he>)
X	(AIC,ACK,T~XT,<^T/@.CVTXT(C)~(/ ^T/(P1)/ alread~Hy exists in catal~hog>)
X	(PWI,ACK,TXT,<Partial PPN (wildcarding is ilHlegal>)
X	(NRV,AhCK,TXT,<No reels inserted in magta(pe volume set>)
HX	(DNS,ACK,TXT,<IhNSERT MAGTAPE command requires /DE(NSITY>)
X	(TNS,AHCK,TXT,<INSERT MAhGTAPE command requires /TRACKS>)
(X	(DNT,ACK,TXT,<DHensity doesn't mahtch track type>)
X	(ARV,ACK,TXT,<(Attempt to removeH last reel in maghtape volume set>)
X	(NUS,ACK,TXT,(<No units inserteHd in structure>)
X	(ARU,ACK,TXT,<Attempt to remove( last unit in strHucture>)
X	(NPV,hACK,TXT,<No privileges to use the (catalog facilitieHs>)




X	(GhFR,WTO,MON,<Illegally formatted GO(PHER message>)
H



X	(IVV,ACKh,TXT,<Invalid volume ^T/(T3)/>)
X(	(NVO,ACK,TXT,<NoH volumes owned>)
X	(QFE,ACK,TXT,<	QUEUE. UUO format error>)

matC4tuP$C4tkP'~C4uKsP"C4v}P!CJ9l}p CS:=P FP F({A  F({F
2A  F
2FMmA  FMmF^
2A  F^
2FlA  FlFA  FFA  FFX{A  FX{F[A  F[F
VA  F
VF[RA  F[RFA  FF
2A  F
2G$I3 J0t]

	SEARCJPH	GLXMAC		
	SEARJpCH	ORNMAC		

	%K%CAT==:%%CAT		
K0
	PROLOG	(A)	
KP
	SALL			
	.DIREC	FLBLST		
IREG$YP G%Z7P G&i9P G&zP Gx x\GLOB A>GPtI7P GPti6P GPuH1P pGPuMP GPumVP'~GPvLUP GPvN8Q 8GPwQ @I5KUP IN^[T LPu


	XLISTL0
X	(RA60,.DCCRA L,.DCU60)
X	(RA80Lp,.DCCRA ,.DCU80)
X	(RA81,.DCCRA ,N.DCU81)
X	(RD10,N(.DCCFH ,.DCUFD)
NHX	(RM03,.DCCRP ,.NhDCUR3)
X	(RM10B,O.DCCFH ,.DCUFM)
O(X	(RP02,.DCCDP ,.OHDCUD2)
X	(RP03,.OhDCCDP ,.DCUD3)
XP	(RP04,.DCCRP ,.DP(CUR4)
X	(RP06,.DPHCCRP ,.DCUR6)
X	Ph(RP07,.DCCRP ,.DCQUR7)
X	(RP20,.DCQ(CRN ,.DCUN0)
X	(QHRS04,.DCCFS ,.DCUS4)
	LIST

UIROIRyP JP KKI7P L
xA  L
xL$[A  L$[L&)6A  L&)6L4:A  L4:L4@A  L4@LL-3A  LL-3LL.:A  LL.:LMiWA  LMiWLM|A  LM|L|-3A  L|-3L|.:A  L|.:L}|A  L}|L|`A  L|`L[A  L[L[@A  L[@L]`A  L]`L)6A  L)6MF:=p M>l}p MRV>9P MS.[yQ MVt=A  MVt=O2|  iSIRP A,<
i0	IF2,<IFDEF A,<.iPIFN A,EXTERN,<INipTERN A>>
	     jIFNDEF A,<EXTERNj0 A>
	Q SUPPRESQA>>)SUPPRO3F
:A  R/
:RE|zA@RE|zRMj:ARMj:RMmARMmRMm	ARMm	RMm	ARMm	RMySA,RMySRM{@A5RM{@RUSA~RUSRu}`ARu}`RLARLR|AR|R%9AR%9R>K`A&R>K`UVn	@ 4@UVn[ZXRA  XRY&i1 h

	  LSTOF. XCREF

	CDO(	OTSINI			
	CDO	H    			
	CDO	.ZPhAGA
	CDO	.ZPAGN
	CDO	.ZCHNK
	CD(O	.SAVE1
	CDO	.SHAVE2
	CDO	.SAVE3h
	CDO	.SAVE4
	CDO	.SAVET
	CDO	.(SV13
	CDO	.SV14
	CDO	.SV15
	CDOh	.SV16
	NT	.RETT
	NT	.RETF
	CDO(	.RETE
	CDO	.AOSH		
	CDO	.SOS		
h	CDO	.ZERO		
	NT	.POPJ		
	CDO	.S(TOP		
	CDO	.SAVEH8		
	CDO	.STKST	h	
	CDO	.TRSET		
	NT	.POPJ1		
	C(DO	.UD2SC		
	CDOH	.SC2UD		
	CDO	.hCPUTY		
	CDO
	CDO
	CDO

	CDO	(		
	CDO	C%RPRM
H	CDO	C%INTR
	CDOh	C%SEND
	CDO	C%R	ECV
	CDO	C%BRCV
	CDO	C%REL
	CDO	H	C%CPID
	CDO	C%K	hPID
	CDO	C%SPID

	CDO	C%MAXP
	CD
(O	C%PIDJ
	CDO	C%
HPIDH
	CDO	C%SIDX
h
	CDO
	CDO
	CDO

	CDO	      	(		
	CDO	F%IOPN
H	CDO	F%AOPN
	CDOh	F%OOPN
	CDO	F%I
BYT
	CDO	F%OBYT
(
	CDO	F%IBUF
	CD
HO	F%OBUF
	CDO	F%
hREL
	CDO	F%DREL
	CDO	F%RREL
	CD%REW
	CDO	F%P
	CDO	F%CHKP
	CDO	F%INFO
	CDO	F%FD
	CDO	F%REN(
	CDO	F%DEL
	CDHO	F%FCHN
	CDO
	hCDO
	CDO
	CDO
	CDO
	CDO
	CDO
	CDO
	CDO	FUNCTH.			

	CDO	    h  			
	CDO	M%ACQP
	CDO	M%RELP
	(CDO	M%IPSN
	CDO	HM%NXPG
	CDO	M%IPhRC
	CDO	M%IPRM
	CDO	M%AQNP
	CDO(	M%RLNP
	CDO	M%CHLNC
	CDO	M%FPGS
	CDO	M%GMEM
	CDO	M%RMEM
	CDO
	(CDO
	CDO
	CDO
H	CDO
	CDO
	CDO	hM%GPAG
	CDO	M%RPAG
	CDO
	CDO
	(CDO
	CDO
	CDO
H	CDO
	CDO
	CDO

	CDO	      			
	CDO	T%TEXT
	C(DO	T%TTY
	CDO
	HCDO
	CDO
	CDO
h	CDO
	CDO
	CDO
	CDO
	CDO
	CDO(

	CDO	      		H	
	CDO	L%CLST
	hCDO	L%DLST
	CDO	L%CENT
	CDO	L%CB(FR
	CDO	L%DENT
H	CDO	L%NEXT
	CDOh	L%FIRS
	CDO	L%LAST
	CDO	L%PREV
	CDO	L%PREM
	CDHO	L%CURR
	CDO	L%hRENT
	CDO	L%SIZE
	CDO	L%APOS
	C(DO
	CDO
	CDO
	HCDO
	CDO
	CDO
h	CDO
	CDO

	CDO			
	CDO	I%NOW
	CDO	I%EXIT
	CDHO	I%ION
	CDO	I%IhOFF
	CDO	I%SLP
	CDO	I%INT1
	CDO(	I%INT2
	CDO	I%IHNT3
	CDO	I%TIMR
	CDO
	CDO
	CDO	I%SOPR
	CDO	I%W(TO
	CDO
	CDO	I%HHOST
	CDO	I%JINFh
	CDO
	CDO

	CDO	S%U2DT		
	CD(O	S%DT2U
	CDO	S%HDATI
	CDO	S%SIXBh
	CDO	S%CMND
	CDO	S%TBLK
	CDO	S(%SCMP
	CDO	S%ERRH
	CDO	S%INTR
	ChDO	S%EXIT
	CDO	S%TBAD
	CDO	S%TBD(L
	CDO	S%NUMI
H

	CDO	K%RCOC			h
	CDO	K%WCOC
	CDO	K%SUET
	CDO	K(%STYP
	CDO	K%TXTHI
	CDO	K%SOUT
	hCDO	K%BOUT
	CDO	 K%BIN
	CDO	K%BAC (K
	CDO	K%TPOS
	 HCDO	K%BUFF
	CDO	 hK%FLSH
	CDO	K%OP!EN
	CDO	K%ECHO
!(	CDO
	CDO
	CDO
	CDO
	CDO
	CDO!h
	CDO
	CDO
	  LSTON.
  
	  Y&v
P Y>:=P YO%GP YO%yG &:
	IFNDEF &(LSTIN.,LSTIN.==0	&H	
IFE LSTIN.,<
&h	IFIDN <XCREF><A'>,<.XCREF>	
		  '( XLIST>		
	LSTIN.==LSTIN.+1STINYO%{G 'hD
	IFG LST(IN.,LSTIN.==LSTIN((.-1	
	IFLE LSTIN(H.,<.CREF		
		      LIST>
		   ZP Z
<8A  Z
<8ZXA  ZXZKQA  ZKQZ6	yA  Z6	yZ=Y6A  Z=Y6Z>3A  Z>3ZN
QA  ZN
QZN
VA  ZN
VZN
wA  ZN
wZw
A  Zw
Z[A  Z[ZKXA  ZKXZY6A  ZY6Z3A  Z3[@ ,Hp
	IFB <B,h>,<MAXSIZ==0
		I-RP A,<IFG <A-MA-(XSIZ>,<MAXSIZ==A-H>>>
	IFNB <B>,<-hB==0
		IRP A,<.IFG <A-B>,<B==A>>>
B>,<B==[RP ]n:=P ] Dx)IF2,<IFDEFE A,<A==A>> IFNDEF A,<A==B>]P x^CDO A STA  ST`P a>:=P af:=P  a+= 5aJ}Ks ^H

	SALL	^h			
	LSTOF. XCRE_F			

	%%.GLX==_(%%.GLX			
	GLXVR_HS==GLXVRS			

	_hIFNB <A>,<%%.MOD`==SIXBIT/A/> 
	`(IFNB <B>,<%%.OTS`H==SIXBIT/B/> 
`h
	GLOB	I%INIT			

	TOPS10	<			
a(		SEARCH	UUOSYM		aH
		%%UUOS==%%UUOahS		
	>				

	TbOPS20	<			
		SEAb(RCH	MONSYM		
;		bH%%MONS==%%MONS		
	>				

	IFB <cB>,<			
		IFN Gc(LXPUR,<
			.TEXTcH	|,REL:GLXLIB/SEAchRCH/REQUIRE:I%INIdT/SEGMENT:LOW|
	d(	>			
		DEFINE	$dHDATA (NAM,SIZ<1>)dh,< 
			NAM:	BLOCeK	SIZ
		>			
		e(DEFINE	CDO (X),<GeHLOB X> 
		DEFINEeh	NT(X),<CDO X>	
f		LIBVEC			
	>		f(		

	IFNB <B>,fH<CHKEDT (B)>	
fh
	IFNB <B>,<IFDIgF <B><INI>,< 
	g(	IFN GLXPURE,<.PSgHECT .HIGH.> 
		IghFE GLXPURE,<		
	h		TWOSEG	400000	
			RELOC	0	
			hHRELOC	400000	
		hh>			

		DEFINE i$DATA(NAM,SIZ<1>)i(,< 
			IFN GLXPUiHRE,<.PSECT DATA> ih
			IFE GLXPURE,j<RELOC> 
			IFNDj(EF B%D,<B%D::! jHB%DL==:0>
			NAjhM:	BLOCK	SIZ
			kB%DL==:B%DL+SIZk( 
			IFN GLXPUREkH,<.ENDPS DATA> 
kh			IFE GLXPURE,<RlELOC> 
		>			
l(
		IFDIF <B><OTSlH>,<	
			DEFINE	ClhDO (X),<GLOB X> 
			DEFINE	NT(X),m(<CDO X> 
			LIBVmHEC		
		>			

	mh>>				

	IFNB <nB>,<IFIDN <B><In(NI>,< 
		DEFINE	nH$DATA (NAM,SIZ<1>nh),< 
			NAM:	BLOoCK	SIZ
		>			
	o(>>				

	LSTON.oH				

	GLOB	<.PohOPJ, .RETT, .RETFp>	
	OPDEF	$RET	[p(POPJ	P,]	
	OPDEFpH	$RETT	[PJRST	.REphTT]	
	OPDEF	$RETqF	[PJRST	.RETF]	
	OPDEF	$RETIT	[JqHUMPT	.POPJ]	
	OPqhDEF	$RETIF	[JUMPFr	.POPJ]	
	.NODDTr(	$RET,$RETT,$RETFrH,$RETIT,$RETIF
$RETIT,$RETIF
f[RA  f[Rf$A  f$f&DZA  f&DZf.,@A  f.,@f/
:A  f/
:fMmA  fMmfv[4A  fv[4f;8A  f;8fA  ff$(2A  f$(2f$)A  f$)f$+A  f$+f*)A  f*)f@t;P f@u;wP ~f@vN8P |gPvXvP gPvZzP ~gPv]P |gS[[P ;gSyP h$^A  h$^h&N A  h&N i
eI7P  i?4( 8 CIFN FTUUOS,B			;DEFINE UNi?4H x GIFN FTJSYS,	INTERN AEDT	ic$y7 Rhu
	EXP	A
	PUSHJ	P,B
	[AR(SCIZ	|C|]
	<D>
	|C|]
	<D>mKc@ 8P#GBYTE (3)A8pWHO (9)AVER (6)AMIN (18)AEDTmNv:=P mNvyP p Qhu.AMA==<ZZ==ZZ+1>==ZZ+1uhP uk%2P 	H  (xZ
			A:	BLOCK	B
		A,ExjxU1NIT	J.@ ,~	J.I@P`5yJ.I@	J.J3P`4@y
B~
@	J.J:P`5@y
B~
@	J.MP`5yJ.M
t{P 
u[rQ G&H1
Q 
.[yQ<8uKqP l8:P l=P mYP m[wP m|P n+2P n+xP n=P nNP n\yP ~0A  ~0
pp$sp 
$up 
$Pp $Qp $Rp $Vp !$Xp !$3p  $;yp 5$j7p 
$k:p %Ip ,%I7p 6%IPp $%IQp "%IRp %%J3p *%Kp +%Lp +%[rp 
%\sp &	Pp &	Qp &	Rp &	Vp &	Xp &
3pI&1pI	&6pJ	&H1pK6&KpK5&NpM,&Np[3&Np^4&Np3&Np4&\pH&i1pJ&|qpK4zP!49P!4I6P!4J9P!4[PP!5YP!5[rP!5ySP!6(zP!6,9P!S@P[]A&\]"HPi"$Pk"U+Pk"dJPk"}P #P #P $P $<zp 
&kVp &lqP &lqp 4:p 4=Zp 4H:p 4j6p 4k:p 5Tp 5Yp 5I7p 5Jp 5KUp 5Lzp 5[[p 6,{p 6:p 6Np 6N8p 6}Yp <KTP =|P >-7P %I7p &*2p 7%I7p 7&*2p >DLYp B~
@A  B~
@B~
HA  B~
HJ.I A  J.I J.I@A  J.I@J.MA  J.MMZ2P M[P M\zP Ni(A  Ni(Ni)A  Ni)Ni)A  Ni)Ni*A  Ni*Ni,A  Ni,Ni:A  Ni:N-2A  N-2N~0A  N~0O%<zA  O%<zO%I7p O%|A  O%|O&Xtp O&Z2p O2`A  O2`O2A  O2O2 A  O2 O2@A  O2@ODk:P S9:A  S9:V",qA  V",qjUA  jUj.+`A  j.+`kpA  kpkwA  kw>}{woP