Google
 
Trailing-Edge - PDP-10 Archives - decuslib10-04 - 43,50343/filter.sav
There is 1 other file named filter.sav in the archive. Click here to see a list.
h'8K;+x-0x.8x?p@(B(KXB+:x[     xeINXHrC3,PLLI7i&5pi&}`fxv8pg?.(rMI X
S)H@xHyxzp(Y'J7N65x+
Th,hH@5x.Hqx1xxC:pE$j:pGHjHxI$jJ: "P	b+L <s->-87:@-<:+:ggge}g# SINXINXpp6ppppCOwh^gB,:0X6t2fhdS-mM&_8xjSppaJ||PZ6L@pvK;5W]6-mh|g?.(r}\ih_
TXz}\ixi<xI$xMpaJ|92kJ(x?mfY:p&x6NMHp,S:M2Jh2G>n

elUfpG>mY7iLxY&tPxY&t\`x$I$Pp*I$Pe'&I7p0_RD\[SN(H 67H@6@@>O@@ \A8@@w <z,

 
w Jq*{j|*}j} <,+;(	+C	+C+D0)	+F	+F+G <	,@@f 		*(jU(AHj 		d	
 		d	
 	 D5 	

*(? 	f	

	Q	+Q+RH)5 	 DQ 	*(Z 	f	U(AHfU(pAHjD+Y@	+,   @g	   @h@A+4"	 	2B+`@	+'	+b	+b+\	+d 	"*(p@B+~@A+4"	# 	#2B+i@	%+'	&+k+b@B+~ 
w Jr	' 
rJk*	(j	(S(pAHk@@l	)*(p@B+~@B+*	*j	*@A+4"	+F	+2B+x+'g05+{\(pAHj+|+u	,+~@B+~+	-+	.+	5*(p@B+~	5+	6+		=*(p*	>j	?@B+~@A+4"	? 	@2B+@	C+'	C+
f Jk@@k 	L*(p@B+~+@	O+'@B+~ 	U*(p@B+~@B+ *	Vj	W@A+4"	W 	X2B+2+( g0 +5\(pAHj++.*	Yj	Y 	d*(Z*	dj	e@B+  	o*(Z*	pj	p@B+ "	q 	q2B+A 	|*(Z*	|j	}+C 
*(Z*
j
@B+ 4C@@k 
	*(p+"
	 

2B+I+L@C+6 
*(p@B+~@A+4"
 
2B+O+X
+Q+]
+U
+U
+U
+U+Y
+W+@B+~+L@
+'*
j
 
"*(p@B+~+L@B+~@A+4@B+~@B+ U(pAHj@A+4"
# 
#2B+e+X
$+g+n
%+i 
,*(p
,+k*
.j
. 
/0@+m+x@B+~+b@A+4"
/ 
02B+r+X
0+v
1+v
2+v
3+w*
5j
5+b+n"
6 
62B+{@B+~+L\(AHj@B+~@B+   d
7. 
7
8 	d
9 DU 
9*(Z 	f
:@B+ +L@A+4"
: 
;2B+	+'
;++
<+

+"
=++
>++%
?+
@+*
Bj
B@B+~+ 
I*(p@B+~+ 
O*(p@B+~@A+4
P+
Q+@B+~+@A+4
R+ 
S+! 
Z*(p@B+~+@B+~*
[j
[+ 
b*(p@B+~+d
b+* 
c1@++@B+~@B+ "
d+.
e+/+/")
g+1
h+2+3 <
j,0,8,8"
j 
k2B+8@B+ @C+D+>p
k+= 
l0@+=@B+ @C+T+>@C+D 
l0@+@+4"
m 
m2B+D   @g+H g0@+G   @g+H g @g@@k 
n*(p@@h 
n0@+L+^  .@h&
o TDD@E+Z 
q1@+Q+L h5@S+]&
q TEE"
s 
t3B+Z"
t 
u3B+Z"
u 
v2B+\Z$&
vD+]\(AHj+}"
x 
y3B+b&
y TGF  .@h@C+D 
{0@+j"
| 
|3B+jZ$&
}D  .@h+4 
0@+l+4"
 3B+n+^@B+  1@+r*j+4   @h@C+D" 2B+w+n 0@+z  .@h+t 1@+}*j+^4Ad++ h0@++	 h/  @i& TGG 
1@+ 
0@++	  .@h" 3B+ h. 2 g+@A@ g/  @h   @i&

d++& TP& TPP& TIH+*j   @P.@h P.@i+@@k *(p& TJI\(AHj  .@h4B" 2B+#p+#+A" 3B+)" 2B+) h0@+)+A+++0  #e.#@e#e@ +2! 	d" 	f#$+4%+5+6H)5@'+8(+8+=*+:++< <.,!+= <0,! 	 DQ 0*(Z 	f1 	f1U(pAHj\(`AHj   @h4B"2 22B+G+' 31@+J3U(AHf+Z  .@g g0 $+S g/( HP&4 TJJZ$ g/( HP&6D+Z*9j9   @gD+Z*:j; 	d; D <*(4C@C+D g1@+_ <1@+_+q g0@+a+f@C+D =0@+d+_= 	f>+q ?0@+h+q ?1@+j+o@C+D g0@+m+f @0@+o+j+q@ 	fA4E,<G>{#prr

zxuCOBOL FILTER HEREHAuHw

Hy

pxy$Hw$HqYO$H|$HqHyp~z$H	<z$H	<x&H	0z&H	0xHwp	x,hg AHfHv$j6X6p@$H	$HkH@qHw$0u<r<k-@lp<	)

j$j<UHkH@wHkH@%HkH@+I$S;e'&I7H	4pkHkH@VISIONHA@	@HkH@w$j<UHkH@}HkH@HkH@HkH@YHkH@HkH@	$f$f-8l?NO DATA DIVISIONHA	MI>9iiT(y(	Uxkp<	V

j$j<Up<	X0jSPECIAL-NAMES.                                                                                   Q:	c:Z    CONSOLE IS TTY                                                                              XQ:	o:Z0j<X    CHANNEL (1) IS TOP-OF-FORM                                                                   Q:	{:Z    CHANNEL (1) IS TOP-OF-FORM.                                                                 XQ:
:Z-0k0j<XI$~0
!(k$j<UHkH@HkH@3HkH@9HkH@?HkH@EHkH@?NO PROCEDURE DIVISIONHA0
***T
T5I'r508
"#Hk$j<UHkH@KHkH@'gR
+$`kHkH@!p<
-0jj$j<UHkH@uHkH@{HkH@HkH@p<
4j0j<X$v$vHsH`Q U*XV:Z$j<UHkH@-HkH@oHkH@]HkH@1HkH@cHkH@i***T
AT5G?h
H(0kC4QS:8(
O)kHkH@QHkH@WHkH@HkH@i?[s~+ X
Y*@k***T
ZT5K3P
a+@kH@kj$H
c<z$H
e<x&H
f0z&H
h0xu
j0j<T:P<f,<j<X-0k,Hkh

$,Hk@h

$j<Uj<Vj<VHk@h

$

j<WHQh

0,

j<WHQ`h

0,0j<T,***TT5-HHQ0j<T,,***TT5H@kHQ`i

0<j<jj<WHki

$Hk@i

$HQh

0\HQh

0***TT5-0kHQh

0j<WHQ

j<Wj<W(H$z(H$xH0[HQ,[H[:86HQ:6X?p@$H#<z$H%<x&H&0z&H(0x(H)$z(H+$xH[3x,HQ0x.*Q:ZT5$j<U<fHf::`P

$:`P

$p<80jp<:$jt2@,,:Hf,,,,:Hf,pB8 8 

XD+:xpHzQf]>ez]?}9gY7M&6Jg'FJ"IE+x

Hxx

H

x

Hx

Hhx

Hhx

Hhx

	Hhx

H0zp

HxHxx

HRx

Hx

Hx "

	b+

 <E->-8

:~-<:+

!ggge}g#Z@

(v~:7h`B6@~>O@~ \8B6G@

+

$6 ~+

$@@~:B,~@IBIJdK+

'+

$R+

+Z+

+b+

+j+

,,8Z$&k "

D=b

-Z$&m "

D=b

0  #@p  #@o@

+p0@+

6+

n@

+

o#p0@+

9+

n o1@+

;+

>@

+p0@+

>+

n p1@+

A p0@+

E#p0@+

D@t+

$+

E  #@p+

3 u0@+

K@

+

#p0@+

J+

n+

K+

>#

#o2D+

M+

_ u1@+

O+

V  #o.#@o#

#o2D+

T+

_&v T



+

>@z@{|@}d}+

Y+

]@@ *(`*j@

+@@+

$&d+

h& TR&
 TRR&

 T



&@@PZ$& "D=b

g&d+

n& TR& TRR& T



4

@+

$#p0@+

r& T



#p0@+

u& T



 1@+

w+

~@

+p0@+

{&  T

	

#p0@+

~&" T



	4

@@s@@p@

+p0@+p+
h Jz&' T



z2Bz+)d+R++

#r#@r+#s.#@s  #r.#@r#q#r3d+
z JZ@@Z 1*(`U(AH`@

+2#s1`++

+>0@#@p+RR#p0@+

@@p@@h @*(nU(AHn#

#o2D+@ T



E+#o.#@oB0@+#@p+



  #o.#@o#

#o2D+

@@q##@o&Rd+



@W  #o.#@o#o1@(+

@@p@

+@

+,X1@+

+@

+,TX0@+



  #o.#@o+#

#o2D++  #@p@]+#y%]@^#Dy#y#y.#@y#p0@+#y&^#@P#p0@+#y&`#@P4

@@y&b T



  #o.#@o"d e3B+"e f3B+"f g3B+"g h3B+"h i2B++) i0@++&fj7+!+)`j1`+#+,@A@#y% dk@^#Dy#

#o2D+)+,+@@h k*(nU(AHn4

  #@o#y@A@l DR#@y R& &l#BP  #o.#@o#y4@5+-#o5@7+=@A@#y% &n#P@^#Dy p#o.#@o+54

@q@t@y@|@@@@
@4

,<G>{#pCD(Fh

> HHHERHRHaHaJhRHKHaK`hZHSHaKbHhbH[HaKbN@g@jHcHaH@H@

<x<x<x? TWO INPUT SPECIFICATIONS ILLEGALHBq<x<xHa@o

(? SYNTAX CHARACTER Hx"""""HzHxHRHRHh FOLLOWING WORD H~Hz=Z00n00`Hz ILLEGAL.H@H     H@H

H@H



G
`HHH@HH@

HG
`HH@H

H<xH

HHh? NULL SWITCH ILLEGALHA($H{@r4Hzo

Hz@o

Hzo

? SWITCH HH/Hz;([Hz IS AMBIGUOUS.H@p2 ILLEGAL.H@H4H~@r

Hr

H~@r

Hr



=hHa@o

(<x<x<

<x<

<x<

<x<

<x<

Hx<x<x? ILLEGAL SYNTAX CHARACTER HXIHzHxHRHRHz.H@OHho

(HZo

(HHZ@o

(HR<x<xHa@o

(? INCORRECT PPN.HA[PdH

HHa@o

(<x<

<x<

<x<

<x<

<x<

<xHxHxHx=hHso4Hso4 H@qTHE COMMAND FORMAT IS:HA0rFN.EXT[PPN]/SWITCHES_FN.EXT[PPN]/SWITCHESHBHuTHE SWITCHES ARE:HAzHELP-----THIS MESSAGEHA(|NOLIST---CREATES NO LIST FILEHAhNOSOUR---CREATES NO SOURCE FILEHAxSEQUEN---RESEQUENCES SOURCE FILEHBTHE DEFAULT IS CBL AND LST WITH NO SEQUENCE NUMBERSHC 1!$Lu@@
+ p   @@ p  ^+5>:x,~!"!$Lu!&.
+- p R @@ p  ~+-,~ p p p@@1R9(4P',> 2,*=p&,^,*=d# 2,* 2+*? /+,R/,~~+*
&6	`/>,~@? CAN'T OPEN INPUT FILE.


&2,~?OUTPUT ERROR
X7Zx<;.\x,~+px:$$p+K