Google
 

Trailing-Edge - PDP-10 Archives - tops10and20_integ_tools_v9_3-aug-86 - tools/dsconv1/dsconv.exe
There are 3 other files named dsconv.exe in the archive. Click here to see a list.
?p0 ?hX?x " 
<+
+2	`pI'(:2' (Integer   Real      Text      Date      Integer   *    .DMI           END  EXIT QUIT (' DSCONV')(/' Enter dataset name or filespec: ',$)(5A5)(/' Dump data? ',$)(A1)(/' Answer Y or N')(' System 1032 allows only 25 datasets per database.'/' Only the first 25 sets will be converted.')('Database ',A9)('Dataset ',A9)('Comment "Original dataset name was lost')('Comment "Full dataset name was ',5A5)('Attribute ',5A5)('Or ',A5)(2A5)('of Entry')('of Change')('of Identification')('Double Format N18')('Format E+10.4')(I15)('Keyed')('Use_Case')('Prompt "',5A5)('Title "',5A5)('!* Alternate definition: Decimal 22.0 Format N22 *!')('RD ',A9)('Field ',5A5)('Double')('Format ',I1)('RD_Missing')('"',21A1)('Column')('End_RD')('Load_Defaults')('Data_Input ',A10)('RD ',A9)('End_Dataset')('DUMP DATA ',A10)(/' Dataset ',5A5,' no records to dump')(/' Dataset ',5A5,' records are in file ',A10)('End_Database')(/' Data definitions are in file ',A10)Y    N    Range|z    _:    Xpa    SEQOUT    ASCIISYSDSNAME ALL  + -<
 <p,, <),M <s,, <v, <y,
 	ZD" " #3H+&*d <|,, <, <,
 2$
2d+! Af 2D3D+% <,,+ <o,x <n, <m,x <l, $
2$+- <,, D <k,
3<	,<j,% 1D+6 <
 <i,% <h,% <g,%" $ F D Dt <f, <e, <, ( <,
 <d,%7Ds+B <, <c,%+H <a, A$1D +H <, <,
 <`,% <_,% <^,%"% $ F D& D <\,|7D}+- 	 | F7*dO < , <$,
 <[,%7D+X <&, <*,
 <Z,%  	 Dw <+, 
_DZD w(. </,
:; +\, <Y,% .$6b0b+f+d4k4f4h4i <0,+j <4,+j <7, <X,% w0D+o <;, <W,% w0D+r <>, <V,% w0D+w <B, <E,
 <U,%7@+} <G, <T,% w0D+} <J, <S,% w0D+	  D0 <R,% <N, <Q,
 <Q,% 	 D0 <P,% <S, <V,
