Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap2_198111 - decus/20-0040/cobstd.exe
There is 1 other file named cobstd.exe in the archive. Click here to see a list.
?p0 ?hX0?x " 
 
<++2	`qp?0x2>x	` 0@ INXy+s"INXx+s	b
 BQ
&A F
2
 1F+;/&F+8
&F K
2
 1F+?/&F+<
&L
&L
2
 
&L@P+tbR+u-W . $"-k--W0N+ $%-k0N+--W $'-k0N+--W $--k0N+U--W T U
J0J+R- +P@ $)-k0N+Y- .-W+N $*@-k0N+^- .-W+N U
1J#+g1J+i1J)+c- +e
0J"+f-@-W+N- +e
0J"+f+d
0J+f+d U T U
J1J+u
3J+w .
J0J+q+k
J+k
J .+k
0J+zJ+t
2J+|J+w0L+q
0J+}J+t@ U
1J+ . ( &-TFx.6.(0H+ .1J+-TJx.6
+-TJx.6 *-TJx.606$.8+ (
.(0H+0J+ U+-2+ .-k--W1N+H+--W .-k0N+--W+K-  .-W+K U
1J+$1J+++!@ $/ U U
1J+*
3J+&-+ -2+  $0 U
1J+$
3J+,0L+1-+ -2+ @ U
1J+@@ &-TFx.6..0N+6 U
-TJx.60J+9 *-TJx.606$.8+2 (
.(0H+@1J+91B,+5 U
1J+E@@ &-TFx.6..0N+H-TJx.61J+N
+K06$.8+2G
`G
`>`x+Wb+W+v+T T>`z+\@+\
b@+1+:
y4JX1J+l1J+l1J+b1J+cJ+cJ+W-h>`z+g@+g
b@+1+:
y+_@ *J..0N+i+h &@F.(0H+mJ1J+W
y1J7+o-h+p
&V+:
&X+:
&Z+:
&]+:IDENTIFICATION DIVISION.ENVIRONMENT DIVISION.DATA DIVISION.FILE SECTION.WORKING-STORAGE SECTION.PROCEDURE DIVISION.EXIT.SECTION.
&_+:
&a b,= "
&c	`&8,>6@,=,^.8
",~
NAME OF COBOL FILE TO BE STANDARDIZED?HP
NAME STANDARDIZED COBOL FILE IS TO BE CALLED?
HR
IF YOU WANT TO KEEP YOUR ORIGINAL
INDENTATIONS TYPE Y ELSE TYPE N
Y OR N?HzHHERR. IN INIT OF DSKERR. IN LOOKUP OF FILEERR. IN ENTER OF FILEERR. IN O/P OF FILEERR. IN I/P OF FILETHERE ARE 2LINES THAT ARE TOO LONG.PLEASE CORRECT6g6`gLRYD,2*PPzF?y@;.3bn2S09v"+91r0';T
LN
}S-4K6
		cu^\W2u^Sg<u^vUg~W1XWH1Cf^19tw)OU(CYT=PYT5+/Sm/838Mw+vG
Nu>\(THHW ,Hq
%gPHcR)Gg=/Y2uY1tY1saP%-RPaqQPHaqI+K_H/=_H!?u='RoM**kUl$*{9S
t~nex\>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