Google
 

Trailing-Edge - PDP-10 Archives - decuslib20-04 - decus/20-0108/cobedt.exe
There is 1 other file named cobedt.exe in the archive. Click here to see a list.
?p00 0?hX?x " 
 
<++2	`,	O]|Te2|H
OGW$DINXINXCx@INXD@INX$iSH%0"0b+u+h4@n &+m4T1 &+m?BAD  FILE NAME
&4+E?ILLEGAL CHARACTER?CANNOT HAVE 2 PPN'S
6=6`=9gi1;,~
&CX3	`	}K	`K<i"Hu?	`z#,
~	:~	6~54w
p	[
SM
pN
Y
R\3T	^R,{({'i{'h{'{$
K`wWK
*\3.w;t/*YaE*YaB*Y`A
*Ys;w;lDw&/$
b-#duT*hy0KzdW'4<	{tztFutBatA`tAjL(
c9%]9g%1;,~[S+
&giws
giLIgiLB%giLA 8(
gi&f&gi!tP\gJWs
gJ,IPgJ,AYgJ,@V~T(V
gJf\gJt$P\gH]s
gHY?gHY
gH2I8gH2A>
gH
fHgHt!P\gFcs
gF-gF4gF
gF8I'
gFf6gFgDtz#,+tT
HxT{z65mEu3U>]/	;#F)%}W',(1)}Mi-Ay,rQ;N8V`p.]V`o0UV`CxtV`2H]V?QcGV?Q^HQ&:9NKPFRPEOH9N	F8-CPy{$MQs0MQh1MPy;MP.sWMP.nnMP.njMP.maMP.m]x3R'tEgL(
UJ1
)DQ:
)D-B
)DE
)=;6
)=20
)=2;
(aJ
(aK
(`s7
(`mO
(U*G
hd&
hc%
h_,
hY)
hY(U
<mxt&B0[S+I"2I9eUHmxUHI@H=@>2%BUSgx$c8
&u^
"o`7lZj?Hj?H3:APS0o
)r0!qTY/$<0t@G9{~vG(WMP7vQ>MiPEQLiP
F.?61);P0wx0`c8X	~*|W[
^{4!p^{4l^{4n^{4w^{4v^{4tS^b^\&~
$Pz7	
$(,
:tSS"#u%+#\'+P
b7R (Tm=J(Tm3K(Tm2<(Tm.U(Tm-Q(Tm-A(TVw7(TVn?(TVm8(TVm8(T4yD(T4x@
NtC= ];JP4EU
NPS/HSGxd 49&g[B

M9 ML HMKzK<
&!ASKz BF AE
$)-
$(% A  @
xsSH
k
mqxm	~u8y+yMia	|Qy`!lK2!l<8}K	`Y> Y<`Y6@}\a:/}\@\	C:K{	C:=~	C:=
	9=gH^SqVG%Pf$@CsP^nBZP^THHo;d@Ljf3PPLiTU
)(	Kj0eKR)I%!KQpf"KI
2P=xRHFKz#,6|A2Ic7I2nf2dP,Pi
Pi3D-I*Acs0P{[$Lj(`d\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|T+|H(G>Y	` s B
&t
&v@`*" v, w
&y,]+	,++ 8a@
&@(,`+1`B@a@1+s0BB=( !&{/(4H{ $+ 
A
2D*f4'# e|Rg'D*:CN G>nG>n)E2|:`M]>
=`Qf,CATT,t@+`px|~
&8+37
	*K,0,7D(+3,`+ 0B1B+/1B+/l,~0B
@e@+@+ 1B+?1B+80"0b,~$$.$h+8 H+8l+3 * $ DKm *7D6+E2D 
 J6,0,j,>>&"!(@`.(04DK`=dJ*Z.Z0&t *Z5BRj=fM``,~,^1B+F+3
&
&37
 *,0,7 0B+Y,7*1B ,>7@ Z7@ &1J(F$& "&"6@ !(@``B!( `(B.(0+K 8VZ`,0,~ ,=,E1B`,=,=,E0"0b	+u0"0b+
k+%v##qqrrg,=+g,=Z]0Bz1B`+q+g
&#
&L+v7F7+b7J6:
6e`+{0&7
*Zl1J&1J&6@8$8,H@@7+b,=,>],=,E1B	+1B	+0B`',^@@)"$&.&x5B F8,E1B+v1B+
)@4B!$|[22B*d^2aBZ`4"*5B+1B+`*1B+`* H7d`+	+g@0"0b
+"$$.$x+.(=,=,E1B+#+
 ,-)(/37
4 *7H6  H62H`4+gm l  Z&"6@."$"+g @@7,`,~1B+10B1B "0B1B "B0B+1@B:x,~7B7 B71B+:,~,: ) 7@@*"_7B7 B7h4BD0B+D3D)B,~B+@ $M7F+L (][Z` 
.$2J 9F.(=fH,~@,~e$YT]a&M9Ja& kN
y`(gft::O)2(gft00UWJ3Sn0UW@8E2r58xS:$^I$Pgm9<,X0`i<i&l\`l@ 8,]+s7@!$;2,P+>+B 8V+
`@ C,]+
,P+q+q,b Z BK,o
&G
&s6BK+~
&J
&
!(M,8+P+ @@H ".b6`@+
.K/"&6$6/K B7HI+
 HJ HJ.K 61F/&&"."$(/(@$(#HI
&R,]+
Z[O@\,'+V+Z`@+"
&\,)\2B*dl4%@]&(#)"l
&c7-,0B v+l +d@ +:H & ",?+++&7`H+0 $
&_
&,>+,]+4B5Z[,6	b+,<+8+6d@,~Z [@&@aO@\,~l,+d@+M7 @c,jGQ& ,~@fX:p ,I B+F,<+G,+L=zE
&h
&,/+PY`m,0+ \.$ G/&/H#`+A &" n.(6@`=dS 
n 
hA$0B;x=lU,~ &" .(6@`=d[ 
n 
0B;x=l],~,e+,8 8..2D;x=la,~ &"6@@o .L &(6@@s 
 
n x:x,~,j0F@x,>d@,Z { | K,
0X+t/6.:aZ.|+w0B`+w.:=vt
&| d
&[,o "
" "h/",o/|[Z/ZZ..| "
"l@@#,1BQ`5Vp:\:H+n}~~
&+5X=v
,^xaz,+n @@*"/,~,+1B@x,,+ n &+  & &".(6@`=d 
n 
1FhB=l,~,e+,8 D8..=l,~,]+,8@@+l@,j Q<,~+-+),<+-`@@e,0=z(d@+@
$+ d@
&
$+ ,6,&Z[,+3+3Z[,'+5+6
2:\,o
&
&\7BI,~ BJ BJ,~d@,Z Ka@.0 `@..`@Q.A`,+QB`@0B=pA 4PF,+Q=pE`@+K7BK7@I+J
&
 KZ`2BK+U:x:\l>@J,~ I BJ6PI,+ =pO,~/K/07@,~
&
&
&
&
& K,o
& K,o
& Ka@.0 `@..`@Q.A`,-+i`@0B=p^  "4Pd,-+i=pb>@J,~ I BJ@6PI,-+ =pg,~
&
&j`@,0,7 1B,7*/&4&,,~&"QDx6@,o[x."
",~"0,  $`@ $,; ",d 4B{,?+z+y,~1F+l,6,/[ \1&+|/&4F,<,~=f:x,~/444
.,H1B+2B,~ $9 $`=d,~ 49>xZ
&
&1D+$0D+
&L
&b3 *t nd@+  B] 7*"A,1B+1B+-B1B
=j
&/*t#J]d@,~
& ,j@@0B<>&$.{6@`=f' D 
<h,0B(@!=h*:x,~`@+ 0Jt@&l+% { 2L 4 K \." BHl,sd $(,S+
7:BGJO6,`@0B=v6$"0bih0,?+F+; ",0B1B+;+E ",,s/65v;
&(
&N ,,s ",?+R/6+KQ$A`4BV,?+U+T,~ - B0 "0,-, 
K`@ *B {5B^=j\+a 
_,+]SA 1 2 ",d ",d ",d . B0 "0, ", { ( 
K`@ ,B4Dn&( "0$,d "(,d:=lj ",d ",d ",d / B0,~,COBEDT VERSION 4.0h7~8?CANNOT INITIALIZE TTYENTER COBOL FILE TO EDIT: ?INIT FAILURE FOR DEVICE DSK:
&|
&	?FILE CANNOT BE FOUND
&
&	FD-H%COMMAND TO LONG%BAD COMMANDI,`%CANNOT MIX SIXBIT AND ASCII RECORDS?EXCEEDING MAXIMUM RECORD SIZE?THESE POSITIONS HAVE BEEN COVERED%SECOND COMMA ILLEGAL%POSITIONS NOT ON A WORD BOUNDARYHL%ILLEGAL TO USE LEVEL NUMBERS 66 AND 88%REDEFINES ARE ILLEGAL` ?YOU HAVE CONFUSED ME ON LINE: %CONFUSION IN 'OCCURS'H]9%BAD PIC STRING%INDEX USAGE IS NOT ALLOWED`,%DATABASE KEY USAGE IS NOT ALLOWED`0?CANNOT MIX RECORD MODES!X^%FILE COMMAND ILLEGAL IN FILE MODE?INIT FAILED FOR DEVICE
&;
&s?LOOKUP FAILED FOR FILE
&?
&s%COBOL RECORD SCANNER UNAVAILABLE POSITIONS SCANNED FOR RECORD%RECORD SIZE MUST BE ENTERED!?CANNOT INIT DEFAULT LIST DEVICE
&M
&ENTER OUTPUT FILE NAME ?CANNOT INIT DEVICE
&T
&
?CANNOT ENTER FILENAME
&X
&
ML-$%ILLEGAL COMMAND%AT BEGINNING OF FILE%CANNOT RENAME FILE%LINE RANGE MUST BE SPECIFIED%NO SUCH RECORD%SEARCH FAILED%NOT IMPLEMENTED FOR DOUBLE WORD@jHLH]%COMP FIELD MUST BEGIN ON WORD BOUNDARY%COLUMN RANGE DOES NOT END AT END OF COMP FIELD%LINE RANGE NOT PERMITTEDH
0INSERT: S A 1 2 =	@L%DOUBLE PRECISION NOT YET IMPLEMENTED@%CANNOT INIT OUTPUT DEVICE%CANNOT ENTER FILENAME SPECIFIED%BAD LINE RANGE%EOF ENCOUNTERED  RECORDSHK%INCOMPLETE RECORDS EXIST?RECORD LENGTH INCORRECTDESCRIBED:  IS: ?OUTPUT FILE ERRORH
@:6$     %STRING TOO LONG COLUMN RANGE %MATCH MAY NOT INVOLVE DIFFERENT DATA TYPES%NO MATCH PERMITTED. %A COMP FIELD IS LARGER THAT RECORD SIZE
@BREC # 
@&

RECORD N	- THE SIZE OF THE RECORD
BLOCK N 	- THE # OF RECORDS PER 128 WORD BLOCK
NOACW		- THE FILE CONTAINS NO INTERNAL COBOL ACCESS WORDS
FD <FILE.EXT>	- SCAN THE FD GIVEN INTO INTERNAL FORMAT
SIXBIT M:N[,M:N]- SPECIFY SIXBIT FIELD SPECS
ASCII M:N[,M:N]	- SPECIFY ASCII FIELD SPECS
COMP M,N	- SPECIFY COMPUTATIONAL FIELDS
COMP-2 M,N	- SPECIFY DOUBLE PRECISION COMP FIELDS
		- (NOTHING) PROCEED TO MANIPULATION LANGUAGE

D<R>		- DELETE A RECORD
E<FILE.EXT>	- EXIT NAME THE FILE (OPTIONAL FN)
F<STR>$<COL>,<R>- FIND THE STRING GIVEN IN THE COLUMNS AND RECORDS SPECIFIED
L<FILE.EXT>	- LIST ALL OUTPUT TO THE FILE GIVEN
R<STR>$<COL>	- REPLACE THE COLUMNS SPECIFIED WITH THE STRING GIVEN
S		- TYPE THE SCALE FOR THE RECORD GIVEN
$		- (ALTMODE) MOVE UP A RECORD
LF		- (LINEFEED) MOVE DOWN A RECORD
%FILE IS BLOCKED WITH NULL RECORDS 
""iSH",~
BdBd+# B-4B,~,++,&
,~:x:@:x?`, ,~ "	QB
$d+%
D,^x>x,~ "+I$,~,6
,~:x:@:x?` ,/B ,~,> "	QB 
&d+4
F,^x>x,~ ",I,^,~&,~,H H
,~:x@:x,~:x?`",DB!0B,~ 3B.,D ",~
(d,~
H,^x>x,~(,~x  &`@ &$$ DZ$@`@Z$`QDx,~,\ H

,~:x @
J,~:x,~:x? %+Y$4BV,~
*d+V
J>x,~
*,~ ^- .*>, -@p@t!$A@@`,0B1B+a1B-+v0B1B+j1B+j0" 0b-+/hB+a1B &1B &1B+26@+6 @0B+`7H!(Lu7F	f
 7*> -:x %,~
&7+5P4@z5Rx +z5Tz +z @,0B.1B+~$$.$h+{5PS0+zX0+`
&9
&<,~ B<,iXQ$A` D D[$& F[ Q`.$ r F9
*",~,iQ"A`.4B,d+ H,~,i s (4B,d=h,~,i s, s+,i7@	b	&"t&",> t,; ",d,^&",> t,; ",d,^+;,i	b&":." ,>&$.&,>  t,; ",d,^,; ",d,^+;,i ^+E&",>5B/6B,d,^.",d2^+2,~,i & t4B:0"0bih0,d=f6,~,i[
7@ * ^#`7 +A2"H,>u2"H+B,>=$@5BD,^+D,^,d2^+C#@
7  *+/2t'PB 1@kan5J,i,T,>@)B.",d=jO,^,~,i,T,[+N(bU7u&$"
$$(B .*,~,i,N,[,~Z~/(([~7@ "7 7u1,d=(_,~,i ",d ",d@@,~*<B? ,p0B+h* B**<,~*
x,>,>,>,> <,(,^,^,^,^,^,~
&v
&z	b,~     HHH?EDIT PACKAGE STORING OUT OF BOUNDS