PDP-10 Archive: 70,6067/isacon/vag001.exe from tops10and20_integ_tools_v9

Trailing-Edge - PDP-10 Archives - tops10and20_integ_tools_v9_3-aug-86 - 70,6067/isacon/vag001.exe

There are 5 other files named vag001.exe in the archive. Click here to see a list.

?p@?xm:Kb)1<U_1`INXQF:ysN:AZQ^	NP;E@

+*>	``@`O@X9(2+++`}~\4G4O(20t@Listing file             >     COPY 	COPY		COPY  COPY	 File language (.FL) name >    Select name              >    VAG001:  File Language File Generator - Version 1       C\y2s:
`G",:x_&v@I4\YKIft4FKZ.. M&dS9i&\`S:$^HSLWH[>$P_J<Tu%w]/	2etKve|R
@e|RS:8
ySbe|Rfe\[JgdXz
@gY7i&o'%CJ(Y>0EtCJ

=eL A;wiMl` B$!I&oJNM\MHA
2K;%TG%w A` BdRX!6|I _K~)A

RG?J7N"A>)1_J&0 C%p!W\F]Vl)9mfY CN[RS:8(H7V"[T\W\AG>n
G>n{8D V{8Dw[@j0AXw[@j0G>n
G>n{8kRJ7]aT( V{8Dw[C.H:S>t&AXw[@j0I[RS:8($\qK:%S"H	gBd AYgBd I'r50
I'r%xYIU` V%xYH
7I@AZ7I@S:$^H)N0 @
ZgPE
PUWJ3S *\^  @qGW0E_8` P

GS.)E@e$YT]	\e$P \e$\tO8E`gft0*QQJ}j=K"P

.83J T
pmfY9+=	7 @4

	M&bG>{Y'J7N65TH @lH>$>

P>@HH@ABHpBEM&dS6C:>X3J65T8 @HN+ -<G-8
:<@@-<
+BINXINX* @"@$H$L$P$H$L$P&@&P D X L @"@$H$L$P$H$L$P&@&P D X L "$&(*, " " "gdXzI$MQfPbbP> <;,+,~4m:7H 6@<,<O@< \< <
,;,~@m:+B,~,~ 
. ( 8,X  
/ ( 8,X 2D+> n @= 
/ ( 8,X  
0 ( 8,X 2D+( <0,K <1,K <2,J <2,K <3,J <3,K <0,K m @b   @@+> <0,K <5,K <2,J <2,K <3,J <7,K <8,K 
; ( 8,X  < )n <h=,Y <>,J <>,K 
? ( 8,X  < )n ?h=,Y <@,J <@,K7@;+B>;[x2P;,M>;+2,~

,~:=:;!X2H,>0S+3+L:=:;!X2L,> 0\+3 b3@d+N+N+H:>:;!X2R,> 0+3,,~@@=@@b <0,K <A,! <0,K7@=+[>=[x2P;,M>;+2,~ m @b+a:>:;!X2a,> 0A+3 b3@e+c+d+^ b2@d+o m @bZ$dA@@=+l:?:;!X2l,> 0s+3 b3@d+n+n+h@@b7@=+s>=[x2P;,M>;+2,~+x:?:;!X2x,> 0d+3 b3@e+z+z+t b2@d+:@:;!X2,> 0y+3 p @=:@:;!X2,> 0
+
+   @b7@?+>?[x2P;,M>;+2,~ =2@V+ B,! K2@]+ B,!7@>+>>[x2P;,M>;+2,~ C"C3B+U 
D (4@nhD+U:A:;!X2",> 0W+3 
F ( 8,X  
F ( 8,X 2D+,:B:;!X2,,> 0	+3+V 
F ( 8,X  
G ( 8,X 2D+6:B:;!X26,> 0	]+3+V 
F ( 8,X  
G ( 8,X 2D+@:C:;!X2@,> 0
R+3+V 
F ( 8,X  
H ( 8,X 2D+J:C:;!X2J,> 0#+3+V 
F ( 8,X  
H ( 8,X 2D+T:D:;!X2T,> 0

+3+V+V+V m @= 
F ( 8,X  
I ( 8,X 3D+d 
F ( 8,X  
I(8,X3D+d=2@U+wm@b+i:?:;!X2i,> 0d+3 b3@e+k+k+e b2@d+v@@=Z$dA:@:;!X2r,> 0y+3:@:;!X2u,> 0
J J ( .hK+	 r F@#
 Kh=,Y <0,K L De M*(m 
M J^ .( N_   @_ <U,n <^,! <0,K+	A 
J ^ ( .hD+	 m @=+	A:A:;!X2	,> 0W+3 
J _ ( .hD+	 m @=+	A q F@#
 Kh=,Y <0,K <_,K <`,J <0,K K2@]+	6 B,! n @K a,  m @K =2@w+	5 
a J^ .; N_   @_ <e,n:D:;!X2	5,> 0K+3+	A+	A+	A a,  m @K =2@w+	A 
a J^ .; N_   @_ <e,n:D:;!X2	A,> 0K+3 
F ( 8,X  
G ( 8,X 2D+	X#4`	X m @=   @K6pK0p,K/0$0pk`p`+	Od0p.lQ(KX(@*(@:E:;!X2	T,> 0+3@@K r F@#
 Kh=,Y7@B+	\>B[x2P;,M>;+2,~ n @@@J   @E7E"E&"4B	d#BE.bJ0b+	`+	e+	q6jJ0j,K/*$*

jl m ( .hD+	p6jJ0j,K/*$*

jl m ( .hm+	`+	` m @ 2@t+
(6jJ0j,K/*$*

jn ( 8,X  
o ( 8,X 2D+
6jJ0j,K/*$*

jo ( 8,X 4`
6jJ0j,K/*$*

jo ( 8,X  @K6jJ0j,K/*$*

jp6pK0p,K/0$0pk ( .hp,MZ$6tK0t,K/4$4tq "D=b
:E:;!X2
,> 0+3@@K+
4+
4+
46jJ0j,K/*$*

jn ( 8,X  
q ( 8,X 2D+
'6jJ0j,K/*$*

jo ( 8,X  @K+
4+
4+
4 K4`
46pK0p,K/0$0pk`p`+
.d0p.lQ(
X(@*(@:E:;!X2
3,> 0+3@@K#4`
E m @=   @K6pK0p,K/0$0pk`p`+
<d0p.lQ(KX(@*(@:E:;!X2
A,> 0+3@@K r F@#
 Kh=,Y =2@w+
N 
a J^ .; N_   @_ <e,n:D:;!X2
N,> 0K+37@B+
R>B[x2P;,M>;+2,~  
J r ( .hD+
W m @=+
l:A:;!X2
[,> 0W+3 
J _ ( .hD+
_ m @=+
l s F@#
 Kh=,Y =2@w+
l 
a J^ .; N_   @_ <t,n:D:;!X2
l,> 0K+3 
F ( 8,X  
H ( 8,X 2D+#4` m @=   @
aJ^ .; N 
z# <@,n   @K 
(@nh+@@@@ @@!   @F:F:;!X2,> 0
,> 0K+3@@ *(: s F@#
Kh=,Y+D@G:F:;!X2,>0*(: s F@#
 Kh=,Y7@C+">C[x2P;,M>;+2,~" n @@@J   @G7G"G&"4B*#BG.bJ0b	+&+++76jJ0j	,K/*$*j m ( .hD+66jJ0j	,K/*$*j m ( .hm+&+& m @ 2@t+Q6jJ0j	,K/*$*j ( 8,X  
 ( 8,X 2D+B+]6jJ0j	,K/*$*j ( 8,X  
	 ( 8,X 2D+P6jJ0j	,K/*$*j	 ( 8,X  @K+]+]+] K4`]6pK0p,K/0$0pk`p`+Wd0p.lQ(
X(@*(@:E:;!X2\,> 0+3@@K#4`

	 m @=   @
aJ^.;N
,n   @K 
(@nh+{@@@@@@!K@H:F:;!X2p,>0
 Kh=,Y+

	`@H:F:;!X2,>20

,> 0K+3@@ *(: s F@#
 Kh=,Y =2@w+

 
a J^ .; N_   @_ <t,n:D:;!X2

,> 0K+37@C+

>C[x2P;,M>;+2,~$ n @= =2@v+

 o @=+

 n @= 
 J ( .hD+

% 
 J ( .hD+

% 
 J ( .hK+

) t F@#
 Kh=,Y+

1+

-:I:;!X2

-,> 0

6+3 =3@u+

0 =2@v+

1+

1+

*7@D+

5>D[x2P;,M>;+2,~& n @Z<,(+

H =2@t+

H   @K n @=6pK0p,K/0$0pk`p`+

Ad0p.lQ(
X(@*(@:E:;!X2

F,> 0+3   @K+

k K0@+

X:I:;!X2

M,>60K0p,K/0$0pk`p`+

Rd0p.lQ(
X(@*(@:E:;!X2

W,> 0+3@@K+

k@@K    @J7J"J&"4B

^#BJ.bK0b+

Z+

^+

k6jK0j,K/*$*+

j6jK0j,K/*$*+

Y+

Z m @ =2@w+

m6o0@=,2@t+ 
(8,X2D+jK0j,K/*$*j6pK0p,K/0$0p ( .hp,MZ$6tK0t,K/4$4t "D=b
(8,X2D+`+
X(@*(@:E:;!X2
aJ^.;N @J:F:;!X2
aJ^.;N;!X2
aJ^.;N@<6,n:D:;!X2
AJ ( .hK+
B ( 8,X . B@#
 Bh=,Y > H
@@
 C*(

 
D C D .4hD,M@@3 E <G,6 
CDx(4.4hH,M7@I+*:K:;!X2X2,> 0+3>`K+ =3@U+ 
ID(1.1hp,MLdJDv:L:;!X2,>0$+3:L:;!X2,>03+37@@+>@[x2P;,M>;+2,~,[@<=3@U+<\,"+m@==2@U+<@b7@K+#>K[x2P;,M>;+2,~.D`Q@3;Q@4;Q@5~Q@6iQ@7;QQ@8iQQ@9|QQ@:bQQ@;J<N,67@L+3>L[x2P;,M>;+2,~0+8:M:;!X28,>0+3<2`w@@b m @b7@?+{>?[x2P;,M>;+2,~6 <Z,! <[," 
[ \ \ .hD,M 
\ (@nh+ n @b   @b+# ]*(@ 
] ^ ( .hD+ 
] ^ ( .hD+ 
] _ ( .hD+ 
] _ ( .hD+ 
] ` ( .hD+ 
] ` ( .hK+ <a,K <f,K+# n @b 
\ J` . N`   @_@@g <l,o p5@#[qQHN7@N+'>N[x2P;,M>;+2,~8 <q,! <[," 
[ \ \ .hD,M 
\ (@nh+2 n @b   @b+R ]*(@ 
] ^ ( .hD+E 
] ^ ( .hD+E 
] _ ( .hD+E 
] _ ( .hD+E 
] ` ( .hD+E 
] ` ( .hK+H <r,K <z,K+R n @b 
\ J` . N`   @_@@g <,o@@U@@V 
 J^ . N_   @_ <,n7@N+V>N[x2P;,M>;+2,~:@@

*(

+]:M:;!X2],>0+3+<2`<0j4,K/*jX"X2@+g+h+h+Y <3`
D J` .4 N` < @_@@g+q#_ @<,~ <,o+y 
DJ`.4N`<@@@g+x#@<,~<,o@@@@4M@Q@3  <,6 4#.#@  `Q@3 <,6 <3`
J^.;NK0j,K/*$*j# (@nh$+1 K0@+&6pK0p,K/0$0p#`p`+ d0p.& % H@Z$6tK0t,K/4$4t& "

D=b%+16pK0p,K/0$0p#`p`++d0p.& ' H@Z$6tK0t,K/4$4t& "

D=b0 
J^.;N$*j# J` . N`,~ <),n7@F+@>F[x2P;,M>;+2,~@ <-,! <-," 
. . / .h/,M 
. (@nh$+L   @b m @= n @b+d 0*(@ 
0 1 ( .h1+_ 
0 2 ( .h1+_ 
0 2 ( .h1+_ 
0 3 ( .h1+_ 
0 3 ( .h1+_ 
0 4 ( .h$+a <4,K+d:O:;!X2d,> 0i+37@>+h>>[x2P;,M>;+2,~B 
. J` . N`   @_@@g <@,o D5@p[EQH> n @b:@:;!X2t,> 0y+37@O+x>O[x2P;,M>;+2,~D =2@V+} E,! n @= m @= F, 7@@+>@[x2P;,M>;+2,~F6jK0j,K/*$*j#`j`+	d*p.
&Q((X(:*(<+6jL0j,K/*jF0@+ L0@++:M:;!X2,> 0'+3>L+   @L+ L0 +:L6tL0t,K/4tFZ(H6pK0p,K/0$0p#`p`+!d0p.&Q(:X(@*(@7@E+'>E[x2P;,M>;+2,~H7@M+,>M[x2P;,M>;+2,x -

>H[<?H\ 
% File [H0>.H>] not found.
? Fatal error on file [].
	(File Status / Error Number = $>H3@aYH3 /

>@HP3)
HC8\<p\:U:lHl@HpHeHfHgHgHhHfHhI
In@@     <XfHeSelect name HN HPHK not found.HSh@OQR@THEeIlIKCreating H@`UHIMAGE,SELECT,HbHl4p@c@dHHHuH
`0vHi$v

v@<HiIqIMAGE,FD,Hrp@s@dMODULE,HzHNt
x@{Q|H@g'D*:@RH#0$HjHj$$tc@{Q|MIo?:7N7KyC(IaJ|92kJ(IH
H>$?Hk?H0?H00HkFIELDH|E,NONE,NONE,NONE,NONE,H+NONE,NONE,NONE,NONE,NONE,NONE,NONE,NONE,NONE,NONE,H0h@/@5@dM&eI9I?$>@Q(HA@4!OHHAM&eI9H0EH0>x3(`FH l:l uHHlH0H      H0K:0I,0I0J83`4)0L5)PL6)XL7)`L)08)P9)X:)X;Hl]@lHb`HXVHAp3H3Hc@<0>I>IwIzI|III  Enter the short name of the file to be converted
  Default extension is .FL
HiHNpj|k$HNM0HXY  Enter the name of the file to be converted exactly as it appears in the
  SELECT statement of the .LST file
H~x ~RHUh~|@j~kQ 
;H
|p

 Q$|wHp
x3p4x3pH,H|@H@ BHH]>tX@H'|5(6HXEHAp3H3Hc@!O<0>I>Iw@IzI|III  Enter the name of the COBOL listing to be read - default extension .LST
H<H>H>p=>?$H>YO \\H:+H+a ^qZ>j*>q\".	b+\4B\ B4\"/	b+\ B4\"2	b+\4B\ Bs "r*4 Bs\"3	b+\ Bt4B\\"3	b+\ Bt4B\\"4	b+\ Bu4B\\"4	b+\ Bu@@vS"	b+ Z"v	b+`S>j*>+p
&y+\-<H,^,^,^,^,^,^,^,^,^,^,^,^,^,^,^,~ggF]%t)
?GETSEG of SYS:C74O12.EXE failed.
,~,~Zx<.\x,~+G+p$$p,~+p+:x:x,~