Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99e-bb - cobver.c05
There are 2 other files named cobver.c05 in the archive. Click here to see a list.
 REP 1/1	;05C1
	; UPD ID= 3545 on 5/11/81 at 2:58 PM by MAYBERRY                        
	UNIVERSAL	COBVER -- VERSION NUMBERS AND HISTORY FILE FOR COBOL 68/74
	SUBTTL		VERSION 12B

	;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
	;  OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
	;
	;COPYRIGHT (C) 1979,1981 BY DIGITAL EQUIPMENT CORPORATION

	;VERSION NUMBER SYMBOLS FOR THE COBOL COMPILER (COBOL)

	CBLEDT==1131	;EDIT LEVEL
	CBLMJR==12	;MAJOR RELEASE VERSION
	CBLMNR==2	;MAINTENANCE VERSION OF A MAJOR VERSION
	CBLWHO==0	;WHO LAST EDITED (0= DEC)

	CBLVER==BYTE(3)CBLWHO(9)CBLMJR(6)CBLMNR(18)CBLEDT



	;VERSION NUMBER SYMBOLS FOR COBOL'S OBJECT-TIME SYSTEM (LIBOL)

	LBLEDT==674	;EDIT LEVEL
	LBLMJR==CBLMJR	;MAJOR RELEASE VERSION
	LBLMNR==CBLMNR	;MAINTENANCE RELEASE
 WIT
					; UPD ID= 3545 on 5/11/81 at 2:58 PM by MAYBERRY                        
		UNIVERSAL	COBVER -- VERSION NUMBERS AND HISTORY FILE FOR COBOL 68/74
		SUBTTL		VERSION 12B
		
					;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
					;  OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
					;
					;COPYRIGHT (C) 1979,1981, 1982 BY DIGITAL EQUIPMENT CORPORATION
		
					;VERSION NUMBER SYMBOLS FOR THE COBOL COMPILER (COBOL)
		
		CBLEDT==1445		;EDIT LEVEL
		CBLMJR==12		;MAJOR RELEASE VERSION
		CBLMNR==2		;MAINTENANCE VERSION OF A MAJOR VERSION
		CBLWHO==0		;WHO LAST EDITED (0= DEC)
		
		CBLVER==BYTE(3)CBLWHO(9)CBLMJR(6)CBLMNR(18)CBLEDT
		
					;VERSION NUMBER SYMBOLS FOR COBOL'S OBJECT-TIME SYSTEM (LIBOL)
		
		LBLEDT==1046	;EDIT LEVEL
	LBLMJR==12	;MAJOR RELEASE VERSION
	LBLMNR==2	;MAINTENANCE RELEASE
 REP 1/2	;05C2
	SUBTTL	MAJOR VERSION HISTORY FOR COBOL AND LIBOL
 WIT
	SUBTTL	MAJOR VERSION HISTORY FOR COBOL
 INS 32/3	;05C3
	RJD		RHONDA DURAY
	RLF		RUTH FONG
 INS 35/3	;05C4
	SMI             STEVE INGERSOLL
 REP 5/4	;05C5
	*** EDITS BELOW WILL BE IN COBOL-68/74 VERSION 12B RELEASE ***
 WIT

	;.BEGINR
	;.COMPONENT COBOL
	;.VERSION 12B
	;.AUTOPATCH 4
	;;
	;.EDIT	1300	Arg passing fails if arg is redefined but used as original later
	;		DMN/JM,10-AUG-81,SPR:10-31754
	;		A:SRC CMNGEN,IMPURE
	;
	;.EDIT	1301	Optimizing SKIP instruction can cause Illegal Mem Ref
	;		DMN/JM,27-AUG-81,SPR:10-31556
	;		A:SRC PMATCH
	;
	;.EDIT	1302	Bad table link if RMS RECORD KEY is missing
	;		DMN/JM,10-AUG-81,SPR:20-16835
	;		A:SRC IOGEN
	;
	;.EDIT	1303	Bad code for RMS file with Depending Variable
	;		DMN/JM,10-AUG-81,SPR:20-16563
	;		A:SRC IOGEN
	;
	;.EDIT	1304	68274 fails if first item in COPY LIBRARY must be replaced
	;		DMN/JM,10-AUG-81,SPR:10-31569
	;		A:SRC GETITM
	;
	;.EDIT	1305	Bad code for WRITE AFTER ADVANCING data-name
	;		DMN/JM,11-AUG-81,SPR:20-16566
	;		A:SRC IOGEN
	;
	;.EDIT	1306	Bad table link at 535214 if REL KEY is not defined
	;		DMN/JM,26-AUG-81,SPR:20-16620
	;		A:SRC IPCGEN
	;
	;.EDIT	1307	Move 0 to COMP-3 item
	;		JSM,18-SEP-81,SPR:20-16560
	;		A:SRC CMNGEN
	;
	;.EDIT	1310	First of two LIB files is forgotten
	;		JSM,24-SEP-81,SPR:10-31525
	;		A:SRC GETITM
	;
	;.EDIT	1311	Bad placement Diag 179 when ref made to para def twice in sect
	;		WTK/JM,28-SEP-81,SPR:10-31212
	;		A:SRC COBOLD
	;
	;.EDIT	1312	Warning for +,+++... or -,---...
	;		WTK/JM,30-SEP-81,SPR:20-16845
	;		A:SRC DIAGS,PSCAN
	;
	;.EDIT	1313	No diag when CR LF and sect or para name follows IF cond clause 
	;		JM,30-SEP-81,SPR:20-16844
	;		A:SRC DTREE,COBOLD
	;
	;.EDIT	1314	Continue  char after "(" gives bad subscript
	;		WTK,30-SEP-81,SPR:20-16846
	;		A:SRC GETITM
	;
	;.EDIT	1315	Save block for A/B params during Search 1 word short causes Ill inst in Phase E

	;		WTK/JM,30-SEP-81,SPR:20-16843
	;		A:SRC IMPURE
	;
	;.EDIT	1316	Copy replacing para name after * comment omits LF - diag State. Expec
	;		JSM,01-OCT-81,SPR:10-31689
	;		A:SRC GETITM,IMPURE
	;
	;.EDIT	1317	IF on 2500 char item fails
	;		WTK,01-OCT-81,SPR:10-31687
	;		A:SRC IFGEN
	;
	;.EDIT	1320	COBOL-68 ref to OCCURS DEPEN items don't conform to ANSI-68 standards
	;		JSM,07-OCT-81,SPR:10-31665
	;		A:SRC MOVGEN,IFGEN
	;
	;.EDIT	1321	USE ... F.6 name OPGN F.6 name fails after first OPGN
	;		DMN/JH,07-OCT-81,SPR:20-16881
	;		A:SRC DTREE
	;
	;.EDIT	1322	Check last para in prog for ending in uncond GOTO
	;		WTK,8-OCT-81,SPR:20-16882
	;		A:SRC DTREE,COBOLD
	;
	;.EDIT	1323	Test receiving alphanumeric edited field for size < sending field
	;		JSM,14-OCT-81,SPR:10-31660
	;		A:SRC MOVGEN
	;
	;.EDIT	1324	Non-BIS, transfer of more than 2047 characters fails
	;		JEH,05-NOV-81,SPR:10-31711
	;		A:SRC MOVGEN
	;
	;.EDIT	1325	Comments in DATE-COMP being dropped even w/ *, reset DCCFLG if scanning comm
	;		JEH,14-DEC-81,SPR:20-16940
	;		A:SRC COBOLB
	;
	;.EDIT	1326	Edit 1322 broke CREF listings
	;		WTK,18-DEC-81,SPR:NONE
	;		A:SRC COBOLD
	;
	;.EDIT  1327    ID DIV subscript required - add call to SETOPB to Edit 1126
	;		JEH,04-JAN-82,SPR:NONE
	;		A:SRC SRTGEN
	;
	;.EDIT  1330	Check memory size of OBJECT-COMPUTER, give warning and set to max if too large
	;		JEH,07-JAN-82,SPR:20-17179
	;		A:SRC COBOLB,DIAGS
	;
	;.EDIT  1331	Failure in phase E - WRITE ADVANCING data-name LINES, data-name syntaxed
	;		JEH,13-JAN-82,SPR:NONE
	;		A:SRC IOGEN
	;
	;.EDIT	1332	COLLATING SEQUENCE scanning too far
	;		DMN,19-JAN-82,SPR:20-17180
	;		A:SRC COBOLB
	;
	;.EDIT	1333	Fatal error when using ORGANIZATION IS RELATIVE WITH CHECKPOINT OUTPUT
	;		LEM,26-JAN-82,SPR:20-17176
	;		A:SRC BTREE
	;
	;.EDIT	1334	Supersedes edits 1322 and 1326
	;		RJD,29-JAN-82,SPR:20-17253
	;		A:SRC COBOLD,DTREE
	;
	;.EDIT  1335    Declare DATAB entries for indexes if REPORT SECTION scanned 
	;		JEH,02-FEB-82,SPR:20-16952
	;		A:SRC COBOLC,CLEANC,IMPURE
	;
	;.ENDA
	;.AUTOPATCH 5
	;
	;.EDIT	1336	Convert modes for INDEX and COMP-3 fields
	;		RJD,08-FEB-82,SPR:10-32097
	;		A:SRC MOVGEN,COBVER,INTERM
	;
	;.EDIT  1337    Fix MOVE literal to EDITED-DATA-FIELD of length 1
	;		JEH,12-FEB-82,SPR:10-31946
	;		A:SRC MOVGEN
	;
	;.EDIT	1340	Add warnings to 68274 for JUSTIFIED stmt w/
	;;		value and NOT in abbrev comb rel cond
	;		DMN,12-MAR-82,SPR:NONE
	;		A:SRC DIAGS,CLEANC,COBOLD
	;
	;.EDIT	1341	Test on mode of "A" operand to prevent multiple
	;;		trunc warnings if immediate mode
	;		JEH,16-FEB-82,SPR:10-31946
	;		A:SRC MOVGEN
	;
	;.EDIT	1342	Handle "D" in continuation column when
	;;		scanning for the end of a literal
	;		RJD,23-FEB-82,SPR:20-17273
	;		A:SRC GETITM
	;
	;.EDIT  1343    68274 - convert NOTE into a comment
	;		DMN,05-MAR-82,SPR:20-17408
	;		A:SRC GETITM,DTREE,COBOLD
	;
	;.EDIT	1344	Bad code generated for a literal compare
	;		RJD,09-MAR-82,SPR:20-17278
	;		A:SRC CMNGEN
	;
	;.EDIT  1345	Trap illegal UUO's on TOPS10
	;		JEH,18-MAR-82,SPR:10-31969
	;		A:SRC P,IMPURE,COBCOM
	;
	;.EDIT  1346    Address of conversion routine for depending on
	;;		field stored wrong
	;		JEH,30-MAR-82,SPR:10-32147
	;		A:SRC TABLES,DIAGS,COBOLC,IPCGEN
	;
	;.EDIT	1347	Eliminate warning set up by edit 1312 for fields
	;;		with non floating symbols
	;		DMN,01-APR-82,SPR:NONE
	;		A:SRC PSCAN
	;
	;.EDIT	1350	68274 Give warning for DISPLAY or STOP signed integer
	;		DMN,07-APR-82,SPR:NONE
	;		A:SRC COBOLD,DIAGS,DTREE
	;
	;.EDIT  1351    Avoid BAD TABLE LINK by storing READ .. INTO
	;;		operands in a fixed location in phase E
	;		JEH,09-MAR-82,SPR:20-17471
	;		A:SRC IFGEN.MAC
	;
	;.EDIT  1352	Fix double precision floating point subtract
	;		RLF,14-APR-82,SPR:10-32368
	;		A:SRC EXPGEN
	;
	;.EDIT  1353	If operand in literal compare too large, give
	;;		error rather than halt
	;		JEH,05-MAY-82,SPR:10-32315
	;		A:SRC DIAGS,MOVGEN,IFGEN,CMNGEN
	;
	;.EDIT  1354	RMS START error - wrong alt. key made be used
	;;		if mult. keys at same starting loc.
	;		JEH,07-MAY-82,SPR:20-17392
	;		A:SRC COBOLD
	;
	;.EDIT  1355	MOVE ZERO TO COMP-3 ITEM gets wrong value,
	;;		fix to edit 1307
	;		JEH,18-MAY-82,SPR:20-17711
	;		A:SRC CMNGEN
	;
	;.EDIT	1356	Allow qualification in DATA RECORDS ARE clause
	;		RJD,24-MAY-82,SPR:20-17519
	;		A:SRC COBOLC,CTREE
	;
	;.EDIT	1357	68274 EXAMINE replacing a word causes HALT
	;		DMN,16-JUN-82,SPR:10-32755
	;		A:SRC GETITM,IMPURE
	;
	;.EDIT	1360	68274 conversion of a file with COPY REPLACING
	;		DMN,16-JUN-82,SPR:10-32567
	;		A:SRC GETITM
	;
	;.EDIT	1361	68274 dies if CVT is not requested
	;		DMN,16-JUN-82,SPR:10-32623
	;		A:SRC GETITM
	;
	;.EDIT  1362	Declare HLDSAV outside of MCS!TCS conditional code
	;		JEH,07-JUN-82,SPR:10-32624
	;		A:SRC IMPURE,COBOLC
	;
	;.EDIT	1363	Fix syntaxing of SPECIAL-NAMES is defining both
	;;		collating seq and CHANNEL numbers
	;		DMN,21-JUN-82,SPR:10-32453
	;		A:SRC COBOLB,COBOLE
	;
	;.EDIT  1364	Set size of delimiter to 1 if fig. const. and 
	;;		source is edited field
	;		JEH,11-JUN-82,SPR:10-32465
	;		A:SRC STRGEN
	;
	;.EDIT	1365	Size of STRING source wrong if num edited and
	;;		defined with OCCURS clause
	;		JEH,14-JUN-82,SPR:10-32618
	;		A:SRC STRGEN
	;
	;.EDIT	1366	Correct edit 1335, set up CURHLD properly
	;		JEH,14-JUN-82,SPR:NONE
	;		A:SRC COBOLC
	;
	;.EDIT	1367	Correct edit 1343, return after converting
	;;		NOTE to comment
	;		SMI,25-JUN-82,SPR:20-17913
	;		A:SRC COBOLD
	;
	;.EDIT	1370	Make CURAKT an absolute address so XPAND
	;;		will update it correctly
	;		JEH,28-JUN-82,SPR:NONE
	;		A:SRC IOGEN
	;
	;.EDIT	1371	Set CUREOP to B operand before generating
	;;		truncation warning
	;		RJD,28-JUN-82,SPR:20-17918
	;		A:SRC MOVGEN
	;
	;.EDIT	1372	Gives error message when COPY REPLACING finds ==
	;;		missing after BY.
	;		RLF,02-JUL-82,SPR:20-17926
	;		A:SRC GETITM
	;
	;.EDIT	1373	Corrects page advancing when more than
	;;		2 report header lines
	;		RJD,15-JUL-82,SPR:20-17967
	;		A:SRC TABLES,COBOLC,RPWGEN
	;
	;.EDIT	1374	Check the collating sequence before
	;;		generating high-values
	;		JEH,22-JUL-82,SPR:10-32454
	;		A:SRC IFGEN
	;
	;.EDIT	1375	Check to see if DATAB entry
	;;		contains DA.DEP field
	;		SMI,02-AUG-82,SPR:20-17980
	;		A:SRC IOGEN
	;
	;.EDIT	1376	Correct diagnostic if line before
	;;		FD is too long
	;		RLF,02-AUG-82,SPR:10-32810
	;		A:SRC COBOLC
	;
	;.EDIT	1377	Gives warning on truncation when converting FP to fix
	;		RLF,05-AUG-82,SPR:10-32886
	;		A:SRC MOVGEN
	;
	;.EDIT	1400	Fixes LABEL USE PROCEDURE for file specific format
	;		RJD,10-AUG-82,SPR:10-32809
	;		A:SRC PURE,DTREE,COBOLD
	;
	;.EDIT	1401	Flag error when statements are in EXIT paragraph
	;		SMI,25-AUG-82,SPR:10-32969
	;		A:SRC DIAGS,DTREE
	;
	;.EDIT	1402	Make COMPUTE do floating point divide
	;		JEH,30-SEP-82,SPR:10-32885
	;		A:SRC EXPGEN
	;
	;;.EDIT	1403	EDIT WITHDRAWN - Do not install: Gives truncation
	;;		warning message after rounding
	;;		RLF,13-SEP-82,SPR:10-32886
	;;		A:SRC IMPURE,CMNGEN,EXPGEN
	;
	;.EDIT	1404	Update byte pointer after LATTAB expands
	;		SMI,15-SEP-82,SPR:10-32952
	;		A:SRC IFGEN
	;
	;.EDIT	1405	Makes NEXT SENTENCE after ELSE without period get fatal
	;		RLF,17-SEP-82,SPR:10-33064
	;		A:SRC DTREE
	;
	;.EDIT	1406	Fix COPY REPLACING for continuation in A margin
	;		SMI,17-SEP-82,SPR:10-32949
	;		A:SRC GETITM
	;
	;.EDIT	1407	Fix COPY REPLACING in ID DIVISION
	;		SMI,23-SEP-82,SPR:20-18216
	;		A:SRC COBOLB
	;
	;.EDIT	1410	FIX MOVE SPACES TO DATA ITEM IN LINKAGE SECTION
	;		SMI,28-SEP-82,SPR:20-18225
	;		A:SRC MOVGEN
	;
	;.EDIT	1411	Provide leading truncation warning in COMPUTE
	;;		statement when ROUNDED
	;		JEH,30-SEP-82,SPR:10-32885
	;		A:SRC CMNGEN
	;
	;.EDIT	1412	Makes LSU work with ISAM sequential access
	;		RLF,01-OCT-82,SPR:20-18125
	;		A:SRC COBOLD,IOGEN
	;
	;.EDIT	1413	Fix 68274 conversion of DBMS statement
	;		SMI,06-OCT-82,SPR:10-33089
	;		A:SRC GETITM,COBOLD,DBGETF
	;
	;.EDIT	1414    DBMS USE procedures in the declaratives section
	;;		of subprogram are ignored
	;		DMN,07-OCT-82,SPR:NONE
	;		A:SRC IPCGEN
	;
	;.EDIT	1415	Generate SET TALLY TO 0
	;		SMI,08-OCT-82,SPR:10-33117
	;		A:SRC GETITM,COBOLD,IMPURE,DIAGS
	;
	;.EDIT	1416	Generate warning message for 68274
	;		SMI,08-OCT-82,SPR:10-33116
	;		A:SRC IFGEN,DIAGS
	;
	;.EDIT	1417	Fix 68274 conversion of write stmt.
	;		SMI,15-OCT-82,SPR:10-33156
	;		A:SRC CLEANC,CLEAND
	;
	;.EDIT	1420	Fix generation of code for EBCDIC sorts
	;		SMI,18-OCT-82,SPR:20-18255
	;		A:SRC SRTGEN
	;
	;.EDIT	1421	Generate left truncation for RIGHT JUSTIFY.
	;		RLF,18-OCT-82,SPR:10-32998
	;		A:SRC MOVGEN
	;
	;.EDIT	1422	Fix conversion of DATE-COMPILED line
	;		SMI,19-OCT-82,SPR:NONE
	;		A:SRC COBOLB
	;
	;.EDIT	1423	68274 Fix conversion of FILE LIMITS
	;		SMI,22-OCT-82,SPR:NONE
	;		A:SRC COBOLB,BTREE
	;
	;.EDIT	1424	Give fatal error on non-DISPLAY data declared
	;;		in file section
	;		JEH,26-OCT-82,SPR:20-18388
	;		A:SRC COBOLC,DIAGS,FNDPOP
	;
	;.EDIT	1425	68274 Fix conversion of RESERVE statement
	;		SMI,26-OCT-82,SPR:NONE
	;		A:SRC COBOLB
	;
	;.EDIT	1426	68274 Make TALLY a COMP item
	;		SMI,26-OCT-82,SPR:10-33156
	;		A:SRC GETITM
	;
	;.EDIT	1427	68274 Generates warning SHOULD BE UNSIGNED INTEGER
	;;		when data item is an unsigned integer.
	;		SMI,27-OCT-82,SPR:NONE
	;		A:SRC CLEANC
	;
	;.EDIT	1430	Store intermediary result in 2-wd temp
	;;		if d.p. floating point
	;		JEH,05-NOV-82,SPR:10-33207
	;		A:SRC EXPGEN
	;
	;.EDIT	1431	DBMS - syntax error on FIND statement if
	;;		identifier-2 not COMP
	;		DMN,09-NOV-82,SPR:NONE
	;		A:SRC COBOLD,DIAGS
	;
	;.EDIT	1432	Indirect command file for compiler doesn't type
	;;		outp warnings on TTY.
	;		RLF,19-NOV-82,SPR:10-33227
	;		A:SRC COBOLA
	;
	;.EDIT	1433	Fix edit 1373 when report has no PAGE HEADING 
	;;		report groups
	;		SMI,11-NOV-82,SPR:NONE
	;		A:SRC RPWGEN,IMPURE
	;
	;.EDIT	1434	Allow UNSTRING to return sign to signed
	;;		destination fields
	;		JEH,01-DEC-82,SPR:20-18506
	;		A:SRC STRGEN
	;
	;.EDIT	1435	Prevent TI wait state after error message is printed
	;;		for /Y<cr-lf>
	;		DMN,03-DEC-82,SPR:10-33303
	;		A:SRC COBOLA
	;
	;.EDIT	1436	Fix 68274 conversion in COMM. SECTION
	;		SMI,03-DEC-82,SPR:10-33333
	;		A:SRC COBOLC,CTREE
	;
	;.EDIT	1437	Generate error message for all undef. errors
	;;		on one line.
	;		SMI,04-DEC-82,SPR:10-33234
	;		A:SRC DTREE
	;
	;.EDIT	1440	COPY REPLACING of numeric literal loses next period
	;		DMN,07-DEC-82,SPR:10-33198
	;		A:SRC GETITM
	;
	;.EDIT	1441	Fix edits 1402 and 1430 for NON-BIS compilers
	;		JEH,07-DEC-82,SPR:10-33256
	;		A:SRC EXPGEN
	;
	;.EDIT	1442	Move of seperate sign display to 1-word comp moves zero
	;;		or minus sign only
	;		DMN,07-DEC-82,SPR:10-33229
	;		A:SRC MOVGEN
	;
	;.EDIT	1443	Add to Edit 1431 to check for decimal places
	;		SMI,08-DEC-82,SPR:10-33219
	;		A:SRC COBOLD
	;
	;.EDIT	1444	68274 has problem with IS when comment columns exist
	;		DMN,09-DEC-82,SPR:10-33347
	;		A:SRC GETITM
	;
	;.EDIT	1445	68274 removes period if last clause is turned
	;;		into a comment
	;		DMN,10-DEC-82,SPR:10-33347
	;		A:SRC GETITM
	;
	;.ENDA
	;.ENDV


	*** EDITS BELOW WILL BE IN COBOL-68/74 VERSION 12B RELEASE ***

 INS 36/11	;05C6

 REP 5/12	;05C7
	*** VERSION 12B RELEASE ***
 WIT
	;.COMPONENT LIBOL
	;.VERSION 12B
	;.AUTOPATCH 4
	;;
	;.EDIT	1000	SMU of relative file fails, falls into ISAM code
	;		DMN/JM,10-AUG-81,SPR:NONE
	;		A:SRC LSU
	;
	;.EDIT	1001	SMU of ISAM sometimes fails if block got split
	;		HAM/JM,11-AUG-81,SPR:10-31570
	;		A:SRC CBLIO
	;
	;.EDIT	1002	Funct routine CBC fails if CORPT goes to 0 when overlays in use
	;		DMN/JM,11-AUG-81,SPR:20-16842
	;		A:SRC COBFUN
	;
	;.EDIT	1003	If file closed w/ DGLGTE doesn't exist, next file to be closed is deleted
	;		DMN/JM,11-AUG-81,SPR:10-31571
	;		A:SRC CBLIO
	;
	;.EDIT	1004	When trunc of COMP-1 field should produce 0, get weird neg number
	;		JSM,05-OCT-81,SPR:10-31688
	;		A:SRC FIX
	;
	;.EDIT	1005	CLOSE w/ DELETE fails on TOPS-10 if LSU w/ Monitor 7.01
	;		JEH,05-OCT-81,SPR:10-31726
	;		A:SRC CBLIO
	;
	;.EDIT	1006	Unable to REWRITE a non-null EBCDIC record
	;		WTK/JM,08-OCT-81,SPR:10-31691
	;		A:SRC CBLIO
	;
	;.EDIT	1007	Read unconditional code for Rel 5 doesn't work
	;		DMN,04-OCT-81,SPR:NONE
	;		A:SRC CBLIO
	;
	;.EDIT	1010	LOOKUP errors using ENTER arg block to determine error msg to print
	;		JEH/JM,13-OCT-81,SPR:10-31722
	;		A:SRC CBLIO
	;
	;.EDIT	1011	Fixes 1005 CLOSE w/ DELETE after non-SMU open, output doesn't delete file
	;		JM,22-OCT-81,SPR:31742
	;		A:SRC CBLIO
	;
	;.EDIT  1012	NON-BIS display of comp field with low-values is wrong
	;		JEH,13-JAN-82,SPR:10-31765
	;		A:SRC PD
	;
	;.EDIT  1013	Sequential relative ASCII file; null record in block
	;;		causes rest of block to be skipped.
	;		WTK,20-JAN-82,SPR:NONE
	;		A:SRC CBLIO
	;
	;.ENDA
	;.AUTOPATCH 5
	;
	;.EDIT  1014	Append extra <CR> to magtape files - match FCTC implementation
	;		LEM,16-FEB-82,SPR:10-31971
	;		A:SRC CBLIO
	;.EDIT  1015	allow COMPT. UUO to return correct file statues errnum
	;		LEM,02-MAR-82,SPR:20-17305
	;		A:SRC CBLIO
	;
	;.EDIT	1016	Test for ISAM files when using CHECKPOINT EVERY n RECORDS
	;		RJD,17-MAR-82,SPR:10-32257
	;		A:SRC CBLIO
	;
	;.EDIT  1017	RESET ERRNUM when retrying to OPEN a busy RMS file
	;		LEM,08-APR-82,SPR:20-17329
	;		A:SRC LBLERR
	;
	;.EDIT	1020	Test for use of CHECKPOINT with RMS files opened I-O
	;		RJD,21-APR-82,SPR:20-17559
	;		A:SRC RMSIO
	;
	;.EDIT  1021	make READ NEXT return correct record as ANSI standard states
	;		LEM,27-APR-82,SPR:20-17271
	;		A:SRC CBLIO
	;
	;.EDIT	1022	Deallocate memory if OPEN fails with RMS files
	;		RJD,29-APR-82,SPR:20-17312
	;		A:SRC RMSIO
	;
	;.EDIT	1023	Make pointer go to the next record after a REWRITE
	;		RLF, 07-MAY-82,SPR:20-17667
	;		A:SRC CBLIO
	;
	;.EDIT	1024	Make READ check for end of record by count rather than character
	;		RJD,14-MAY-82,SPR:10-32428
	;		A:SRC CBLIO
	;
	;.EDIT	1025	Test CORPT. as well as HLOVL. to decide whether core
	;;		can be freed
	;		JEH, 25-MAY-82,SPR:10-32197
	;		A:SRC COBFUN
	;
	;.EDIT	1026	Reset buffer pointer before append FILOP.
	;		JEH, 01-JUN-82,SPR:10-32567
	;		A:SRC CBLIO
	;
	;.EDIT	1027	Zero buffer location so RETAIN NEXT of L-V
	;;		key get right block number
	;		JEH, 07-JUN-82,SPR:20-17328
	;		A:SRC CBLIO
	;
	;.EDIT	1030	Clear the SFD area when opening a SMU file
	;;		on an ersatz device from a SFD
	;		RJD,08-JUN-82,SPR:10-32398
	;		A:SRC CBLIO
	;
	;.EDIT	1031	Don't decrement byte/record count when finding
	;;		<CR><LF> in record
	;		LEM,08-JUN-82,SPR:10-32463
	;		A:SRC CBLIO
	;
	;.EDIT	1032	STRING/UNSTRING - the destination character
	;;		count is off by one
	;		LEM,28-JUN-82,SPR:20-17802
	;		A:SRC NSTRNG
	;
	;.EDIT  1033    Do close abort on labeled mag tapes during
	;;		fatal error processing
	;               SMI, 06-JUL-82,SPR:20-17970
	;               A:SRC CBLIO
	;
	;.EDIT	1034	Zero out unused data block area after delete
	;		JEH, 15-JUL-82,SPR:20-17925
	;		A:SRC CBLIO
	;
	;.EDIT	1035	Make READ NEXT after DELETE on sixbit relative
	;;		not skipping record
	;		RLF, 20-JUL-82,SPR:10-32758
	;		A:SRC CBLIO
	;
	;.EDIT	1036	Zero out right half of UOUT. after checkpointing
	;		RLF, 21-JUL-82,SPR:20-18032
	;		A:SRC CBLIO
	;
	;.EDIT	1037	Change error message to "for OUTPUT only".
	;		RLF, 26-JUL-82,SPR:20-18011
	;		A:SRC CBLIO
	;
	;.EDIT  1040	Fix output byte pointer for sixbit keys
	;		JEH, 05-AUG-82,SPR:10-32807
	;		A:SRC KEY
	;
	;.EDIT	1041	Clear flags after multiply for SIZE ERROR
	;		RLF, 20-AUG-82,SPR:10-32941
	;		A:SRC ACCEPT
	;
	;.EDIT	1042	Fix if error on open of sequential file
	;		SMI, 30-AUG-82,SPR:20-18176
	;		A:SRC CBLIO
	;
	;.EDIT	1043	Do not ignore end-of-file errors
	;		SMI, 13-SEP-82,SPR:20-18078
	;		A:SRC CBLIO
	;
	;.EDIT	1044	Space-fill record area at file open
	;		RLF, 10-OCT-82,SPR:20-18154
	;		A:SRC RMSIO
	;
	;.EDIT	1045	Use $MESSAGE in RMSGET as first RMS-20 call to
	;;		init RMS-20 global data symbols
	;		JSM, 14-OCT-82,SPR:NONE
	;		A:SRC RMSIO
	;
	;.EDIT	1046	Fix RMS CHECKPOINTING for DELETE and REWRITE
	;		SMI, 14-OCT-82,SPR:10-33144
	;		A:SRC RMSIO
	;
	;.ENDA
	;.ENDV
	;.ENDR

	*** EDITS BELOW WILL BE IN COBOL-68/74 VERSION 12B RELEASE ***
 DEL 104/13	;05C8
 DEL 44/14	;05C9
 DEL 220/15	;05C10
 DEL 52/16	;05C11
 SUM 25638