Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-02 - decus/20-0067/filter.exe
There is 1 other file named filter.exe in the archive. Click here to see a list.
?p?hXK?x+8K3+08(:(K+:     INXC3,PLLI7i&5pi&}`f8g?.(rMI 
S)H@HyzY'J7N65
ThH@5Hqx:$j:HjH
$j: "P	b+L <l->-81:@-<2+4ggge}g#INXINXpp6ppppCOwgB,:0X6t2fS-mM&_8SaJ||PZ6L@K;5W]6-mg?.(r}\i_
TXz}\ii<I$MaJ|92kJ(mfY:$6NMHS:M2JG>n`I$PI$Pe'&I7RD\[SN(7
 
w Jq*tju*vjv <x,	+5(z+={+=+>0)}+@~+@+A <	,@@f 	*(jU(AHj 	d	 	d	 	 D5 	*(? 	f		+K	+K+LH)5 	 DQ 		*(Z 	f		U(AHfU(pAHjD+S@	
+% @@g	-"	 	2B+Z@	+ 	+\	+\+V	+^ 	*(p@B+w@A+-"	 	2B+c@	+ 	+e+\@B+w 
w Jr	  
r Jk*	!j	!S(pAHk@@l 	"*(p@B+w@B+*	#j	#@A+-"	$ 	$2B+r+  g0 +u\(pAHj+v+o	%+x@B+w+
	&+z	'+|	.*(p@B+w	.+~	/++	6*(p*	7j	8@B+w@A+-"	8 	92B+@	<+ 	<++vU(AHj   @g@B+w@A+-"	= 	>2B+
@B+w@A+-	C+@B+w@A+-  d	D. 	E 
f Jk@@k 	E*(p@B+w+
@	H+R@B+w*	N*(p@B+w@B+*	Oj	P@A+-"	P"	Q2B+,+" g0(+/\(pAHj+
*(Z*
j
@B+4C@@k 
*(p+
"
 
2B+C+F@C+0 
	*(p@B+w@A+-"

 

2B+I+R
+K+W
+O
+O
+O
+O+S
+Q+@B+w+F@
+ *
j
 
*(p@B+w+F@B+w@A+-@B+w@B+U(pAHj@A+-"
 
2B+_+R
+a+h
+c 
%*(p
%+e*
'j
' 
(0@+g+q@B+w+\@A+-"
( 
)2B+l+R
)+o
*+o
++p*
-j
-+\+h"
. 
.2B+t@B+w+F\(AHj@B+w@B+  d
/. 
/
0 	d
1 DU 
1*(Z 	f
2@B++F@A+-"
2 
32B++ 
3++
4++
5++
6++
7+

8+*
:j
:@B+w+ 
A*(p@B+w+ 
G*(p@B+w@A+-
H+
I+@B+w+@A+-
J+
K+ 
R*(p@B+w+@B+w*
Sj
S+ 
Z*(p@B+w+d
Z+# 
[1@+$@B+w@B+"
\+'
]+(+(")
_+*
`+++, <
b,(,8,8"
b 
c2B+1@B+@C+=+7p
c+6 
d0@+6@B+@C+M+7@C+= 
d0@+9+-"
e 
e2B+=   @g+A g0@+@   @g+A g @g@@k 
f*(p@@h 
f0@+E+W  .@h&
g TDD@E+S 
i1@+J+E h5@L+V&
i TEE"
k 
l3B+S"
l 
m3B+S"
m 
n2B+UZ$&
nD+V\(AHj+v"
p 
q3B+[&
q TGF  .@h@C+= 
s0@+c"
t 
t3B+cZ$&
uD  .@h+- 
w0@+e+-"
w 
x3B+g+W@B+ 
x1@+k*
yj
z+-
{   @h@C+="
| 
|2B+p+g 
}0@+s  .@h+m 
}1@+v*
~j
+W4Ad
+x+ h0@+z+ h/  @i& TGG 1@+ 0@++  .@h" 3B+ h. 2 g+@A@ g/  @h   @i&d++& TP& TPP&
TIH+*P.@i+	@@k *(p& TJI\(AHj  .@h4B" 2B+p++:" 3B+"" 2B+" h0@+"+:+$+)  #e.#@e#e@++ 	d 	f+-+.+/H)5@+1 +1+6"+3#+5 <&,+6 <(, 	 DQ (*(Z 	f) 	f)U(pAHj\(`AHj   @h4B"* *2B+@+  +1@+C+U(AHf+S  .@g g0 $+L g/( HP&, TJJZ$ g/( HP&.D+S*1j1   @gD+S*2j3 	d3 D 4*(4C@C+= g1@+X 41@+X+j g0@+Z+@C+= 50@+]+X5 	f6+j 70@+a+j 71@+c+h@C+= g0@+f+ 80@+h+c+j8 	f94E,<G>{#pkk
COBOL FILTER HEREHAnHw
Hy
pqr$Hw$HqYO $Hu$HqHypwz$Hy<z$H{<x&H|0z&H~0xHwpx,hg AHfHv     6X6p@$H	<z$H	<x*Q:Z?SOURCE FILE HAS NO DATAHA@	
:Hf$j<U?NO IDENTIFICATION DIVISIONHAX	HkH@eHkH@kHkH@kS-mM&_8Xk$j<U?NO PROGRAM-IDH@p	HkH@qHw$0u<r<k-@lp<	"
j$j<UHkH@wHkH@HkH@%I$S;e'&I7kHkH@HkH@w$j<UHkH@}HkH@HkH@HkH@YHkH@HkH@	$f$f-8l?NO DATA DIVISIONHA	FI>9iiT(kp<	O
j$j<Up<	Q0jSPECIAL-NAMES.                                                                                  0Q:	\:Z    CONSOLE IS TTY                                                                              hQ:	h:Z0j<X    CHANNEL (1) IS TOP-OF-FORM                                                                  0Q:	t:Z    CHANNEL (1) IS TOP-OF-FORM.                                                                 hQ:
:Z-0k0j<XI$ 8k$j<UHkH@HkH@3HkH@9HkH@?HkH@EHkH@?NO PROCEDURE DIVISIONHA0
***T
T5I'r50"Xk$j<UHkH@KHkH@'gR
&0jj$j<UHkH@uHkH@{HkH@p<
,j0j<X$v$vHsH`Q U*XV:Z$j<UHkH@-HkH@oHkH@]HkH@+HkH@cHkH@i***T
9T5G?'0kC4QS:8(kHkH@QHkH@WHkH@HkH@i?[s~+ )@k***T
RT5K3P*@kH@kj$H
[<z$H
]<x&H
^0z&H
`0x0j<T:P<f,<j<X-0k,Hkh
$,Hk@h
$j<Uj<Vj<VHk@h
$
j<WHQh
0,
j<WHQ`h
0,0j<T,***T
yT5-H
zHQ0j<T,,***T
~T5H@kHQ`i
0<j<jj<WHki
$Hk@i
$HQh
0\HQh
0***T
T5-0kHQh
0j<WHQ
j<Wj<W(H$z(H$xH0[HQ,[H[:86HQ:6X?p@$H<z$H<x&H0z&H 0x(H!$z(H#$xH[3x$HQ0x&*Q:ZT5$j<U<fHf::`P
$:`P
$p<00jp<2$jt2@,,:Hf,,,,:Hf,7 	7 
+:Qf]>ez]?}9gY7M&6Jg'FJ"IE+HpHHH`H`H`H`H0rHpHpHJHpHp "
	b+
 <=->-8
:v-<2+
ggge}g#(v~:7g`:6@v>O@v \w8:6?@x+
6 v+
@@v::,~@ABABdC+
+
J+
#R+
#Z+
#b+
$,8Z$&c "
D=b
%Z$&e "
D=b
(##@h+#@g@y+
.+
f@y+
g#h0@+
1+
f g1@+
3+
6@z++
6+
f h1@+
9 h0@+
=#h0@+
<@l+
+
=  #@h+
+ m0@+
C@z+
w#h0@+
B+
f+
C+
6#
#g2D+
E+
W m1@+
G+
N  #g.#@g#
#g2D+
L+
W&n T{{+
6@r@st@udu+
Q+
U@x@xy*(X*yjz@|+
&~d+
`& TJ& TJJ& T}|&@@PZ$& "D=b
_&
d+
f&
 TJ& TJJ& T~}4x@+
#h0@+
j& T~#h0@+
m& T
 1@+
o+
v@y++
s& T

#h0@+
v& T

4y@@k@@h@y+
{++
~@#@#@h+
` Jr& T

+r2Br+!d+J+
+#g.#@g#g1@+#j.#@j#i#j3d+
rJR@@R)*(XU(AHX@|+
+60@#@h+JJ#h0@+` 8*(fU(AHf#
#g2D+8 T

+#g.#@g@:0@+#@h+

  #g.#@g#
#g2D+#@g&Jd+

@O@@#g.#@g#g1@(+
+@
+$@P1@+
+@
+$TP0@+

##g.#@g+
#g2D+U+#q%U@V#Dq#q#q.#@q#h0@+#q&V#@P#h0@+#q&X#@P4z@@q&Z T
	
	  #g.#@g"\ ]3B+"] ^3B+"^ _3B+"_ `3B+"` a2B++! a0@++fb7++!`b1`++$@A@#q% dc@V#Dq#
#g2D+!+$+@@` c*(fU(AHf4
  #@g#q@A@d DJ#@q J& &d#BP  #g.#@g#q4@-+%#g5@/+5@A@#q% &f#P@V#Dq h#g.#@g+-4
@i@l@q@t@w@z@~@@4
,<G>{#p;<hwwx> H@HEJHJHYHYJHCHYK`HKHYKbHHSHYKbN@H[HYH@wH@x<p<p<p? TWO INPUT SPECIFICATIONS ILLEGALHBi<p<pHY@g
(? SYNTAX CHARACTER Hp"""""HrHpHJHJH` FOLLOWING WORD HvHr<R00f00XHr ILLEGAL.H@H{     H@|HxH@wH
xG
`HwHwH@wHwH@xHwG
`HwH@|HxHw<pHxHwH`? NULL SWITCH ILLEGALHA(Hs@j4Hrg
Hr@g
Hrg
? SWITCH HH'Hr:(SHr IS AMBIGUOUS.H@p* ILLEGAL.H@H,Hv@j
Hj
wHv@j
Hj
x<`HY@g
(<p<p<
<p<
<p<
<p<
<p<
Hp<p<p? ILLEGAL SYNTAX CHARACTER HXAHrHpHJHJHr.H@GH`g
(HRg
(H|HR@g
(HJ<p<pHY@g
(? INCORRECT PPN.HASPdHxHwHY@g
(<p<
<p<
<p<
<p<
<p<
<pHpHpHp<`Hkg4Hkg4 H@iTHE COMMAND FORMAT IS:HA0jFN.EXT[PPN]/SWITCHES_FN.EXT[PPN]/SWITCHESHBHmTHE SWITCHES ARE:HArHELP-----THIS MESSAGEHA(tNOLIST---CREATES NO LIST FILEHAhwNOSOUR---CREATES NO SOURCE FILEHAx{SEQUEN---RESEQUENCES SOURCE FILEHBTHE DEFAULT IS CBL AND LST WITH NO SEQUENCE NUMBERSHC )!$Lu@@
+ p   @@ p  ^+->:x,~!"!$Lu!&&
+% p R @@ p  ~+%,~ p p p@@1R9 4P,> 2,"=p,^,"=d 2," 2+"? '+$R',~~+"
&.	`>,~@? CAN'T OPEN INPUT FILE.


&*,~?OUTPUT ERROR
Zx<3.\x,~+p$$p