Google
 
Trailing-Edge - PDP-10 Archives - decuslib20-06 - decus/20-153/rpgiif.shr
There is 1 other file named rpgiif.shr in the archive. Click here to see a list.
2+x'

~eB=3+ <# \b (T <&y \0 <&rX\( <&rX\* & \ <&X\* <0	|R`,6T@@@Pd  

`ZX<X*<hX,D,

N G FX@@V@@V,

J4($ ,

V<1\#G(@`H@+l(;V:V H H*f  XZ0:p+ haX@9 X*F 9/&,

J4($aH@;V:V+!!< \, Xa`+(7@V6@V+)``+Z,

$,

" 1B+C,> <)a3|m d ,^ <(90H?  <(6,p"!,

,

,' <B] $+: $,

 `\+B=d6,

 $+< (1D,?,

 `\+B4H<,?9<a`+(&`@ 
"+(&`@ ,+*,> 0B?`h+I 6v(R 4t(Q H9D2Fx+K,^+M 4M*x,>,>+``l ")a1B?+Z!48 T!@@W@@ ,(9``
&&(,=,?,?A",',4.&")a0B?+Va`+^Z<\W.<'\<\W.\.\.\.\.\+b+>&4(P,(&Q(X+(&&4QVx6@,e[x.(+(& (.(,(&`vp+i,~ 8+n 8 :54p#` :,>p&4 (X,><xs5Tp,>4xu (,(&=xt,^0(@,~,(&+u[pA4.@Z@1xP+Q4@ 81H
.83Z+
 0V9
 6 +
 (,; (,;> ,> ,?,@ 1V+(",; (,; (,;aZ@+7$,;5H,4.&3Fx+$ 2Z+aZ@?V>V+``
&&,^,^,~ < (,1=|( d  <&4.6)V|=|* <)V ,1=|- (dB  (!,1 (a`+(&`@0
"+(&,

V4H;1H+41H+8,;+4,?``
&+,@+4+?``
"+(&,;5H=,~``
&&+(6,>;-,&'9(``,(&,^,~-,w/,sHHCA6G/,sO8XXJ0,uH8X1,u8X11X8X6@+QHH 2X`|`+U 8XX 3,uH <\@@!:!O@W@@  3,w 4,u (H 4,u,w65<5(\.&6.8,> 6`,y (H,^&6 6.<`,u (H.6 ,y 8,w66&6,>,y (H,^+y.81X 8XH5Xp,~.8X5Xt,~ 8 (H=xx,~&6.6V.8X,~UpM[CC[HUVpUV`CV8g ]?0I.&Z,4\[pA<.@Z@1zp+ 7 (,;aH,~1H
&:,~59*8*8(((H%Fatal - ,'
Warnings:H'$

??UNKNOWN??H)	***				H,HFaJ||PZH.HeB= H0HdH|H}a<PH2HRHg<h0h"

hH|,hHp ??UNKNOWN??H7

?COMPILER ERROR--'WARNW' CALLED IN PHASE F
 <# \b (T7@@O@"@@t``+q7@c`` +D+q!4 T!@@W@@ a` l ,a,

A+S 44+ ,9Z1\i+g:0\h+Qd,z  R_+R,
  Ri,

A,

<4HI 

4([ 4
M0T1Tl,alk,

<Z,Wa`,c9Sd<
N+t[_cn,

<Z ,6,-c@
N,n9SZ,

< 

[,6!`(\,>,>,

< 

[,6,^G,-*

x,^c@
N,z.2=pc+SZal~+}`l +~`l@+`l *`l *`l *`l *,

<al7,s <,-a@``+|, ,,S,(6.2=pv+S
&
O+&|1x+l8,C"8.x+,C+S 1x+ 8,D"8.x+,D+S`l@+
&
R+&y``+ ]4|,(6l O@] A&`l+.P+ .D XV``+,(9, 
U,&',7,(6,(6,,7 (,(&,(6,(6+S (,(&,(&,(&,~``+$i@ ,(6,,7 (,(&,(6[A<4\).@ p,\l(@ ,E4)`7@7 .1RX+S 
Z,&'"4.t 7`,(9:t+S @&8.:)Z}5X1(\}l<P ,\l(@ ,E``+S:\]+: L\+S0\+=a@ ,(6, \,@ (,(& ,@+S (,(&A8,, (,(& ]0T,~l O@]+(6alk,

<Z,6`@1Rh+M 4
_,&'"4.T :t+S`@+O,9Z R_a`,(6Z`0L+S1N+c1N+d1N+e1N+f1N+W+S``+[ ((9  0< ((6,  
_``+],,v ,\l(@ ,E``+S (,(&l ,(6+S7
` 
`d+[7
a 
ad+[ 
b ,E 
b  S2ZT,E,9,
,7``+q 
d,&' 
e,&',(6,"6@^d ,	6`t,``( (,(&& 

f!<pP!:rP2J
f+z7 +2J
g+|7@!+@l@p+@+@+ +@3J
g+&r.

g.
g.
g+x, t 
j+ 
k``+
&P:aV>,~,&'> +,(6,(66@V, V.V4V V 
m, 
n, V 
o,a`
&
p+(6 
r,&'+(65T (',  (7, 7,,1T,~ (9+ a`
&p4H,(&+ &6QXx6@,[x.(a`
"+(& 
``+$ 
u+( 
y,&'Z.
/*,- 
|,&'Z,-/
4j(6
&
| ,&' ,#+(67@c,~\ Z:^*b9`@+@ 6 :^ P,

,*t3.V_`@+B!4 T^S T^  ,~7@c,~Z^7@+5 6P"4P!`X4^a@+2.	+@ 	 P,

,:|*t@@@^@@^ 
 
,~7@c,~ i HP \Pa@k 4Tj 4.Ti.Tj j`tp,~  P,

,*tM!4 Tj@@k 4k Ti  Tj,~Zj6@c7@,~.4"`!`X4j+M*)a0J?+Z4
M1T+g1*=+^4
M1j=A4(T!
,	P.
+_(J.*	 (v

avel,6+-,  (,v (,(&6 (+j (`l,(&(

.(,(&,(,(&`(`l,(&,`l,2+(6,6 ,(& 4/,q+(6,>,  ,v (,(&[, (,(&,^[,+(6 A&6)b+@\K,7d`N,~+ ,v A.+.D`@+`z``+Z,# ,&',7``,~`@74,~1T,~:t +&'l,7daN+,~Z+ZA4a@+#+( (,(& A8,,+6)bA.+@\O,v+Z+# a\,~ (0|p+0,(&A< `vp4H$.(,(&avp,~+%Z1x+, (/,(& (",(&,>Z<&8.:)Z}5X-,v,^,~ (,(&"`+# (,(& (`l,(&(.(,(& (+(&[A< 44\;.@Z@16p7 +=.4,(&5H?,~.(1H (0H+<a@i (+<7 a`,0 
 .,

<  <,-.2a`+K=xF,~af .(1H .6@H`f`+KX&=xF (H (,(&,(&6@]+U \,@O@]af 7 ,&' ,(& ,&' ,(&+(6 ,v (,(& +q ,v (,(&,

<,>,>  <,-/0,^ x56h (,(&J"`d87@.64Vq',> ,q,^7 &h (X,(&*zl (`,(&,(6.2,^+  ,q+o,>/( Hh,

<ZHh/0B:7$:.`vp+w4Z "Q`z+|/"(Z`z~+~(Z/"`z+(Z=~#h0t2+4T 81t+ 8Wm 47 h"`%Tn`z+(Z/"&44\	."W@6T+.:@5:

<6@"`14.Th,^,~ ",&':t":.Z  :+ ",v (,(&(4H (,(& #,v  :.(,(&=z7Th,~ (",(&+q,0[ #,- (`\ (,(& (,(& $,- (`\ (,(& (,(&6@]++ \,@O@] (+(& .(,(&`tp+-,~6`],(6e@ 6 ],(6 $,- (`@,(& (+(&6)b A4+@\C <.,~ <X,~14``+@(Tl, <X:P4l:,~.DZPXRP1V+DX <,~R` <,~ZP.X4)`5TI.,~.,~ZO.X.~,~X ,~ZM.Xp.~,~X <,~4)b+@TG A60vp.%. <,~ *,&':t"4.T X:,~X,~ *,~ ( +4Vh$(1V

7+f1V 6/60v/61v7  6.`tp+],~m 6+f +,v (,(& ,`|p4Hl.(,(&a|p,~+n54s (,(&#`&4QVx6@,s[x.(+(& ,4Hz.(,(&`tp+w,~,9 /WZR_ -,

,!(,

,Z,

,,(9,(6a`+ .,!:k@``+X: <+ . ,,6,-O@]a`71 3,ZZA8.:` <,- 5,> ,v,(68ZZA8.:`Q:P <,- 7,ZQ:X <,- 8,> ,v,(68+9,>9(6!:X.:/W <,- ;, 

<.,W,c.2!:X@X/W.:(<,-=,!:`X.<,-(A,,,(6B.8`<,-`,*x++9,9ZR,(6Z}<L3TL@|,-D,>,#,(6.2Z/:G:<,-F,>Z,#,(6.2Z <,- H,>Z,#,(6.2@|`` :,- J,>Z,#,(6.2Z.:

, (,

, ,\,

,!(a`X(@,

,a`+s U,

,!(,

,.F!`X(,

, U,

,a`k!(,

, (.,

,a`7V (,

,``+~ V,

,@(,

, W,

,Z(5,

, <hX\R`l,(9  \iZD.< ET`p.<[wA8Q8`.1|h+O@]l@r_,/+9 
Da`.
W,9ZR_3JE+!*J"6:(+Z`0Z+@z+ <XR(,-,9``+,  Y,&' ,7,(6.2*J"Z(1\+[/A8.@ `,\:Y6@m(@l(,E[(A8Q8`.
+

 R+R
&Z+&y7@c,~Z
D.*,5<]4\-[(A8.@ `,\ H:^*b-,0S4 T^@T^ ][(A8.*` E1j`+&Z^7@,~"4PQ4PX4^ P,

,*t3S4 T^@T^ ^,~ ^,

,!(``l(@,

,``7 

,``7

,``,~,>, ,^hb+&',~+:,N,E+;,L,J+P+R,VX}X~XX~X,ZX+.M.P++.O++!< 
` 
` 
_ 
a!<`,[ 
a[^jggHAeB=J1Hag#HcHeHeHe68}g5"NPQ*DB$e5Rm!Cd)Dt]w3vu5 9k1(H%]2Z/?T?0{/J'NM2>@'0j=@&h/WB;M2@% /H.H;::J(@$0N9(-<bR8kzIF#C<M|,4+a;7A6Yi"Xr+/^6r5\!pgAI*-1|4x!^;!)-z-f3Y8y 'sKc(1p>\2>,N4?
$$T	
$T	
$T	
 ` 	AP:b8T

# nD	
$dy$*%a>1FIZ8g9t> ("E#I
(L&irDR*
b^Y-KJx`0l3f4[~n5Jka1@B P't2@@[?4P@@[?4Z @A[?4[ @F[?5P@G[?5[ @D[?5`@D[?5j @E[?5k @B[?60@B[?6: @\C @\C%@]C%P@]C$ @^gV@^gV@gVP@J[V`@J[Ve@HS7-@@HS7-J @PCN@@NI'0@\ix@LiP@LSN`@LSNj @MSNk @2M& @3M&+ @6MN @7MN+ @:M7 @;M7+ @>M6 @?M6+ @/IB@.Y@/S @.S2$ @tC?|g?~g?y }g?I @eGlP@aGLP@gGlp@cGLp@fGly @bGLy @dGm@@`GM@@eGmI @aGMI @gGm`@cGM`@iUVn	 @kUVn	`@jUVn	r@hUVn@iUVn@kUVn@VUK@mg.N	 og.N	`ng.N	rlg.Nmg.Nog.N@@ng.N @AiJtP@CiJu`@Ai2tP@Ci2u`-S@XaW
@@TE3 g'+ g%{ @Vi@C:%P@Giu`@*QJez @8QKz @&QJg* @4QK* @g'(@@hCJ8@{g>Tp@TKb@GeJ @Hi3P@Xi2x@g$8 @g$;6@Ya? @gV8y@kVzp@M'A`@kVz @ac@@M2~CH@M2~CI@a1`@a9`@O1`@O9`@]9`@	[9`@	C!d)@
C!dH@
C!dI@gVd)@gVdH@

gVdI@

[Vad)@I'1d(@I'1d)@I'1dH@I'1dIA"A" A#PA%PA'Pk2~9'k2~9'k2~9'k2~9'k2~9'k2~9'k2~9'k2~9'k2~9'k2~9'k2~9'k2~9'k2~9'G>n@G7d(G7d)G7dHG7dIG7ekG7f+G7f+gB

3KgB

3KgB

3LG>n G7T(G7T)G7THG7TI[?4S@F:"iF:"i

F:"yF:"y

F:#F:#[[{Y[[{@iN@i&lS@i&lYeO6yiHGgGC@IYgg%yGg%{GS:$3@M?9'Kb

B

BAD CONSTANT TYPE IN ASYFIL
BAD MISC. OPERATOR
ENTRY	H
T

				******** PHASE ERROR ********

H
V
				****** IMPROPER RELOC ******

H
[2N@?$`>&@"9L_
				ENDH
c	START.H
d*:< Assembly ErrorH
h
?H
j Fatal ErrorH
k, H
m WarningH
n
No Errors DetectedH
p

PROGRAM BREAK IS H
s

HIGH SEGMENT BREAK IS H
v
LOW  SEGMENT BREAK IS H
y
%RPGCSE  'CORE SIZE TO EXECUTE' exceeded in object program



'CORE SIZE TO EXECUTE' exceeded by H~`^~x_D^~h^~p_H^~`jHk6$.

a>Mm0<q^ $ 		;H	******NO FLAG IN EXTAB******H$

$

>-jw_^sw`HHpHHHu	SIXBIT	H	ASCII	HIPd<	@h
				****** BAD COMP-1 CONSTANT ******

HM2| 8$

$

$



				******** BAD INCREMENT *********
H%R-\H_ H

H8START.:H-	JSP	14,400010	;RESET.H/	JSP	14,RESET.H2	XWD	0,H4	AOS	%PARAMH5	JRST	H7START.:	MOVEI	1,%RPGLBH9B	JRST	4,.H<	MOVEI	16,%LIT		;RPGLIB argumentsH>TT%OTFBS:	XWD	0,HB%MEMRY:	OCT	HD%TOTBS:	XWD	0,HF%TBDEX:	OCT	HH%FTBAS:	XWD	0,HJ%PUSHL:	OCT	HL%FRCFL:	OCT	HN%ARBAS:	XWD	0,HP%STLST:	XWD	0,HR04u6
@XWD	0,HX@(EXTNXT IMPROPERLY SET UP
@(~p_~p_(%RPGLB:	SIXBIT	"SYS"	SIXBIT	"RPGLIB"	SIXBIT	"SHR"	Z [pZp1T+k5ToZXQ4 TX TX+rZXZX/4g"`QTX!4PTX+r0VG+r[X14{Z 4{ZQTX*|f <A_p#`.6.pZp1tX+zQp p/pZ`.8XXVpXXp*6`.<6@p+s_p#`.4.pXTU,~ZX 81\+

 p pD6D42v+

9

5X,~ p*p Zp"89

"W!`XV "pZ@!67Tp+

X axaX+

 T."*|

@@!<!:ZV &/"08+

[`[`X`X`.<.: 	2I+

<v

=t

9

<t

 `*` T`\&9

3i9

+

5F

,~?`+

!,~:R+

(~+&.\(R+

),~
&

*+&yCPYFIL not found
7@c,~?`g+

/Hg,~:dh+

.,>

H!`X(c,&)+

5)d

,^+

/

H`H+

8HH+

4HHH (c,&8

,^+

.?`+

>,~:T+

=(+&.\(T+

F,~S,&]
&

H+&yFIL not found
?`v+

Lv,~:tN+

K(s+&.u\(N+

S,~
&

T+&yERAFIL not found
4#!0tf+

Y T#"4T

Y,~4#!&4)V|&4)V| 6P)V.6v&	4#"t&
 &
,~ALFDiagnostic No. xxx from Phase AWRG005 -- INVALID DEBUG CODE IN COL 15, ASSUME BLANKWRG016 -- INVALID 1P REPEAT ENTRY IN COL 41, ASSUME 1WRG019 -- INVALID ZERO SUPRESS ENTRY IN COL 44, ASSUME 1wRG021 -- invalid entries in cols 7-12, 16-40, 42-43 or 45-74,
assume blanksWRG376 -- INVALID FILE NAME IN COLS 75-80 OF CONTROL CARD, ASSUME BLANKWRG023 -- INVALID FILENAME IN COL 7-14, CARD IGNOREDFRG024 -- FILENAME PREVIOUSLY DEFINED IN COL 7-14FRG025 -- INVALID DEVICE NAME IN COL 40-46, ASSUME DISKWRG026 -- INVALID FILE TYPE ENTRY IN COL 15, ASSUME DEFAULT FOR DEVICEWRG028 -- FILE DESIGNATION IN COL 16 IS INVALID FOR EITHER FILE TYPE OR DEVICE.
ASSUME SECONDARYWRG030 -- FILE DESIGNATION ENTRY IN COL 16 INVALID FOR OUTPUT OR DISPLAY FILE,
ASSUME BLANKWRG032 -- NO PRIMARY FILE SPECIFIED IN COL 16, ASSUME FIRST SECONDARY FILE AS PRIMARYFRG033 -- NO PRIMARY OR SECONDARY FILE SPECIFIED IN COL 16, OR NO FILE DESCRIPTION SPEC FOUNDWRG034 -- MULTIPLE PRIMARY FILES DEFINED IN COL 16, ASSUME SECONDARYWRG036 -- INVALID END OF FILE ENTRY IN COL 17, ASSUME E FOR INPUT FILE TYPE
WITHOUT RANDOM PROCESSINGWRG037 -- INVALID ENTRY IN COL 19, ASSUME FWRG038 -- END OF FILE ENTRY IN COL 17 INVALID FOR FILE TYPEWRG039 -- INVALID SEQUENCE ENTRY IN COL 18, ASSUME PREVIOUS ENTRYWRG040 -- ENTRY IN COL 18 INVALID FOR TYPE OF FILE OR MODE OF PROCESSING, ASSUME BLANKWRG041 -- INVALID RECORD LENGTH ENTRY IN COL 24-27, ASSUME DEFAULT FOR DEVICEWRG042 -- INVALID ENTRIES IN COL 20-23, ASSUME RECORD LENGTHWRG043 -- DUAL I/O ENTRY IN COL 32 INVALID FOR TYPE OF FILE OR MODE OF PROCESSING,
ASSUME BLANKWRG044 -- INVALID ENTRY IN COL 32, ASSUME BLANKFRG045 -- OVERFLOW INDICATOR IN COL 33-34 PREVIOUSLY ASSIGNED, ASSUME BLANKFRG046 -- INVALID OVERFLOW INDICATOR IN COL 33-34, ASSUME BLANKWRG047 -- OVERFLOW INDICATOR IN COL 33-34 INVALID FOR DEVICE, ASSUME BLANKWRG048 -- INVALID OR BLANK EXTENSION CODE ENTRY IN COL 39 FOR TABLE OR
RECORD ADDRESS FILE, ASSUME EWRG049 -- INVALID EXTENSION CODE IN COL 39WRG051 -- EXTENSION CODE IN COL 39 INVALID WITH DEVICE OR P,S,C, OR D IN COL 16, ASSUME BLANKFRG052 -- DEVICE IN COL 40-46 PREVIOUSLY ASSIGNED TO OUTPUT OR NON-TABLE INPUT FILEWRG053 -- INVALID ENTRIES IN COL 47-52, ASSUME BLANKSWRG055 -- ENTRIES IN COL 71-72 INVALID FOR TABLE FILE, ASSUME BLANKFRG057 -- INVALID FILE CONDITIONING ENTRIES IN COL 71-72WRG058 -- INVALID ENTRIES IN COL 67 AND/OR 73-74, ASSUME BLANKWRG307 -- FILE NAME DEFINED BUT NEVER USED. SPECIFICATION IS DROPPEDWRG308 -- SEQUENCING INVALID FOR FILE WITH NO MATCH FIELD, ASSUME COLUMN 18 ON
FILE DESCRIPTION SPECIFICATION BLANKWRG309 -- SEQUENCE ENTRY IN COL 18 INVALID OR BLANK FOR FILES WITH MATCH FIELDS
SPECIFIED, ASSUME FIRST VALID SEQUENCE OR AFRG310 -- EXTENSION CODE SPECIFIED IN COL 39 ON FILE DESCRIPTION SPECIFICATION
FOR THIS FIL, BUT EXTENSION SPECIFICATION MISSINGWRG311 -- AN EXTENSION OR LINE COUNTER SPECIFICATION WAS PROVIDED FOR THIS FILE BUT
AN EXTENSION CODE WAS NOT ENTERED IN COL 39 ON THE FILE DESCRIPTION SPECIFICATIONFRG339 -- AN OUTPUT REFERENCE IS REQUIRED FOR EACH COMBINED OR UPDATE FILEWRG374 -- ENTRY IN COL 16 INVALIDFRG377 -- RAF, COLUMN 31, IS NOT ALLOWED ON A BSCA FILEFRG398 -- COLS 54-59, INVALID FOR DEVICE, OR WRONG ENTRY, ASSUME BLANKFRG399 -- INVALID ENTRY IN COL 54-59FRG400 -- INVALID MODE OF PROCESSING ENTRY IN COL 28WRG403 -- INVALID LENGTH OF KEY FIELD IN COLUMN 29-30, ASSUME 03WRG404 -- INVALID RECORD ADDRESS TYPE ENTRY IN COLUMN 31, ASSUME AWRG405 -- INVALID KEY START LOCATION ENTRY IN COLS 35-38, ASSUME 1WRG406 -- INVALID CORE INDEX ENTRY IN COLS 60-65, ASSUME BLANKWRG407 -- INVALID FILE ADDITION OR UNORDERED ENTRY IN COLUMN 66, ASSUME AWRG408 -- NUMBER OF EXTENTS ENTRY IN COLS 68-69 IS INVALID OR NOT ALLOWED WITH THIS
DEVICE, ASSUME BLANKWRG409 -- ENTRY OF K MADE IN COLUMN 31 FOR RECORD ADDRESS TYPE, ASSUME AFRG450 -- BUFOFF SPECIFIED ON AN OUTPUT FILEWRG451 -- CONTINUATION (K IN COLUMN 53) INVALID FOR DEVICEFRG452 -- ENTRY IN COL 54-59 OF A CONTINUATION CARD IS INVALID OR MISSINGWRG453 -- CONTINUATION ENTRY IN COL 54-59 IS REPEATED FOR A FILE, SECOND ENTRY IGNOREDFRG454 -- INVALID BUFFER OFFSET SPECIFIED IN COL 60-65WRG455 -- COLUMNS 7-52 AND 66-72 ARE NOT BLANK FOR A CONTINUATION LINE, ASSUME BLANKFRG456 -- RECORD LENGTH SPECIFIED FOR A TAPE IS LESS THAN 18WRG457 -- ENTRY IN COL 70 INVALID FOR DEVICE. ASSUME BLANKWRG458 -- BUFOFF SPECIFIED IN COL 54-59 FOR A NON-ASCII TAPE FILE, ASSUME ASCIIWRG459 -- COLUMNS 60-65 ARE NOT BLANK WHEN ASCII IS ENTERED IN COL 54-59WRG460 -- INVALID ENTRY IN COL 53, ASSUME BLANKWRG461 -- INVALID ENTRY IN COL 70, ASSUME BLANKWRG462 -- CONTINUATION, K IN COL 53, INVALID FOR MAIN FILE DESCRIPTION LINE, ASSUME BLANKWRG540 -- FILE TYPE ENTRY IS U OR C FOR A CONSOLE, ASSUME IWRG541 -- FILE DESIGNATION IS INVALID FOR ADDROUT FILE, ASSUME RFRG543 -- LENGTH OF KEY COL 29-30, OR LENGTH OF KEY AND KEY START LOCATION
GREATER THAN RECORD LENGTHWRG544 -- LENGTH OF RA OR KEY FIELD, COLS 29-30 BLANK OR INVALID, ASSUME 03WRG545 -- RECORD LENGTH, COLS 24-27, NOT 18 FOR ADDROUT TAPE FILE, ASSUME 18WRG548 -- FILE ADDITION IS INVALID FOR FILE OR DEVICE, ASSUME BLANKFRG549 -- KEY FIELD START LOCATION IS BLANK OR EXCEEDS RECORD LENGTHWRG551 -- RECORD LENGTH MISSING OR INVALID FOR DISK FILE, ASSUME 256WRG553 -- CORE INDEX IS INVALID FOR DEVICE TYPE OR MODE OF PROCESSINGFRG560 -- Mode of Processing (Col 28) must contain R or blank, Assume blankWRG561 -- KEY FIELD START LOCATION (COLS 35-38) GIVEN BUT NOT ALLOWED, ASSUME BLANKFRG564 -- RECORD LENGTH IS NOT AT LEAST TWICE THE KEY LENGTHFRG565 -- COLUMN 31 INVALID FOR DEVICE TYPEWRG568 -- LENGTH OF KEY FIELD OR RA LENGTH COL 29-30 FIVEN BUT NOT ALLOWED,
ASSUME BLANKFRG569 -- ENTRY OF I COL 32 NOT GIVEN FOR AN INDEXED FILE, ASSUME IFRG573 -- MULTI RA FILES DEFINEDFRG574 -- EXTERNAL INDICATOR COLS 71-72 NOT THE SAME AS RA FILESFRG578 -- RA FILE OR A FILE ASSOCIATED WITH RA FILE IS REQUIRED BUT NOT DEFINEDWRG644 -- SHARED I/O NOT ALLOWED WITH DISK45 IN PROGRAM, ASSUME NO SHARED I/OWRG061 -- INVALID ENTRIES IN COL 7-10, ASSUME BLANKWRG062 -- INVALID OR UNDEFINED FROM FILENAME ENTRY IN COL 11-18, CARD IGNOREDWRG063 -- TYPE OF FILE INVALID FOR FROM FILENAME ENTRY IN COL 11-18, CARD IGNOREDFRG064 -- INVALID OR UNDEFINED TO FILENAME IN COL 19-26, CARD IGNOREDWRG065 -- TYPE OF FILE INVALID OR INCORRECT FOR TO FILENAME ENTRY IN COL 19-26,
CARD IGNOREDWRG067 -- INVALID TABLE OR ARRAY NAME IN COL 27-32, CARD IGNOREDWRG068 -- INVALID OR MISSING NUMBER OF ENTRIES PER RECORD IN COL 33-35, ASSUME 8WRG070 -- INVALID OR MISSING NUMBER OF ENTRIES PER TABLE OR ARRAY IN COL 36-39,
ASSUME 05WRG071 -- NO OF ENTIRES PER RECORD IN COL 33-35 EXCEEDS NO OF ENTRIES PER
TABLE/ARRAY IN COLUMNS 36-39WRG072 -- INVALID OR MISSING LENGTH OF ENTRY IN COL 40-42, ASSUME 05WRG073 -- LENGTH SPECIFIED FOR EACH TABLE/ARRAY RECORD IN COL 33-35 AND COL 40-42
OR COL 52-54 EXCEEDS RECORD LENGTH, CARD IGNOREDWRG074 -- INVALID ENTRY IN COL 43 OR 55, ASSUME BLANKWRG075 -- PACKED OR BINARY VALID ONLY FOR PRE-EXECUTION TIME TABLE OR ARRAY,
ASSUME BLANKWRG076 -- INVALID DECIMAL POSITION ENTRY IN COL 44 OR 56, ASSUME 0WRG077 -- INVALID SEQUENCE ENTRY IN COL 45 OR 57, ASSUME BLANKWRG079 -- INVALID ALTERNATE TABLE/ARRAY NAME IN COL 46-51, CARD IGNOREDWRG080 -- ALTERNATE TABLE/ARRAY NAME IN COL 46-51 AND/OR 27-32 MISSING FOR ENTRIES IN
COLUMNS 33-45 AND/OR 52-57, ASSUME COL 33-57 AND/OR 46-57 BLANKWRG082 -- LENGTH OF TABLE/ARRAY ENTRY IN COL 40-42 OR 52-54 FOR ALPHA FIELDS EXCEEDS 256.
ASSUME 256 FOR NON-COMPILE TIME TABLE/ARRAY, OTHERWISE ASSUME 96WRG083 -- LENGTH OF TABLE/ARRAY ENTRY IN COL 40-42 OR 52-54 FOR NUMERIC FIELD
EXCEEDS 15, ASSUME 15WRG121 -- FROM FILE CANNOT HAVE AN E IN COL 17 OF FILE DESCRIPTION SPECIFICATION
WHEN TO FILE IS A DEMAND FILETRG126 -- LENGTH OF TABLE/ARRAY EXCEEDS MAXIMUM CORE STORAGEWRG130 -- TO FILE MUST BE A LIMITS FILE IF FROM FILE IS A RECORD ADDRESS FILE,
OR TO FILE MUST BE A RANDOM ACCESS FILE IF FROM FILE IS AN ADDROUT FILE,
CARD IGNOREDWRG390 -- SEQUENCE CHECKING IS NOT PERFORMED ON EXECUTION TIME ARRAYSWRG392 -- LAST ENTRY IN ONE OR MORE COMPILE TIME TABLE/ARRAYS EAS BLANKWRG401 -- ONLY ONE TABLE/ARRAY PER FILENAME ALLOWED FOR THIS DEVICE, CARD IGNOREDWRG500 -- FROM NAME INVALID OR MISSING FROM RA FILEWRG502 -- FROM FILENAME IS AN RA FILE THAT IS USED MORE THAN ONCEWRG503 -- TO FILENAME FOR RA FILE TYPE IS EITHER: 1-NOT A PRIMARY, SECONDARY OR
DEMAND FILE OR 2-IS MISSING,INVALID OR NON-DISK FILEWRG504 -- TO FILENAME IS INCORRECT FILE TYPEWRG567 -- TABLE RECORD SIZE GREATER THAN FROM FILENAME DEVICE RECORD SIZEWRG576 -- COMPILE TIME TABLE DATA FOUND. COMPILE TIME TABLE OR ARRAY NOT SPECIFIED IN EXTENSIONWRG577 -- ONLY ONE FILE ASSOCIATED WITH RA FILE IS ALLOWED PER PROGRAMWRG586 -- MORE THAN ALLOWABLE TABLE/ARRAY NAMES USED IN THE PROGRAMWRG593 -- TABLE/ARRAY NAME MISSING FOR 'TO' AND/OR 'FROM' FILENAMEWRG594 -- TO FILENAME MAY NOT BE USED WITH EXECUTION TIME TABLE/ARRAYWRG598 -- ALPHA TABLE/ARRAY SPECIFIED AS PACKED, ASSUME NUMERICWRG599 -- LENGTH OF ELEMENT FOR BINARY TABLE/ARRAY NOT SPECIFIED AS 4 OR 9,
DEFAULT TO 4 IF LENGTH SPECIFIED IS LESS THAN 4, OTHERWISE DEFAULT TO 9WRG645 -- IMPROPER USE OF THE PACK/UNPACK FEATURE FOR LIMITS FILE PROCESSINGWRG647 -- UNEQUAL KEY LENGTHS SPECIFIED FOR KEYS OF IDENTICAL FORMAT,
ASSUME KEY LENGTH OF LIMIT FILEFRG085 -- INVALID, MISSING OR UNDEFINED FILE NAMEFRG086 -- FILENAME IN COL 7-14 DOES NOT REFER TO A PRINTER FILEFRG087 -- FORM LENGTH ENTRY IN COL 15-17 INVALID OR GREATER THAN 112WRG088 -- INVALID OR MISSING FL ENTRY IN COL 18-19, ASSUME FLFRG089 -- OVERFLOW LINE ENTRY IN COL 20-22 INVALID OR GREATER THAN 112WRG090 -- INVALID OR MISSING OL ENTRY IN COL 23-24, ASSUME OLFRG091 -- OVERFLOW LINE IN COL 20-22 EXCEEDS FORM LENGTH IN COL 15-17, ASSUME FORM LENGTHFRG092 -- INVALID OR UNDEFINED FILE NAME IN COL 7-14FRG093 -- FILE AND RECORD TYPE ENTRIES IN COL 7-42 AND FIELD TYPE ENTRIES IN
COL 43-74 ON SAME LINE, ASSUME 43-74 BLANKFRG094 -- FILE AND RECORD TYPE DESCRIPTION MUST PRECEDE THIS SPECIFICATIONFRG096 -- AND LINE FOLLOWS LINE WITH NO RECORD IDENTIFICATION CODESWRG097 -- NO FIELDS DESCRIBED FOR THIS OR PREVIOUS RECORDWRG098 -- INVALID SEQUENCE ENTRY IN COL 15-16, ASSUME ALPHABETIC SEQUENCE ENTRYWRG101 -- NUMERIC SEQUENCE ENTRY IN COL 15-16 NOT IN ASCENDING ORDER OR THE FIRST
IS NOT 01, ASSUME PREVIOUS NUMERIC SEQUENCEOR 01 IF FIRST NUMERIC RECORDWRG102 -- INVALID NUMBER ENTRY IN COL 17 FOR NUMERIC SEQUENCE, ASSUME NWRG103 -- INVALID OPTION ENTRY IN COL 18 FOR NUMERIC SEQUENCE, ASSUME OFRG104 -- NUMBER/OPTION ENTRIES IN COL 17-18 INVALID WITH ALPHAMERIC SEQUENCE ENTRIESWRG105 -- NUMBER/OPTION ENTRIES IN COL 17-18 INVALID FOR AND/OR LINE, ASSUME BLANKFRG106 -- INVALID POSITION ENTRY FOR RECORD ID CODES IN COL 21-24, 28-31, OR 35-38,
OR TO POSITION COL 48-51, ASSUME 1WRG107 -- INVALID NOT ENTRY IN COL 25,32, OR 39, ASSUME NWRG108 -- INVALID C/Z/D ENTRY IN COL 26,33, OR 40, ASSUME CWRG109 -- INVALID STACKER SELECT ENTRY IN COL 42 OR NOT ALLOWED WITH DEVICE, ASSUME BLANKWRG110 -- STACKER SELECT ENTRY IN COL 42 INVALID WOTH AN AND LINE, ASSUME BLANKWRG111 -- INVALID ENTRY IN COL 43, ASSUME BLANKFRG112 -- INVALID OR BLANK FROM OR TO ENTRY IN COL 44-51, ASSUME 1 FOR BOTH ENTRIESFRG113 -- FROM ENTRY IN COL 44-47 EXCEEDS TO ENTRY IN COL 48-51, ASSUME ENTRY
EQUAL TO FROM ENTRYFRG114 -- LENGTH OF NUMERIC FIELD IN COL 44-51 EXCEEDS 15, ASSUME 15FRG115 -- ALPHAMERIC FIELD SPECIFIED AS PACKED OR BINARY, ASSUME NUMERIC FIELDFRG116 -- INVALID DECIMAL POSITION ENTRY IN COL 52, ASSUME 0WRG117 -- DECIMAL POSITION ENTRY IN COL 52 INVALID FOR ARRAY, ASSUME BLANKFRG118 -- FIELD NAME IN COL 53-58 MISSING OR INVALIDFRG119 -- INVALID CONTROL LEVEL INDICATOR IN COL 59-60, ASSUME BLANKFRG120 -- INVALID MATCHING FIELD ENTRY IN COL 61-62, ASSUME M1FRG158 -- TABLE NAME INVALID FOR A FIELD NAME ENTRY IN COL 53-58WRG159 -- MISSING RECORD IDENTIFYING INDICATOR IN COL 19-20FRG160 -- FILE NAMED IN COL 7-14 NOT SPECIFIED AS INPUT, COMBINED, UPDATE-PRIMARY,
SECONDARY, DEMAND, OR CHAINED FILEWRG162 -- RECOR DIDENTIFYING INDICATOR IN COL 19-20 INVALID FOR AN AND LINEFRG163 -- ENTRIES IN COL 17-18 AND 21-42 INVALID FOR LOOKAHEAD RECORD, ENTRIES IN 59-74
INVALID FOR LOOK AHEAD FIELDWRG164 -- STACKER SELECT ENTRY IN COL 42 INVALID FOR DEVICE SPECIFIED,
ASSUME BLANKFRG165 -- INDICATORS IN COL 65-70 INVALID FOR A TABLE/ARRAYFRG166 -- PLUS OR MINUS INDICATOR IN COL 65-68 INVALID FOR ALPHAMERIC FIELDFRG167 -- RECORD ID POSITION 21-38 OR TO ENTRY IN COL 48-51 EXCEEDS RECORD LENGTH,
ASSUME RECORD LENGTHFRG168 -- FIELD NAME IN COL 53-58 IS A RESERVED WORD OTHER THAN PAGEFRG169 -- CONTROL OR MATCHING FIELDS INVALID FOR ARRAY OR TRAILER RECORDFRG170 -- MATCHING OR CONTROL FIELDS INVALID WITH DEMAND OR CHAIN FILESFRG171 -- LOOK AHEAD RECORDS INVALID WOTH DEMAND FILES, CHAIN FILES,
FILES CONTAING SPREAD CARDS, OR WITH THIS DEVICEFRG172 -- INCORRECT SEQUENCE OF INPUT SPECIFICATIONSFRG173 -- NO FIELDS SPECIFIED FOR LOOK AHEAD RECORDFRG175 -- STERLING ENTRY IN COL 71-74, BUT OMITTED FROM HEADER CARDFRG176 -- SIGN POSITION ENTERED IN COL 71-74 EXCEEDS RECORD LENGTHFRG177 -- DECIMAL POSITION ENTRY IN COL 52 BLANK OR GREATER THAN 3 FOR STERLING FIELDFRG178 -- STERLING OR BINARY INVALID WOTH CONTROL OR MATCHING FIELDSFRG179 -- SIGN POSITION ENTRY, OTHER THAN STANDARD, IN COL 71-74 INVALID FOR STERLING ARRAYSFRG180 -- ARRAY LENGTH EXCEEDS LENGTH SPECIFIED IN COL 36-42 IN EXTENSION SPECIFICATIONS
OR NOT A MULTIPLE OF ENTRY LENGTH IN COL 40-42 IN EXTENSION SPECIFICATIONSFRG181 -- INCONSISTANT FIELD LENGTHS FOR CONTROL OR MATCHING FIELDS OF ONE
LEVEL, ASSUME FIRST VALID LENGTHFRG182 -- INVALID SPLIT CONTROL FIELD SPECIFICATION, ASSUME PREVIOUS TOTAL LENGTH FOR THIS LEVELWRG183 -- CONTROL OR MATCHING FIELDS OF A LEVEL SPECIFIED AS BOTH ALPHAMERIC AND
NUMERIC, ASSUME NUMERICFRG184 -- ALL OF THE VALID MATCH LEVELS WERE NOT REFERENCED IN LAST RECORD GROUPFRG186 -- MATCH OR CONTROL FOELDS WITHOUT FIELD RECORD RELATION ENTRIES MUST PRECEDE
MATCH OR CONTROL FIELDS WITH FIELD RECORD RELATION ENTRIES, ASSUME PART
OF A NEW GROUP OF MATCH FIELDSFRG187 -- MATCH AND CONTROL FIELDS WITH FIELD RECORD RELATION ENTRIES MUST BE
GROUPED ACCORDING TO THE FIELD RECORD RELATION INDICATOR. ASSUME NEW 
GROUP OF MATCH FIELDSFRG188 -- FIELD REOCRD RELATION INDICATOR USED IMPROPERLY WITH MATCH OR CONTROL FIELDSWRG314 -- RECORD IDENTIFICATION CODES ARE MISSING (COLS. 21-41)FRG317 -- NUMBER OF DECIMAL POSITIONS SPECIFIED EXCEEDS FIELD LENGTHWRG325 -- ALL INPUT, UPDATE, AND COMBINED FILES CONDITIONED BY EXTERNAL INDICATORSFRG327 -- SPLIT CONTROL FIELDS SPECIFIED MAY NOT HAVE PARTS THAT ARE PACKEDFRG511 -- PACKED LENGTH GREATER THAN 8 FOR A FIELD, TABLE OR ARRAYFRG570 -- LOOK AHEAD WITH NUMERIC SEQUENCE OR LOOK AHEAD FOLLOWS A NUMERIC RECORDFRG580 -- REFERENCED A MATCH LEVEL WHICH IS NOT VALID, OR DEFINED A LEVEL MORE THAN ONCEFRG583 -- BINARY LENGTH SPECIFIED GREATER THAN 9, ASSUME 9FRG584 -- THIS MATCH LEVEL WAS REFERENCED PREVIOUSLY IN THIS RECORD GROUPFRG621 -- TRAILER RECORD OVERLAPS HEADER RECORDFRG622 -- NO TRAILER FIELDS FOR SPREAD CARDFRG623 -- ENTRIES IN COL 7-18 AND 21-74 INVALID FOR TR SPECIFICATION, ASSUME NO TRFRG624 -- TR SPECIFICATION OUT OF ORDERFRG628 -- INVALID FILE TYPE FOR SPREAD CARDFRG634 -- STERLING INVALID FOR SPREAD CARDWRG635 -- NUMERIC SEQUENCE CHECKING SPECIFIED FOR A SPREAD RECORD, BUT N
NOT SPECIFIED FOR NUMBER, ASSUME NFRG095 -- AND OR OR LINE OUT OF ORDERWRG122 -- FIELD WAS PREVIOUSLY DEFINED WITH DIFFERANT LENGTH OR DECIMAL POSITIONS.
ASSUME FIRST DEFINITION - OR FIELD IS NOW DEFINED AS LOOK AHEAD FIELD.FRG123 -- INVALID ENTRY IN COL 7-8WRG124 -- INVALID ENTRY IN COL 9, 12, OR 15; ASSUME NFRG125 -- INVALID FIELD NAME OR CONSTANT FOR FACTOR 1 IN COL 18-27WRG127 -- ENTRY IN COL 49-51 INVALID WITH NO RESULT FIELD, ASSUME 49-51 BLANKFRG128 -- INVALID OPERATION CODE ENTRY IN COL 28-32FRG129 -- FACTOR 2 FIELD NAME IN COL 33-42 EXCEEDS 6 CHARACTERSFRG131 -- FACTOR 2 IN COL 33-42 INVALIDFRG132 -- FACTOR 2 MUST BE A FILENAMEFRG133 -- NUMERIC FIELD LENGTH EXCEEDS 15; ASSUME 15FRG134 -- ALPHANUMERIC FIELD LENGTH EXCEEDS 256; ASSUME 256FRG135 -- INVALID RESULT FIELD ENTRY IN COL 43-53FRG137 -- INVALID RESULT FIELD LENGTH IN COL 49-51; ASSUME 15 FOR NUMERIC OR 256
FOR ALPHANUMERIC FIELDFRG138 -- DECIMAL POSITION ENTRY IN COL 52 INVALID WITH NO FIELD LENGTH ENTRY IN
COL 49-51; ASSUME BLANKFRG139 -- INVALID DECIMAL POSITION ENTRY IN COL 52; ASSUME 0WRG140 -- INVALID HALF ADJUST ENTRY IN COL 53; ASSUME HWRG141 -- DEBUG CALCULATION OPERATION USED, BUT DEBUG OPTION NOT SPECIFIED IN THE CONTROL CARDFRG161 -- AND OR OR LINE INVALID WITH LOOK AHEAD RECORDS OR RLABLFRG189 -- INVALID SEQUENCE FOR CALCULATION SPECIFICATIONS OR SR NOT SPECIFIED IN
COLUMNS 7-8 WITH BEGSR OR ENDSRFRG190 -- INVALID SEQUENCE FOR BEGSR AND ENDSR OPERATION CODESFRG191 -- A SUBROUTINE MUST NOT CALL ITSELFFRG192 -- BRANCHING BETWEEN SUBROUTINE AND OTHER CALCULATIONS INVALIDFRG193 -- BRANCHING BETWEEN DETAIL, TOTAL AND LR CALCULATIONS INVALIDFRG194 -- SETOF OPERATION INVALID FOR LR INDICATORFRG195 -- LENGTH OR SEARCH WORD NOT EQUAL TO LENGTH OF ELEMENT IN TABLE OR ARRAYFRG196 -- FACTOR 2 OR RESULT FIELD INVALID FOR LOOKUP OPERATIONWRG197 -- SEARCH TABLE HAS MORE ENTRIES THAN RELATED TABLEFRG198 -- INDICATOR ENTERED IN COL 54-57 INVALID WITH LOKUP ON AN UNSEQUENCEED TABLEFRG199 -- TEST FOR BOTH HIGH AND LOW INVALID FOR LOKUP OPERATIONFRG200 -- RESULTING INDICATORS IN COL 54-59 REQUIRED OR NOT ALLOWED FOR OPERATION SPECIFIEDWRG201 -- HALF ADJUST ENTRY IN COL 53 FOR DIVISION OPERATION FOLLOWED BY A MVR OPERATION;
ASSUME NO HALF ADJUSTFRG202 -- MVR OPERATION CODE DOES NOT FOLLOW DIV OPERATIONWRG204 -- HALF ADJUST ENTRY IN COL 53 INVALID FOR OPERATION OR NUMBER OF DECIMAL
POSITIONS SPECIFIED; ASSUME BLANKFRG205 -- COMP, TESTZ, OR MVR INVALID FOR AN ARRAYFRG206 -- INVALID USE OF COMP OR LOKUPFRG207 -- FIELD TYPE, ALPHANUMERIC OR NUMERIC, INVALID FOR OPERATION SPECIFIEDFRG208 -- FORCE OPERATION INVALID AT TOTAL TIMEFRG209 -- FILE TYPE INVALID FOR USE WITH THIS OPERATION CODEFRG211 -- DEBUG SPECIFIED FOR MORE THAN ONE OUTPUT FILEWRG212 -- EXCPT OPERATION CODE SPECIFIED BUT NO EXCPT OUTPUT RECORDS SPECIFIEDFRG213 -- EXSR DOES NOT REFERANCE A BEGSR NAMEFRG214 -- GOTO BRANCHES TO A BEGSR NAMEFRG215 -- FACTOR 1 ENTRY IN COL 18-27 MISSINGFRG216 -- FACTOR 1 ENTRY IN COL 18-27 INVALID FOR THIS OPERATIONFRG217 -- FACTOR 2 ENTRY IN COL 33-42 MISSINGFRG218 -- FACTOR 2 ENTRY IN COL 33-42 INVALID FOR THIS OPERATIONFRG219 -- RESULT FIELD IN COL 43-48 MISSINGFRG220 -- RESULT FIELD ENTRY IN COL 43-48 INVALID FOR THIS OPERATIONWRG221 -- RESULT FIELD LENGTH MAY NOT BE LARGE ENOUGHFRG223 -- SUBROTUINE SPECIFICATIONS ARE ONLY CALCULATION SPECIFICATIONSFRG224 -- A ZERO CONSTANT INVALID AS DIVISOR IN COL 33-42FRG225 -- CONDITIONING INDICATORS IN COL 9-17 INVALID WITH TAG, BEGSR, ENDSR, OR
RLABL OPERATIONFRG226 -- A RESERVED WORD OTHER THAN PAGE INVALIDFRG227 -- RESULT FIELD IN COL 43-48 IS A LOOK AHEAD FIELD OR CONSTANTFRG228 -- INVALID INDEXFRG229 -- INDEXING INVALID FOR TABLES OR FIELDSFRG231 -- GOTO DOES NOT BRANCH TO A TAGFRG232 -- THIS NAME WAS PREVIOUSLY USED ON A TAG, BEGSR, OR ENDSRFRG337 -- INVALID SEQUENCE FOR EXIT AND RLABL OP CODESFRG338 -- SUBR MUST BE USED WITH EXIT OP CODEFRG388 -- FACTOR 1 MUST BE EITHER A FIELD NAME OR A LITERAL WHEN USED WITH DEBUG OPERATIONFRG391 -- A FIELD WITH A LENGTH GREATER THAN 8 CHARACTERS CANNOT BE USED IN FACTOR 1 WITH DEBUG OPERATIONFRG516 -- MORE THAN 7 AN/OR LINES SPECIFIEDFRG517 -- AN/OR LINES OUT OF ORDERWRG518 -- NO INDICATORS GIVEN WITH AND/OR LINESFRG519 -- COLUMNS 18-59 ARE INVALID WITH AN/OR LINES OR OP-CODE IS MISSING WITH
INDICATORS PRESENT, ASSUME BLANKFRG520 -- THIS LINE NOT AN AN/OR LINE AND PREVIOUS LINE HAS NO OP-CODE; OR THIS LINE
HAS NO INDICATORS AND NO OP CODEWRG521 -- MINUS INDICATOR IS NOT ALLOWED FOR TEST BIT OPERATION OF ONLY 1 BITWRG522 -- ALL THREE RESULTING INDICATORS ARE THE SAMEFRG523 -- A NEGATIVE FACTOR FOR THE SQUARE ROOT OPERATION IS NOT ALLOWEDFRG524 -- WHOLE ARRAYS ARE NOT ALLOWED AS FACTOR 1 WITH DISPLAY OR CHAIN OP CODEFRG525 -- OPERATION CODE IS INVALID FOR DEVICE TYPE OR MODE OF PROCESSINGFRG552 -- Factor 1 and Result Field must not both be blank with DSPLY operationFRG557 -- MASK FOR BIT OPERATION IS NOT 0-7WRG558 -- INVALID USE OF (OR MISSING) RESULTING INDICATORS WITH THIS OP CODE.
ASSUME INVALID RESULTING INDICATORS BLANK.FRG581 -- MISSING OR INVALID AN/OR ENTRY IN COL 7-8WRG582 -- THE RELATIVE RECORD NUMBER FOR THE CHAIN OPERATION MUST BE NUMERIC WITH 0 DECIMALFRG585 -- DISPLAY, CHAIN, OR DEMAND FILE SPECIFIED, BUT APPROPRIATE OPERATION
CODE NOT FOUND IN CALCULATTION SPECIFICATIONSFRG587 -- IF FACTOR 1 OR FACTOR 2 IS A WHOLE ARRAY, RESULT FIELD MUST BE WHOLE ARRAYFRG588 -- TESTB, BITON, AND BITOF MAY NOT REFERENCE ENTIRE ARRAYFRG589 -- RESULT FIELD MUST BE A ONE-POSITION ALPHANUMERIC FIELD. IF FACTOR 2 IS A
FIELD NAME, IT MUST BE A ONE POSITION ALPHAMERIC FIELDFRG590 -- WHENEVER HIGH IS USED IN A MOVE ZONE OPERATION, IT MUST REFERENCE AN ALPHAMERIC FIELDFRG591 -- LENGTH OF FIELD IN FACTOR 1 NOT EQUAL TO KEY LENGTH OF FILE SPECIFIED IN FACTOR 2FRG625 -- FACTOR 1 MUST BE NUMERIC FOR CHAIN OPERATION WHEN FACTOR 2 FILENAME HAS PACKED KEYSFRG646 -- RESULT FIELD FOR XFOOT MAY NOT BE AN ENTIRE ARRAYFRG700 -- FACTOR 1 MUST BE NUMERIC, IF FACTOR 2 IS NUMERICFRG701 -- FACTOR 2 MUST BE NUMERIC, IF FACTOR 1 IS NUMERICFRG702 -- FACTOR 1 MUST BE ALPHA, IF FACTOR 2 IS ALPHAFRG703 -- FACTOR 2 MUST BE ALPHA, IF FACTOR 1 IS ALPHAFRG704 -- FACTOR 1 NOT DEFINEDFRG705 -- FACTOR 2 NOT DEFINEDFRG706 -- OPERATION NOT IMPLEMENTED IN COMPILERFRG707 -- RESULT FIELD IS NOT DEFINEDWRG708 -- GARBAGE ON CARD, CARD IS IGNORED, BUT YOU BETTER CLEAN UP YOUR ACTWRG709 -- CARD HAS NO INDICATORS AND NO OPERATIONFRG710 -- FACTOR IMPROPERLY DEFINEDFRG711 -- RESULT FIELD IN COL 43-48 MUST BE NUMERIC FOR THIS OPERATIONFRG712 -- RESULT FIELD CANNOT BE WHOLE ARRAY UNLESS FACTOR 1 OR
FACTOR 2 IS ALSO A WHOLE ARRAYFRG713 -- Result field must be of length 6 or length 12 for the TIME operationFRG714 -- Result field must have 0 decimal positions for the TIME operationFRG715 -- Result field cannot be whole array for the TIME operationFRG716 -- Factor 2 must be whole array for XFOOT operationFRG142 -- FILE AND RECORD IDENTIFICATION ENTRIES IN COL 7-22 AND FIELD
DESCRIPTION ENTRIES IN COL 32-74 ON SAME LINE, 7-22 ASSUMED BLANK.FRG143 -- INVALID LINE TYPE ENTRY IN COL 15FRG144 -- AND OR OR LINE NOT PRECEDED BY RECORD IDENTIFICATIONWRG145 -- INVALID ENTRIES IN COL 17-22 FOR AND LINE, ASSUME BLANKFRG146 -- INVALID FILENAME OR ENTRY IN COL 15 MISSING ON FIRST OUTPUR SPECIFICATIONWRG147 -- INVALID NOT ENTRY IN COL 23, 26 OR 29; ASSUME BLANKFRG148 -- INVALID FIELD NAME IN COL 32,37FRG149 -- INVALID OR MISSING CONSTANTFRG150 -- INVALID BLANK AFTER ENTRY IN COL 39; ASSUME BLANKFRG151 -- MISSING OR INCORRECTLY SPECIFIED END POSITION IN COL 40-43; ASSUME END POSITION 1WRG152 -- INVALID ENTRY IN COL 44; ASSUME BLANKWRG153 -- END POSITION IN COL 40-43 INVALID FOR *PRINT; ASSUME BLANKFRG154 -- ENTRIES IN COL 7-22 INVALID FOR A FIELD DESCRIPTION SPECIFICATION, ASSUME BLANKFRG155 -- INVALID STERLING SIGN POSITION ENTRY IN COL 71-74; ASSUME BLANKWRG256 -- STACKER SELECT ENTRY IN COL 16 INVALID FOR OUTPUT DEVICE, ASSUME BLANKWRG257 -- INVALID STACKER SELECT ENTRY IN COL 16; ASSUME DEFAULT STACKERWRG258 -- SPACE AND/OR SKIP ENTRIES IN COL 17-22 INVALID FOR DEVICE, ASSUME BLANKWRG259 -- INVALID SKIP ENTRIES IN COL 19-22 OR GREATER THAN THE FORM LENGTH
SPECIFIED, ASSUME BLANKWRG260 -- INVALID SPACE ENTRIES IN COL 17-18; ASSUME SPACE 1 AFTER OR BLANKWRG261 -- FETCH OVERFLOW ENTRY IN COL 16 INVALID FOR DEVICE; ASSUME BLANKFRG262 -- OVERFLOW INDICATOR INVALID FOR AN EXCEPT RECORDWRG263 -- FETCH OVERFLOW INVALID WITH OVERFLOW INDICATOR ENTERED IN COL 23-31;
ASSUME NO FETCHFRG264 -- OVERFLOW INDICATOR USED IS NOT ASSIGNED TO THIS FILEWRG265 -- 1P INDICATOR INVALID WITH TOTAL OR EXCPT RECORDSWRG266 -- FETCH OVERFLOW INVALID WITH 1P INDICATOR, ASSUME NO FETCH OVERFLOWFRG267 -- 1P INDICATOR INVALID FOR A COMBINED FILEWRG268 -- SPECIFIED OR IMPLIED SPACE BEFORE OF ZERO IS INVALID FOR CONSOLE FILE.
ASSUME SPACE BEFORE OF ONEFRG269 -- INVALID INDICATORS USED IN AN AND RELATIONSHIP WITH 1PFRG270 -- END POSITION ENTRY IN COL 40-43 FOR CONSTANT, EDIT WORD, FIELD,
OR ARRAY EXCEEDS RECORD LENGTHFRG271 -- LENGTH OF ARRAY, ARRAY ELEMENT OR FIELD EXCEEDS RECORD LENGTHFRG272 -- END POSITION IN COL 40-43 FOR CONSTANT, EDIT WORD, FIELD, OR ARRAY
TOO LOWWRG273 -- OUTPUT INDICATORS IN COL 23-31 MISSING OR ALL NEGATIVEWRG274 -- OUTPUT INDICATORS MISSING FOR AN AND OR OR LINEFRG276 -- INVALID EDIT CODE IN COL 38WRG277 -- INVALID EDIT WORD SIZEFRG278 -- EDIT CODES INVALID WITH FIELDS OTHER THAN UNPACKED NUMERIC FIELDS OR CONSTANTS
OTHER THAN * OR $FRG279 -- CONSTANTS IN COL 45-70 INVALID FOR X, Y, AND Z EDIT CODESWRG280 -- FIELD LENGTH FOR Y EDIT CODE LESS THAN 3 OR GREATER THAN 6FRG281 -- DECIMAL POSITIONS INVALID FOR FIELD EDITED BY Y CODEFRG282 -- NAME OF FIELD TO BE EDITIED, BY CODE SPECIFIED IN COL 38, MISSINGFRG283 -- INVALID FILE TYPE FOR OUTPUT RECORDFRG285 -- T OR E ENTRY IN COL 15 INVALID FOR COMBINED FILEFRG286 -- *PRINT INVALID FOR DEVICEFRG287 -- OPERATION IN COL 40  INVALID FOR DEVICEWRG288 -- BLANK AFTER ENTRY IN COL 39 INVALID WITH RESERVED WORD OTHER THAN PAGE;
ASSUME BLANKFRG289 -- *PRINT PRECEDES ALL FIELD NAMES AND CONSTANTSFRG290 -- *PLACE PRECEDES ALL FIELD NAMES AND CONSTANTSFRG291 -- INVALID ENTRIES IN COL 38, 39, OR 44-74 FOR OUTPUT OPERATION, ASSUME BLANKSWRG293 -- BLANK AFTER SPECIFIED FOR A CONSTANTFRG294 -- STERLING ENTRY IN COL 71-74 BUT OMITTED FROM HEADER CARDFRG295 -- STERLING USED WITH EDIT CODE OTHER THAN ZFRG296 -- STERLING SPECIFIED FOR ALPHAMERIC FIELDFRG297 -- STERLING SPECIFIED FOR FIELD WITH MORE THAN THREE DECIMAL POSITIONSFRG298 -- STERLING SIGN POSITION IN COL 71-74 EXCEEDS RECORD LENGTHFRG300 -- VALUE OF ARRAY INDEX EXCEEDS NUMBER OF ARRAY ELEMENTSWRG302 -- BLANK AFTER ENTRY IN COL 39 INVALID FOR LOOK AHEAD FIELD; ASSUME BLANKFRG304 -- INVALID INDICATOR OR IMPROPER USE OF A VALID INDICATORWRG313 -- *PRINT SPECIFIED MORE THAN ONCE FOR A RECORDWRG328 -- STERLING FIELDS SPECIFIED AS PACKEDWRG329 -- PACKED OR BINARY DATA NOT VALID FOR DEVICEFRG330 -- ALPHAMERIC FIELD SPECIFIED AS PACKED OR BINARYFRG335 -- EDIT WORD SPECIFIED WITH OTHER THAN UNPACKED NUMERIC FIELDSWRG389 -- L0-L9 INDICATOR SPECIFIED IN AN OR RELATIONSHIP WITH LRFRG394 -- 'ADD' IN COL 16-18 NOT ALLOWED ON AND/OR LINES, ASSUME BLANKWRG397 -- FILE DESCRIBED AS 'ADD' TYPE FILE, EACH OUTPUT LINE MUST HAVE 'ADD' IN
COL 16-18. ASSUME 'ADD'FRG592 -- FOR SEQUENTIALLY PROCESSED UPDATE FILE - T ENTRY IN COL 15 IS INVALID
OR L0-L9 INDICATOR USED WITH E IN COL 15FRG596 -- INDICATORS MAY NOT BE USED WITH *PLACEFRG597 -- END POSITION SPECIFIED FOR *PLACE LESS THAN TWICE THAT OF HIGHEST
PREVIOUSLY SPECIFIED FIELD END POSITION OR END POSITION GREATER THAN 256FRG022 -- INVALID ENTRY IN COL 6 OR SPEC TYPE OUT OF SEQUENCEFRG320 -- INVALID ALTERNATE COLLATING SEQUENCE DATA RECORDFRG321 -- INVALID, UNDEFINED, OR TABLE FILENAME ON FILE TRANSLATION DATA RECORDFRG322 -- ALTERANATE COLLATING SEQUENCE OR FILE TRANSLATION DATA INVALIDWRG333 -- TABLE/ARRAY FULL OR NO TABLE/ARRAYS FOR FOLLOWING DATAWRG334 -- SHORT TABLEFRG554 -- ADD SPECIFIED ON THE FILE DESCRIPTION SPEC BUT ADD NOT REFERANCED ON OUTPUTFRG555 -- NO ADD SPECIFIED ON FILE DESCRIPTIONFRG562 -- FILE TYPE FOR FROM FILENAME AND/OR TO FILENAME INVALID WITH TABLE/ARRAYFRG575 -- NO INPUT SPECIFICATIONS FOUND FOR THIS FILEFRG717 -- Field name specified is undefined(:

d:

i:

o:

u:"\:
::

:::":,:1:::C:H:O:U:Q:V:^:g:n:w:~::::!:/:4:>:E:K:S:b:r:+:0:7:>:D:L:R:[:a:m:!:u:|::
::!:):2:::F:L:R:[:c:h:q:{::
::::$:}:%:5:8:>::E:M:R::Y:]:a:f:l:q:|::W:`:f:n:x::::: :%:,:3:<:C:M:]:h:r:}:::*:$:/:6:::A:H:N:V:]:c:k:r:{::

:::: :$:R:Z:b:j:u:}: : 
: : : !: ): .: 9: @: K: R: [: b: h: l: o: z:!:!:!:!:!:!":!&:!+:!5:!;:!A:!J:!O:!V:![:!`:!h:!o:!v:!~:\:c:o:{::":3:::"b:"h:"p:A:I:"
:":":"x:"~:":+:0::!:

}:$:5:"": :?:':"):"0:*:2:6:.:;:B:I:P:V:^:i:p:u:{::::: :&:.:5:::?:7:<:C:Q:Q:J:N:R:W:b:n:v:|::

:H:N:U:_:g:o:v:}:::#:#
:: :::#::":U:':0:X:7:::#:]:g:A:a:,:2:j:p:;:n:H:P:W:e:o:";:u:|:"H:"M::
:w:|::	:x:::::::":&:+:/:7:<:@:G:Q:Y:a:h:#Z,[:X ^i &*>j +`\+&`\ +&`\+& <&+& <&+&7&  <&!
&p
&&$ &&.8
"`|p+&
&&&!&*> i+&y`iUnknown APR trapPush-down overflowIllegal memory reference&Reference to non-existant memory at location $

+
,(&5H&',~,>  	t`t ah+&-,^,~,^,&/+&9,&/+&?
&'j,>,>  ,&] 6
"6\ ,&]R 4\&6 6
",&],^,^
&'m,~
&'m+&0  	hah@ +&?
&'p	bah +&?ah :x:x,~
&'s+&r,&L
&'uZ,&X &K[p0Z8*|&CZp
&pa`d +&r'u

'w'z'|4'd(l(t((
D&G ,&] (
"6\,&]7\+&Q (
",&]7\+&W (-
"[,&X (
"Z,&X (.
"
&'m,~ (

`zp4H&Y.(
"azp,~+&Z (

4V&a.6
"`tp+&^,~(A`QHx+&c,(&x5H&c:x,~4(
&( (.(
"`tp+&j
&'m+&yCAGFPDMJ  ``	` <A( b1z!+p ( Z9+&x \9 < \<+1 ^p >i*>p-:& 4+&}-:& 4 ( Z9 T<+16\c \(!<r+@.(2\(+' b+h Ti4(0t+',T' i,~ Hi
&(>x (.(
"`tp+'	
&'m i i+&y''Z+'e@ `4V'82H9':x,~[0:+'ZQ.l'_56'Zl' Yl',~,l' +'
&(+&iCBHFQENKLO)i)g)o)m){)k)w)s)u)y K*\'( \KA< \K,~,)s+'% F*\', \FA< \G,~,)m+') (.R_56'1ZR XR,~,)}+'- ,> 8':,'a+'9((1H+'9,^:x>@,~
&(,~,^,~$#"&$!' TSX4p@@p*4p ,~0H,~=X'B:x,~ Z0:+'NZl&n7l'O3V+'L.l'TZl'3<+'G ,~  :x,~
&(!+&i(U(d)
)(($0(0h,~ ($4H'c1H+'b1h1(,~0h

0(a,~`zp+'[:x,~azp+'b4H'c,~ X b/8 x(%  /8x(%,)c ,~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$

H

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+(2FF+(.FFF (^,&8,^+(( (,(& (>` +(&+(<  0(,~ (,(&: !O@W (,(& ( H  b1(#+(J,>,>7(P,(&5H(A !,(K;zW+(F (,(&,(K,(67(P,(&5H(G,^,^,(6+(64:(O&:Q\x6@,(K[x.(+(&((Q+(&HFHR:*4$

$<p

p

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$<pHpFpDp$HpHp$HpHp$HpHppB

p<

p6

p2p.p&p$pHp00p,p pppp
pp8 p( pppp$HpHp$Hp"pp$HpHp$HpHppDp,0p$p

0p
pppppFp8p*p&p"p
0ppp*<p"p p$pppp$HpHpp$HpHp$HpHp$Hp8 p( p p ppp8 p( p&p$p

p0ppp00p<ppFpDp4 p0pp
 pp ppppp<p:p8p$(pHp>p$4pHp>p$4pHpFpBp@p:p4

p2p0p,p(p$pHp$HpHp$0pHppp$HpHp$HpHp$HpHp$HpHp"LpHpB

p	>p	<p	Hp	p	p
$

p
p
0p
6$p$$pHppp

p

ppppB

0$($0$D@HHF*86



?`x+)eHw,~n+)d (s+&. \ )h+*%@A \ )j+*C \ )l+* D \ )n+*

@F \ )p+*

@G \ )r+*PI \ )t+*J \ )v+* L \ )x+* M \ )z+*O \ )|+*	0P \ )~+*R \ *+*`S \ *.*<[U[3t+*,*(Z@.4ZV,* 4.T@.TV.TV.T@6@A.TA!4.TU 7@P+*ZPZU/!X.o *.*<Y+ [.4.VP.VP6@P.VP6@P+*ZR"`.Tp.TpY.TU!*/*< ,~ A4| 8W|38 !X<`*<X3X,~ 6W/4+* 8 \8@@8/.*n+*G43T,~	t+*-+**Z.4	t+*,Z.4 Tc,~
&*/+&r
&*4	`8E$ 8?Not enough core to continue compilation
?Not enough core to start compilation