+<O,%6bw0b+
444  D 5D & F   D5D & Fd # D <N,w@ @!d# D <M,w@ @ !3$ .$ D|+ $ D|+ .$/ D| <L,&6D+$ <X, <[,
 <K,% <^, <a,
 <J,% w0D++ <d, <I,% <H,%:&; +L <G,% <g, ( <k,
 <F,% <E,%"% $ F D& D <D,|  	 Dw <l, <p,
 <C,% <r, 
_DZD w(. <v,
:; +>, <B,% w0D1D+F+O .&/ F&0D+M1f+O 3(+M 3(+O <w, <A,% w0D+X .$/ D & F1$+U & F <{, <~,
 <@,% w0D+m <, <?,% .$/ D1d
+` &
 F <," $ F D" <,
:"; +c .$ D" "/& " F! D" <,
:"; !+i, <>,% <
, <=,% <
 <<,% <, <,
 <;,% <:,%:&; +5 <, <9,% <8,% <7,% <, <6,% <, ( <",
 <5,% <#, ( <',
 <4,% <3,%+<2,%,<(,(<1,%,<0,% 1D+
@dv <.,y <-,6D+ <1, <4,
+ <,,= <6, ( <9,
:; +8 1D+" <<, <+,% <*,% <@, <C,
 <D, <),+ <),w <),
xxxtxxxxxxxxxxxxxxxxxxxxxxxp}xxxxxxxx|xxxxxxxxxxxxxxxp}xxxh
P
PY^^
P	;00?P=00?P?0PC0@PG0@7PI0$PJ0$vPK0PL0PN0PP0PS0PU0$PU0PV0PU0$PU0$PX0@:PZ0@<P[0Pa00?Pb0@
}PJ0$vPc0Pd0$Pf0Pg0$$Ph0PU0$PU0$Pi0Pj0P
l00YPn00?Po0P
qt0YXs@Xw@0YP|0X~0Yh
     ;    -    "    (80A1)('!  ')
{{(aW$; \" p @n6bn0b+++(4S4T4`4f4+ <i,	 <l,
 $ZDu u Fv F3Ho*d."&&.v $% Du u Ds F2Ho+6>u8&37Dn+9:s u FF $/v.s D.$.l1$(+K l t Fv.$&$ (..& Fv <o,"v $ Hr D  <r,
:; r+E, $ o Fv*dI m Dl"&.v/s v /v.l 
F J v.$8&M $..Dl+c"$.Dl l n s Fv.$&$ (..& Fv <s,"v $ Hp D  <v,
:; p+\, n l Dl $ o Fv*db # o F/*dd+g <x,, ",~P% 0@%FX
 $vX
 $vX
!_    /         (25A1)~8Z    A    z     _a    aJnM \! p @
++o( p,	 <	,
."ZD  F z3H*d-"&
 D  D z2H+6>8&2 $ D  F
. D"&/.  z2H+A  Hz {3H+A: *.
 J 
.$8&;  &. F
  z3(%+K 
  z2h$+K 
 

 
(zA
% J z.$8&E" $ F D 
.&/F"  z3(#+V z2h#+V $GHz.$8&R:; +N <	
,"&./  F D  <	,
:; +],  D $ D "$..
2$+z@d"&/.    D  D <	,) @ 2d+n /$.
2$::8&h6d+t   
  Fz  . 
 D .D +b <	,"&./  F D  <	,
:; +~, !,~xP
 7@{P
 :$zP
 <$z.DMD _    .DMI      :    ;    <    >    [    ]    .    (25A1)(4A1)(10A1)('DS',I1,22X)('DS',I2,21X)(9A1,16X)(I1)(9A1)(6A1)(I1)(4A1)(' Internal error ',3I3)B    ~8z    D    8_PX`a    SYSDSNAME O%h6 \
+ p @
 !p @
 <t,	 <x,
 
-ZD
 
 F
 	3H
*d
8"&
 $
 D
 
 D
 	2H
+
A>
8&
="&.
/
 
 D
 
 	2H
+
G.$ D
+
H:
8&
C"&.
/
 
 D
 
 	2H
+
N/$ D
+
O:
8&
J"&.
/
 
 F
 D
 	2F
+
d.$ D
"&/
.
 
 F
 D
 	2F
+
b &/
.
 F
.$ D
"&/
.
 
"
. 
	 J 	.$8&
^"
.D
+
f:
; 
+
W+g:
; 
+
R"&.
/
 
 F
 D
 	2F
	+
{.$ D
"&/
.
 
 F
 D
 	2F
	+
y &/
.
 F
.$ D
"&/
.
 
"
. 
	 J 	.$8&
u"
.D
+
}:
; 
+
n+g:
; 
+
i"&.
/
 
 D
 
 D
 	3H
+
8&
+.
 D
 $.
3d
+.
 D
"&/
.
 
 
 H	.$8&
 
._D
ZD
 
 
.
 	 Fx:
; 
+/
.
 D
"
.
1d+
 D
 <z,	 
.$ D
"
/&.
 
 F
 D
 
 <~,
:
; 
+ 
.$ D
"
/&.
 
 
 H	.$8&
/"&.&.
 F
 	3(
1+	2h
-+
/AH	*d <,"* ( J	 H
 
.
 <,
:
;	+
0 &.
 
"H*d
 $ F
 D	:,D	 <s,@ds <q,x <o, <n,x+
+	:0&+,
1&+ <
+, <,
 <,	 
._D
ZD
 $
$	:.
 <,
:
; 
+"& $ F
 D
 &
$	:.
.	22F~+
 
/&
 (
$	:. 
Z	2J 	2.$8&
$
.	 
 F	2:
; 
+ $ D
 	: 
 H
$$
.
 	22H
+
8&	:; 
+
1D+
 $ F
 D	: 
.ZD
 &
$	:.
 
*x2H	2+
 D
 
 
. Fx 
,:Fy+
+/
 $ F	- D	: &"F	-@f	,.$ D	"&/
.	 	 F	+ D} &"F	- 
.ZD
 &
$}.
 (
$	:.
  	23H	2+ }@h	-+	*d:	,:}; 	++ $3D	,+ D
"&/
.	: 	: F	* D}6 	-+:
 
0F+ & F
 }$&
.
 <, <,
:
:};	*+:	:; 	-+
"
 $ F	 D	:( <$, 
._D	ZD
 	:$$
.
 <(,
:
; 	+!,:	:; 	+"
 $ 
1h++ ( H
.$8&( &/
 $ F D	: &"F	-@f	,.$ D	"&/
.	 	 F~ D} &"F	- 
/ZD
 &
$}.
 (
$	:.
  	23H	2+< }@h	-+=*d5:	,:}; ~+4 $3D	,+M D
"&/
.	: 	: Fx D}6 	-+K:
 
0F+G & F
 }$&
.
 <), <-,
:
:}; x+C:	:; +."
 $ F	? D	: <.,	 
0_D	>ZD
 	:$&
 	: 
.
. <2,
:
; 	>+S, 	: 
.& F
( 
,#Y 	:( <3,"
 $ H	= D
 	:$$
.
 <7,
:
; 	=+a,:	:; 	?+P+j <8, <;,
 <l,& 
+,~x
+x
+h
1
+	;`

+x	P


@	P
 	$	P
!Y$	P

"	;$	:P

#	;$	:P

%	;@xP

	;$	2P
&	3$
P
&?@xP
&?$	2P
'	3$
P
($ 	2P

!Y$	2X
($
$
++!QF10gg"A-Kb(!QF10,t? 1022 ROUTINE CALLED BEFORE DBF10
+v,t? REENTRANT 1022 FORTRAN NOT SET UP
+vg"._9@e "YZ6@[3D[1+6@A+H@6@&7pB+X(PQ0xF@(.*pV,>,>  @,*,^,^4Nd(.}F@`P=[4Nd,t
%%1022 RUNTIME SYSTEM FOROTS/LIBOL VERSION SKEWED
ZB7@"$"."+kZ$o!&XYF.$<`nXF.$86@=`i+K+R,C+I,C+D,C+O,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C+ ,C .]Q.A` 7H@!(Lu,H &F,E7D@+2\&]\"]74@ ,E@F!"\$]+@ n4@ &4@`D+;0f+@.&+7ZD@l"	Q"l o@4@,~\"oe\"]U$@+ + <+D6H@,H &F7H@!(^@)F.&F5HH,~ "Y+,>4 V4@R .[6@+WO@Z/[:+WQ"xX".[7@+P*bT+W".[@@,^,~!JCS18]>L
+v Z[3B7+g+hH?
?ERROR IN GET FOR FILE =QF10,^Q"A`+3\"<+w, 	b,~A"p0B:x,~,x,~, "`4d{,~*x,>,>,>~,^,^,^+{
EXITP!JCST+ + /+ 
&		`?1022F4 ADJ1 ERR, CALL OPER	`Z(X^. >X.~(3~+	~+Z. \x <x*<x .ez+!"	b+  "	b+Z`.Z. h+ggM?$@
&	b+
,
?NO CORE AVAILABLE - CAN NOT PROCEED
a.3@1,>&O@a+'gR~@1,>&@@a,>,>@6 w+4"a0B+/!"A`X#p5@,/#p!"X#p+4\p+4a.9'1,>&,>,>O@a+4,>
6+ _4`<"`Q@,> <b,,^,> <e,
,^*b9+G,> <g,,^7@a+B,> <j,
,^+D,> <k,
,^Z5"G,> <m,
,^,7@a,
,> <n,,^,,> <q,,^,> <t,
,^(@qd1@,,
1@#+U0@*+G,> <v,,^+G,^,^,^,~('TypeGtoContinue,XtoExit,TTotrace.'/2H*,$)(A1)(1H 14A5/)(1H A5,1X,O6)PAUSESTOP .pX]p X^p `p `p XWX~]p xC2|t(1,>& p4@ @},> <,~,^|,~{e^bC2|p1,>& p5`4@+P0#p3@+2 +3`+@@ +
 ,~  ,~ 0_i/X3 6P'Ms!hhyI^ *Vh P `@ 6P'M P'M]oxx}Attempt to take log of negative argIae *)|h(F%,~'Y\(Q<X\)*+6)6`)S	YVBG9)G9(
GJ&GK/K&thW%f&#PU7f&"x?N;-9}lXS	YVBRMSQTE0J/8K~
fwK|vkoYUlrBKYX<:&
Y]@a
Y?'
\!9{-^4{-X/{-OB{-NU{-NG{-MD{-M<VBSo&BTE)|#)	S3*9
AwB8B
5KN20JTUR/}F
/|N	@\:_<F

zRu6
(J"
&*
 R	WJ
>
_Bb
_2v	^,6
K^
2b
2(bI|@
SB
S@&
e-.SB@p+se`Hr"@MSajB
dMSaiJJ6(:E:C	tE:=|xE:R|E9\Cv
K
2`aQ t
8QbBs:Qf(`rK&uj)`p(`rO/L`?{?2J!2)qB)(b|(#S7TUH
4J nv.EE:3;l <
k[LK1y=03"03zK+mK+lu_l[@H
9|H
9h
4J	Mce	L	KHY4
}){N	D |_^aj'
]NH')^ag
^]o	
]Iq4
]IC2
]IC
]I2_^O[^OW
]H[g
]FzD$
]Fz3
]C^;
]ANx
]?g[
]?a2
]?	+
]>yG^)I^%:}
]5fL|
]22{^[z^M
]/ZGy]|(M
].<~
].?%
].9#]zx]yGw
],v]qwu
]+;t&
]+5D
]*)[t
]*W]lfs
])B
])f(r
])d(]gtq]aS
]&p
]%Wf]^oJM@:@#ll	\\v?E|?E|`?HMqH@+
].<r=].<r`=]
'!K3
b	
8%Ka
/
9%sA
Ge
&
=&s9s
=&q>
C&/o>s"8A
d
C&Cn?E
J&Wm?!
J&k$
Q&?C!
a
;M'
R'?W! !;
W+(
JAg i
(O
W,	?(%a
Hc
^,' )
!Ji
(w
h,;z?.tA
i,OzS.>a
f
n,czg3ti
n,w4?	
u
u-5
"3
-{#6
;u%
#&a]G
-3C?E
yu9[
2C&!
%oG,
Nua
&)
@
zaz2o	zA
{?PG~3+
A$=
'g2{YW{
O?l#8ga!+Sj 7
^
_
69K8a
}
st _9#';	qG
P]
P]
P^
P^
P_
P_
P`
%p
gyFr
	
w04
w05
w05
PH
w06
9
PI
w06
PI
w07
PJ
w07
PJ
w08
PK
PK
PL
F
}
h
P4
>
dYP5
P5
P6
P6
P7
P7
0K
+P8
9
0'[


dG
UJ
z>
d^

L
daQQ~
rks!fG~7[}Q}Y<xQx\	?Q	?%p	>Q	>Q	=KT	;P	:]>x3?go3@kM	.Pp	-Pq	-
	,k	,Pq	+Pr	+Pr	*AZZ	Ps	Ps	Pt		w0H	w0I	d	9	deZP\	(TSg
3(TSg]p
3-A0NR'U;	
O\%a5c]w	tA`g>aKh3	b3^G	[{o	!0(++)?*S)n
_	aV
s		qG   	w04w05PHF}P4>P5N,<P5P6P6P7P70K!P8
UJ-f
=w:!fG*Cg7P>
{J~d+0
v#&
v#uP&IMbs
a''\
u+;\%aKQccbedwd!6F{%Tg+'?(Si9
_la`
s.	qG f	+vGwvFvu;.tP4s>sP5rN,<P5rP6qP6qP7pP7p0K"P8oUJo
=w:s+$nSMPBl&BlTfF*Cg7J~d+0-#O%-#OvP%(Rh04-N
~O1,ioYb2asS8A	mc?CL
a/9''*?WX&G1&[49aZeX )jwl,;\z?a+i&o,
'+<?	[j-0{HS='?+&Y{3='V[i2X{Kk<,SC)?oh23;{7F#,gD=B,}g2GW{sE7QC@+m&Io82[>c5K;eHhza"+82oVs5v:3tzA,?f3BDsGtL
_p K9QF#a-i
ss _`9#Q'M'	qG'#x&Wu&/9G%gyFr#	"w04"9!PH!1 gk:9P4>dYP5N,<P5P61P6P7}
|FP7P8HL
0'[UJ
5,x5,daq9
=w:
rks\ON0!2]>x3?m2z	go3@*Cg7&&L}x|m2zwJ~d+0?,wi

zt9tdeZ?HH?0Hp0gZ"Wp\B:/\>X\>5'\7N+\2g'r'I(\)8*\)7\	\	)\+,\6.\.,[rO.O[mNO[mO[m	O[l|[l{&O[l+O[kO[kO[j]O[jRO[i%r%H([Z[X%[Qgr%0[Ms/[M"-[M	+[L,[FG[@v*r#eOD^w'dw]!+{0