PDP-10 Archive: decus/20-153/rpgiid.shr from decuslib20-06

Trailing-Edge - PDP-10 Archives - decuslib20-06 - decus/20-153/rpgiid.shr

There is 1 other file named rpgiid.shr in the archive. Click here to see a list.

2+x[

~eB=2+ <" \b

5 <
Y \0 <
QX\( <
RX\* : \ <	jX\* <0	|f:l 
 "h@

  "Y 0
+3lh i@xD+07\`(+\(l\,):  =0Z!+5 >1Z+ ;(HG1Z+,1H&+q1Z)i+0Z g1Z'i+' =+`@+) +@1Z'i 8 Kx

p+.`@+ 8,!+; < 8,!a+F < 8,!+:,`@+8 \/JG: ZN,m,2l+ b+`@+A = 8,!+A =1H&+A@@N+G,`@+D/JG< \N,m,2d+G b+d7@N+J K :z

r,h+L @+@@L@@L@@K@@KdAs >@, ZK >O, ZK@@,@@,@@M ? ?1H+l1H+Z/(H`zp+U+l,>,S+n :!`,$+n :

Z4zo@,^0(0h+g/(Hazp+n1H+l0(0h+p+b1H+p/(Hazp+n0H+h(,h\MNd+tC+r+r+0Z&)+|`@+.a@`@+v^+`@+`@+zH((({,s@,sd0l+.A:?0:0z+`@+7@ A,^0(0h+3/(Hazp+>5B/3XA++03XB+1H+0(0h+>++1H+>/(Hazp+>5B83XB+;+93XC+;0H+4+4B<ml,~,^x c,~4B@m@l ,+;,	 /FG8 XO 6{ C1H+JH8VL`x`+E,	 D+E1H+F+N4BM A,~ >,~.6 O,
EvC O4BRm@l,~ ,	 /FG8 XO 6{ C6@2ZD3ZE+b1H+b1H+^0H1H+^0(0h+LH8Vb`x`+W,	 D+W (/H8.6 O,
EvCO4BgmPl<,~@[E[F[8,G[<[:3Ttu+p4Zs24tuo/(1|+k+n &8:lt ZN,~:x,~$d	6$d	$$d	$d	C E><@E'%y@E'%{@G"

@e2

+g%y@g%{@gG@gVi8iH@iN@i&lPq}}t6

It7X@?!h&		JApB

b.B@b4 H

R@4#S?ZCDEv^z	$73uN'',T,,@@ :z

z  z

y ,sSN,,s@@ :z

za@+.z

{`@ z

| Kz

| ,s3ZK+6@@ :z

za@@+5z

{`@z

| Kz

|~,s:N1Z+1Z

z Mz

| ,s N1Z++ :,>,T,,@@,^+& :+? :l+?a@+R,T6@K l6@K m@@ :z

z  z

y ,sSN,,s@@ :z

z Mz

| ,s+ e+,T6@K l,@@ :z

z  z

y ,sSN,,s+1,T6@K l,@@ :+V6@K l,T,,/@@ :+V6@K l6@K m,x4Ln :
,f+@@z

z  z

y ,sSN,s, Lp/JG<Sl(,s,~ +6@K l6@K m,x4Ln :,f+,5,7,x4Ln :,f+* :

,>6@K m,(,/ F 8,! p`@+7\K+a@+ \,,S,n \A :!`,$1+ G,
s!Ax

n 8x

n 8,^1Zx

p/PG<@@z

z  z

y ,s@h,>SN,,s,^|

| :z

z ,sd@,~+ c+ k+ t+ :,>6@K l,(,/`@@+7\K+ a@@+ \,,S,n!`,^+
 l+6@K l,(,/`@@+7\K+a@@+' \,,S,n \A :!`,$1,2 E*Z7!AlSXhZ<hZD/<Pl*Z7 G Xh ZE :

+
 E/Dl*Xp4\6,
E+4XZp,~,K m,/,T :
,5,7 K,
E6@L,k:

Z7@,k8

H.@[`0XH1+a6@L+g7XM+L,>,T M,
E Q4Xg,^38+h8

H.@[`0XH1+gS:,>,x4Lj K,
E6@L,k:

]4Zd:~4ZS:5Zi,^Z@:a@h0 K*K XK,&, Lp/JlZl(,sZMl(,s+6@M+g@6@LS:@+M:~5Zf:4ZS c+S b+ b+ c+ d+7@L+o<

H :,$+u +q<

`4\g,
E:

Z4Zo6@L+u /Al XK,~
&H+
Y6@K l,T,@@ :+V,T,76@K l,/ :@@z

z  z

y ,sSN,s+1,T,76@K l,/ :+},T,76@K l,/ :+}7P :,>,T,76@K l,/,^+}7Q :+	6@K l6@K m,T M :+
6@K l,T,7,/@@ :	+V6@K l,T,7,/@@ :	+V6@K l,T,7@@ :
+Va@+"6@Q+#O@Q :+x ^+ _+ :+a@+"7@Q+#@@Q,(,/6@N p`@+7\K+-,>Q,>Rl+~ :@@z

z  z

y ,sSN,,s+6@K l6@K m,(,/ :+.6@K l,(,/`@+L7\K+J`@@+Ka@@+A \,:R/:zS:S/:zT,S+K :!`,$+K :

:0z+M:

:4ZH0:0z+M/CG< :+
 l+ B+ h+ +6@K l,(`@@+K7\K+Ja@@+W \,:T/:zU:U/:zV,S+K :!`,$+K :

:0Z+M:

:4Z]0:0z+M/CG< :+
,5,(`@@+K7\K+Ja@@+h \,:V/:zW:W/:zX,S+K :!`,$+K :

:0Z+M/CG< :l,
@@ :z

za@+rz

{`@ z

| Kz

| ,s+,/7@K+J7@K6@M+y +6@K,56@M,T Ka@@+ \,:X/:zY:Y/:zZ,S+K :!`,$+K :

:0Z+M/CG<*K \Ka@`@@`@@1h@ :@@+&,T6@K l6K m,/@@ :+Ja`+&,/7@K+J6@K,56@M,T Ka@@+:Z/:z[:[/:z\,S+K :!`,$+K :

:0Z+M/Cl*K \Ka@`@@`@@1h@a@ `@0`@1h0 :@@+& F+
&\+
Y b 8,! n b 8,! ?(c0H f(c0H E,~ d 8,! d,~@bd(

[ K0(0h+G 8'h$8(

^0(0h+B.8'h4XB0"+;l@,x

q0"+@(

a1H+@0H'+F 8x

q80",~+31H+X1"+E +@ +@ >+? 8b,
o+B(

^ K+lf1H)+N0H+M 8D+9 86+7 8;+9 810H+7+B0(0h+B 8E+7 8i,
o+B 8h;+90H)+B 8D+9(

^1H+@ +@66:7::;;:66,7:,;;6,66&$*'&XJOQTV !!""##+ d0H&,~1H)+v1H+w 86.8'h Kx

qOx

r,,~ 8;+s 8D+s@z@

 " 8 XK,34T|:

qz

|@z1"+z,~8(,>,x4L, Lp/Jl,^X,~,^,~a@+	`@ ,~ g,^+7\K+a@+

N5Z:

`4Z ,
E+:

Z5Z6@L+ZA/G< \K,~ k+ + L4Z,8+ r+a@@+`@,~+7\K+.a@@+# \,,S,n :!`,$,/  :

N5Z):

`4Z2 ,
E+&:

Z5Z36@L+ZA/G< \K,~ l+,> e,
s ,^x

H,~ +) L4Z+,8++`@,~+	`@@,~+8

H.@[`1XH1+8e080x

1+I,> Z,@@,,S,n :!`,$,//Al,> <

H,/,^z

g :z

^,^/Alz

g,~,>,><

H,/ :z

^z

Q,^/Alz

g,^@ f4HS$8.8'x+Px

g,~7\M+%,S,n \A :!`,$+ @@O6

N5V]:

`4Zc ,
E+Y:

N ZP:

Z ZQ VO6

O VP,>:

`4Zc ,
E+a \B e,
s B \B*7VO+-/AG4t

` P f 8,!+ B Pv

Nt

Ox

N!Az

H B/AG: ZM :z

f(g1H+u0H$ Fz

\,^7ZM+ f@0(0h

+ 6'xaxp+}4H}$6.6'x+z B :z

Qv

gz

^/Alt

g,~ M \,@@,,>,S,n :!`,$,/,^ /AG<  B :+ :

Z4Z+,~ g :,>2X,'(h1H+k0(0h,(0T'h,'+k e,
s \B,>!Az

H h 8,!a+o i :,>5X,) Bx

N(i1H+#0(0h,( :'hz

O :z

N+o@z

N+o m+ g+ =,~ E (,~ D 8,~ c (,~ c+,>/AG4t

` B+
"jSh,
=
&j+
Y
&l+
Y
&o+
Y`@ ,`@+9 ((({,s@,s+

1,
c@:6,86,76:6,7,8,9H,HMHLHL8,98,9:pHp,9:8,8H6 $?Inexplicable error @LOK.13 in phase E - Table/Array item not found when expected.
-

9<,90,9<,90,9<,90,9<,90,9<,90,?RPGDNV Dispatch to non-verb operator in phase E
,9::,:::6<H:::,:::,: not found
?Can't open DSK for CALFIL input
?Op-code of zero used in phase D
:?`},uH},~p,~ (x+
``+d@+~?`]+]1(+0(00h=+/(+(],~ (+4Hw0H1H
1(1H+,> (/, x.( ,,^,~ (h],~D+z

D`H@+$``+,	A6@Y+l 6@! (,~ (Y+
``,~?`+H,~r+ ~+
,> ah`+! (,+,^,(M,  , (GI:   1z~,~
&Nl ,~ :( Q,:H=Z*,w0H++a`,(Q H=(R H>d,~ 8,:1H+71h1(+8$8.8'h<Z7,:+3,~<Z7+10H,~ (+4,w1H+<,~ (l,~ 81H+D1h1(+E$8.8'h<ZD+@,~<ZD+>0H,~ (+AZ1H,+K/(H=XI,~@@, R*(.+I SOURCE PROGRAM TOO LONG
H5:6,6@, R P,+V.28W/W3UV+Y7AV+f=pU+f V[.@ ,2Zp+X<rh6Z,2Zp+X<ri6Z-2Zp+X<rk6Z-2Zp+X<rl6Z.2Zp+X:x /@Q  ,~6@,+X+d6@-+X+d6@-+X+d6@.+X+d P,+q.28W/W6]V+~ UV @.< :7@h+=zt4Z	8 /@Q UV 6hQ`.v@6 ,	2@@p. 6pQ6,*6hQ ,~=po+	 ,F,F-F-F.[Z`2VFv W&6@.6,~ W*T	9 TWZP VW/W(V[U08X+

,	+@W+	Z@/PXVV/PXVV/UQVUV!8XX8XO@X.P*8!8XX8X@@X.P*8Z@@@X 	:*60Z@ 6X7@X+	(@@, 	:*4. 8, 4X Paz+	 Z`.8*T	,>/@X4X,>,+	#.28W/W6]V+	! UV,V,^Z@04X+	!	:*6.+n 6X X`z9	)+	%,
&	<+
Y
&	>+
\@.@,`ZERO ENTRY IN NAMTAB
NAME TABLE IS FULL
ZE0BE7@+	ZQ"Y! "p,>*<,^ <.\E $+	H , 0,	[

7d

6 5N	O+@7+	PS.,+@+	d+	P+@+	d!<X<g*<hRh(\} \h `\D7\ ( \( \

4d

6+@@@.<X\(,~@@Y,~

6d

6+@+	_

  0,~ :	f (
" ,
=
&ha`d +
R
&	hZ5\
 ,
++	b: unavailable?RPGFNF File not found  ^i 	y*>j +`\+	p`\ +	q`\+	r <	y+	r <	{+	r7
 <

&p
&
 
.8
"`|p+	t
&
!	y*> i+
Y`iUnknown APR trapPush-down overflowIllegal memory reference	}Reference to non-existant memory at location $

+
,

5H
,~,>  	t`t ah+

,^,~,^,
+
,
+

&J,>,>  ,
= 6
"6\ ,
=R 4\
 6
",
=,^,^
&L,~
&M+
  	hah@ +

&O	bah +
ah :x:x,~
&R+
R,
+
&TZ,
8 
+[p0Z8*|
"Zp
&pa`d +
RU

VY\4^daldteiD
& ,
= (
"6\,
=7\+
1 (
",
=7\+
7 (-
"[,
8 (
"Z,
8 (.
"
&L,~ k`zp4H
8.(
"azp,~+
: l4V
@.6
"`tp+
=,~ (A`QHx+
C,

x5H
B:x,~4lA<.T
M T
MZP04w,~
&m>x o.(
"`tp+
J
&L+
YCAGFPDMJ  ``	` <Ao b1z!+p p Z9+
X \9 < \<+1 ^p >i*>p-:
_ 4+
]-:
_ 4 p Z9 T<+16\c \(!<r+@.q2\q+
` b+h Ti4r0t+
g,T
m i,~ Hi
&r>x o.(
"`tp+
i
&L i i+
Y
g
nZ+E@ `4V
s82H9
p:x,~[0:+
zZQ.l
{_56
yZl
{ Yl
{,~,l+
u
&u+
ICBHFQENKLO

+\FA<.\G,~,ZR XR,~,
oa+(x1H+,^:x>@,~
&x,~,^,~$#"&$!' TSX4p@@p*4p ,~0H,~=X!:x,~ Z0:+-Zl
M7l.3V++.l3Zl
{3<+' ,~  :x,~
&

+
I

j(

0(0h,~

4HB1H+A1h1(,~0h

0(a,~`zp+;:x,~azp+A4HB,~ X b/8 x

/8x

,,~TRANSMISSION ERROR FOR 
Mount another reel on To retry, type CONTinue
?Cannot continue
() No file name) Incorrect Proj-Prog no.) Protection failure) File being modified) Bab UFD or bad RIB) No room, or quota exceeded) Write lock) Not enough table space in monitor) Unknown error$

Bad table-link at $

x eB= eB=5>6$Illegal UUO at location BAD INDEX IN GETENT AT ,85
%Over 100 unrecognizable cards found
%Are you sure you have an RPGII program?
Bad table index in FNDLNK at <,*0``,~?`b+

Hb,~:_f+

,>

F!`X(^,
+

'_

,^+

F`H+

FF+

FFF (^,
,^+

(,

 (>` +

  0(,~ (,

: !O@W (,

 ( H  b1(#+

),>,>7

/,

5H

! !,

*;zW+

& (,

*,

0,

5H

',^,^,

4:

.&:Q\x6@,

+[x.(+

0+

HFHR: 
W*4$

.
@$<pCN EV5y@$<p

pp
ppp00p0p0pDp6p4p0p$p p ppp<p4p&p p$HpHp$Hp

0pp$Hp$<pHp$HpHp$HpHpDpBp@p>p8

p4p0ppppppp8 p( p p0pDpBp@p<p.p&p$p p0ppppp*<p(p&p$pHp4(p0p.p,p$pHp$HpHp00p0p pp8 p( pp
 pppp$HpHp$Hp
4ppp00p$<pFpDpBp@p>p$

pHpB

p$<pHpFpDpFpDp4 p0pp
 pp pppp420.,*(46 FDBHB@B

0$($0$D@HHFeB=2?`x+
+\

@F\

@G\[3t+@6@A.TA!4.TU.7@P+,~ 6W/4+
&
R
&`8AX(8?Not enough core to continue compilation
?Not enough core to start compilation