Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-10 - decus/20-184/2022.rel_117a
There are no other files named 2022.rel_117a in the archive.
 0t]Hx[2L INXQI
IggQ1
Igg	'}s}PHo`opk
f

.
(
0
@o
P
h
,X
*
*
*	?Ogo(	@oP	h
)	8	9(8
h
Ho X-
h	>?yy(+h(pk
f
(o
h
60Hopj
f
?x
C@(	?g|y@
X
X
h


0
 	_`	i@	nP	lh
Vx
L	9#g"!0HH`
fHo`ox
h

.
(
0
r
h0
g03HT`	?Wk_*TT8TPTpTT(@`TxT(@T`T T8T	?u.U3XSpTT(T@TXTxW0H`xT8Ph	?:/_; T@T`xT0PThTT0HT`TxT0TP	5z_~uDh T8TPh   T 8T PT hT!T!!0T!H!h"T	=}~}L"T"0"HT"hT#T# T#8W#PT#p$T$0T$HT$h%T% T%8%P	?XU%hT&V& V&8V&PT&hT'T'U'0U'HU'`W(W( W(8(XT@BUFFE	 ]R@CORE@DATA@DESC@FORMFEED@LRECL@MAX@NOKEY	 fS@NOMSG@SET@$CHECKSUM@$SCAN@$VERIFY@ALL	 n@BUFFER@CORE@NOMSG@NOREUSE@NULL@REUSE@	 wUSING@BY@LOGICAL@TO@ALL@NULL@AS@UNI	 @SORTED@UNBUNDLED@$MISSING@ACCESS@ENQ@NOENQ	 @PASSWORD@READONLY@RO@KEY@USING@LOCATOR@	 MESSAGE@TTYMSG@MASTER@TRANSACT@APPLIED@DUPLICATES	 @NOCHANGE@UNAPPLIED@SYSADDMSG@SYSADMCDIR@SYSALCMSG	 !@SYSAMBATTR@SYSAUXCHK@SYSBETWEEN@SYSCASE@SYSCBLSIGN	 *@SYSCLOSE2@SYSCOLNAME@SYSCORESS@SYSCVTERR@SYSDAMAGE	 2@SYSDATE@SYSDATEFMT@SYSDAYTIME@SYSDBEXMSG@SYSDB	 ;GBUF@SYSDCORESS@SYSDELIM@SYSDEQFAST@SYSDIV@SYSDI	 CVMSG@SYSDIVP@SYSDMETRID@SYSDSALIAS@SYSDSENQ@SYSDS	 LFILE@SYSDSNAME@SYSENQDEF@SYSENQTYPE@SYSERRCODE@SYSER	 TRDEV@SYSERREXT@SYSERRFILE@SYSERRPPN@SYSERRTEXT@SYSEU	 ]RODAT@SYSEXP@SYSEXPTYPE@SYSFDMATT@SYSGTABERR@	 eSYSHLCVT@SYSHLDISP@SYSHLMODE@SYSHLNAME@SYSID@SYSIFTYPE	 n@SYSIOMSG@SYSJOBNO@SYSKEEPBUF@SYSKEEPPSI@SYSLINE	 v@SYSMSTIME@SYSNOFILOP@SYSNOPSI@SYSNOSEG@SYSNOSEGP@	 SYSNOXCHAN@SYSNREC@SYSNRETRY@SYSOVF@SYSOVFMSG@SYSOV	 FP@SYSPAGE@SYSPPN@SYSPROT20@SYSRECMODE@SYSRECNO	 @SYSREP1@SYSREP2@SYSREP3@SYSREPMODE@SYSREPSYNC	 @SYSRESET@SYSRNGMSG@SYSSCRDEV@SYSSCRFILE@SYSSFDFLAG	 !@SYSSWEDSRT@SYSTENQ@SYSTEXTDOT@SYSTIME@SYSTRAPUP3	 )@SYSTRETRY@SYSUPROG@SYSUPROJ@SYSUSERADR@SYSUSERD1	 2@SYSUSERD2@SYSUSERD3@SYSUSERI1@SYSUSERI2@SYSUSERI3@SYSUS	 :ERR1@SYSUSERR2@SYSUSERR3@SYSUSERT10@SYSUSERT40@SYSUS	 "CERT5@SYSUSRADRP@SYSWRITE20(5HC/(2HD"E
(K(<HE(:HE(4HF(9HE(7HF u 
A6 {20222022> H7HvHvH= E gia(9additional data for (@H (P `(HGHHH@(HJH*@ 	*@!
{~	 *	 o2pP5i@hiHpiPki`nihipHixj9j9j Fj0
dj8
1jH
i	?;jX
jhkk=k 	k0?k@3kP	k`
tkp%l
1l	olP:l0	?Cl`	lh
8lp
tm
qm.m 
~m(
m8
mHXmX0m`Jmp
n8$n@NnP
nnX	<nx
oQo Fo(
!o0	$o8poHToXToh	q	?TopvpXppWp(5p8
SpH	ph[pp0px]qZq
|qX	?]qhqp
Drpdsdss8	s(
sH
vsXshspLsx
kt	Nt
y0iPt(t8tHtXth	((D"n'Te$	(D vF`HO@(H*@(H,@(H.@(H0	 Q(@(H2@(H2a(H45@(H2a(H4	"D A5a(H55 (H7a(H93	(AH93a(H;3H;3a(H=	((D5 (H? (H? (!H?La(HA1	 "*!@ a(HC;HC; ))HF	 A
Q)`(HHa(HH9.
(THV	)"E"E2;{hH{h`hx{ {0{8{H{P{`	%
D":{hhX{x|hP|j0t|(|8	$"DC|H|P|`|h|po}}	1D"K}CpX}0}@sp}H|}X}h}x	1~Ttpj8	D~	Gjh(~Vk`	M|PV|HW~~Xo	M~0XrY~@Z~P	I~`	B	1#~?e\}~p~x 
:k@
6  }0sX k@
6|h
K0
6} 
R|h} |	1Lysy} jX
|H
Pr
UjXnXPl0nX t	?JQ*E ` nX ! p(` (h0x8H	5*U*)Xkhhxkx (0(_}w}w	 1xM`x@x@xx`x@p@xx`x@x@xx~`x@x@x	 :@xw~`x@x@xxw~`xx@xx{~`x	 B@x@xEQ or =ASVIATOBYIN <file>==<variable-name>file specs	 K for DMC#COM#T#TYPE#Z10222022@@A@ACACCEPTADD	 SADMITALLOCATEAPPENDAUDITBACKTOBODY@CCHANGE@CL	 \CLEARCLOSECOLLECTCOMPILECREATEDBSETDEFINEDELETEDFIND	 dDISABLEDROPDUMPEDITELSEELSEIFENABLEENDENDIFENDWHILEEVALU	 mATEEXIT@FFILEFINDFOOTINGGETRECHEADINGHELPHOST@IIF	 uIGNOREINFORMINITJOINKEY@LLETLOADMAPMODIFY@O@	 ~OPOPENOPTIMIZE@PPAGE@PERPERFORMPERMITPL1022PRINT	 PUSHQUIT@R@RELRELEASERELOCATE@REPREPEATREPORTRUN	 SAVESEARCHSELECTSETSORTSOSSPSSSTARTREC@TTECOTRANSACT@	 TY@TYPTYPAGETYPEUNDELETEUNKEYUNTILUPDATEUPTOUSEUSERC	  ALLVALUESWHILEERRORFORMATNEWS1NEWS2SYNTAX	 @(Afile specs for DMXfile specs for DMVfile specs for DMDfile specs	 1 for DMIfile specs for DMSdata set namedata set aliasdata set numberkeyed	 9 attribute nameattribute namecollection-namechannel number (1-8)varia	 Bble-nameattribute-name or sort-expressionsystem-variableprint-list [FORMAT f	 *Jormat-list END]a;logical operator L$HOrelat	 Sional operator Q'HRselection-criteria@A@B@EEQ	 [@IIN@OON@T@V@VIACCESSBLANKSBUFFE	 dRSDATADAMAGEDESCFORINTEGERLENGTHNOCLOSEPASSWORDREADONLYSYNC	 lUSINGCOLUMNCOUNTSYSIDATTRIBUTEBASEFILESNAMESSTATUS	 uSTRUCTUREVERSIONNAMENUMBERCOPYRENAMENOREUSEREMOVEREUSESTART	 }ANDORTERMINATORBACKUPCHECKCHECKPOINTCOMMENTFIXLIST	 MERGERECOVERYDATEDOUBLEREALTEXT$ACCESS$ATTRIBUTE$DSNAMEENQ	 NOENQABBREVIATIONROALLOWOFFPREVENTBUFFERERRCHARFILERR	 FMSGFERRPROMPTSCRATCHTAPEABORTCONTINUE01CLOCKCPUTIME	 FFNONELASTCLASSLOCKEDOWNERLEAVEAPPLYFIRSTASCENDING	 (DECENDINGDOWNUPEQVNOTXORBEGINSBETWEENCONTAINSEQUALSGEGT	 0LTNBEGNBETNCTNENEQNOT  	 9DISP.BIN. ALL  LAST SYSID     LOGICAL   NOCLOSE   PASSW	 @*AORD  ACCESS    +D+D"<
3@ no#`,7@u+MO@gO@g	*U"DJ@@E p*"F 6 B9 $),=,O@u,c, p/4 q/4	*
ER <r @F, F <s @F, F <u @F, F\$v,+`ZB\"w	 @

[,,\"zZ	4 <|,f,,i "4\$7, : }d@	"E
A(c!(GH8 $,BH8ZDjd&1Fx+I,QZ+ @@i@@j@@u0+	*U*U
l $,e+w $,l+w $,n+q $,o $-,qd&1F-,^+w	 E"D*tZ, +w,+; $.,rd&0F.+w,+;!( H=\(	 H@ $z	(E@},w:x+.l $
,},~l $,d&0F,~:x:x+yS&(	*E**	\(q H@ $)d@,=,+	
 $(,	d&0F(+	
+		 $+,		,v+;	*E*U*	 $,	
+$)d@,=+		+$,	$,	,	
T	,	,	+;a(H%9\(( H $,,	[Fd&2F+	Z	"U"U"	, ,	+;S&	,p+	#,	a,	+; $0,	 $,=l@,v:	***	' $1,	$[Fd&2F+	0,^+	.,IZ, +	'a,S&p,p+	3	*U
*	0+	2S(p,r+	3 $p,	(d&0F,^a+	2 <5D	2,	"+; $2	*U*E*	8,	2+Q $
,I $4,	8+QS&o\(q H@l,+	@ $o,	;,QZ	"Q(A*	A, ,	7+;,	A:x+c $6,	?d&1F	 :x,~ $,	D $7,	G+	J	*
U
	I $8,	Hd&1F	E;x+Q,~ $9,	J+QS&
\(q H@l,+	R $
	*E*U*	R,	M $;,	Rd&1F	K+	V,Q+	R,	#+; $>,	S $,=X(%XHN $?	(UU"	Z,	Wd& (	`0F#,^+	^Z, +	Z+; $#,	Z $C,	`d&1F	T+	h	*U(Q*	c0F%,^+	`1FN+	_ $N,	a <5H	a+	o:x+	V,I $H,	f $	*U*(	k+I,I $P,	j $+I $
,	m,	B:x,~ $R,	o $,=l@,v	**U*	t $S,	qd&S(n0F1F+	z,^,:,z+	}+	{,{+	}: $n	(U*E"	|,	td&0Fn+	,	i+;0F1F+
,^a+
0D+
	\"\$T	 U*
0 B5H
	Z,IZ, +	{ $,=,S(n,z+	}+	{	**U*
 $,=S(n,{+	}+	{ $U,	|,Q $,I $+I $,I+
	*U
U

 $,I $+I $X,
,~ $+I $+I $\,
,~ $a,
 $	*U*E"
,= $,I $,I+
) $d,
 $,=l@,f $e,
"Z1H|+
(	*U*P

'S&m+
*,j $,I $m,
%,8+;+
),ua,~>+
* $f,
*	*E*U 
/+Q $g,
/,~ $j,
0 $,= $k,
2,8+;+
3,ua,~>	*U*U*
8+
4 $n,
4 $,= $t,
9,8,q $u,
;,8+;+
< $,IS&u	(*U
@,ua,~>+
=X(%XHN+	e $,= $s,
=,QZ, +
J $r	(P(U*
I,
Fd&,Q,IZ+  $t,
Id&1Fr+
J,Q *v,
m+
J,k $w	(D*U*
Q,
Ld&1Fr,~,Q:x+fS&r+p[" Dh $",= $$,=[   	(E"U"
Z *aH *
 ,
Q $x,
\d&0F	b1Fs+
a+
[ $s,
]d&1F
^+
e	**Q*
b,Q,IZ, +
`,	~+; *z+
m *|+
m D $},
`,Q,I 	*U
*
k>`h,M *+
m $!,= ,
i,QZ, ,~,I+
n $,
n $	(Q(*
s,
r,~ $	,
sl@,v $
,
u[Fd&3F,^+
$
wX(XHJ	*E**
|S&J $J,
zd&0F++
X*XJJ2F+,S&J,p++S(J	*U
U*,r+@@?: $J,
}d&@@?1FJ+,r++ $, $,	"U**
a+ $0,
S&p+,	oa,
e+; $	,X(XHMS&M	*T*U*,p+: $M,d&X(XHK0FM+S&K,p++S(K,r+	**Q  $K,d&0FK+! $, $,= $q,! D $,I d&1F	*U*T(&+)1Fq,^+)+* $,#,8+;+) $
,),~\$,,,~\(	"U*T*/a\(\H\$,-,Q\(A+7\(\H\$,1d&1F+9,QZ	"E*D*7,\+9,a,+;\(\H\$&,4d&1F,~\(q\H\$(,<	*T"U*@+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ J,e mh	*T
P*,.@@E,<o#`+i $k,
a+,~,Q+o,$m,
U*.,8,$o,1F+
@,~+$r,E*
	(U
*0$o,Q+
0F+++
UQS$,,+
(HS&
l$$,&,;\$7D9+;:@g+;\"(,-,=\(= H@ $A	*U
U*,,.,+; $F,!( H=\(	 H@ $z,,.,
+; $I,	"Q"U*!( H=\(J H@l $N,ab+\(O H>+,.,+;\(P H	*T** : } $V, 
<
,5J;\"X <r,f,_,i+i,+i	*
*% $],!( H=\(^ H@l $c,%ab+,\(w H@+(\"} B?d$	"U
U*-!&,e,)!( H=\(f H@ $g,0,.,$+; $j,3	"U*U
6!( H=\(f H@ $y,5,.,4+; $l,8 $o,;d&1F+A,^	(
U(>+;Z,"$,<<5D;,9+;$q,@+Q$v,D,~B$y	*"P*G,E$)<m@,C$|,Gd&1F+Y,QZ,+I,B+;XHG	*"U*O$$G,Jd&0FG,~ZG,P,~X(+OX(+OX(	+OX(
Q*q1F+t,QZ+t (z, ,m+; $.,p,~ $1,v+Q $,x	*A"E(z $2,y,QZ+  $7,z,~ $<,},~\(> H $@,~d&0F	*U*U
+,^+;,Q,u+; $D, $H,,+;S&Ml,+ $M	*E**,,+;!(GH8 $P, $T,d&0F]+,+;0F0+@
	** +,Q D $Y,,1J6+1J7++;\"+i
 This command	  will turn control over to the 1022 command parser. You will
 then be able to execut	 $e any command not implimented in 2022. When you are
 done you can return to 2022 by 	 
U(-entering the "HOST" command.
 $],,+;+4 $`,1,1`@,n	*
P5 <r @F, F<+DZ1H+,I,QZ, ;x+9,~O	 @>R"P.$[ dbH H*d@,~R"P.$[ 	 FlbH H*dE,~[ pl HpaH,~[+I[ pd Hp	 A OaH,~[+M`b,~x
x3P:+UH+S 
<]
 0anx	 @W.,Q,A`a`5HY4H\H+Zx
x,~:x`b,~x	"*` Fx\"] afx.$06@>xx x,~!( H=\(a H@d@@	"U
U(h,~ $|,3+*@@=+l!( H=\(= H@ $},i+* $",n,~l@	*A"Q(q,v $,o:xd&1F+@+@@=+w!( H=\(a H@RF:	 P*T(yd@@,~ $,r:xd&1F+XHQ $Q,{+`b+ 
<
4J	"E
U( D:, $,~ 3T:+,+:YHQ $Q,d&1FQ	(U

+* F,>x,~6D,. $,	+*5D*,~@@=+!(	*U"@ H=\(a H@+ T:*;/;".V; ;,~ON <file> or <channel>ON <c	 Uhannel>ON <file>YFP\(d@\(d@\( HQ $P,d&0FP,~!(	*U(
$ H= $ZQ1H $1H $!,!:xd&0F!,~+.,>\"} B?Z	"@,!&,.a,>Z	4,^,~,61H,~ (H,~H	(@ E
55H4,~3P:,~H+6H5H8,~ Bi "i,>,8 } 	 **=,,sa@ +C\"b,\"G\"b <c,f,",i,~	*E
U*F,i7 g6 g,~7Di $J,+<7@j,Q7@u,S\$u,a : } $h	(P*TN,'d&0Fh,4,,~\(k Hj d+W e,W &FF@F	"W,~]j afx.$Q$A`F5FZ BOb,~ " @+Z(	*U D(_ Hu\(k\(e Hj,J,8 } ,> ,k>+> n/4	(@h @F,~ "
04 F,~`3D+r Od&0F1F+l	 p@F,~ &f+p1F+vF5Fs,~ B0H?+u`	"Qy4Fs0F+y+s>	,, "4Bx+}>	,| "44<	 P F443F,~ 
B
D7BF,=4B!44nf44	 T*
,~>	,\"z,A"O!&H4\"z7BF,=,!\"{	 4"} F,2$4&,24d&J4\"| ,2\"}	""@ ~4  "  ~M4\",,~l" $ (74-	 @ P#[1F+d0&O\.1F+\" "  &`n+	Z	"*T ,J4-,~
w=,~ "!$ @@;4Z4BBZ BF,~0s83s@sHRs`	4:(U*EshspsxOtt $#,Nd&0F9+N,< "i\$%,L $&,I	 TUNZ+  $+,M,Pl `@d +i $-,O,P\".,\",	(
D\V\"1`@7@E+\\"8ZE,\"B\"@a@ \"E+i\"F$H &,"H." 	 P(g "ZD,e "$I4Dm ",i\",,~|R$A $A 	8 p8PE(xrhsttAUTO.DMC	[Taking c	 @
xommands from ]
USE  AUTO.DMCxzHGA 1022 command, x4H}	" =for records@Hrecords@Hdeleted records@H	 ((	DMVrelational operator 'H
logicalmoperator'HHattribute value@Hlist of <attribute> <new-value>a(	"H9the current data set@Hcurrent record from selection	 # group@H relative position expressionto get next record in selection gro	"A+up	Ato data set@H.gCLEAR	"A4iH3I\NAME]H9R	 (
<selection group@H<#sequence-descriptorASCENDING0N"H@	(PEHBbuffer size (3 or more)5 8HEHHscratch device for sort (leave	  M the ":" suffix off)B(HJdata set@HQJPASSy	 "Valias data set namea(HV5data set passworda(HZ	(*^7records from data set@H_bundled data set@Hb|	*@gk"Qunbundled data set@Hhselection group to@Hl	 *o?shouldn't get hereZ"o $4+SYNCrNHtr!r	*
D*xE`sy!{!"~!mast	  er if tranaction field is@HBLANKSAHdata sets	"PD 	@H@open data sets@H?join-namea(	"H5to enable ALL joinsto disable ALL joinsJOINH	(PHto clear user defined variable names{to clear ALL collectionscolle	 E"ction-name, collection-name, ...a(H"5a(H"9	 +to clear ALL join definitionsjoin-name, join-name, ...a(H.5	(D3a(H.9value for variable@H6variable-name, variable-name, 	 <...a(H99command file@H?to use last file used% No 	 *@Dprevious file to use
,K\"D,
+iH[Using@$comment@HK	Mcommenttexta(HM9message@HQtextrmessagea(	(@UHS9multi-linecommandeabort@HWtrace@H[O	*^keywtable@H^KHyaccess-codeUPDATE0v	*( H|H~0H|H~READONLY0wH|Haccess to attr	 (Dibute@Hvv>MHnew record to data set	"@Hto be prompted for rest of attributeslist of <attribute> <value> ...
  	  or NUL<ret>a(H9room to data set@HMACRO routine	""@H data to pass to MACRO routinea(H#9condition@	(*H(<boolean-expression> THEN <commands>
	ELSEIF <boolean-expression> THEN <command	 3s>
	ELSE  <commands>
    ENDIF or ENDa(H+9<boolean-expression>	 "; THEN <commands>
	ELSE  <commands>
    ENDIF or ENDa(H99<comm	 "Dands> ENDIF or ENDa(HC9<boolean-expression>a(HH	"L9<boolean-expression> DO <commands> ENDWHILE or ENDa(HM	( U9<commands> UNTIL <boolean-expression>a(HU9IF or WHILE st	 ]atement@H\data for commanda(H_9lfile	" f@Heto edit last file editedH[Editing ^Bto	 @Pn@Hnoutput channel@Hp@to release ALL assig	 wned channelstyped out before all error messages to@Hycharacter 	 to type out before all error messagesa(H~9recovery to@	(@DHwhen error encounterd@H	to reset default prompt	* new prompt in double (") quotes (Hbuffer limit t	 @o@Hnumber of lines to reserve at bottom of pagerecords in current selec	  !tion group from data set@HDAMAGEDH%	[PL1022 is not full	 *y supported by 2022]
2022(PL)>	[REPORT is not fully supported by 2022]
2022(	 @@2R)>creturn to global mode@H4unbundled data file@H7	 D;DATACH;DMIfile specs of new location@(H>current s	   Celection group in file@HBprogam then exit 1022@HGEXEfile specs	  L of program to run@(HKSYS:to enter 1022 command levelcommand line to	 T send to 1022a(HS9	[type "HOST" to return to 2022]
source fi	 @]le@H\DMAfile specs of DMA (or DMC) to compile@(H_giving	"e@HdDMXcompiled DMX file@Hhvariable@Hka variable	 Tn type qHmINTEGERGHptext length (1 to 65535) (	"  vHsvariable name@Hwsystem-variable )Hznew delimiter i	 
n double quotes, 8H}Hnew value (integer) (Hnew v	  alue (real) (Hdate in double quotes (H
new value in do	 uble quotes (Hall selected records into variable@H<vari	 Dable> EQ,= <expression>a(H9P	[use @POP to return to 2	 "P!022]EXEC-commanda(H!;#oEND.PUSH>>	()tAnew internal data set namea(H+5v	""2xnew attribute abbreviation (1-5 characters)a(H33new a	 ":ttribute namea(H:3to turn update ON|H@1022	  C version@HBa 1022 version (116,117,etc...) (HEnumber of lines	   K/page60 8HJHLon subject@HO0i?	*TQ4?additional subtopicsHV9from 1022	 @
\@H[from this program@H^DMDDMS""
pGFHm	(eHuvalue for attrubute
  or NUL to give this and all further attributes null value	  ms %End of noise not found - should not happen\"n,H+u%^E routine MC.	 vCET is unavailable
\"t,~  1022  Used  in , Load `	 ~ @program disappeared\"+- on PSI channel \" " Z &	"@
J4-+( at ,,[J4-\"	 " ++unknown status (call DP)	 runningIO waithaltedforced terminationfork waitsleepJSYS trap 	  waitaddress break waitmn@|EXITHELPINFORMATIONQUITSETTAKEDISPLAY	 
  ECHONOA 2022 command,CH!2022>> CH!commands that a	 )re sent to 1022@H'about program@H, Program version is  ****	 1* Commands are currently comming from the RESCAN buffer *****
 ***** Commands are 	 :currently comming from  Commands from TAKE files will NOT be echoed
 Comm  Band send to 1022 will be displayed
	2022 version 0$D$DB
D	@"Xd2Bx_"yRxaism6kh{uj1wD
H	D"- R
K- S
M- T
Q- T
R9gR9g#9m>R9mC9s^	@"R9sc9y~R9z:Q<
6:Q<
7J_R
EH#=hJ|O/	DJ$D 
%tYY"lRY[b.1^wL2R<SF3S]=S5	D"S#&;S#_9=Y/S2}?25/ASf*7Tj1[pKnTN	z#,RD89w+
H_M"!-70 "]P J/]@^KO9K9M	D"K:@K==K@MKI>Ku"{RKwJLL^JLU:JLaU	JLbZ@JLh*@JLmf`H&<0@JLzU JLPJL  JL JL L	JL=AJL]D@K="CRK=KQg=G
KQjB8JKQjD 
KQktvKRY"4	D"RKR[5
Ke:H6L~mL~nL~oL~p
L~pM+=()RK	D bMh;JNZ/:
3NZ/:
4N[#"RN[%3N>~3N?{3NG
PF	"PF]-ybF`]yG6`]zUy=;b].<rD]{:]{<	D"`^)BS]Ht<	#b]Iq4W_
A;_M"qR_OZC4l':<d"	D Rd`wkS`wsSbe%
GjO0	9j
<	9j
=	0	0=7wVrb}e
}
si}*2CR}gW&R}gW:R}gWNR}gWb	@ 
~${4	I4G	K4bE[G	KHY4bTm}P	S;xSS1 	STjP
/I@Sf4SfGP!LP!s P
/G9@SnbSn0	D"Sq!4	x*h	x+i	xa*wekxiF	x}vtt	D"	|&&u{|{}{	~@0{z{y|	D"O'O
Pc"kSPe	D" !
G-X&.
@#
@Vvc;[LYlSI0cHeyZcHez-	"Hi"^SHk
&q
&w
&LoL]"
SL_

'&q<J]F	D
KF
OMvr_".SraKS^SpKTKT+KT/KT/`	S"W&xS"W:~`xS"WN@xS"Wb@x
m9KM 1Ip :w" @4n	D"
r)kU+
o
+( S	
vr} Y_#
^%
+!	D de=-
|]r
|`s ij(Tcc(Tsk(THfZ(THtW(TObJ	@(Tm0	(To^S(TocK)4i@
P3]=)#B)cw;K+l>@K+lj,	@"K+lub1T6B=>Aj<SME%"iSE%E%wF)7z8|Q	@"|w	@^b]"TS^b^hQ^h4{S|;
L$A
L$B
L$C)
L$C*wk["	Swk]KzJ?|pKzJ@JKzJ}g`KzK
$KzK'	
L!
+P9P	"P
)e
)e
)e 
"T
1i&xT
1i:~`x	"T
1iN@xT
1ib@x
2D
'
2I
#
2["T
2]+E3="#@tj+^9I	D"+^;Y
"am"%"?n
)z
*	Q(F"T(F$T(c389"vT89!->i	'->j	.	D ->j	0->k	2->k	38Z9"xT8Z;92+"gT92-d:E[~?7"i	@"T?9Ay"tTA{A.]A#=8A#Z4A#r}6A7Q"TA7S	A9K"eTA9M
G h37LYeo3LYf2LYg<Y3OB@TY>nK?0KJ	"d]
l
k.&?Hqi
q&+3q')PfPq ITUB	{TUB	}	DTUC
	TUD
rLM"TrLOrWfI
rW~]xrW~~rW~rX)"
Lu"@u:cdvYMU
	@"
w<@Ad$cSPWx 3?f]|j3?k	D"^nj3?`'`0vVzV{VVu`6	D"3@p
9r
:
:-Z]
T-Z_
_-Z`
c-\>U-\C	D"Zj

hZ		
hZ	

h[	

WE?V(KwS	"(lOT)
nK
sGU)2wW-
`-
l	D"3qBe3sf5e3s:MM74!i5$g5K@"'U;!3e;RK8	@MP#@IMP#IC
[	D"j~
`j
aj
enSLEY0Ml
He7;r~
m[wE
nmW	@ UmW#mW>UmWCmW^!UmWcmW!~UmW"mW(UmW(#	@ mW.>"mW.>hUmW.CmW4^UmW4cmW:~$UmW;mWQPumXE
H	D mXF
JqzGjmrv32;"aV=ge
ge
ge
w	"|	D"Vw=}NN/(~Fr'i"RV'k'p	RV2U4EV2iGF	PbK
Vl("<
TKV;/'VKP@PNFxPNZ{~`xPNn@x	D"PO@x
,QKUuSKUvYKUwZKUy\&S5Y9&S5Z>Jb?	D".wb9Jd#@o*2'3JA'DlGBoA4'y,H=(lk?(:/DD	D"4U=C4n*E(a=J}Gooy58zGJKFpH7?LN	D"+Z]tGA(HKd,JJ]6,LD]7-0n*-3cIDmM-DU]	D"DzQK-a
.b>dJ/!ZJ+Mq@9/.aM//,/2=2	D"JnxT/6GCK<\/dtK/kxUW0rOLLvoX1-M1qqZ	D"1
B\KOx]R7]SFNT
odKb+O	D33nPy|Py}WuP7MWuPJ`WuP]	V	D"WuP`	^WuPs	zWuPs	{WuQ	WuQ
WuQ
(WuQ/
WuQBWuQB	D"WuVUWuVUWuVX!WuVkVWuV~ZWuWcWuWgWuW
WuW'
0	D"WuW:
5WuW:
6WuWM
QWuWP
	D"Wu],Wu]nAWu^`Wu^tWuct	D"WucWuc*Wuc=Wuc@WucPWucSUWucfWucyWuc|	D WudCWud"vWui5NWui8\P	P	P2i P2iPJ!	P:=PJY@nPHhe5YF 0f
:Hh
d nk
1!"2
@	D"09:
ia&*37]2
888x
iIAPK;bjJ9	 e	PdU-PdamD,H	OD=w?L+J3Llk	ev:ez@	ON
]ONkONqONON|ON JON-ON-?ON-@	ON-GON-mON:ON?)ON@FON@^ONK]ON_}ON`w	ONm&ONs3ONyiOO>	OO
2RF
tHwhRMq%XK
1	@e9[
6Hx
:Pe?MW\NBW\NCO\[{O[	 f\'C
m:	D"f\/E	g3[
?(R_
CgA9
8hPKIAi
ti#U
ql&[.IG
~l:D
l<]
I6i#r5	D{x'XiMK390%R9O/gI
8EDgESIos$I	D	D"
'
.&	GIn	Mj$
nd	<%Rpw	BI j-rw(O|Z\I#d+\At
*I']
ON(
)I-~7	D"I-{Ff3
.vj
!o
0w[
,I0*7I3I	$DRA	8DT	9	D"_ jw_#=|_#Bz_#D~_#Fy_4Dp_6vF;J9	Dz
:I:>6za
4O9RH`#r
I@

|M
yaM
}=2
	D"|^x	q~2GvIBb4IB\
i
6wL56xU
S<%
C(U"OOqhOrO	OOrc ~z-[`rkE8:]:4]HRqq
q
|S
B5OTHOUNOUOUkIUxkg!'
HB	W6fH7}`dFgDS
flU=
PmQs
hOvA*	"OvA+OvA3
|z)
Vn-
r~kpN
DS[
U
R_
L
ok	D"=i
gzo	N9w
OG
vR-+=$Ih+LX$
kWqRWqeWqfL3	N_
y$b5H@ 
Mh;h#HW}M(P(HW}MP(hHW}MP(HW}MP(xHW}MP((HW}MP(HW}MP(
xHW}M_P(xH@@ `Th?~kH@
Mh;hH @Th?~\pH@
Mh;h
Mh;hlH@
Mh;hH@
Mh;h]H@
Mh;hH@
Mh;hHW}M_P.(H@
Mh;hkH@
Mh;h;H@
Mh;h9H@
Mh;h8H@
Mh;h7H @Th?~&`H@ 
Mh;hHW}M_P(`HW}M_P(
 HW}M_P(
H@`Th?~VH@@ `Th?~TXH@@ `Th?~R@H@@ `Th?~QpH@
Mh;hwH@
Mh;hvH@
Mh;huH@
Mh;hsH@
Mh;hm8 C( T