Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

 lA-80
lA-8p`@u4
.
/(
k
d%MF
x	 
F$6"AXe>\y5}m_1T0"A(RO&p$A+0U?(YC:&A)i
x	 
O&U)i(A*Y@ *A,S; "*A+,S; $*E,S; &*E+,S; 
x	 
W(*I,S; **I+,S; ,,A,Ra@..A(2H0.I(7g^. 2.Q)9
x	 
`e?82AZ]O&*7N$:2A&YKQV):kJs(9K<2AVYi@>2AfTL@
x	 
h2AvPYBDVK B2APID2A
Wk6.*1F2A
&YSF@H2A
FTLJ2A
fP
x	 
qIL2AV_Z(N2AV_Z($P2AWk6.*15,:6C0R2A&TLT2AFP
x	 
yIV2AfPIX2AvTLZ2API\2AQ_7^2ATL`
x	 2AVRq'#&( @42eK,z_@,5-i9CR,FXCJ

|Pa!Uh6Jh$5-i9CR,FYK%w5:
	#B	'Bk
OC#(7g^. 
HC#(7g^.&VS:(	*D	.Dk

E=@
x	 
UEJ,mk@	EUTY
|EUTYo
aEUTYCd	
sEUTI1
nEUU-9h
e
x	 EUUIzP
YEUUksYEUV=d	
jEUVN8	1F	5Fk	G!T;v[
x	 $G>vLWXj)gBHt

GW)7hjeR	8H
I$VVKOrI$VZS6(	I
x	 ,I':G". 	
I5TI	
,I5U
	
3I5U[ 	
I5U[`	
%I5W 
7IVm^-Y&tP
>
x	 5IVm^-Y&tVW^
K;$\M[+`	Q9Q>dFVZTRj{-r	CS1RI	?
x	=S1RK	FS1R6KS6(9eH
	&S:$^
S:$^fzYFVS;.I !
Y&t\mY6FZQ'(ZeO Q
x	 NY&t\m_W 
Y&t\ma(ZeO ~Y&t\mi=V

T]PuY><y25&pqY>=MiJL\`	 
x	 W['0	[4	[<M[?VZ^j{2]=TXt^`_1RK(d_1T89e&

y-
x	 _GR`[_W#+]X_W#,ze&tpa=weT:G,a=weT\Y_KeKy
x	 hJj,:	gL

gR-lkN.&ZC
dPikN.&ZC
d\`boJZ`	sd
x	 @@p(@@
F

8
x	   y
`F
h@@
	  `@@
x	 

	G

PX0@@

@@

G
x	(
H`@@
 x0@0@
G
#
x	 P

F@pD@
PD@
P	(
@XH P
x	 

#0D@
P00
@XH

 L0@
P
x	 @@,8
?X%h	!C0GX
x	   4h@
xx`0@ K@0@
x	 =("0@Ex L@
@
x	(E0 L@
E0 
[8 B 
`
x	  N
0X% G` 

H
@P%8x'8
x	V
0@K8Xz
l@
4E@z

(



`8
J0
x@08G@9G

x
X@@

x	@@:

0@
Xt@:G

p0@
	?Gx


K
P

<
x	 E	H
!

Y 
"H
`
!H@@X

K
x	(@M
! Q
ax
H`XH

!y
ex
(Y	H
x	"V
H
! 
xA@
YJH
!h
H
@Z
H
x	 @^
0
!0
0
@ZJH
 
!
A0@[

x	 
gH

\
!I
|	
0 [IH	p
!y
0 
x	  o\
H	`
!@
0@ \KH
x
9!
@
x	 

x`]@0
X
;X0@]H 
<
@$
x	 @`F
<!P
0@$ a 
B

pb
x	"	P
B#@8L(d`
B#x8L(gp
C$0
x	 

8L(iG
C$h8L(kG
D"P8L0(
x	 nGb,h@

	8@

AX@

A
x	 @ "

`@

a@


0@

,
H@

4

x	"
@ +H@

=
h@

V
@

\
0@

c
H
x	(
3@

{
h@


@

\

@

c

0@

z
x	 <

H@



`@

 

x@

3
@

G
x	 @ D(@

I
@@

z
X@

|
p@



x	"
@ M@

`
P@

m
@

s
 @

w@
x	(
U@

yh@

@

@

(8@

C
x	 ^
P@

Gh@

N@

P@

m

x	 @ f0@

qH@

y
`@



@


x	"
@ o @

1
8@

5P@

Ah@

f

x(
w@

j@

x
0@

p@

	!p@
F
F(
k8>@	 
 
x.@
Fhp
 
 
DATE:   -  
 -     TIME:   
 
:     
LINE #    - DEMO MULTI-USER    
YOUR TOTAL IS  
 
; @
D
	04*"@iB$[77@b 6@
D,O@
D \
E <,,@iB$[7,	+,
	"E


+s,

+

E,
6p0p,/0$0p`p`+d0p.	(""Q(zX(@*(@ <,@@6j0j,/*$*j`j`+d*p.
Q((	*T"*X(z*(| 
   .%h, 1f5f#+)++,+,+,+,	*U(Q
&+,+,+,+,+,+,+, <, < ,*,,

$  %	*Q
T*. D! &*(':Z(,h&Z('h'  4 @
E+,, -*(% % D&	* U"7 D& D'Z('h':Z$ . "D=b;  = @
E+,4 .2B	(Q*?+AZ(h/+\   
/ ( 8, .
@#
 0 /h0,	(*U"H 
/ ( 8,C 0@
+Q1  % D! &*(':Z(,h&  V	*U*U
P @
E+ 5*(" % D" 5*(':  = @
E+,=6  %	*U(U*Y D! &*(':  , @
E+,V1  % D! &*(':Z(,	*T" ah&  c @
E+,\:Z$6t0t,/4$4%t "%D=bi	*"j:6p0p,f/0$0%p`p`+od0p. 7 H@Z$6t0t,k	 A"
r/4$4%t7 "#D=bt6t0t,r/4$4%t8Z('H  { @
E+	(U*U*{,c 82B+~+

 92B+
+
c 92B+
+
z :2B+
	*U*U*
+z :2B+
+| ;2B+
+m ?*(# % D# ?*(':+c	(*

,{, 
@ (
 8,I @#
 @ AhA,G 
B (
	"
*A
 8,
 @#
 @ ChA,
 
C (
 8,
 @#
 @	*P (
 DhA,
 
D (
 8,
 @#
 @ EhA,
 
E (
 8	(*U*
%,
  @#
 @ FhA,
# F*("(GhG %dH D# H*('	*U
.: 
E (
 8,
% @#
 @ Ih0,
) 
I (
@nhJ+
7	* A
6+
\ 
I (
 8,
0  
E (
 8,
8 2$+
C   
E (
 8	(
*A
?,
; .
@#
 @ Eh0,
3 
I (
 8,
? " 
E (
	"*P 
G 8,
E .
@#
 @ Eh0,
C 
E (
 8,
H 1`+
P	*DE
P+
\:6p0p,v/0$0%p`p`+
Vd0p.Q(KX(@*(@Z$6t	"
 
X0t,
R/4$4%tP "

D=b
[,

 
I (
 8,
N @#
	*U*
a @ Ih0,
L+c,
\Z$ Q "%D=b
f T*() % D* T	*U*U*
i*(. W*(0 % D1 W*(6 \*(: % D; ]*(= c*(C % DC	*U*U"
r c*(E h*(I % DJ i*(L n*(Q % DQ n*(T  .@+c	(Q 
z,
c :6p0p,
Y/0$0%p`p`+
d0p.Q(oX(@*(@Z$	(AD6t0t,
}/4$4%tt "
D=b6t0t,/4$4%t8Z('H	*Q"  
u(
8,
@z7`z+z0	2++	*":6p0p,/0$0%p`p`+d0p.Q(uX(@*(@
Z$6t0t	(*,/4$4%tw"D=b+
z,& 
u (
 8,	"T*Q6  @{7`{+: {0 2+:@@|+G:6p0p,./0$0%p`p`	(PA>+@d0p.Q(uX(@*(@
Z$6t0t,</4$4%tw "D=bE+ 	(T(*G,3( { @{,G*:|#|& t@#
 | }hA,
b 
} ~(O  , .


`2@Q	 (AQ 

XL .hR,!>{:6p0p,C/0$0%p`p`+Zd0p.	("
ZQ(
X(@*(@(hZ$6t0t,V/4$4%t "D=b` 0@	(U*U"b+eZ(,h&  I @
E+ |2@z+g+c6@{+z:6p0p,^/0	" k$0%p`p`+nd0p.Q(
X(@*(@Z$6t0t,j/4$4%t "	"D(sD=bs6t0t,q/4$4%t8Z('H  G @
E++I,I,:	* D(|+c,z.:6p0p,u/0$0%p`p`+d0p.Q(X(@*(@	" U"Z$6t0t,/4$4%tt "
D=b#  @
E+,|0 	*(
A	 *U
 0 
h0,N(h(h

 


,.h
T:
F:!X2,> 0x+
 
! H(h <,X @Z<,	*T"@
+++` 4`'@@ 
 ( ,5 " )n  h0	*U**&, 
$h 
% H(h <,X @Z<,+.+.+` +	*E*/4`6@@  
 ( ," " )n  h0,& 
(h 
(	*T*U*7 H[
)QH <,*X @.Z<,,+=+=+` :4`E@@/ 
 (	**T(@ ,1 " )n  h0,5@@> 
 ( ,@  
	"A
H ( ,G .
 
 ( ,I .
 @  )n  }*TQhA,D 
}   , .


`2@T	* U*U 

QXLS .hU,Z$ Q "%D=bY *()(h %d D*	*
"] *(.  
.@+c,2:6p0p,/0$0%p`p`+fd0p	*
*f.Q(X(@*(@Z$6t0t,b/4$4%t "D=bl+|,`4	*U*Q"n   % D! &*(':  , @
E+,m6 !"/2@+w+c	*
(w+=,s8@@
B@@
C,w::
C6p
C0p,i/0$0p# "2@	(D"+Z$6t
C0t,|/4$4t# "D=b+
 $6t
C0t,
/4	"($4t# "D=b	 

 ( 8,L 3`
C++y@@
C,y<:
C	(** 

 ( 8,

 2 
C++,> 
B0@$++:
B6j
B0j$	(A(A ,/*j$0@++6p
C0p,/0$0p# %2@+"	*("!+G6p
C0p,/0$0p' &2@+'+N@@
B,@6j
B0j$	(D*D*,#/*j$"'2@+.+:
B6j
C0j,*/*$*j( (
 8	(Q
2, 2 
B+: 46v
C0v,//6$6.t(Z(H+C6j
B0j$	(Q@ ;,6/*j$6p
B0p,;/06r
C0r,=/2$2.p(H,(	"(DCB 
B0@$+F+:
B+(,CD6j
C0j,?/*$*j) ( 8	(U
L,2 5@N+N+

,GF@@
C,NH6j
B0j$,I/*j$"'	"QT2@+V+q6j
B0j$,R/*j$1@+Z+_ 

 ( 8,L 	*UD]2@
C+_+q+_+m 
C0@+f 46v
C0v,W/6$6.t(Z(	"Q
eH+m:
C6j
B0j$,b/*j$6p
C0p,h/0p)H,PJ	(U"T n 
B0@$+p+q:
B+P,mL 
C5@s+6j
C0j,j/*$*j(	 E
T"v (
 8,\  @
D,qN 
C5@{+ 
D5@ 46v
C0v,t/6	 A""$6.t(Z(H+6j
C0j,~/*j)6p
D0p,/06r
C0r	(
Q(,/2$2.p(H>
C>
D+y,yP@@
B@@
C,

R6j
B	"
D 0j$,/*j$"'2@++j6j
B0j$,/*j$1@+	**T"+ 

 ( 8,w 2@
C++j++16p
B0p$,/0p$ *	 UD!2@+#:
B+5 
C0@+* 46v
C0v,/6$6.t(Z(	"Q
)H+1:
C6j
B0j$,&/*j$6p
C0p,,/0p)H,T	(U"D2 
B0@$+4+j:
B+,1V@@E6j
C0j,./*$*j( (
 8	(D(:, 6j
C0j,7/*$*j) ( 8,: /
 @
D,5X6j
B	"
D C0j$,</*j$"'2@+G+j6j
B0j$,C/*j$1@+L	**UK+Q 

 ( 8,? 2@
C+P+j+Q+f:
D6j
C0j,H/*$*	("Tj( (
 8,M 2 
D+] 46v
C0v,R/6$6.t(Z(H	*"\+f6j
B0j$,Y/*j$6p
D0p,^/06r
C0r,`/2$2.p(	 D*Q*eH,AZ 
B0@$+i+j:
B+A,f\ 
C5@l+@@66j
C	"Dm0j,b/*$*j( (
 8,U 6j
C0j,n/*$*j) ( 8	(*Qv,q /
 @
D,j^ 
C5@z+ 
D5@
 46v
C0v,s/6$6	"Q~.t(Z(H+6j
C0j,}/*j)6p
D0p,/06r
C0r,	 *E"/2$2.p(H>
C>
D+x,x`7@
F+>
F[x2P,(D>+
,b,+	  U x HzHH BhH H@%!?? TR	 ANSACTION PROCESSOR HAS MORE TTY'S THAN COBOL PROGRAM - -
?? CALL APPLICATIONS PROG	 j#RAMMER
!STOPECHOF     !:'WELCOME TO MULTI-USER COBOL -DEMO- USING	 
+ T/P - - PASSWORD:  @dx HzO?' 0zHz@a!STOPECHONERROR - -  PASS	!p
4WORD:     @f( (#!STOPBADPW*    H 'I$PQfaJMmeX:C gR~INVALID CO	 hA*<MMAND  -  TRY     HELP   @g8 8$0@
:
a
H,
H	*u:@E
0:
 T
T"<"0#H0z@(P.S. - YOU ASKED FO	 (xMR DATE LESS THAN 5 MIN. AGO!!)H%H DATE = TODAYS DATE & TIME@j' *HELP = THI	!pxVS TEXT    @jP/1PRINT= PRINT NN LINES; XX LINES @ A BURST    @k60;REPEAT= TY	 
p^PE BACK TO THE USER EXACTLY WHAT HE TYPED    @kX>8DADD  = ADD 3 NUMBERS AND PRINT	 <g THE RESULT    @l@E	 JSTOP = GET OUT OF THIS PROGRAM & UNSLAVE SELF@mM
RHOW M	 oANY TEST LINES DO YOU WANT TO PRINT (01-99) ?     H%H?? NOT WITHIN RANGE H"	 *xHOW MANY LINES PER BURST (01-99) ?      H$@
H`
 :
@},8
,8@	( ,"(TYPE <CR> FOR MORE)     H"ENTER 3 NUMBERS (SEPARATED BY COMMAS) TO ADD TOGET	&E*(	HER  
<H
!"Bp@

x
x
!

x
$H


'@

x
"

xHIPH@@	*U*@`
%`



0P`  4	`
@	:\`':
 :*t*(+NUMBERS ENTERED NOT NUMERIC   H#!STOP     r<!B	*D"U("<"$
!H
! AH
<\<%d<&
!
;<
!H
!


!H
9<*	D"BzV?QjbgsC(+`[G;`	Vl>9`-$`x7VbT3[
eVZq	D"eks.

d"a*emWOnemWP	D"eWc!o+fPa-+Wb2,Cd]NDUbQ0%BvbDw