Trailing-Edge
-
PDP-10 Archives
-
CFS_TSU04_19910205_1of1
-
update/cblsrc/cobver.mac
There are 21 other files named cobver.mac in the archive. Click here to see a list.
; UPD ID= 1957 on 3/3/89 at 8:39 AM by KSTEVENS
UNIVERSAL COBVER -- VERSION NUMBERS AND HISTORY FILE FOR COBOL
SUBTTL VERSION 13
SEARCH COPYRT
SALL
;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, 1983, 1984, 1987 BY DIGITAL EQUIPMENT CORPORATION
;VERSION NUMBER SYMBOLS FOR THE COBOL COMPILER (COBOL)
CBLEDT==1653 ;EDIT LEVEL
CBLMJR==13 ;MAJOR RELEASE VERSION
CBLMNR==0 ;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 (COBOTS)
LBLEDT==1207 ;EDIT LEVEL
LBLMJR==CBLMJR ;MAJOR RELEASE VERSION
LBLMNR==CBLMNR ;MAINTENANCE RELEASE
LBLWHO==0 ;WHO LAST EDITED (0=DEC)
LBLVER==BYTE(3)LBLWHO(9)LBLMJR(6)LBLMNR(18)LBLEDT
.DIRECTIVE .NOBIN
SUBTTL MAJOR VERSION HISTORY FOR COBOL AND COBOTS
COMMENT \
COBOL V1 -- SEP 1970 (LIBOL V1)
COBOL V2 -- JAN 1971 (LIBOL V2)
COBOL V2B - JUL 1971 (LIBOL V3)
COBOL V3 -- JAN 1972 (LIBOL V4)
COBOL V4 -- AUG 1972 (LIBOL V5)
COBOL V5 -- MAR 1973 (LIBOL V6)
COBOL V5A - OCT 1973 (LIBOL V6A)
COBOL V6 -- NOV 1974 (LIBOL V7)
COBOL V6A - MAR 1975 (LIBOL V7A)
COBOL V10 - JAN 1976 (LIBOL V10)
COBOL V11 - JUL 1977 (LIBOL V11)
COBOL-68 V12 - JUN 1978
COBOL-74 V12 - JAN 1979
COBOL-68/74 V12A - DEC 1979
COBOL-68/74 V12B - SEP 1981
\
SUBTTL CAST OF CHARACTERS
COMMENT \
PEOPLE WHO HAVE DEVELOPED OR MODIFIED COBOL/COBOTS INCLUDE:
ACK ANDY KASCMAR
ALB AL BLACKINGTON
BCM BRAD MERRILL
BL BRUCE LARU
BSM BERNIE MIETH
CAM CHUCK McCOMMAS
CLRH CHARLOTTE HOUDE
DAW DAVID WRIGHT
DBT DAVID TOLMAN
DC DONNA CHAO
DLC LARRY CAMPBELL
DMN DAVID NIXON
DPL DANA LAJOIE
EHM EVALYN MCCARTHY
GCS GAIL SANDERS
GPS GIL STILE
HAM HOWARD MAYBERRY
ILG IRWIN GOVERNMAN
JEC/JC JOHN CONNOR
JEF/JF JOE FRIES
JEH JANE HOFFMAN
JSM JOHN MASLANKA
KWS KEN STEVENS
LEM LAKSHMI MULLAHOO
MDL MICHAEL LACKMAN
MEM MARIE MCCLINTOCK
MFTT MICHAEL TIGHE
MFY MICHAEL YODER
MJC MICHAEL CARLETON
RJD RHONDA DURAY
RLF RUTH FONG
SSC SETH COHEN
SEB SUMNER BLOUNT
SHP SERGE POLEVITSKY
SMI STEVE INGERSOLL
VR VIRGINIA ROGERS
WTK BILL KILGORE
... WAYNE NEELY
\
SUBTTL COBOL EDIT HISTORY
COMMENT \
;.BEGINR
;.COMPONENT COBOL
;.VERSION 13
;.AUTOPATCH 23
;.EDIT 1653 12c only. Make MOV external.
;.EDIT 1652 Fix code generation so that the correct code would get
;; generated for Sorting an RMS indexed sequential file.
; KWS,16-FEB-1989,SPR:20-21411
; A:SRC SRTGEN,IOGEN,CMNGEN,COBVER
;.ENDA
;.AUTOPATCH 22
;.EDIT 1651 Fix code generation so that the CMPxx instructions always
;; generated 3 words, rather than 1 or 2. The microcode requires
;; it.
; KWS,01-FEB-89,SPR:20-21888
; A:SRC IFGEN,COBVER
;.ENDA
;.AUTOPATCH 21
;.EDIT 1650 Reconciled edits 1641 and 1637 with edits 1570 and 1626.
; KWS,21-MAR-88,SPR:NONE
; A:SRC CTREE,COBVER
;.ENDA
;.AUTOPATCH 20
;.NOEDITS
;.ENDA
;.AUTOPATCH 19
;.EDIT 1647 Fixed code generation for COMPUTE statement so extraneous DMOVE
;; does not get generated.
; KWS,21-MAR-88,SPR:10-35598
; A:SRC EXPGEN,COBVER
;.ENDA
;.AUTOPATCH 18
;.EDIT 1646 Fixed group to elimentary editting
; KWS,9-DEV-87,SPR:20-21637
; A:SRC MOVGEN,COBVER
;
;.EDIT 1645 Increased the gtjfn block to include gtnod.
; KWS,16-NOV-87,SPR:20-21572
; A:SRC COMUNI,COBVER
;
;.EDIT 1644 Extended edit 1603 to include the case where the SD is not in
;; the file section.
; KWS,29-SEP-87,SPR:20-21619
; A:SRC SRTGEN,COBVER
;
;.ENDA
;.AUTOPATCH 17
;.EDIT 1643 SELECTed sequential file gets error message erroneously from
;; FREE EVERY RECORD statement
; RLF,4-AUG-87,SPR:20-21563
; A:SRC IOGEN,COBVER
;.ENDA
;.AUTOPATCH 16
;.EDIT 1642 Length of reference modification ignored in move statement.
; MEM,9-JAN-87,SPR:20-21486
; A:SRC MSCGEN,COBVER
;
;.EDIT 1641 An undefined name used as index caused the compiler to ICE.
; MEM,6-JAN-87,SPR:20-21465
; A:SRC CTREE,COBVER
;
;.EDIT 1640 NON-BIS patch and we only build BIS compilers on -20.
; 12C Only.
;
;.EDIT 1637 Call DA64. when file name is seen instead of a report name
; so that RPWRDL is set up for when it is used at D27MCY+15.
; MEM,17-DEC-86,SPR:20-21481
; A:SRC CTREE,COBVER
;
;.ENDA
;.AUTOPATCH 15
;.EDIT 1636 Modify display of an item with a depending variable so the
; the correct number of characters are displayed instead of
; the maximum size of the item.
; MEM,12-NOV-86,SPR:20-CS00080
; A:SRC IOGEN,COBVER
;
;.EDIT 1635 Remove edit 1630 from DTREE and replace it with a patch in
; COBOLD. Prior to 1630 we were sometimes getting more
; '072' (start expression) operators put into genfil than
; '073' (end expression), but with edit 1630 we sometimes have
; the reverse problem.
; MEM,4-NOV-86,SPR:NONE
; A:SRC DTREE,COBOLD,COBVER
;
;.EDIT 1634 Make the Value-of-id variable in the File status
; variables to allow sizes to a max of 63(decimal). This
; takes into account long file names.
; KWS,30-OCT-86,SPR:20-21278
; A:SRC CLEANC,COBVER
;
;.EDIT 1633 Depending on with comp-1 doesn't get correct
; internal size
; RLF,28-OCT-86,PSR:20-21269
; A:SRC CMNGEN,COBVER
;
;.EDIT 1632 Not applicable to Cobol-13
;
;.EDIT 1631 Subscripting a non-uniquely defined name caused a
; catastrophe in phase E because phase D was not correctly
; recovering from the error.
; MEM,16-OCT-86,SPR:20-21290
; A:SRC COBOLD,CMNGEN,COBVER
;
;.EDIT 1630
; Fix problem with IF (A EQUALS B(1:2))
; MEM,29-SEP-86,SPR:20-21183
; A:SRC DTREE,COBVER
;
;.EDIT 1627 Fix indexing into table FIGTYP.
; MEM,24-SEP-86,SPR:20-21167
; A:SRC MSCGEN,COBVER
;
;.ENDA
;.AUTOPATCH 14
;.NOEDITS
;.ENDA
;.AUTOPATCH 13
;
;.EDIT 1626 Fix loop in CTREE at DD59E (BLOCK CONTAINS)
; MJC,15-JAN-86,SPR:20-21066
; A:SRC CTREE,COBVER
;
;.EDIT 1625 Set up .JBREN in COBSCN so REENTER works
; MJC,15-JAN-86,SPR:20-20993
; A:SRC COBSCN,COBVER
;
;.EDIT 1624 COMPUTE converts 1 word integer to 1 word floating without
;; checking the size of the source item.
; MJC,14-JAN-86,SPR:20-21040
; A:SRC MOVGEN,COBVER
;
;.EDIT 1623 ADD 1 TO var1 GIVING var2 generates bad code.
; MJC,10-JAN-86,SPR:20-20946
; A:SRC MATGEN,COBVER
;
;.EDIT 1622 Use ADJBP to genterate refmod offset BP for non-sixbit.
; MJC,09-JAN-86,SPR:20-20958
; A:SRC MSCGEN,COBVER
;
;.EDIT 1621 Fix HANDAN to display FILTAB optional data.
; MJC,05-DEC-85,SPR:NONE
; A:SRC HANDAN,COBVER
;
;.EDIT 1620 Fix edit 1605. Suppress CBL670 if 'REC CNT nn TO nn' syntax.
; MJC,04-DEC-85,SPR:10-35298
; A:SRC COBOLC,CLEANC,HANDAN,TABLES,COBVER
;
;;.EDIT 1617 Not applicable to COBOL-13.
;
;.ENDA
;.AUTOPATCH 12
;
;.EDIT 1616 Correct edit 1614.
; KWS,25-NOV-85,SPR:NONE
; A:SRC COBOLC,COBVER
;
;;.EDIT 1615 Not applicable to COBOL-13.
;
;.EDIT 1614 Fixed over-zealous edit so binary and ascii mixed mode
;; works.
; KWS,13-NOV-85,SPR:20-20704
; A:SRC COBOLC,COBVER
;
;.EDIT 1613 Check for table overflow in XPAND
; MJC,6-NOV-85,SPR:20-20925
; A:SRC COBCOM,COBVER
;
;.EDIT 1612 One char IF with COLLATING SEQ gens bad code. Move check for
;; COLSEQ.
; MJC,30-OCT-85,SPR:20-20776
; A:SRC IFGEN,COBVER
;
;.EDIT 1611 Fix edit 1602. END-IF causes syntax tree error.
; MJC,29-OCT-85,SPR:NONE
; A:SRC DTREE,COBVER
;
;.EDIT 1610 Fix CBL770 warning on more than two SUM items
; MJC,24-OCT-85,SPR:20-20917
; A:SRC IMPURE,CLEANC,COBVER
;
;;.EDIT 1607 Not applicable to 13
;
;.EDIT 1606 Reset FNOLST so that error count appears in the list file.
; MJC,24-JUL-85,SPR:20-20797
; A:SRC COBOLG,COBVER
;
;.EDIT 1605 Suppress CBL670 when RECORD VARYING is used
; MJC,22-JUL-85,SPR:20-20736
; A:SRC CLEANC,COBVER
;
;.EDIT 1604 Update CURIRG when expanding LITAB so INSPECT won't gen bad arg
; MJC,19-JUL-85,SPR:10-35246
; A:SRC CMNGEN,MSCGEN,COBVER
;
;.EDIT 1603 Fix edit 1516 not to use CURFIL
; MJC,17-JUL-85,SPR:20-20744
; A:SRC SRTGEN,COBVER
;
;.EDIT 1602 Fix edit 1541 so that NEXT SENTENCE works.
; MJC,15-JUL-85,SPR:NONE
; A:SRC COBOLD,DTREE,COBVER
;
;.EDIT 1601 Remove FORTRAN edit numbers
; MJC,21-JUN-85,SPR:NONE
; A:SRC COBSCN,CMND20,COBVER
;
;.EDIT 1600 Implement INITIALIZE for tables
; MJC,21-JUN-85,SPR:20-20351
; A:SRC COBOLD,DTREE,MSCGEN,IMPURE,DIAGS,COBVER
;
;;.EDIT 1577 N/A to 13
;
;.ENDA
;.AUTOPATCH 11
;.EDIT 1576 Fix miscellaneous bugs with COPY REPLACING.
; JEH,19-APR-85,SPR:10-35098
; A:SRC GETITM,PSCAN,IMPURE
;
;.EDIT 1575 Fix catastrophe in phase C, due to not unique report-name.
; JSM,9-APR=85,SPR:20-20471
; A:SRC COBOLC
;
;.EDIT 1574 Fix the level check in DA29.D to check for a DATAB pointer.
; MJC,5-APR-85,SPR:20-20486
; A:SRC COBOLC,COBVER
;
;.EDIT 1573 Fix edit 1556. Make a new PCA7BA that does not set FPERWD
; MJC,4-APR-85,SPR:NONE
; A:SRC COBOLD,DTREE,COBVER
;
;.EDIT 1572 Fix CONTROL FOOTING to use the saved value of the control
;; variable when a break occurs.
; MJC,4-APR-85,SPR:20-20476
; A:SRC RPWGEN,COBVER
;
;.EDIT 1571 Replace some uses of acs so FNDPOP is called
;; with different arguments.
; JEH,1-APR-85,SPR:20-20396
; A:SRC COBOLC
;
;.EDIT 1570 Implement reference modification in phase C.
; JEH,29-MAR-85,SPR:20-20551
; A:SRC P,CTREE,COBOLC,RPWGEN
;
;.EDIT 1567 Check the files in a SAME AREA clause in case the first
;; file is used again later in the clause.
; MJC,27-MAR-85,SPR:10-35026
; A:SRC COBOLB,COBVER
;
;.EDIT 1566 Zero the in-line tag (INPTAG) after it is used so that
;; the next PERFORM won't use it.
; MJC,26-MAR-85,SPR:20-20442
; A:SRC COBOLD,COBVER
;
;.EDIT 1565 Removed OCCURS 1 TIMES optimization from subscripting
;; because it generates bad code.
; MJC,25-MAR-85,SPR:20-CS00026
; A:SRC CMNGEN,COBVER
;
;.EDIT 1564 Fix the 'SET condition-name' code
; JEH,25-MAR-85,SPR:20-20441
; A:SRC MSCGEN,COBOLD,DTREE
;
;.EDIT 1563 Allow the no rewind bit as valid for report writer
;; files.
; KWS,21-MAR-85,SPR:20-20550
; A:SRC COBOLD
;
;.EDIT 1562 In the reference modifier routines, if the current
;; operator is zero, check the implop field that 'if'
;; uses for storing opcodes.
; JEH,20-MAR-85,SPR:20-20573
; A:SRC COBOLD
;
;.EDIT 1561 If reference modification is being done within the
;; scope of an IF expression then save the open paren
;; count and restore it after the modification is complete.
; JEH,20-MAR-85,SPR:20-20572
; A:SRC COBOLD,IMPURE,COBVER
;
;;.EDIT 1560 Not applicable to 13
;
;.EDIT 1557 Update size for redefines
; BCM,26-FEB-85,SPR:20-20410
; A:SRC COBOLC
;
;.ENDA
;.AUTOPATCH 10
;
;.EDIT 1556 Remove code to ignore a period inside SEARCH ... WHEN and
;; and add nodes to DTREE to catch the period.
; MJC,22-JAN-85,SPR:NONE
; A:SRC COBOLD,DTREE,COBVER
;
;.EDIT 1555 Flush CRF sort buffers before closing the temp files
; MJC,12-JAN-85,SPR:20-19273
; A:SRC SRTCRF,COBVER
;
;.EDIT 1554 Allow STOP RUN to followed by and END-XXX scope terminator
; MJC,03-JAN-85,SPR:20-20474
; A:SRC DTREE,COBVER
;
;.EDIT 1553 Fix edit 1541. Redo PA823. to pop nodes from the node stack
;; to perform the wrap-up actions for END-XXX scope terms.
; MJC,31-DEC-84,SPR:20-19930
; A:SRC COBOLD,DTREE,IMPURE,DIAGS,COBVER
;
;.EDIT 1552 Change a PUSHJ to a PJRST so the routine returns
;; properly
; KWS,16-NOV-84,SPR:20-19789
; A:SRC SRTCRF,COBVER
;
;.EDIT 1551 Cause COBOL to generate IFIW's in its argument
;; blocks.
; KWS,26-OCT-84,SPR:NONE
; A:SRC IPCGEN,COBVER
;
;.EDIT 1550 Clear flags on literals in SETOPN.
; KWS,26-OCT-84,SPR:10-34905
; A:SRC CMNGEN,COBVER
;
;.EDIT 1547 Make DEC extension warnings print at the
;; end of the source listings
; KWS,18-OCT-84,SPR:10-34907
; A:SRC DIAGS,COBVER
;
;.EDIT 1546 Fix move of literal 000.0 to PIC 999V9.
; KWS,3-OCT-84,SPR:20-20327
; A:SRC MOVGEN
;
;.EDIT 1545 Fix Report CODE SIXBIT conversion factor
; MJC,19-SEP-84,SPR:NONE
; A:SRC RPWGEN
;.ENDA
;.AUTOPATCH 9
;
;.EDIT 1544 Fix SUM id UPON dn to handle forward reference and check
;; for undefined DETAIL lines.
; MJC,5-SEP-84,SPR:20-20290
; A:SRC COBOLC,CLEANC,COBVER
;
;.EDIT 1543 Fix edit 1411 to not give warning if ON SIZE ERROR
;; clause is used.
; MJC,21-AUG-84,SPR:10-34792
; A:SRC CMNGEN
;
;.EDIT 1542 Fix IFGEN code so that it would request the correct
;; amount of temporary storage.
; KWS,20-AUG-84,SPR:20-20238
; A:SRC IFGEN
;
;.EDIT 1541 Fix END-IF to use ARGL2 to store and define IF,ELSE tags.
; MJC,10-AUG-84,SPR:20-20252
; A:SRC COBOLD
;
;.EDIT 1540 Nativize COBOL compiler UUOs
; MJC,18-JUN-84,SPR:20-20185
; A:SRC SRTCRF,P
;
;.EDIT 1537 Fix edit 1424, give error on comp data in ascii record
; JEH,07-JUN-84,SPR:20-20184
; A:SRC COBOLC,DIAGS
;
;.ENDA
;.AUTOPATCH 8
;.EDIT 1536 Reset AC16 to CURFIL value after examining alternate
;; keys
; JEH,31-MAY-84,SPR:NONE
; A:SRC IOGEN
;
;.EDIT 1535 Ref. Mod. - Don't give extra error messages from
;; phase E if phase D has reported problem
; JEH,16-MAY-84,SPR:NONE
; A:SRC P,COBOLD,COBOLE,MSCGEN,COBVER
;
;;.EDIT 1534 Not applicable to V13
;
;.EDIT 1533 Error generated on all alternate keys if record
;; containing their definition is variable in length
; JEH,16-MAY-84,SPR:10-34680
; A:SRC CLEANC
;
;.EDIT 1532 Fix edit 1506, installed wrong in V13
; JEH,16-MAY-84,SPR:NONE
; A:SRC MOVGEN
;
;.EDIT 1531 Change the 'TTCALL' to an 'OUTSTR' defined in P.MAC
;; so TOPS-20 jsys will be used
; JEH,14-MAY-84,SPR:NONE
; A:SRC PUTCPY
;
;.EDIT 1530 The 'FDSKC' flag (compile specs coming from disk) is not
;; getting set if the 'TAKE' command is used
; JEH,14-MAY-84,SPR:NONE
; A:SRC CMND20
;
;.EDIT 1527 Skip warning tests if 'GENERATE data-name' instead of
;; 'GENERATE report-name'
; JEH,14-MAY-84,SPR:NONE
; A:SRC COBOLD
;
;.EDIT 1526 Reset size of command buffer before call to COMND jsys
; JEH,14-MAY-84,SPR:NONE
; A:SRC CMND20
;
;.EDIT 1525 Allow use of [P,PN] in file spec for library file
;; in a COPY statement (V13)
; JEH,11-MAY-84,SPR:NONE
; A:SRC GETITM,IMPURE
;
;.EDIT 1524 Don't increment byte pointer into SRCBH before storing
;; it in RPLBH+1 for copy replacing (V13)
; JEH,04-MAY-84,SPR:NONE
; A:SRC GETITM
;
;.EDIT 1523 Print SUBPROGRAM instead of SUB on listing (V13)
; JEH,02-May-84,SPR:NONE
; A:SRC COBOLF
;
;.EDIT 1522 Clean up EOP stack if errors with reference modifiers (V13)
; JEH,26-APR-84,SPR:NONE
; A:SRC COBOLD,COBOLE,EXPGEN,MSCGEN
;
;;.EDIT 1521 Not needed in V13
;
;.EDIT 1520 Give error if "DEPENDING ON D-N" and D-N is subscripted
; JEH,28-MAR-84,SPR:20-34603
; A:SRC CLEANC
;
;;EDIT 1517 Already in v13
;
;.EDIT 1516 Don't zero sort record area if SAME RECORD AREA clause used
; JEH,19-MAR-84,SPR:NONE
; A:SRC SRTGEN
;
;.ENDA
;.ENDV
*** EDITS BELOW WILL BE IN COBOL VERSION 13 RELEASE ***
1507 29-Nov-83 JEH MOVGEN
Make handling of figurative constants more
consistant
1506 29-Nov-83 JEH MOVGEN
Have FIPS Flagger mark extensions in use of
figurative constants with numeric fields
1505 Not needed in V13
1504 Already exists in V13
1503 Not needed in V13
1502 24-Oct-82 JEH CLEANC,DIAGS
Put a warning out on any record which is smaller
than maximum record size
1501 11-Oct-83 JEH CLEANC
Put syntax error on alternate key if variable length
1500 10-Oct-83 JEH DIAGS,CLEANC,MOVGEN
Put warnings out where HIGH or LOW VALUES used
with numeric fields
1477 04-Oct-83 JEH CMNGEN
Adjust calculation of EPSILON to consider decimal
places of source
1476 23-Sep-83 JBB COBOLC
Catastrophe in Phase E. Bad table link.
1475 23-Sep-83 JBB CMNGEN
Correction to edit 1452. AC was getting clobbered.
1474 11-Jul-83 RLF IOGEN
Free records of all files, the bit wasn't checked in edit 1450.
1473 06-Jun-83 JEH MOVGEN
Don't produce truncation warnings on RPW line/pg
counters
1472 09-Jun-83 JEH MATGEN
Fix DIVIDE literal INTO dn1, dn2, etc.
1471 12-May-83 SMI RPWGEN
Fix page heading not advancing to next page
1470 12-May-83 JEH IPCGEN,RPWGEN
Make LMASKR and PUTAYY external for edits 1451 nand 1447.
1467 3-May-83 WTK DBGETF
Define ALCPA. so that DBMS-20 V.6 edit 473 undefined symbol is resolved.
1466 2-May-83 JEH CLEAND,COBOLD,DIAGS
Give error 508 under WRITE stmt,and include standard ASCII in error
1465 28-Apr-83 DMN IMPURE COBOLD
Fix edit 1354 to use DKEYSZ rather than KEYRLN.
1464 22-Apr-83 RLF IOGEN
Correction to edit 1450.
1463 22-Apr-83 DMN GETITM
Fix COPY REPLACING when BY and == are not on same line.
1462 20-Apr-83 DMN P COBOLA
*** Not required in v13 ***
Remove duplicate reserved word conflict.
1461 20-Apr-83 JEH EXPGEN
Test for DP floating point before GETEMP calls
1460 19-apr-83 RLF COBOLD,DIAGS
Give error message when key is subcripted.
1457 1-Apr-83 JSM IFGEN
IF SET-NAME SET generated literal contains garbage
1456 25-Mar-83 JEH EXPGEN
Fix COMPUTE using 'ZERO' in first term
1455 14-Mar-83 SMI GETITM
*** Not required in v13 ***
68274 does not always convert the statement following a NOTE clause correctly.
1454 7-Mar-83 SMI BTREE GETITM
*** Not required in v13 ***
68274 does not convert SYMBOLIC KEY into a comment correctly.
1453 24-Feb-83 DMN CMNGEN MOVGEN
Fix 1411 to point to correct line on truncation error.
1452 23-Feb-83 SMI COBOLC
Error 370 given when RPWTAB gets expanded.
1451 29-Jan-83 SMI RPWGEN,TABLES,PURE
Fix bad-table link when RPWTAB > 77777 words.
1450 27-Jan-83 RLF IOGEN,DIAGS
Give error message on FREE syntax error
1447 28-Dec-82 SMI IPCGEN
Fix Ill mem ref when PROGRAM-ID contains non-character non-integer characters.
1446 20-Dec-82 JEH BISGEN
Don't overwrite user-defined floating currency sign with minus.
1445 10-Dec-82 DMN GETITM
*** Not required in v13 ***
68274 removes period if last clause is turned into a comment.
1444 9-Dec-82 DMN GETITM
*** Not required in v13 ***
68274 does not correctly convert /S format when comment column exists.
1443 8-Dec-82 SMI COBOLD
Test for no decimal places in COMP field.
1442 8-Dec-82 DMN MOVGEN
Fix MOVE of Separate Sign Display item to 1-word COMP.
1441 7-Dec-82 JEH EXPGEN
*** Not required in v13 ***
Fix edits 1402 and 1430 for non-BIS compilers.
1440 7-Dec-82 DMN GETITM
COPY REPLACING loses terminal period if replacing a numeric literal.
1437 6-Dec-82 SMI DTREE
Give error message for all undefined errors on a DISPLAY line.
1436 3-Dec-82 SMI CTREE COBOLC
*** Not required in v13 ***
Fix 68274 not to cause PA1050 ill. inst. when in COMM. SEC.
1435 3-Dec-82 DMN COBOLA
Prevent TI wait state after error message is printed for /Y<cr-lf>.
1434 01-Dec-82 JEH STRGEN
Allow UNSTRING to return signs to signed destination fields.
1433 22-Nov-82 SMI RPWGEN
Fix 1373 when report has no PAGE HEADING groups.
1432 19-Nov-82 RLF COBOLA
Turn on switch to type error mesages to terminal for indirect commands.
1431 9-Nov-82 DMN COBOLD DIAGS
Fix bug caused by edits 1046 and 1104 to DBMS FIND with INDEX item.
1430 5-Nov-82 JEH EXPGEN
Store intermediate results in 2 words if DP floating point mode.
1427 27-Oct-82 SMI CLEANC
*** Not required in v13 ***
Fix 68274 not to give spurious warning "Should be signed integer".
1426 26-Oct-82 SMI GETITM
*** Not required in v13 ***
Fix 68274 to make TALLY a COMP field.
1425 26-Oct-82 SMI COBOLB
*** Not required in v13 ***
Fix 68274 to convert RESERVE negative AREAS to RESERVE 1 AREA in all cases.
1424 18-Nov-82 JEH COBOLC COBCOM DIAGS
Give fatal error on non-DISPLAY fields in ASCII file.
1423 22-Oct-82 SMI COBOLB BTREE
*** Not required in v13 ***
Fix 68274 to convert FILE LIMITS statement into a comment.
1422 19-Oct-82 SMI COBOLB
*** Not required in v13 ***
Fix 68274 to corectly comment the DATE-COMPILED paragraph.
1421 18-Oct-82 RLF MOVGEN
Make left truncation if signed numeric field is moved to smaller and right justified
alpha field.
1420 18-Oct-82 SMI SRTGEN
Bad code generated for Sort of one case of EBCDIC key.
1417 15-Oct-82 SMI CLEANC CLEAND
*** Not required in v13 ***
Fix 68274 conversion of WRITE to WRITE BEFORE ADVANCING.
1416 15-Oct-82 SMI IFGEN DIAGS
*** Not required in v13 ***
68274 Generate warning if size of literal and data item not the samr.
1415 8-Oct-82 SMI GETITM DIAGS IMPURE COBOLD
*** Not required in v13 ***
Generate SET TALLY TO ZERO before 68274 converts EXAMINE to INSPECT.
1414 7-Oct-82 DMN IPCGEN
Output call to INITDB for subprograms containing DBMS INVOKE statement.
1413 6-Oct-82 SMI GETITM COBOLC DBGETF
*** Not required in v13 ***
Fix 68274 to handle DBMS statements.
1412 1-OCT-82 RLF COBOLD IOGEN
Make RETAIN do RETAIN NEXT so LSU works for ISAM Sequential access.
1411 30-Sep-82 JEH CMNGEN
Test for leading truncation warning in the rounding routine if conversion
from floating point to binary before operand sizes adjusted.
1410 26-Sep-82 SMI MOVGEN
Fix ill mem ref in phase G if data item in LINKAGE SECTION is greater than 77777
characters.
1407 23-Sep-82 SMI COBOLB
Fix COPY REPLACING in ID-DIVISION.
1406 17-Sep-82 SMI GETITM
COPY REPLACING does not work if continued in A margin.
1405 17-Sep-82 RLF DTREE DIAGS
Give fatal error if NEXT SENTENCE after ELSE does not end with period.
1404 15-Sep-82 SMI IFGEN
If LITTAB is expanded, update byte pointer to literal.
1403 14-Sep-82 JEH CMNGEN EXPGEN IMPURE
*** Not required, replaced by 1411 ***
Give truncation warning after rounding.
1402 30-Sep-82 JEH EXPGEN
Force floating point divide, but convert back to integer arithmetic when done.
1401 25-Aug-82 SMI DTREE
Generate error for statements in EXIT paragraph.
1400 10-Aug-82 RJD PURE DTREE COBOLD
*** Not required in v13 ***
COBOL-68 only. Check for specific file name in LABEL USE PROCEDURE and
set up USE PROCEDURE table for all applicable cases.
1377 5-Aug-82 RLF MOVGEN
Give warning on truncation.
1376 2-Aug-82 RLF COBOLC
Corrects diagnostic when line before FD is too long.
1375 2-Aug-82 SMI IOGEN
Bad move generated on variable length records.
1374 22-Jul-82 JEH IFGEN
Check collating sequence when generating HIGH-VALUES.
1373 15-Jul-82 RJD RPWGEN
Correct page advancing when more than 2 report header lines.
1372 2-Jul-82 RLF GETITM
COPY REPLACING does not know == are missing after BY for pseudo-text.
1371 28-Jun-82 RJD MOVGEN
Display destination name on truncation warning.
1370 28-Jun-82 JEH IOGEN
Make CURAKT an absolute address so XPAND updates it correctly.
1367 25-Jun-82 SMI COBOLD
*** Not required in v13 ***
Fix edit 1343 to 68274 converter.
1366 14-Jun-82 JEH COBOLC
Correct 1335, set up CURHLD properly.
1365 14-Jun-82 JEH STRGEN
If STRING source is edited and has occurs clause wrong size is used,
change to external size.
1364 11-Jun-82 JEH STRGEN
UNSTRING delimiter has wrong size if figurative constant and source is edited.
1363 21-Jun-82 DMN COBOLB COBOLE
Fix errors in handling alphabet-name in SPECIAL-NAMES.
1362 7-Jun-82 JEH COBOLC IMPURE
Declare HLDSAV outside of MCS conditional.
1361 3-Jun-82 DMN GETITM
*** Not required in v13 ***
68274 does not handle case of no CVT file wanted.
1360 27-May-82 DMN GETITM
*** Not required in v13 ***
68274 does not handle COPY REPLACING correctly.
1357 26-May-82 DMN GETITM IMPURE
*** Not required in v13 ***
68274 cannot always decide which line buffer to use during replacing words.
1356 24-May-82 RJD COBOLC CTREE
Allow qualification in DATA RECORDS ARE clause.
1355 18-May-82 JEH CMNGEN
*** Not required in v13 ***
Build COMP-3 zero literal correctly.
1354 7-May-82 JEH COBOLD
Wrong alternate key selected if multiple keys are defined with the same starting
location.
1353 5-May-82 JEH MOVGEN CMNGEN IFGEN DIAGS
Eliminate HALT if literal is too large, give error.
1352 14-Apr-82 RLF EXPGEN
Fix double precision floating point subtract.
1351 9-Apr-82 JEH IFGEN
Store READ ... INTO operands in a fixed location to avoid link failures.
1350 7-Apr-82 DMN COBOLD DTREE DIAGS
*** Not required in v13 ***
68274 does not flag DISPLAY or STOP signed integer.
1347 1-Apr-82 DMN PSCAN
Eliminate warning for PIC +,999 or -,999 caused by edit 1312.
1346 30-Mar-82 JEH TABLES DIAGS COBOLC IPCGEN
Give fatal error if data key conversion routine address cannot be stored.
1345 18-Mar-82 JEH P IMPURE COBCOM
Trap illegal UUO's on TOPS-10.
1344 9-Mar-82 RJD CMNGEN
Bad code generated for literal compare in some cases if table expands.
1343 5-Mar-82 DMN DTREE COBOLD GETITM
*** Not required in v13 ***
68274 converter does not convert NOTE into a comment.
1342 23-Feb-82 RJD GETITM
Handle D in continuation column when scanning for end of literal.
1341 16-Feb-82 JEH MOVGEN
Eliminate extra warning on immediate fields.
1340 15-Feb-82 DMN COBOLD DIAGS
*** Not required in v13 ***
Add 68274 warning for Abbrev. Combined Relation Conditions work with NOT
and JUSTIFIED clause in VALUE.
1337 12-FEB-82 JEH MOVGEN
Generate code for MOVE literal TO 1-character edited item.
1336 8-Feb-82 RJD MOVGEN
Convert modes for INDEX and COMP-3 in group move test.
1335 2-Feb-82 JEH COBOLC CLEANC IMPURE
Declare DATAB entries for all indices if REPORT SECTION is scanned for their
use by REPORT WRITER statements.
1334 29-Jan-82 RJD COBOLD DTREE
*** Not required in v13 ***
Supersedes edits 1322 and 1326.
1333 26-Jan-82 LEM BTREE
Allow ORGANIZATION IS RELATIVE WITH CHECKPOINT OUTPUT.
1332 1-Jan-82 DMN COBOLB
Fix PROGRAM COLLATING SEQUENCE not to advance too far.
1331 13-Jan-82 JEH IOGEN
Fix failure in phase E when WRITE ADVANCING data-name has a syntax error.
1330 1-Jan-82 JEH COBOLB DIAGS
Give warning for invalid memory size clause.
1327 4-Jan-82 JEH SRTGEN
Set up B operand for clearing of input buffer.
1326 18-Dec-81 WTK COBOLD
*** Not required in v13 ***
Fix edit 1322 breaking of CREF listings.
1325 17-Dec-81 JEH COBOLB
Shut of DCCFLG so source is not lost with DATE-COMPILED comment.
1324 5-Oct-81 JSM MOVGEN
Non-BIS MOVE of field greater than 3770 characters fails.
1323 14-Oct-81 JSM MOVGEN
Flag right truncation on edited alpha-numeric fields.
1322 8-Oct-81 WTK COBOLD DTREE
*** Done differently in v13 ***
Check for unconditional GO TO in last paragraph of program.
1321 7-Oct-81 DMN DTREE
Allow multiple file-name OPEN in USE statement.
1320 9-Oct-81 JSM MOVGEN IFGEN
*** THIS FIX IS NOT INCLUDED IN ANY OFFICIAL SOURCES ***
In COBOL-68 group item references to OCCURS DEPENDING items do not conform
to ANSI-68 standard. i.e. MOVE and IF conditional arguments.
1317 23-Jul-81 WTK IFGEN
Fix alphanumeric compares of greater than 2040 characters.
1316
1315 2-Sep-81 WTK IMPURE
Catastrophe in phase E during SEARCH because BLT to save A and B parameters
is one word short.
1314 30-Sep-81 WTK GETITM
Continuation character after "(" gives bad subscript.
1313 3-Aug-81 JSM DTREE COBOLD
Give diagnostic for IF <cond> paragraph-name.
1312 29-Jul-81 WTK PSCAN DIAGS
Add warning for +,+++ or -,---
1311 24-Jun-81 JSM COBOLD
Bad placement of diag. 179 in listing.
1310 24-Sep-81 JSM GETITM
Compiler forgets first of two LIB devices.
1307 18-Sep-81 JSM CMNGEN IMPURE
COMP-3 literal 0 is always generated unsigned.
Make it signed if receiving operand is signed.
1306 26-Aug-81 DMN IPCGEN
Fix Bad table link if RELATIVE KEY has a error.
1305 11-Aug-81 DMN IOGEN
Wrong code for WRITE record-name AFTER ADVANCING data-name
where record-name has an OCCURS DEPENDING ON clause.
1304 13-Jul-81 DMN GETITM
*** Not required in v13 ***
68274 converter fails if very first word in a library
has to be replaced by COBOL-74 syntax.
1303 6-Jul-81 DMN IOGEN
RMS variable length records always take DEPENDING ON error return.
1302 23-Jun-81 DMN IOGEN
Bad table link if RMS RECORD KEY is missing.
1301 23-Jun-81 DMN PMATCH
Ill. mem. ref. when optimizing certain programs.
1300 19-Jun-81 DMN/JSM CMNGEN IMPURE
Subroutine arg passing fails if REDEFINED item is specified
in USING clause but original item is referenced elsewhere.
;*** Fixes to 12A found after 12B was released not required in 12B or duplicated above
1147 13-Jan-82 JEH IOGEN
*** Same as edit 1331 ***
Fix failure in phase E when WRITE ADVANCING data-name has a syntax error.
1145 14-Oct-81 JSM MOVGEN
*** Same as edit 1323 ***
Flag right truncation on edited alpha-numeric fields.
1144 8-Oct-81 WTK COBOLD DTREE
*** Same as edit 1322 ***
Check for unconditional GO TO in last paragraph of program.
1143 7-Oct-81 DMN DTREE
*** Same as edit 1321 ***
Allow multiple file-name OPEN in USE statement.
1142 30-Sep-81 WTK GETITM
*** Same as edit 1314 ***
Continuation character after "(" gives bad subscript.
1141 18-Sep-81 JSM CMNGEN IMPURE
*** Same as edit 1307 ***
COMP-3 literal 0 is always generated unsigned.
Make it signed if receiving operand is signed.
1140 2-Sep-81 WTK IMPURE
*** Same as edit 1315 ***
Catastrophe in phase E during SEARCH because BLT to save A and B parameters
is one word short.
1137 1-Oct-81 JSM GETITM IMPURE
*** Same as edit 1316 ***
1136 3-Aug-81 JSM DTREE COBOLD
*** Same as edit 1313 ***
Give diagnostic for IF <cond> paragraph-name.
1135 29-Jul-81 WTK PSCAN DIAGS
*** Same as edit 1312 ***
Add warning for +,+++ or -,---
1134 23-Jul-81 WTK IFGEN
*** Same as edit 1317 ***
Fix alphanumeric compares of greater than 2040 characters.
1133 24-Jun-81 JSM COBOLD
*** Same as edit 1311 ***
Bad placement of diag. 179 in listing.
1132 16-Jun-81 JSM DTREE
*** Not used ***
Turn off OPEN EXTEND in COBOL-68
*** EDITS BELOW WILL BE IN COBOL-68/74 VERSION 12B RELEASE ***
1131 2-Jun-81 WTK MOVGEN
IF on two double-word numerics fails when the numbers are negated.
1130 21-May-81 JSM COBOLD
ENDSPIF message with bad IF clause in statement followed by
statement with special IF.
1127 30-Apr-81 DAW MSCGEN
INSPECT / REPLACING item with fig. const. failed when
the item ended on a word boundary.
1126 28-Apr-81 JSM SRTGEN
Make RELEASE verb clear its input buffer after releasing the record to SORT.
1125 14-Apr-81 JSM GETITM
*** DO NOT INCLUDE THIS EDIT, IT HAS BAD SIDE EFFECTS ***
COPY REPLACING gives spurious warnings when numeric replacement
precedes end of statement in DATA DIVISION.
1124 25-Mar-81 DMN PSCAN
Make PIC S(n) illegal.
1123 19-Mar-81 JSM CMNGEN
Bad table link, catastrophe in phase E with subscript assoc with linkage item
with no occurs clause.
1122 4-Mar-81 JEH GETITM
Save AC6 when opening second source file.
1121 27-Feb-81 HRB/JM IMPURE
Duplicate of edit 1031.
1120 27-Feb-81 WTK COBOLD
Already in 12B in a slightly different form.
1117 6-Feb-81 DAW COBOLD
Make "UNSTRING delimited by LOW-VALUES" work in COBOL-68.
1116 2-Feb-81 JSM DTREE DIAGS
Allow only one BY in UNSTRING.
1115 3-Feb-81 JSM DMLIO
DBMS edit number 575.
1114 21-Jan-81 JSM COBOLD
Fix edit 1035 to bypass SUB-SCHEMA error message if no INVOKE seen.
1113 9-Jan-81 DMN MATGEN MOVGEN
COMP-1 to COMP-2 conversion not done correctly.
1112 8-Jan-81 DMN PMATCH
Fix bad SKIPA optimization when previous instruction can skip 2.
1111 8-Jan-81 WTK XFRGEN
PERFORM LIMIT EXCEEDED when doing many executions of DECLARATIVES.
1110 31-Dec-80 DMN CMNGEN
Allow ON SIZE ERROR code to catch divide by zero for COMP-1 result.
1107 29-Dec-80 DAW CMNGEN IOGEN
"?Ill mem ref" and bad error pointer when a WRITE statement is compiled
that has an error regarding a depending variable
1106 31-Dec-80 DAW COBOLC
Bad error message given when 88 level item has numeric value clause
and is subordinate to INDEX item.
1105 30-DEC-80 JEH RPWGEN
Set LINKAGE SECTION bit for CONTRL, SUM operands.
1104 17-Dec-80 CLRH COBOLD
More of edit 1046, patch to edit 675.
1103 15-Dec-80 DAW CMNGEN
Bug in literal pooler caused bad code to be generated in rare cases.
1102 12-Dec-80 DAW COBOLC DIAGS
"?Bad table link" in phase D if level number is 0 on item with sons
1101 04-DEC-80 WTK IOGEN
REWRITE and DELETE generating WRITV. when record has a DEPENDING ON clause.
1100 26-Nov-80 JSM SRTGEN
COBOLE loops if bad syntax for PIC on sort key.
1077 18-Nov-80 DAW CMNGEN IMPURE
"?Illegal memory reference" in PHASE E at random times
1076 17-Nov-80 DAW PMATCH
Disable unsafe optimization for MOVE ZEROES to LINKAGE-SECTION COMP-item.
1075 17-Nov-80 DAW MOVGEN
"?Bad LITAB code" generating numeric literals that get truncated.
1074 14-Nov-80 DAW CLEAND
?Catastrophe in phase D if "DYNAMIC" is misspelled.
1073 14-Nov-80 DAW CMNGEN
Fix bad code generated when depending variables are 2 or more
levels down in an item.
1072 14-Nov-80 DAW CLEANC
Make VALUE clause work correctly for EBCDIC signed numeric item.
1071 14-Nov-80 DMN COBOLC DIAGS
Give error message when variable part is not the last thing in the record.
1070 5-Nov-80 DAW COBOLD IMPURE P
Fix MOVE CORRESPONDING of items with subscripts.
1067 30-Oct-80 DAW IFGEN IMPURE
Fix ANS74 compare of numeric item to non-numeric item.
1066 29-Oct-80 DAW CLEANC
Better error recovery for CONTAB.
1065 24-Oct-80 JSM GETITM
With COPY REPLACING, check for end of library member.
1064 24-Oct-80 JSM GETITM
With COPY REPLACING don't split a line if the only input characters left are "."
and line-feed.
1063 24-Oct-80 JSM GETITM
Special handling for paragraph names and 01 level numbers with COPY REPLACING.
1062 24-Oct-80 JSM COBOLD
Fix fatal error on NOTE with COPY REPLACING.
1061 23-Oct-80 DMN SRTGEN
WRONG CODE GENERATED FOR 8 BYTE ASCII KEY WITH 1 OR 2 BYTES IN FIRST WORD.
1060 10-Oct-80 JEH IFGEN
FIX IF DATA-ITEM = ZEROES FOR FIELD GREATER THAN 2040 CHARACTERS.
1057 1-OCT-80 DMN IFGEN
GIVE ERROR ON ILLEGAL USE OF ALL IN NUMERIC COMPARISONS.
1056 26-SEP-80 DMN EXPGEN MOVGEN
FIX COMP-2 TO COMP-1 CONVERSION IN COMPUTE STATEMENT.
1055 23-SEP-80 WTK COBOLG
FIX EDIT 762 TO USE CORRECT ERROR MESSAGE.
1054 23-SEP-80 JEH COBOLF
PRINT MESSAGE WHEN WARNINGS BEING DUMPED
1053 22-SEP-80 DAW IOGEN
ACCEPT ITEM(SUBSCRIPTS) FROM DATE/DAY/TIME (74 ONLY).
1052 9-SEP-80 CLRH RPWGEN
[Not required in 12B, SOURCE can now be subscripted].
1051 2-SEP-80 JSM IMPURE
GET MCS FLAG WORDS OUT OF OVLAY AREA.
1050 25-AUG-80 DAW COBOLD
BAD CODE GEN FOR NESTED IF..I-O VERB...IF.
1047 22-AUG-80 JEH MATGEN
BAD CODE GEN FOR DIVIDE..INTO USING -1 AND +1 LITERALS
1046 12-AUG-80 CLRH COBOLD DIAGS
IN FIND RSE3, IDENTIFIER-2 MUST BE 1-WORD COMP.
1045 11-AUG-80 LEM EXPGEN
[Already in 12B]
1044 11-AUG-80 LEM IPCGEN
[Already in 12B]
1043 31-JUL-80 DAW MOVGEN
FIX ANS68 MOVE NON-NUMERIC TO NUMERIC EDITED
1042 31-JUL-80 DAW MOVGEN
FIX COMPUTE ID = ID1 / (10 ** ID-2)
1041 24-JUL-80 DAW IPCGEN
BAD CODE GENERATED FOR COBOL-74 CONSTRUCT "CALL <IDENTIFIER>".
1040 22-JUL-80 DAW IFGEN
FIX NON-BIS CASE OF EDIT 1034, "IF ...NOT = SPACE" DIDN'T WORK
1037 18-JUL-80 DAW IFGEN
FIX ?ASSEMBLY ERRORS WHEN DEPENDING VAR ON READ AND COMP ITEM
1036 18-JUL-80 DAW GETITM
FIX PRINTING OF SPECIAL CHARACTERS IN THE LISTING
1035 10-JUL-80 CLRH COBOLD
DBMS IF STATEMENT FAILS TO CHECK FOR USERNAME
1034 7-JUL-80 DMN IFGEN
MAKE IF = ZERO TEST GENERATE INLINE CODE, FIXES LARGE RECORD PROBLEM.
1033 2-JUL-80 DMN COBOLD
TURN OFF COPY REPLACING FLAGS DURING ERROR RECOVERY.
1032 27-JUN-80 JEH CLEAND
STORE EBCDIC MODE IN KEY DESCRIPTOR.
1031 26-JUN-80 DMN IMPURE
ADD VARIABLES FOR DBMS VERSION 6.
1030 26-JUN-80 DMN IOGEN
MORE OF EDIT 605 WHEN OCCURS IS NOT ELEMENTRY ITEM.
1027 24-JUN-80 JEH IMPURE IOGEN IFGEN SRTGEN
BUILD RECORD NAME TABLE IF NESTED READS.
1026 18-JUN-80 CLRH DTREE COBOLD
CHECK MOVE CURRENCY STATUS FOR A VALID RECORD.
1025 11-JUN-80 DMN SRTGEN
ALLOW RANDOM AND ISAM FILES AS SORT INPUT FILES.
1024 30-MAY-80 DMN COBOLG
FIX BUG IN EDIT 762 IF D. P. MANTISSA IS EXACTLY 18 DIGITS.
1023 29-MAY-80 DMN GETITM PSCAN IMPURE
FIX VARIOUS PROBLEMS WITH PICTURES IN COPY REPLACING.
1022 20-MAY-80 DMN GETITM
FIX PROBLEM OF MISSING CHARACTER ON LISTING FILE IN COPY REPLACING.
THIS EDIT REPLACES EDIT 617 WHICH WAS NOT IN 12A.
1021 16-MAY-80 DMN COBOLB
FIX ERROR CAUSE BY LOWER CASE LITERAL IN PROGRAM-ID.
1020 13-MAY-80 DMN GETITM
FIX LINE TOO LONG PROBLEM IN COPY REPLACING.
1017 8-MAY-80 DMN EXPGEN
FIX EDIT 443, MAKE COMPUTE A = - (SOMETHING) WORK.
1016 2-MAY-80 DMN DTREE
EDIT 1002 WAS TOO AMBITIOUS, REMOVE PART OF THE EDIT.
1015 25-APR-80 DMN GETITM
USE THE CORRECT RIGHT MARGIN ON COPY REPLACING .
1014 23-APR-80 DMN COBCOM
LIST FULL PATH ON LOOKUP/ENTER ERRORS.
1013 22-APR-80 DMN GETITM IMPURE DIAGS
FIX LOOP IF MISSING == ON COPY REPLACING.
1012 22-APR-80 JEH DTREE
COBOL-74 LOOPS IF END DECLARATIVES IS MIS-SPELLED.
1011 9-APR-80 CLRH COBOLC
FIX EDIT 733 TO NOT REQUIRE DATA RECORD IF FD HAS A REPORT CLAUSE.
1010 9-APR-80 LEM COBOLG
FINISH EDIT 774
1007 4-APR-80 CLRH RPWGEN
GENERATE 'AOS PAGE-COUNTER' FOR 'LINE NEXT PAGE'.
1006 3-APR-80 JEH CLEAND
PULL OUT CODE TESTING ON USE PROCEDURE CONFLICTS.
1005 2-APR-80 JSM COBOLD DIAGS
MAKE IF OR SEARCH ILLEGAL IN WHEN CLAUSE OF SEARCH VERB.
1004 1-APR-80 DMN IMPURE PURE COBOLE CMNGEN IFGEN MOVGEN MSCGEN
SRTGEN STRGEN COBOLO OPCTAB
MAKE ASCII & EBCDIC COLLATING SEQUENCES WORK CORRECTLY IN COBOL-74.
NEEDS LIBOL EDIT 624.
1003 28-MAR-80 DMN COBOLC
FIX DUPLICATE CREF DEFINITION WHEN LEVEL # DECREASES (BROKEN BY EDIT 373).
1002 26-MAR-80 DMN DTREE IPCGEN DIAGS
ADD CHECK FOR ILLEGAL OR MISSING CALL/ENTER ARGS.
1001 26-MAR-80 DMN GETITM
MAKE ALL "LITERAL" WORK IN COPY REPLACING.
1000 25-MAR-80 DMN MOVGEN
GENERATE NUL LITERAL FOR MOVE TO BAD DATA-ITEM.
777 26-MAR-80 DAW EXPGEN
FIX ?ASSEMBLY ERRORS WHEN LITERALS USED IN COMPUTE AND EDIT 637
IN INSTALLED
776 14-MAR-80 LEM DTREE
CHECK IF WE NEED TO REGET PRESENT TOKEN
ALSO FIX SYNTAX TREE TO ALLOW CONSOLE AS TTY FOR "ACCEPT".
775 14-MAR-80 LEM DTREE
FIX DISPLAY "LIT" UPON MNEMO WITH NO ADVANCING WHEN MNEMO ISNT DEFINED.
774 10-MAR-80 DAW COBOLG
DELETE AS1.TMP IF USING -,-=FOO/O
773 25-FEB-80 DAW PMATCH
FIX OPTIMIZATION OF ADDING 1 TO LINKAGE-SECTION ITEM.
772 22-FEB-80 LEM COBOLD
MAKE DA.CLA EXTERNAL IN CASE DBMS IS TURNED OFF.
771 11-FEB-80 DAW P CLEANC
ALLOW DISPLAY-9 VALUE OF ID. NEEDS LIBOL EDIT 616.
770 7-FEB-80 DAW CLEANC
REPLACEMENT FOR EDIT 742: IF YOU DEFINED AN ITEM WITH "INDEXED BY"
CLAUSE AND ALSO DEFINED IT AS INDEPENDENT ITEM, NO ERROR MESSAGE
WAS GENERATED.
767 7-FEB-80 DMN EXPGEN MATGEN
CHECK OVERFLOW FLAGS FOR "ON SIZE ERROR".
NEEDS LIBOL EDIT 615.
766 31-JAN-80 DMN MOVGEN
1-WORD COMP WITH "ON SIZE ERROR" SOMETIMES MOVES WRONG ACC.
765 31-JAN-80 DAW COBOLD IMPURE
"NULL TABLE LINK" WHEN UNSTRING IS DONE FROM VARIABLE WITH
MORE THAN ONE SUBSCRIPT.
764 30-JAN-80 DMN MOVGEN
FIX SPURIOUS ERRORS ON MOVE WHERE "A" OPERAND HAS SEPARATE SIGN.
763 30-JAN-80 DMN IMPURE COBOLC
CHECK FOR DUPLICATE LINKAGE AND REPORT SECTIONS.
762 30-JAN-80 DMN P IMPURE EXPGEN CMNGEN XFRGEN COBOLG
ADD SMALL CONSTANT TO COMP-2 COMPUTE CALCULATIONS.
IMPLEMENT AND USE D. P. FLOATING POINT LITERALS.
761 29-JAN-80 JSM DIAGS
MAKE MESSAGES 117, 148, 154, 264, 414, AND 419 MORE EXPLICIT FOR DML COMPILES
760 29-JAN-80 DMN COBOLC
MAKE "BLANK WHEN ZERO" WORK AGAIN FOR NUMERIC SENDING ITEM.
757 9-JAN-80 DAW COBOLD
DO NOT ALLOW OPEN OF A SORT-FILE (IN AN "SD")
756 28-DEC-79 DMN COBOLG
GENERATE REQUEST FOR C.RSET IN COBOL SUBPROGRAMS INCASE CALLED BY FORTRAN
755 31-OCT-79 DAW MOVGEN
FIX BUG IN EDIT 745 - IT BROKE ACCEPT OF SMALL NUMERIC ITEMS
754 25-OCT-79 LEM DTREE
FIX "FIGCN" "AFTER ADVANCING " TO WORK
753 25-OCT-79 DAW CMNGEN
COBOL-68 MAKE 745 WORK FOR COBOL-68
752 24-OCT-79 DMN IPCGEN
COBOL-74 ILLEGAL INST. IF DATAB CONTAINS ERRORS
751 24-OCT-79 DMN COBOLC
BAD DATAB DEFINITION IF FD NAME MATCHES PROGRAM ID.
750 24-OCT-79 DMN IOGEN
COBOL-74 BAD TABLE LINK IF RELATIVE KEY CONVERSION REQUIRED
747 24-OCT-79 DMN CLEAND
COBOL-74 BAD TABLE LINK IF MISSING ISAM RECORD KEY
746 NOT REQUIRED (ALREADY IN V12A)
745 15-OCT-79 DAW CMNGEN MOVGEN
COBOL-74 SUBSCRIPTING AND MOVES WITH NON-COMP DEPENDING VARIABLES
744 8-OCT-79 DAW COBOLD
FIX EDITS 707 AND 670 FOR IFS WITHIN "SEARCH"
743 6-OCT-79 DMN CMNGEN
COBOL-74 MORE OF EDIT 721
742 29-SEP-79 DAW COBOLC
[EDIT DELETED]
741 29-SEP-79 DC DTREE
NOT NEEDED, ALREADY IN 12A SOURCES
740 26-SEP-79 DMN COBOLB
FIX SOURCE-COMPUTER. WITH NO COMMENT ENTRY
737 25-SEP-79 DAW PMATCH
FIX LOOPING IF PROGRAM HAS NESTED SEARCH STATEMENTS
736 21-SEP-79 DMN MOVGEN
FIX TYPO IN BISCMP CODE FOR COMP-1 TO COMP-2 CONVERSION
735 14-SEP-79 CLRH CLEAND
GIVE ERROR IF RECORD KEY NOT DEFINED IN RIGHT FD
733 13-SEP-79 DMN COBOLC
GIVE ERROR IF NO DATA RECORD IN FD.
732 13-SEP-79 DAW MATGEN MSCGEN
FIX "SET" GENERATING BAD CODE SOMETIMES IN COBOL-74
731 7-SEP-79 DMN MOVGEN
FIX DIVIDE A BY B WHERE B IS 2-WORD COMP.
730 7-SEP-79 DMN CMNGEN MOVGEN
FIX MULTIPLY A BY B ON SIZE ERROR FOR QUAD WORD.
727 10-SEP-79 DAW STRGEN
NOT REQUIRED - REPLACED BY NEW STRING/UNSTRING ROUTINES
*** EDITS BELOW WILL BE IN COBOL-68/74 VERSION 12A RELEASE ***
726 21-AUG-79 DMN GETITM
FIX COPY REPLACING WHEN MULTIPLE OF SIX CHARS.
725 21-AUG-79 DMN COBOLF
MAKE SURE FFATAL IS ON IF FATAL ERRORS EXIST.
724 14-AUG-79 DMN MOVGEN
FIX ERROR IN EDIT 722
723 8-AUG-79 DMN COBOLC
FIX EDIT 706 TO POINT TO CORRECT RECORD.
722 26-JUL-79 DMN IMPURE CMNGEN MOVGEN
FIX COBOL-74 MOVE HIGH/LOW-VALUES WITH PROGRAM COLLATING SEQUENCE.
721 24-JUL-79 DMN CMNGEN
FIX COBOL-74 SUBSCRIPTED IF WITH PROGRAM COLLATING SEQUENCE.
720 23-JUL-79 DMN IFGEN
FIX COBOL-74 COMPARE TO SPACES WITH PROGRAM COLLATING SEQUENCE.
717 16-JUL-79 MFY IFGEN
FIX IF A NOT = SPACES FOR A ALPHANUMERIC AND LONGER THAN
2040 CHARACTERS.
716 22-JUN-79 DAW CMNGEN
FIX BAD CHECK FOR EBCDIC MODE IN SUBSCRIPTING.
715 5-JUN-79 CLRH MATGEN
CORRECT EDIT 566.
714 3-JUN-79 MFY DTREE
BREAK UP LONG LINES DUE TO SIRUS BUG.
713 31-MAY-79 CLRH COBOLA
DO TMPCOR UUO IN THE RIGHT ADDRESS IF CORE UUO IS NEEDED.
712 24-MAY-79 CLRH PMATCH
NOT REQUIRED, IN 12A IN DIFFERENT FORM.
711 22-MAY-79 DAW COBOLC
FIX EDIT 674 FOR INDEX ITEMS.
710 16-MAY-79 DMN COBOLC
SET FLAG SHOWING WORKING-STORAGE SEEN.
707 7-MAY-79 DAW COBOLD
FIX EDIT 670 - IT BROKE NESTED IFS.
706 3-MAY-79 CLRH COBOLC DIAGS
CHECK RECORD CONTAINS CLAUSE AGAINST MAX. RECORD SIZE.
705 2-MAY-79 CLRH DTREE
PUT OUT "PERIOD ASSUMED" MESSAGE IN RIGHT PLACE
704 30-APR-79 DMN GETITM
FIX MULTIPLE COPY REPLACING ORDERING BUG.
703 30-APR-79 CLRH SRTGEN
BAD CODE GENERATED FOR SIXBIT SORT WHERE KEY STARTS
ONE CHARACTER INTO A WORD (NON-BIS CASE ONLY).
702 30-APR-79 DMN COBOLB GETITM
LIST COMMENTS IN DATE-COMPILED PARAGRAPH.
701 26-APR-79 DAW PMATCH
DON'T DO IMPROPER OPTIMIZATIONS - FIX TO "SAMACM" ROUTINE
700 27-APR-79 DAW COBOLC
FIX UNDESERVED ERROR FOR COMP-1 ITEMS WITH EDIT 674
677 23-APR-79 DAW CLEAND
TABLES EXPANDING MAY CAUSE DBMS USE PROCEDURES TO GET MESSED UP
676 17-APR-79 DMN COBOLF
FIX EDIT 517, GET LISTING RIGHT WHEN SPACE IN COLUMN 7
675 4-APR-79 DMN COBOLD
CHECK FIND RSE 3 SYNTAX THAT COULD LOOK LIKE FIND RSE 5
674 3-APR-79 CLRH COBOLC IMPURE
GENERATE ERROR FOR BAD VALUE CLAUSE OF 88 LEVEL ITEM
673 2-APR-79 DMN CMNGEN MOVGEN
FIX QUAD-WORD ROUNDING PROBLEM.
672 29-MAR-79 DAW COBOLC MATGEN
FIX ILL MEM REF WHEN SOMEONE DEFINES A DATANAME "TALLY".
671 28-MAR-79 DAW CMNGEN
FIX PROBLEM WITH LINKAGE SECTION SUBSCRIPTS
670 28-MAR-79 JSM COBOLD IMPURE SQUIRL
FIX NESTED IF . ELSE PROBLEM
667 22-MAR-79 MFY SRTGEN
WRONG CODE FOR EBCDIC KEYS WITH 2 BYTES IN LAST WORD
666 22-MAR-79 DAW CMNGEN
FIX EDIT 661 (LABEL BADSB4 WAS ALREADY DEFINED IN MAINTENANCE SOURCES)
665 20-MAR-79 DMN COBOLD
RECOVER CORRECTLY FROM PROCEDURE DIVISION MIS-SPELLED
664 19-MAR-79 DAW MOVGEN
FIX MULTIPLY WITH 4-WORD INTERMEDIATE PROBLEM
663 16-MAR-79 DMN PMATCH
FIX SKIPA OPTIMIZATION IF PREV. INST. IS JRST .+3
662 13-MAR-79 DMN IMPURE
FIX EDIT 557, DEFINE PICNXT COMMON TO PHASES B, C, AND D
661 12-MAR-79 DAW CMNGEN DIAGS
GIVE ERROR MESSAGE RATHER THAN GENERATING BAD CODE
FOR COMP-1 SUBSCRIPTS.
660 12-MAR-79 DAW CMNGEN
FIX ERROR MESSAGE POINTS TO WRONG PLACE FOR "WRONG NUMBER OF
SUBSCRIPTS".
657 9-MAR-79 DMN GETITM IMPURE
FIX PROBLEM WITH LOOKAHEAD IN COPY REPLACING INTEGER.
656 8-MAR-79 DAW COBOLE IMPURE
FIX PROBLEMS WITH DBMS USE PROCEDURES
655 6-MAR-79 DMN GETITM
CHECK FOR PREMATURE EOF ON LIBRARY FILE
654 6-MAR-79 DAW MOVGEN
FIX BAD CODE GENERATED SOMETIMES FOR MOVE OF ITEM WITH
TWO OR MORE SUBSCRIPTS.
653 6-MAR-79 DMN COBOLG
TURN ON FFATAL ON ASSEMBLY ERRORS IN PHASE G
652 6-MAR-79 DAW DTREE
ALLOW NULL PARAGRAPH PROCEEDING "END DECLARATIVES"
651 6-MAR-79 DMN COBOLE TABLES
WRONG BYTE POINTER USE IN RPW CONTROL FOOTER CODE
650 5-MAR-79 DAW COBOLE
FIX ILL MEM REF WHEN COMPILER EXPANDS TABLES FOR DBMS
PROGRAM WITH USE PROCEDURES
647 1-MAR-79 DMN SRTGEN
WRONG CODE GENERATED FOR FILLER X(5), KEY X(8) IN SIXBIT
646 1-MAR-79 DAW STRGEN
FIX ERROR MESSAGE ALWAYS POINTS TO LINE 371 IF ERROR WAS IN
SUBSCRIPTED "COUNT" ITEM IN UNSTRING STATEMENT
645 28-FEB-79 DAW COBOLD
FIX ERROR RECOVERY IN SORT STATEMENT
ALSO ADD RESTRICTION TO "MERGE" STATEMENT TO NOT ALLOW SUBSCRIPTING
644 28-FEB-79 DMN CLEANC
MORE ERROR RECOVERY FOR 88 LEVEL WHERE 01 IS NOT DEFINED UNIQUELY
643 27-FEB-79 DAW CMNGEN
FIX "?SIZTE RETURNED 0"
642 27-FEB-79 DAW DTREE
FIX "MOVE CURRENCY STATUS OF RUN-UNIT TO SUBSCRIPTED-ITEM"
641 27-FEB-79 DMN EXPGEN
FIX INCORRECT TEST FOR OPERAND IS ACC AT LASTOP IN EXPGEN
640 26-FEB-79 DAW XPAND
FIX ILL MEM REF WHEN EXPANDING TABLES IN PHASE O
637 23-FEB-79 DAW EXPGEN COBOLE
FIX COMPUTE WITH COMP-1 RESULT
636 21-FEB-79 DMN COBCOM MOVGEN CMNGEN
FIX VARIOUS ERRORS WHEN COMPILING PROGRAMS WITH FATAL ERRORS
635 21-FEB-79 DAW COBOLC
FIX SIZE ALLOCATION FOR AN ITEM WHICH RENAMES ITEM-1 THRU ITEM-2
634 19-FEB-79 DAW MOVGEN CMNGEN PURE COMUNI
FIX PROBLEMS WITH 4-WORD COMP ARITHMETIC
633 9-FEB-79 DMN IMPURE PUTCPY COBOLF
GIVE BETTER WARNING ON LINE NUMBER WRAP-AROUND
632 1-FEB-79 MFY IPCGEN
REMOVE SECOND (WRONG) DEFINITION OF ARGSGN
631 28-JAN-79 DMN COBOLD
DON'T USE ARG2 AT PA258. THUS PREVENTING CATASTROPHIE IN PHASE D
630 27-JAN-79 MFY IFGEN
FIX EDIT 562 FOR NON-BIS CASE
627 27-JAN-79 DMN SRTGEN
WRONG CODE GENERATED FOR EBCDIC 8 BYTE KEY WITH 1 OR 3
BYTES IN FIRST WORD
626 22-JAN-79 DMN MOVGEN
FIX MOVE OF 3 CHAR EBCDIC FIG-CONST (COBOL-68 ONLY)
625 16-JAN-79 DMN CMNGEN
FIX BAD TEST FOR TWO WORD TEMP IN PUTEMP
624 5-JAN-79 DMN COBOLC DIAGS
RECORD SIZE MUST MATCH RECORD CONTAINS IN F MODE FILE
623 29-DEC-78 DMN SRTGEN DIAGS
GIVE ERROR IF SORT KEY CONTAINS OCCURS CLAUSE
622 29-DEC-78 DMN SRTGEN
WRONG CODE GENERATED FOR FILLER X, KEY X(9) IN SIXBIT
621 4-JAN-79 DMN MOVGEN CMNGEN
GIVE ERROR ON "MOVE ALL" <DIGIT> TO NUMERIC
620 18-DEC-78 DMN GETITM
STORE SEQ. NO. CORRECTLY FOR DATE-COMPILED PARAGRAPH.
617 15-DEC-78 DMN GETITM
IF FGTPER IS ON DON'T TEST FOR REPLACEMENT
616 13-DEC-78 DMN PMATCH
FIX SUBI/ADDI OPTIMIZATION IN LINKAGE SECTION
615 12-DEC-78 DMN SRTGEN
PUT REMAINING FIXES FROM BWR FILE INTO OFFICIAL SOURCES
614 12-DEC-78 DMN PMATCH
DECREMENT TAG COUNT CORRECTLY FOR IF D.P. TEST (THIS WAS IN .BWR FILE)
613 12-DEC-79 DMN DTREE
MAKE IT POSSIBLE TO BUILD COMPILER WITH DBMS=0 (THIS WAS IN .BWR FILE)
612 12-DEC-78 DMN COBOLD
INITIALIZE FNOSUB AT THE START OF PHASE D (THIS WAS IN THE BWR FILE)
611 12-DEC-78 DMN IFGEN
FIX IF DBMS-STATEMENT TO GENERATE CORRECT CODE (THIS WAS IN BWR FILE)
610 11-DEC-78 DMN CMNGEN
FIX INCORRECT CODE GENERATED IN ARRAY WHERE TOP LEVEL
IS COMP IS REFERENCED VIA CONSTANT SUBSCRIPT
607 7-DEC-78 DAW PMATCH
FIX "?NPCIN BECAME NEGATIVE" WHEN DELETING CODE THAT CAN'T BE REACHED
606 7-DEC-78 DAW CMNGEN
FIX "?INTERNAL COMPILER ERROR" IF 01 ITEM OCCURS USAGE IS NON-DISPLAY
605 1-DEC-78 DMN IMPURE PURE IFGEN IOGEN
MAKE VARIABLE LENGTH READS WORK USEFULLY
604 29-NOV-78 DMN STRGEN
PUT OUT CORRECT ERROR MESSAGE ON STRING OF NON-NUMERIC TO NUMERIC.
603 28-NOV-78 DMN COBOLC
FIX ILL UUO WHEN "CONTROL" IN "RD" REFERS TO EDITED ITEM.
602 28-NOV-78 DMN DTREE
ALLOW NULL SECTION IN PROCEDURE DIVISION.
*** EDITS BELOW WILL BE IN COBOL-74 VERSION 12 RELEASE ***
601 8-NOV-78 MFY MATGEN
CORRECT EDIT 546
600 31-OCT-78 DMN IFGEN
ADJUST D.P. OF "A" IN ACCS IF LESS THAN D.P. OF "B"
577 31-OCT-78 DMN CMNGEN
FIX SET DOWN BY 262144 (I.E. <-1,,0>)
576 12-OCT-78 DAW MESGEN
FIX "?BAD LITAB CODE" - IN "ENABLE" STMT CODE GEN.
575 11-OCT-78 DAW MOVGEN
FIX "MOVE ALL 'A' TO DISPLAY-ITEM (SUBSCRIPTED)".
574 11-OCT-78 DAW COBOLD
DON'T SET BIT 1 FOR USER-NAME EXTERNAL ENTRY (BIT WENT AWAY)
573 4-OCT-78 DMN DTREE
ALLOW NULL PARAGRAPHS IN DECLARATIVES.
572 9-OCT-78 DMN P
MAKE TABLES BE SIZE 1 IF DBMS OR MSC/TCS TURNED OFF
571 9-OCT-78 DMN PUTCPY
FINALLY FIX 531 & 517
570 6-OCT-78 DMN COMUNI PURE CMNGEN
ADD QUAD-WORD ROUNDING FUNCTION
567 6-OCT-78 DMN MOVGEN
FIX DECIMAL POINT ALLIGNMENT IN QUAD-WORD MULTIPLIES
566 4-OCT-78 DMN IMPURE MATGEN
FLOAT OPERANDS WHEN TARGET IS COMP-1
565 4-OCT-78 DAW IPCGEN
PASS NUMERIC EDITED FIELDS TO A SUBROUTINE CORRECTLY
564 4-OCT-78 DAW MOVGEN
FIX BUG IN EDIT 537 - NON-BIS ONLY PROBLEM
563 4-OCT-78 DAW SRTGEN
ILL. MEM. REF. FOR FILLER X(3) OR X(4), KEY X(8) IN ASCII.
562 2-OCT-78 DMN IFGEN OPCTAB
FIX SIXBIT 6 CHAR FIG-CON COMPARE WHEN SIGN GETS IN THE WAY
561 28-SEP-78 DAW XFRGEN OPCTAB
FIX "GO DEPENDING" - /O PROBLEM
560 25-SEP-78 DMN SRTGEN
WRONG CODE GENERATED FOR FILLER X(3), KEY X(7) IN SIXBIT.
557 19-SEP-78 DMN GETITM IMPURE DIAGS
FIX VARIOUS COPY REPLACING BUGS
556 19-SEP-78 DMN COBOLA
FIX GETTAB 135 IF FILDAEMON IS TURNED OFF
555 17-SEP-78 EHM SRTGEN
FIX MISCELLANEOUS PROBLEMS WITH SORT & COBOL
554 17-SEP-78 EHM SRTGEN DIAGS
GIVE ERROR MESSAGE IF KEY IN SORT STATEMENT IS FOR THE WRONG FILE
553 17-SEP-78 EHM IMPURE COBOLB DIAGS
GIVE WARNING IF RECORDS/RERUN TOO LARGE
552 17-SEP-78 EHM CLEAND DIAGS COBOLD
GIVE ERROR IF DECLAR. & NO END DECLARITIVES
551 16-SEP-78 EHM CMNGEN COBCOM
FIX CATASTROPHIE IN PHASE E
550 16-SEP-78 EHM IFGEN
FIX IF SUBSCRIPTED ITEM IS ALPHABETIC
547 16-SEP-78 EHM MSCGEN IFGEN
FIX EXAMINE REPLACING HIGH-VALUES BY
546 16-SEP-78 EHM MATGEN
FIX MULTIPLY -1 BY X GENERATES A SETZM
545 15-SEP-78 EHM MATGEN
FIX STATEMENT AFTER SUBTRACT 1 IS COMPILED WRONG
544 14-SEP-78 EHM IFGEN
FIX HIGH-VALUES COMPARES FOR SIXBIT VARIABLES
543 12-SEP-78 EHM CMNGEN
FIX ACCEPT INTO A DISPLAY-6 ITEM
542 12-SEP-78 EHM IFGEN
FIX NUMERIC COMPARE OF FIELD WITH DECIMAL PLACES WITH EXPRESSION
WITH NO DECIMAL PLACES
541 3-AUG-78 EHM SRTGEN
FIX CATASTROPHIE IN PHASE O IF NULL INPUT OR OUTPUT PROCEDURES.
540 23-JUN-78 EHM RPWGEN
FIX CONTROL HEADING PRINTED PAST LINE SPECIFIED AS LAST DETAIL LINE.
537 13-JUN-78 EHM MOVGEN
FIX "SUBSCRIPTED MOVE WITH "A" IN ACS!!"
536 12-JUN-78 EHM MOVGEN
FIX MOVE OF COMP ITEM TO DISPLAY TO ONLY MOVE THE NUMBER OF CHARACTERS
IN THE COMP PIC
535 4-MAY-78 EHM COBOLD
FIX EDIT 273 FOR IF SET NOT EMPTY
534 14-APR-78 EHM EXPGEN MATGEN
FIX COMPUTE GETS ANSWER FROM WRONG AC
533 6-APR-78 EHM DTREE
MAKE STOP RUN WORK FOR WHEN IN SEARCH
532 29-MAR-78 EHM COBOLD
FIX EDIT 511 TO PROCESS ERRORS CORRECTLY
531 21-MAR-78 EHM COBOLF PUTCPY
FIX EDIT 517 TO COMPILE COPIES CORRECTLY
517 4-OCT-77 MPL COBOLF PUTCPY
IMPROVE READABILITY OF .LST FILE
*** EDITS BELOW WILL BE IN VERSION 12 RELEASE ***
530 FIX COMMAND SCANNER TO LOOK FOR NUL FILE IF USER TYPES =FILE.
527 FIX CATASTROPHIE WHEN REPORT WRITER VALUE IS MESSED UP
526 IGNORE EDITS PAGE MARKS SO CONTINUATION WORKS
525 FIX SUBSCRIPT EXPRESSION AND NON COMP
524 FIX UNSTRING INTO RECEIVING FIELD WITH DECIMAL PLACES.
523 FIX "OPEN JOUR" STATEMENT FOR EXCL. UPDATE
522 FIX ROUNDING FOR LARGE DIFFERENCES IN NUMBER OF DECIMAL PLACES.
520 CORRECT ERROR HANDLING FOR UNDEFINED DATA ITEMS IN A USING CLAUSE.
516 ALLOW ENTRY AFTER EXIT PROGRAM BUT NOT AFTER EXIT (PARAGRAPH).
ADDED KEYWORDS FOR DBMS-V6: TRANSACTION, VIA, MEMBERS
515 CHECK SOURCE-COMPUTER CORRECTLY
514 FIX CONVERSION OF ASCII TO EBCDIC
513 IF INVALID DBMS PRIVACY KEY, GIVE FATAL ERROR
AND BEGIN PROCESSING AFTER SCHEMA SECTION.
512 CHECK FOR COMP ITEM AT 01 LEVEL WHEN DOING A BINARY WRITE
511 MAKE NESTED SEARCH STATMENTS WORK
510 PREVENT CATASTROPHE IN PHASE E WHEN COPY
TO LINKAGE SECTION IS INCORRECT SUCH THAT THERE
IS NO LINK SET UP TO THE 01 LEVEL GRANDFATHER.
507 TO BUILD COBOL WITH DBMS==0, DBMS4==0 WHEN EDIT 476 IS INSTALLED
506 MAKE NEW EXIT QUITS WHICH RETURNS TO
COBOLA WITHOUT GOING TO COBOLK
505 ADD CHECKS SO "KEY" TYPE MATCHES ACCESS MODE
504 ALLOW "STRING" VERBS TO BEGIN IN A-MARGIN
LIKE OTHER VERBS AND CATCH MORE CASES OF
IMPROPER SYNTAX SUCH AS "STRING DELIMITED...".
503 TO BUILD COBOL WITH DBMS==0, DBMS4==0
501 ENFORCE NO PRINTER CHANNEL GREATER THAN 8
500 FIX "SET X(1) X(2) UP" TO STOP LOOPING
477 DO BETTER RECOVERY FROM LIBARY NOT FOUND
476 CHECK FOR PROPER SEQUENCE OF SECTION
NAMES AND PROPER ALLOCATION OF DATA STORAGE
475 PASS NUMERIC AND SIGN BITS TO MACRO SUBROUTINE CORRECTLY
474 PUT OUT ERROR MESSAGE WHEN TRYING TO DO A
"READ INTO" ON A RECORD OF ZERO SIZE.
471 GIVE APPROPRIATE ERROR MESSAGE WHEN OCCURS
MAXIMUM EXCEEDED.
470 BE MORE AWARE WHEN "DECIMAL-POINT IS COMMA"
467 SET LN, CP AND RIGHT DIAG. MESSAGE FOR
STATEMENT: "GO TO -(NUMBER)"
466 FIX COMPUTE FLOATING DIVIDES WHEN ANSWER ROUNDED.
465 LOCATE TOO LARGE DATA ITEM DEFINED BY
OCCURS FOLLOWED BY OCCURS. GIVE FATAL ERROR.
464 ALLOW DIGITS TO BE LEXICALLY ORDERED BEFORE LETTERS.
461 FIX TALLY FOR RECORD-NAME IN WRITE CAUSES CRASH
460 FIX INCORRECT ERROR MESSAGE AFTER SEARCH ALL 'THIS STATEMENT
CANNOT BE REACHED.' ROUTINE COBOLD.
457 GIVE FATAL ERROR MESSAGE FOR ENTRY FOLLOWING EXIT IN THE SAME
PARAGRAPH. ROUTINE DTREE.
456 GIVE WARNING DIAGNOSTIC IF ROUNDING IS USED INCORRECTLY.
ROUTINES CMNGEN, EXPGEN, DIAGS.
455 FLAGS SORT KEYS NOT DEFINED IN SD STATEMENT. ROUTINE COBOLD.
454 RECOVER FROM USER SYNTAX ERROR FOR CONDITIONAL NAME WHICH CAN
CAUSE CATASTROPHIE IN PHASE C. ROUTINE CLEANC.
453 ALLOW DBMS PROGRAMS IN STANDARD (/S) FORMAT.
ROUTINES DBGETF, COBOLC, GETITM.
452 FIX KEY CODE FOR CORE EXPANSION FOR SORTING IN LARGE COBOL
PROGRAMS. ROUTINE SRTGEN.
451 GIVE ERROR MESSAGE LINKAGE SECTION MUST COME AFTER WORKING-
STORAGE IF THERE IS A SCHEMA SECTION OR A COMMUNICATION SECTION.
ROUTINE COBOLC.
450 FIX RENAMES THRU FOR DATA-NAME IN LINKAGE SECTION. ROUTINE COBOLC
447 GIVE WARNING WHEN ATTEMPTING TO ACCEPT MORE THAN 1023 CHARACTERS
INTO AN AREA. ROUTINE IOGEN.
*** EDITS BELOW ARE IN VERSION 11 RELEASE ***
446 TEST FOR ERROR BEFORE PUSHJ TO LNKSET FOR CATASTROPHE IN PHASE
E. ROUTINE IFGEN
445 FIX CATASTROPHE IN PHASE IF VARIABLE FROM LINKAGE SECTION IS
SUBSCRIPTED THAT CANNOT BE SUBSCRIPTED. ROUTINE IFGEN.
444 ADDED WARNING IF MAXIMUM COMPARE LENGTH FOR IF STATEMENT IS
EXCEEDED. ROUTINES COBOLE AND DIAGS.
443 FIX INCORRECT RESULT WHEN ATTEMPTING TO NEGATE A VARIABLE VIA
COMPUTE (I.E. COMPUTE BLAH = - BLAH ). ROUTINE EXPGEN.
442 ILLEGAL MEMORY REFERENCE REFERENCE CATASTROPHE IN PHASE C IF
COMMUNICATIONS SECTION IS AFTER WORKING-STORAGE. ROUTINE COBOLC.
441 ADDED IF OP0 TEST FOR NON-NUMERIC DATA. NEEDS EDIT 455 TO
LIBOL. ROUTINES PURE, IFGEN
440 FIX XPAND GETTING CORE BUT LEAVING NAMADR WITH OLD CORE LOCATION.
ROUTINES XPAND, NAMADR
437 FIX DBMS 'IF' IF THE LITERAL TABLE OVERFLOWES ONTO THE DISK.
ROUTINE IFGEN
436 FIX DBMS 'IF' STATEMENTS IN SEGMENTED SECTIONS. ROUTINE IFGEN
435 FIX DECLARITIVES IN DBMS PROGRAM SO THAT DBMS SECTION GOES
AROUND IT. ROUTINE COBOLD, DTREE, CLEAND, IMPURE, COBOLE, XFRGEN
434 HANDLE SUM COUNTERS OF GREATER THAN 10 DIGITS PROPERLY FOR
REPORT WRITER. ROUTINE CLEANC
433 NOT USED.
432 PASS NUMERIC ARGUMENTS TO A SUBROUTINE CORRECTLY. ROUTINE IPCGEN
431 FIX 'UUO CONVENTION ERROR' MESSAGE WITH SORT GIVING ON LARGE-SIZE
ASCII FILES. ROUTINES CMNGEN, SRTGEN
430 FIX 'ACCEPT' WHEN ARGUMENT HAS A FAULTY SUBSCRIPT. ROUTINE IOGEN
427 FIX FIELD SIZE FOR EXAMINE REPLACING. ROUTINE MSCGEN
426 FIX ZERO TESTING OF FIELDS WITH PICTURE SIZES OF 6 OR FEWER.
ROUTINE IFGEN
425 FIX STRING/UNSTRING AND MCS VERBS TO WORK IN NON-RESIDENT
SECTIONS. ROUTINES MESGEN, XFRGEN
424 DON'T ATTEMPT TO MAKE LITERALS OF ZERO SIZE. ROUTINES CMNGEN,
MOVGEN
423 DON'T ATTEMPT TO MAKE CONTROL ID PREVIOUS IF ID IS ERROR.
ROUTINE COBOLC
422 FIX LOSS OF FIRST CHARACTER IN 'DATE-COMPILED' OR 'SOURCE-COMPUTER'
STATEMENTS. ROUTINE COBOLB
421 FIX 'EXAMINE REPLACING' BY 'HIGH-VALUES' FOR A SIXBIT ITEM.
ROUTINE MSCGEN
420 FIX FOR MISSING PERIOD ON 'OPEN' STATEMENT. ROUTINE COBOLD
417 MAKE SURE RESTYP IS DEFINED SO ARITHMETIC OPERATIONS DON'T GET
'BAD RESTYP' MESSAGE. ROUTINE MATGEN
416 FIX MOVES OF SUBSCRIPTED OR LINKAGE SECTION ITEMS. ROUTINE
MOVGEN
415 FIX THE CONTROL ID COUNT IN REPORT WRITER. ROUTINE RPWGEN
414 HANDLE NEGATIVE EXPRESSIONS IN 'IF' STATEMENTS. ROUTINE IFGEN
413 FIX PERIOD HANDLING FOR NESTED 'IF' AND 'SEARCH' STATEMENTS.
ROUTINE COBOLD
412 PREVENT COMMUNICATION SECTION AND SCHEMA SECTION FROM OVERLAYING
EACH OTHER. ROUTINE COBOLC
411 CORRECT PARAMETER WORD SETTING FOR SUBSCRIPTED ARGUMENTS TO
'ENTER' OR 'CALL'. ROUTINE IPCGEN
410 FIX 'SEND WITH' DATA-NAME FOR MCS. ROUTINE MESGEN
407 FIX WRITE BEFORE/AFTER FOR STANDARD ASCII FILES. ROUTINES
CLEAND, IOGEN
406 SET ERROR RETURN FROM SETOPN IF DATA ITEM HAS ERROR BIT SET.
ROUTINE CMNGEN
405 FIX QUALIFICATION OF SUBSCRIPTS. ROUTINES COBOLD, DIAGS
404 FIX COUNT OF ALLOWABLE CHARACTERS IN AN EDITED PICTURE.
ROUTINE PSCAN
403 FIX ERRONEOUS 'CLAUSE DUPLICATED' DIAGNOSTIC FOR EDITED NUMERIC
FIELDS WITH NO 9S AND A 'BLANK WHEN ZERO' CLAUSE. ROUTINE COBOLC
402 ALLOW INDEX REGISTER AND INDIRECT ADDRESSING FOR ARGUMENT TO
LIBOL. ROUTINES CMNGEN, COBOLG
401 FIX HANDELING OF USE PROCEEDURE IN A DBMS PROGRAM.
ROUTINES CTREE, COBOLG, CLEAND, IMPURE
400 REPLACED BY EDIT 435.
377 FIX MULTIPLE ITEMS IN A GIVING CLAUSE. ROUTINE MATGEN
376 FIX ERROR RECOVERY FOR ERROR IN DIVIDE STATMENT. ROUTINE DTREE
375 FIX LITERAL OVERFLOW IN DBMS 'IF' STATEMENTS. ROUTINE IFGEN
374 FLAG ERROR WHEN SIXBIT LITERAL HAS A NON-SIXBIT CHARACTER IN IT.
ROUTINES IFGEN, CMNGEN, IMPURE, ASCSIX
373 FIX MULTIPLY DEFINED DATANAMES (QUALIFIED) TO ALLOW ALL NEW
DEFINITIONS TO BE MARKED. ROUTINE COBOLC
372 MAKE SURE %PARAM IS PUT INTO AS1 FILE FOR DBMS 'IF' STATEMENTS.
ROUTINE IFGEN
371 FIX MOVE OF 'TODAY'. ROUTINE MOVGEN
*** EDITS BELOW ARE IN VERSION 10 RELEASE ***
370 FIX RETURN FATAL ERROR IN EXPRESSION - EXPGEN -
367 FIX THE MISSING OF LISTING OF ".", "," OR ";" THAT IS IN A
LIBARY - EXPGEN -
366 FIX DISPLAY OF DISPLAY-7 ITEMS SO NO EXTRA <CR-LF> IS DONE
- IOGEN -
365 FIX MULTIPLE CALLS TO SETOPN FOR TALLY - CMNGEN -
364 DBMS FIX - MAKE ONLY ONE CALL TO DBGETF BECAUSE
ONLY ONE INVOKE STATEMENT ALLOWED. - GETITM -
363 FIX RECOVERY IF TOO MANY LEVELS OF SUBSCRIPTING - COBOLD -
362 RECOVER FROM ERROR IN SEARCH STATEMENT - COBOLD -
361 NOT IN V10.
360 FIX EDIT 320 FOR SIMPLE COMPUTE X = -A OR (-A) - IMPURE,
EXPGEN -
357 FIX RECOVERY IF RECORD NAME IS NOT DEFINED IN READ
INTO STATEMENTS - IOGEN -
356 ALLOW LOWER CASE LETTERS FOR VALUE OF ID - COBOLC -
355 ALLOW FOR 1 BUFFER, ALSO CHECK FOR MAC OF 62 ALTERNATE
AREAS - COBOLB, DIAGS -
354 FIX TO HANDLE SOURCE CHAR COUNTER - GETITM -
353 IN DBMS COMPILER AN UNDEFINED IF VARIABLE WAS NOT
FLAGGED IN THE RIGHT PLACE - COBOLD
352 FIX "I/O TO UNASSIGNED CHANNEL" IF A COPY STATEMENT IS THE
VERY LAST ONE IN THE SOURCE FILE - GETITM
351 FIX RANDOM CHARACTERS IN HEADING OF LISTING FILE - COBOLF -
350 FOR SET OR COMPUTE STATEMENST WHICH ARE KNOWN BY THE COMPILER
TO GIVE A ZERO RESULT BE SURE ZERO FLAG IS TURNED OFF -
MATGEN, EXPGEN
347 MAKE SURE THAT A DUMPED FILE HAS A DIRECTORY NAME - COBOLK
346 FIX BAD TAG LOCATION E.G. ADDRESSES IN FILE TABLES - XFRGEN
345 FIX NO ADVANCING OPTION FOR DISPLAY OF SUBSCRIPTED DISPLAY-7
ITEMS - IOGEN
344 FIX "?DSK IS NOT THE DSK" PROBLEM IF A COBOL COMMAND FILE
IS MISSING - COBOLA
343 FIX RECOVERY IF AN "RD" STATEMENT IS IMPROPERLY TERMINATED - CTREE
342 REPORT WRITER FIXES:
1. CHECK TO SEE THAT USER HAS A "LINE" CLAUSE IN A REPORT GROUP.
2. FOR "LINE NEXT PAGE" CLAUSE GOES TO LINE BASED ON REPORT
LINE TYPE AND LINE SPECIFICATION IN PAGE LIMIT CLAUSE.
- DIAGS, IMPURE, RPWGEN
341 FIX MOVES OF SUBSCRIPTED OR LINKAGE SECTION ITEMS > 2047
CHARACTERS - MOVGEN (NO EDIT NUMBERS IN IT)
340 FIX STRING/UNSTRING STATEMENTS IN A SUBPROGRAM AND FOLLOWS
AN ENTRY STATEMENT - IMPURE, STRGEN
(THIS EDIT NOT IN V10, STRING/UNSTRING WAS REWRITTEN)
337 FIX CTREE TO MAKE THE WORD 'USAGE' BE OPTIONAL IN FRONT OF
THE WORD 'DATABASE-KEY' - CTREE.
336 IN COBOLD AT PA283, FIX RECORD NAMES LONGER THAN 12 CHARS
CAUSING BAD ARG BLOCK FOR FIND5 DBMS STATEMENT WITHOUT THE
OPTIONAL WORD 'RECORD' - COBOLD.
335 FIX RECOVERY IF REPORT ID IS NOT LEGAL - IMPURE, RPWGEN,
COBOLC, CTREE, CLEANC
334 FIX UNSTRING STATEMENTS TO ALLOW POINTER AND TALLYING ID
TO BE > 9 DIGITS - STRGEN (THIS EDIT NOT IN V10,
STRING/UNSTRING WAS REWRITTEN)
333 FIX ADDITIVE FOR TALLY SUBSCRIPT E.G. MOVE A TO X(TALLY+1) -
COBOLD, CMNGEN
*** DEVELOPMENT EDITS ***
DBT 17-JAN-75 SEARCH INTERM.UNV - COBOL AND LIBOL SWITCH
DEFAULT RESOLUTION UNIVERSAL
ADD FUUOIC FLAG TO SW FOR CODE GENERATION PHASE
DBT 1-DEC-74 REDEFINE REGO TO BE 400000+.JBHSA THE REAL
STARTING ADDRESS
ACK 12-JAN-75 ADD CAPABILITY TO HAVE DIAGS UP TO 1023.
SSC 6-FEB-75 MAKE CHANGES FOR THE NEW DBDML MODULE
(1) 3 SIMUL CHANNELS
(2) NO RECORD TABLE
GPS 23-DEC-74 INSERT NEW KEYWORDS FOR SIMULTANEOUS UPDATE
DBT 16-APR-75 FIX IT SO THAT MCS AND DBMS TABLES WORK WITH
ANY VARIATION OF SWITCH SETTINGS
SSC 29-JUL-76 TO ADD KEYWORDS TO COBOL MUST TOUCH HERE AND COBOLA
ADD JOURNAL
SSC 28-SEP-77 ADD VIA. & TRANS. TO SUPPORT DBMS-V6 ENHANCEMENTS
*** VERSION 6A RELEASE ***
332 FIX COBOLE TO CORRECTLY BUILD ARG BLOCK FOR DBMS USE
STATEMENT
331 CHECK FOR SCHEMA SECTION BEFORE FILE SECTION OR AFTER ANY
OTHER SECTION. IF IT IS OUTPUT ERROR MSG 470
330 FIX CODE TO SKIP OVER DUMMY ARGS IN A CALLED SUBPROGRAM.
ROUTINES- CMNGEN,IPCGEN
ALSO SKIP ARGUMENT CODE GENERATION IF A FATAL ERROR IN THE PROGRAM
327 FIX "GO TO" IN AN UNNAMED PARAGRAPH AFTER THE DECLARATIVES.
ROUTINE COBOLD.
326 MAKE ERROR OR WARNING RELATING TO A "SUM" CONTROL FOOTING
LINE POINT TO THE CORRECT SOURCE LINE. ROUTINE RPWGEN
325 RECOVER IN A DIVIDE STATEMENT IF THE "GIVING" ITEM IS UNDEFINED.
ROUTINE MATGEN.
324 JUMP AROUND DECLARATVES IN AN ENTRY OF A SUBPROGRAM
ENTERED AT PROCEDURE DIVISION. ROUTINES COBOLD,IPCGEN,IMPURE
323 ALLOW "ALL" AS A DEVICE IN A "SELECT" STATEMENT. ROUTINES GETITM, BTREE
322 FIX "IF" CONDITIONAL SO THAT ".. COMPILER ERROR" MESSAGE
DOES NOT OCCUR BECAUSE OF AN ERROR IN
THE STATEMENT BEFORE. ROUTINE- IFGEN
321 FIX RECOVERY WHEN A DATE-NAME IS NOT PROPERLY QUALIFIED IN AN EXPRESSION
OF AN "IF" OR "COMPUTE" STATEMENT- ROUTINE EXPGEN
320 FIX COMPUTE C = - (EXPR) ; ROUTINE EXPGEN
317 FIX "ADD ... GIVING X1,X2,.." WHERE ANY OF GIVING DATA MAY BE
EDITED- ROUTINE- MATGEN
316 SSC CLEANUP THE COBOL/DBMS INTERFACE IN A NUMBER OF WAYS:
(1) REDO DBDML USING DBCS-LIKE LOGIC RATHER THAN SEQUENTIAL ACCESS
INVOLVED ADDING ROUTINES DMLVOK,DMLVIO,DMLIO,DMLERR,GENCOD
AND UNIVERSALS GENDCL,DBSDCL,CMLSYM
ALSO IT MAKES USER OF STRLIB WITH (HIGH==0)
IMPORTANT: THESE ROUTINES ARE ALSO USED BY FORDML
THE CONTROL IS PROVIDED BY CMLSYM WHICH SETS $COB==1
FOR FORDML THERE IS AN ANALOGOUS FILE FMLSYM.
(2) ADD ACCESS STATEMENT--(SIMILAR TO INVOKE).
CHANGED CTREE,COBOLC, AND COBOLA AND P
(3) ALLOW 30-CHAR SUB-SCHEMA NAMES--CHANGED COBOLC
(4) MODIFIED SYNTAX TO ALLOW ONE INVOKE/ACCESS PER RUN-UNIT AND NO PPN'S
315 REPORT WRITER FIXES
314 FIX RECOVERY FROM AN UNDEFINED VARIABLE IN A COMPUTE STATEMENT
313 FIX ERROR MESSAGE FOR UNDEFINED VARIABLE THAT OCCURS
IMMEDIATELY AFTER AN "IF". (PROBLEM OCCURS ONLY IN A DBMS COMPILER)
312 FIX SO THAT ERROR 410 PRINTOUT WORKS FOR ALL ASSEMBLIES OF THE COMPILER.
FIX ERROR RECOVERY WHEN AN ALTERABLE PARAGRAPH
HAS EXECUTABLE STATEMENTS FOLLOWING THE GO TO.
311 FIX ERROR HANDLING OF ATTMEPTED USE OF STRING AS A PARAGRAPH NAME
310 FIX ERROR CHECKING OF PIC CLAUSES.
307 FIX CANCEL STATMENT SO THAT "BAD GENFIL " COMPILER MSG DOES NOT OCCUR.
306 FIX SUBSCIPT OF COMP AND INDEX ITEM IN AN ASCII RECORD
305 FIX LINE SPACING PROBLEM IN REPORT WRITER.
REQIRES LIBOL EDIT 404
304 FIX ILL MEM REF IN COMPILER DUMP IN COBOLK
303 FIX MOVES OF NUMERIC LITERALS
302 FIX DATE 75 PROBLEM OF SOURCE FILE DATE IN LISTING
301 FIX MOVE OF SINGLE-WORD LITERAL TO 2-WORD SUBSCRIPTED COMP ITEM
300 CHECK FOR RECORD KEY/SYMBOLIC KEY IN LINKAGE SECTION-FLAG AS ERROR IF SO
277 FIX TO HANDLE LC LETTERS FOR OBJECT/ SOURCE COMPUTER STATEMENTS
276 CHECK THAT DATA NAME IS A RECORD LEVEL
FOR WRITE/REWRITE/DELETE/RELEASE STATMENTS
275 RECOVER FROM A LIBARY READIN PROPERLY
274 MAKE CMNGEN IN COBOLE RECOVER CORRECTLY IF A LITERAL
SUBSCRIPT IS TOO LARGE
273 FIX BAD LITAB CODE CAUSED BY DBMS IF STATEMENT PROCESSING
FIXED IN COBOLD(PA265A) AND IFGEN(IFDBGN). /DPL
272 REMOVE LINPAG DEFINITION FROM COBOLK.MAC
271 FIX PHASE D CATASTROPHIE IF NO PARA NAME IMMEDIATELY AFTER
SECTION NAME
270 PREVENT EXTRA ERROR MESSAGE IF VALUE OF IS UNDEFINED
267 FIX ILL MEM REF IN NAMTAB TABLE SEARCH
266 SHUT OFF USERS CONTROL O EFFECT FOR ERROR SUMMARY LINE AND
COMMAND "*" PROMPT
265 ALLOW FIGURATIVE CONSTANT "ZERO" IN "BY" AND "FROM" PARM
IN "PERFORM" STATEMENT
264 FIX ILL MEM REF IN PHASE C IF ACTUAL KEY FOR RANDOM FILE IS UNDEFINED
263 MAKE LISTING RECOGNIZE TALLY FOR DIAGNOSTIC MESSAGES
262 FIX HANDLING OF UNDEFINED SUBSCRIPT TO AVOID COMPILER-TYPE
ERROR MESSAGES.
261 FIX ILL MEM REF FOR NAMTAB TABLE SEARCHES- FOR ENTRY STATEMENTS USUALLY
260 FIX 01 DATAN ..
257 FIX RELEASE AND RETURN SO THAT PARMS ARE ONLY IN SORT FILE
256 REVERSE ORDER OF LOOKUP FOR SOURCE AND LIBARY FILES
SO THAT .CBL (.LIB) IS LOOKED FOR FIRST
255 FIX TO ALWAYS ACCEPT LC LETTERS IN COMMAND STRING
254 PREVENT INDIRECT BIT BEING TURNED FOR COMP USING ARG AT WRONG TIME
253 FIXES A RENAMES B.
252 FIXES POSSIBLE PUSHDOWN LIST PROBLEM OF EDIT 122
251 RECOVERS PROPERLY IN PHASE E IF A SUBSCIPT IS SUBSCRIPTED
250 FIX SO THAT TALLY CAN BE USED FOR ARITH AND SET OPERATIONS
AND ALSO ALLOWS TALLY TO A USED AS A SUBSCRIPT.
247 FLAGS ATTEMPT TO USE SUBSCIPTED ITEMS IN REPORT WRITER
246 FIXES MULTIPLE CALLS TO SUBPROGRAMS OF FORM CALL "SUB"
COBOLD.
245 FIXES READ INTO SO INTO WORKS IF GENERATE STMT PART
OF AT END OR INVALID PATH.
244 FIXES TO DETECT AS AN ERROR AN ELSE AFTER A PERIOD
243 FIXES OCCURS 0 TO N. ALLOWS THE 0.
242 ALLOWS SUBSCRIPTING OF ITEMS QUALIFIED BY FILE NAME
241 FIXES REPORTING OF GROUP INDICATE SOURCE ITEMS; DOES NOT
FIX GI VALUE ITEMS (COMPLEX). IN RPWGEN.
240 FIXES SEARCH ID WITH QUALIFIER CAUSE CRASH IN PHASE E
COBOLD
237 JEF COBOLC .MAC, DIAGS.MAC
IDENTIFIERS GIVEN IN THE CONTROL CLAUSE MUST BE
DEFINED ONLY IN THE FILE AND WORKING STORAGE SECTIONS.
*** THOSE BELOW WILL BE IN RELEASE VERSION 6 ***
222 ACK IN COBOLD.MAC @ PA1., PA47., PA96., PA98., PA99.,
PA100., PA200. AND IN IMPURE.MAC @ THE DEFINITION OF
VARBLK.
FIX THE NULL TABLE LINK PROBLEM FOR THE CORRESPONDING OPTION
AND PERFORM VARYING'S.
221 ACK IN DTREE.MAC @ PD1035
ALLOW SUBSCRIPTED VARYING ON SEARCHES.
220 ACK IN COBOLC.MAC @ DA110A+3 AND DIAGS.MAC ADD ERROR 151.
GENERATE AN ERROR IF A MINOR KEY IS THE SUBJECT OF AN OCCURS.
217 ACK IN IFGEN.MAC @ IFCG20+13
FIX FATAL DIAG PRODUCED IN A VALID PROGRAM.
216 ACK IN CTREE.MAC @ $ DD205G
PREVENT SKIPPING EVERYTHING IF AN RD IS TERMINATED WITH A DOUBLE
PERIOD.
215 JEF COBOLC/DIAGS ERROR IF HEADING < FIRST-DETAIL
< LAST-DETAIL < FOOTING.
214 COBOLD - CHANGE FATAL TO WARNING IF MORE THAN 6 CHARS IN SUBPROGRAM NAME
213 DISALLOW COPY IN LIBARY; FIX LITERAL TOO MANY CHARS MSG
212 "CANCEL IS NOT IMPLEMENTED YET..."
202 REPORT WRITER FIX OF GENERATE STATEMENT CAUSING RUN TIME
ILLEGAL UUO, RPWGEN
\
;;; *** END OF COBOL EDIT HISTORY ***
SUBTTL OTS EDIT HISTORY
COMMENT \
;.COMPONENT COBOTS
;.VERSION 13
;.AUTOPATCH 23
;.EDIT 1207 If ISAM file is ASCII but key is unsigned, make it
;; work the same way as non-numeric.
; RLF,7-JUL-1990,SPR:10-36301
; A:SRC CBLIO
;.ENDA
;.AUTOPATCH 22
;.NOEDITS
;.ENDA
;.AUTOPATCH 21
;.EDIT 1206 Patch CBLIO so that it can return correctly
;; from an extended section.
; KWS,8-JAN-1989,SPR:20-21894
; A:SRC CBLIO
;.ENDA
;.AUTOPATCH 20
;.EDIT 1205 Fix edit 1174 in LSU to work correctly.
; KWS,1-NOV-1988,SPR:20-21904
; A:SRC COBVER,LSU
;.ENDA
;.AUTOPATCH 19
;.EDIT 1204 Edit to make sure that retained records are non-existant
;; when they should be.
; KWS,23-JUN-88,SPR:20-21895
; A:SRC COBVER,LSU
;.EDIT 1203 Edit to fix 1157, forgot a path when correcting qt.
; KWS,22-JUN-88,SPR:20-21893
; A:SRC COBVER,LSU
;
;.EDIT 1202 Edit to generate a more appropriate error message
;; if the byte count to an ISAM index file is set to zero while
;; a COBOL program is running.
;.ENDA
;.AUTOPATCH 18
;
;.EDIT 1201 Fix edit 1166, so .jbff will now be correct
; KWS,27-JAN-88,SPR:10-35774
; A:SRC COBVER,CBLIO
;
;.ENDA
;.AUTOPATCH 17
;
;.NOEDITS
;
;.ENDA
;.AUTOPATCH 16
;
;.EDIT 1200 Allow files to be found via search lists
; KWS,17-JUN-1987,SPR:20-21480
; A:SRC COBVER,RMSIO
;
;;.EDIT 1177 Not applicable to version 13
;
;
;.EDIT 1176 Put back part of edit 1137 to original form so files
; not connected to directory can be found.
; RLF,04-FEB-1987,SPR:20-21274
; A:SRC COBVER,CBLIO
;
;.EDIT 1175 Change Device error error message to include insufficient
;; system resources.
; KWS,26-NOV-1986,SPR:NONE
; A:SRC COBVER,CBLIO
;
;.ENDA
;.AUTOPATCH 15
;
;.EDIT 1174 Fix handling of RETAIN on a numeric key with assumed
; decimal points.
; KWS,17-NOV-86,SPR:20-21401
; A:SRC COBVER,LSU
;
;.EDIT 1173 Fix An error in record locking with RMS files.
; KWS,4-NOV-1986,SPR:20-21277
; A:SRC COBVER,RMSIO
;
;.EDIT 1172 Fix LSU so block locking will work with Relative
; files.
; KWS,23-OCT-86,SPR:20-20813A
; A:SRC COBVER,LSU
;
;.EDIT 1171 Don't output CRLF for first ASCII record
; so there is no extra CRLF
; RLF,14-OCT-86,SPR:20-20878
; A:SRC COBVER,CBLIO
;
;.EDIT 1170 Don't block record if >= 1 page so RMS won't
; give bad record size error.
; RLF,14-OCT-86,SPR:20-21174
; A:SRC COBVER,RMSIO
;
;.EDIT 1167 Correct the checking of flag WANT8. so device NUL
; and mode BINARY won't get COMPT. UUO error
; RLF,08-OCT-86,SPR:20-20926
; A:SRC COBVER,CBLIO
;
;.EDIT 1166 Size of PDL is off by 20.
; MEM,01-OCT-86,SPR:20-21381
; A:SRC COBVER,CBLIO
;
;.EDIT 1165 Increase size of FID.BK for long file name, so
; at OPEN time won't get error from COMPT. UUO
; RLF,30-SEPT-86,SPR:20-21315
; A:SRC COBVER,COMUNI,CBLIO
;
;.EDIT 1164 Check the flag so buffer won't get cleared when
; doing OPEN EXTEND with SAME AREA
; RLF,03-SEPT-86,SPR:10-35457
; A:SRC COBVER,CBLIO
;.ENDA
;.AUTOPATCH 14
;
;.EDIT 1163 Correction to edit 1161
; RLF,11-AUG-1986,SPR:NONE
; A:SRC COBVER,HANDAN,RMSIO,STRING
;
;.EDIT 1162 Change the Start verb so it works as it should in SMU. I.E
; Start is illegal within the scope of a RETAIN/FREE, but it
; should work outside the scope.
; KWS,31-JUL-1986,SPR:20-21279
; A:SRC COBVER,CBLIO,RMSIO,LBLERR
;
;
;.EDIT 1161 Fix BLT's that were faulty because of the new micro-code change
; KWS,1-JUL-1986,SPR:NONE
; A:SRC COBVER,CBLIO,HANDAN,RMSIO,STRING
;
;.EDIT 1160 Fix RMSIO so use of correct mode is done in computing record
; length in words.
; KWS,11-MAY-1986,SPR:20-21114
; A:SRC COBVER,RMSIO
;
;.EDIT 1157 Return the 12B/12C functionality of block locking rather than
; file locking.
; KWS,7-MAY-86,SPR:20-20813
; A:SRC COBVER,LSU
;
;.EDIT 1156 Correct edit 1066 so that EBCDIC labeled tapes now work again.
; KWS,16-APR-86,SPR:20-20727
; A:SRC COBVER,CBLIO
;
;.ENDA
;.AUTOPATCH 13
;
;.EDIT 1155 Change RMS error for ENQ quota exceeded error. Add error LBL534
; MJC,14-FEB-86,SPR:20-21102
; A:SRC RMSIO,LBLERR
;
;.EDIT 1154 Change the return in GC3NEG so it doesn't return indirect.
; KWS, 15-JAN-86,SPR:20-20775
; A:SRC GC
;
;.EDIT 1153 RMS INDEXED EBCDIC files corrupt core on open. Fix edit 1044.
; MJC,12-JAN-86,SPR:20-20999
; A:SRC RMSIO
;
;.ENDA
;.AUTOPATCH 12
;
;.EDIT 1152 Make sure that the channel number is set up correctly
;; when using declaratives.
; KWS,18-NOV-85,SPR:10-35334
; A:SRC CBLIO
;
;.EDIT 1151 Zero dump mode IOWD in UOUT. on invalid key return
; MJC,3-SEP-85,SPR:10-35245
; A:SRC CBLIO
;
;;.EDIT 1150 N/A to version 13
;
;.EDIT 1147 Fix problem with catching "File being modified" error.
; KWS,1-JUL-85,SPR:20-20613
; A:SRC CBLIO
;
;.EDIT 1146 Merge logical name in with rest of file specification.
; KWS,22-MAY-85,SPR:20-20710
; A:SRC RMSIO,COMUNI
;
;;.EDIT 1145 N/A to version 13
;
;;.EDIT 1144 N/A to version 13
;
;.ENDA
;.AUTOPATCH 11
;
;.EDIT 1143 Change where program fails if missing ISAM files
; JSM,22-APR-85,SPR:20-20553
; A:SRC CBLIO
;
;;.EDIT 1142 Applicable to 12B only.
;
;.EDIT 1141 Check for separartor characters in 9 character file names
;; before using the old parsing method.
; MJC,29-MAR-85,SPR:20-20549
; A:SRC CBLIO
;
;.EDIT 1140 Make PA1050 allocate buffers in prealloc area.
; BCM,28-Mar-85,SPR:20-20581
; A:SRC CBLIO
;
;.EDIT 1137 Fix the overlay lookup.
; KWS,28-MAR-85,SPR:20-20443
; A:SRC CBLIO
;
;.EDIT 1136 Change the error message when trying to DEQ. without
;; first doing an ENQ.
; KWS,19-MAR-85,SPR:20-20622
; A:SRC LSU
;
;.EDIT 1135 Fix the retain next so that it works properly.
; KWS,10-MAR-85,SPR:20-00022
; A:SRC LSU
;
;;.EDIT 1134 Applicable to 12B only.
;
;.ENDA
;.AUTOPATCH 10
;
;.EDIT 1133 Make OPEN use long form GTJFN on file-not-found so that the
;; file is opened on the right device.
; MJC,03-JAN-85,SPR:20-20518
; A:SRC CBLIO
;
;.EDIT 1132 Pass an ASCIZ string to RMS rather than an ASCII
;; string (It works better)
; KWS,17-OCT-84,SPR:20-19780
; A:SRC RMSIO
;.EDIT 1131 Fix OPEN I-O filename. so that it doesn't do SMU.
; KWS,15-OCT-84,SPR:20-20390
; A:SRC CBLIO
;
;.ENDA
;.AUTOPATCH 9
;.EDIT 1130 Add conversion factor when toing a sequential i-o read
;; with an external recording mode of ASCII and an internal
;; recording mode of SIXBIT.
; KWS,12-SEP-84,SPR:10-34846
; A:SRC CBLIO
;
;.EDIT 1127 Tops-10 version 12b only
;.ENDA
;.AUTOPATCH 8
;
;.EDIT 1126 Define feature switch and code for printing ascii
;; text files with blank lines
; JEH,22-MAY-84,SPR:20-20056
; A:SRC INTERM,LBLPRM,CBLIO
;
;.EDIT 1125 Don't generate a plus 2 return from WADV. for certain
;; report writer programs
; JSM,14-MAY-84,SPR:NONE
; A:SRC CBLIO,COMUNI,LINE
;
;.EDIT 1124 Don't recompute byte pointer to record key in buffer,
;; use stored value, doing it wrong for write, rewrite, delete
; RLF,14-MAY-84,SPR:NONE
; A:SRC LSU
;
;.EDIT 1123 Unnativise the TIME code, it yields different results
;; than V12B
; RLF,14-MAY-84,SPR:NONE
; A:SRC TODAY
;
;.EDIT 1122 Take 'AT END' path on 'READ NEXT' if at end-of-file
; JEH,14-MAY-84,SPR:NONE
; A:SRC RMSIO
;
;.EDIT 1121 'READ NEXT' fails after 2 'REWRITES', flags being
;; stored at the wrong time
; JEH,10-MAY-84,SPR:NONE
; A:SRC CBLIO
;
;.EDIT 1120 Don't get channel number when opening a file assigned to LPT:
; JBB,27-APR-84,SPR:NONE
; A:SRC CBLIO
;
;.EDIT 1117 XRMS loads in UDDT at runtime.
; JBB,24-APR-84,SPR:NONE
; A:SRC RMSIO
;
;.EDIT 1116 Reset file status before retrying file open
; JEH,13-APR-84,SPR:20-20071
; A:SRC RMSIO
;
;;.EDIT 1115 Determine if mag tape as well as if DV.DIR to
;; choose correct path
;; JEH,10-APR-84,SPR:NONE
;; A:SRC CBLIO
;
;.EDIT 1114 Don't add an extra <CR><LF> to ascii record when re-writing
; JSM,29-MAR-84,SPR:10-34590
; A:SRC CBLIO
;
;.EDIT 1113 USE PROCEDURE doesn't work w/ filename-1 OPEN option
; RLF,22-MAR-84,SPR:20-20027
; A:SRC CBLIO
;
;.EDIT 1112 Don't put <CR> at end of std-ascii tape
; JEH,19-MAR-84,SPR:NONE
; A:SRC CBLIO
;
;;.EDIT 1111 Not needed in V13.
;
;
;.ENDA
;.ENDV
;.ENDR
VERSION 13****************
1103 09-Nov-82 JSM CBLIO
On fake read for SMU Retain on TOPS-10, check for
EOF Return and don't cause program failure if so.
1102 Not needed for V13
1101 Not needed for V13
1100 Not needed for V13
1077 24-Oct-82 JEN CBLIO
Update pointers for current record, next record
last record in DYNAMIC access and REWRITE
1076 23-Sep-83 JEH COBST
Add error rtn in case GET% for ots overwrites application.
1075 23-Sep-83 JBB CBLIO
Multiplevel ISAM file misses record on start,read next.
1074 23-Sep-83 JEH ACCEPT
Does not apply to COBOL-13.
1073 23-Sep-83 RMSIO
Fix CLOSE WITH DELETE so it deletes.
1072 27-Jun-83 JEH FIX
Don't turn on sign bit in second word if result is zero
1071 16-Jun-83 JSM LBLERR
Zero out FS.EN before assembling error number for File-Status 2
for RMS-20 files
1070 16-Jun-83 JEH NUMSTB
Not installed in V13 - for OTS with NUMSTD=0 only
1066 20-May-83 SMI CBLIO COMUNI
Fix tape I/O for labelled STANDARD-ASCII.
1065 21-Apr-83 RLF/JM CBLIO LSU
Make FREE RECORD KEY work for SMU after RETAIN NEXT.
*** Modified for v13 ***
1064 8-Apr-83 JSM CBLIO
Get CHECKPOINTing and RERUN in front of implicit FREE.
1063 8-Apr-83 JSM CBLIO
If file opened for SMU does not have max byte count in count in FDB give warning message.
*** Modified for v13 ***
1062 7-Apr-83 JEH CBLIO
If program's BLOCKING FACTOR differs from ISAM's, give error.
1061 31-Mar-83 SMI CBLIO
Fix byte size on OPEN of magtape with recording mode SIXBIT.
1060 22-Mar-83 JEH STRING
Use spaces as leading padding character.
1057 31-Mar-83 RLF CBLIO
Set correct value to FILE STATUS.
1056 09-Mar-83 EGM COMUNI RESOLV COBOTS.CTL
Prevent inclusion of DBCS for non-DBMS programs.
1055 24-Feb-83 JEH CBLIO
EXTEND of SIXBIT with logical block > physical block fails if file is re-opened at logical block boundary.
1054 16-Feb-83 JSM CBLIO LSU
Allow SMU OPEN UNAVAILABLE after DECLARATIVES.
1053 15-Feb-83 RLF LBLERR
Change error message to "File is busy".
1052 10-Feb-83 JEH CBLIO
EXTEND blocked SIXBIT files correctly.
1051 10-Feb-83 RLF LSU
Fix REWRITE after READ NEXT for RELATIVE file.
1050 25-Jan-83 JEH CBLIO
Set last block number (D.LBN) for random input file.
1047 21-DEC-82 RLF LSU
DEQ all records when fatal error encountered.
1046 14-Oct-82 SMI RMSIO
Fix CHECKPOINT with RMS files for DELETE and REWRITE.
1045 18-Oct-82 JSM RMSIO
Use $MESSAGE in RMSGET as first RMS-20 call to initialize RMS-20 global data
symbols.
1044 8-Oct-82 RLF RMSIO
Space fill record area.
1043 13-Sep-82 SMI CBLIO
Process end-of-file errors.
*** Edit 1043 was backed out of v13 by JSM because it forces any
EOF through a Declaratives Use Procedure if the Use Procedure
exists. The SPR problem that it fixed was on Mag-Tapes and looks
like a User Error. There is no reason that EOF on Sequential
Read should go through a Use Procedure.
1042 30-Aug-82 SMI CBLIO
Pop stack if error on blocked file open.
1041 20-Aug-82 RLF ACCEPT
Make SIZE ERROR work when ACCEPTed data item is multiplied by a constant.
1040
1037 26-Jul-82 RLF CBLIO
Change error message to "for OUTPUT only".
1036 21-Jul-82 RLF CBLIO
Zero out right half of UOUT. after checkpointing.
1035 20-Jul-82 RLF CBLIO
Fix READ NEXT after DELETE to get correct record.
1034 15-Jul-82 JEH CBLIO
Zero out end of data block after deleting a record.
1033 6-Jul-82 SMI CBLIO
Do abort close on labeled tapes during fatal error processing.
1032 7-Jun-82 LEM STRING
Can not STRING a one byte field into a one byte field.
1031 7-Jun-82 LEM CBLIO
Fix records missing when reading an ASCII file sequentially.
1030 8-Jun-82 RJD CBLIO
Check for use of ersatz device when opening a SMU file from a SFD.
1027 4-Jun-82 JEH CBLIO
Zero buffer address to force FAKE READ to get block number for a RETAIN
of LOW-VALUE key.
1026 1-Jun-82 JEH CBLIO
APPEND FILOP. does not reset buffer pointer if file ended on a block boundary.
1025 25-May-82 JEH COBFUN
If CORPT. is zero, don't try to free memory.
1024 14-May-82 RJD CBLIO
Use count on last block to check for end of record.
1023 7-May-82 RLF CBLIO
Update pointer for READ after REWRITE.
1022 29-Apr-82 RJD RMSIO
Deallocate memory if OPEN fails.
1021 27-Mar-82 LEM CBLIO
Make READ NEXT return correct record as ANSI standard states.
1020 21-Apr-82 RJD RMSIO
Test for CHECKPOINT with RMS files.
1017 8-Apr-82 LEM LBLERR
Reset ERRNUM when retrying to open a busy RMS file.
1016 17-MAR-82 RJD CBLIO
Test for ISAM files checkpointing every n records.
1015 2-Mar-82 LEM CBLIO
Not required for version 13. Edit 1007 is better.
1014 16-Feb-82 LEM CBLIO
Allow ASCII files on MTA to have extra CR.
1013 20-Jan-82 WTK CBLIO
Valid records get skipped in SEQUENTIAL access to RELATIVE ASCII file.
1012 13-Jan-82 JEH PD
*** Not required in v13 ***
Non-BIS display of low-values, [400000,,000000], is wrong.
1011 22-Oct-81 JSM CBLIO
Fix edit 1005 to correct CLOSE WITH DELETE for non-SMU files.
1010 28-Aug-81 JEH CBLIO
LOOKUP error message is incorrect, it uses ENTER block.
1007 9-Oct-81 DMN CBLIO
Fix TOPS-20 read unconditional code that is under TOPS2X feature test.
1006 9-Jul-81 WTK CBLIO
Cannot REWRITE a non-null EBCDIC record.
1005 2-Jul-81 JEH CBLIO
Fix CLOSE WITH DELETE to LSU file with TOPS-10 7.01.
1004 5-Oct-81 JSM FIX
For BIS turn on the correct second word sign bit.
1003 6-Jul-81 DMN CBLIO
Turn off CLOSE WITH DELETE flag if file cannot even be opened.
1002 1-Jul-81 DMN COBFUN
Routine CBC does not work if CORPT. goes to zero but overlays still exist.
1001 1-Jul-81 HAM CBLIO
READ NEXT fails in certain obscure circumstances.
1000 22-Jun-81 DMN LSU
Make simultaneous update of relative files work again
;*** Fixes to 12A found after 12B was released not required in 12B or duplicated above
705
704 22-Oct-81 JSM CBLIO
*** Same as edit 1011 ***
Fix edit 677 to correct CLOSE WITH DELETE for non-SMU files.
703 9-Sep-81 JEH CBLIO
*** Not required in v12B ***
Reset FOP.BN before FILOP. in OPNFP2 so extra buffers won't be allocated.
702 28-Aug-81 JEH CBLIO
*** Same as edit 1010 ***
LOOKUP error message is incorrect, it uses ENTER block.
701 27-Aug-81 JEH CBLIO
*** Not required in v12B ***
LSU read using low-values as key loses first record.
700 9-Jul-81 WTK CBLIO
*** Same as edit 1006 ***
Cannot REWRITE a non-null EBCDIC record.
677 2-Jul-81 JEH CBLIO
*** Same as edit 1005 ***
Fix CLOSE WITH DELETE to LSU file with TOPS-10 7.01.
676 5-Oct-81 JSM FIX
*** Same as edit 1004 ***
For BIS turn on the correct second word sign bit.
675 23-Jun-81 JSM CBLIO
Reading variable length labeled EBCDIC tape fails.
*** VERSION 12B RELEASE ***
674 14-May-81 WTK CBLIO
*** NOT REQUIRED IN 12B ***
673 1-May-81 LEM CBLIO
Display all non-trailing DISPLAY-7 and DISPLAY-6 blanks.
****NOTE**** Delete 651 and 664.
672 10-Apr-81 WTK CBLIO
Clear up problems with data loss after OPEN EXTEND
to non-existant file
****NOTE**** deletes edits 653 and 655
671 5-Mar-81 JSM CBLIO
Already in 12B.
670 3-Mar-81 WTK CBLIO
Fix problems with RELATIVE file READs and WRITEs
667 3-Mar-81 DMN CBLIO
On TOPS-20 open read-only disk files via COMPT. UUO so that they can coexist with SMU files.
***NOTE***
This code has not been tested and is under a feature test switch which is off.
666 24-Feb-81 JEH CBLIO
Reset UIN. after random write results in a duplicate record.
665 18-Feb-81 JEH CBLIO
ASCII records were losing cr-lf when the buffer was zeroed for last WRITE before CLOSE.
664 12-Feb-81 JSM CBLIO
Display all non-trailing DISPLAY-6 blanks on TTY:.
663 *** Not required in 12B. ***
662 11-Dec-80 LEM CBLIO
OPEN EXTEND followed by SMU creates wrong data mode when performing I/O on EXTEND file.
661 9-Dec-80 JSM CBLIO
ISAM SEQ READ gets INVALID KEY after many DELETES at beginning of file.
660 5-Dec-80 WTK CBLIO
Add zone at end of pushdown list for PDLOV recovery.
657 24-Nov-80 GCS CBLIO
Zero the unused area of the dump mode buffer for blocked ASCII records.
656 21-Nov-80 LEM CBLIO
Change FILOP. OPEN of EXTEND & I-O/SMU not to check file protection if [1,2] or JACCT.
655 20-Nov-80 WTK CBLIO
Modify WRTCH subroutine to be compatible with edit 653.
654 1-Nov-80 WTK LSU
Supplement ENQ/DEQ error return message.
653 13-Oct-80 WTK CBLIO
Fix OPEN EXTEND for new files (drops the first character).
652 14-Oct-80 DMN COBFUN
Make CBC routine work with SORT 4C when all buffers have been returned.
651 9-Oct-80 LEM CBLIO
Display all non-trailing blanks on TTY if line is long.
650 3-Oct-80 HAM CBLIO LSU
Make CNTRY symbol INTERNAL to CBLIO and EXTERNAL to LSU.
647 29-SEP-80 DMN FIX
DON'T TURN ON LOW-WORD SIGN BIT IF RESULT IS ZERO.
646 25-AUG-80 DAW INSPEC
INSPECT REPLACING 1-CHAR ITEM DIDN'T WORK
645 31-JUL-80 HAM CBLIO
MAKE TX02 PROPER CONTROLLER FOR 1600 BPI TAPE
644 31-JUL-80 HAM CBLIO
CLEAR PPN FIELD OF LKP/ENTR BLOCK AFTER LOOKUP FOR SMU TOPS10 OPEN
643 30-JUL-80 HAM LSU
MAKE PROPER LONG TERM LOCK BITS AN EDIT FOR ENQDEQ
642 29-JUL-80 DAW CBLIO
.JBFF GETS MODIFIED WHEN TTY FILES ARE OPENED FOR INPUT
641 28-JUL-80 HAM CBLIO
FIX USETI/O FOR BLK 777770 through 777777 TO USE FILOP. USETI/O
640 28-JUL-80 HAM CBLIO
FIX ASCII TO EBCDIC READ TO PAD WITH EBCDIC BLANKS
637 5-JUN-80 JEH CBLIO
2-WORD SIXBIT COMP KEY GETS KEY PTR DIFFERS ERROR (12A ONLY)
636 29-MAY-80 JEH CBLIO
FIX PROPER ERROR CODE FOR ERROR RETURN FROM FILOP..EXECUTION
635 3-JUN-80 DMN COMUNI LCM10 LCMIPC
INCORPORATE MCS-10 FIXES FROM B.C.TEL.
634 LEH CBLIO
NOT A REAL EDIT (JUST EDIT 607 REPUBLISHED WITH MORE CONTEXT).
633 19-MAY-80 JEH CBLIO
ADD TO EDIT 622 (VERSION 12A ONLY)
632 19-MAY-80 JEH CBLIO
CLOSE WITH NO REWIND HANGS - LOOPS THRU FILE TABLE
631 16-MAY-80 DMN NUM
FIX IF NUMERIC TEST OF EVEN DIGIT COMP-3 ITEM.
630 14-MAY-80 DAW GD
FIX CONVERSION OF NUMBERS WITH LEADING SIGN.
627 12-MAY-80 JEH CBLIO
CLEAR STACK AFTER FILOP FOR OPEN EXTEND FAILS (12A only).
626 08-MAY-80 JEH CBLIO
SKIP DUMMY OUTPUT FOR OPEN EXTEND.
625 17-APR-80 JEH CBLIO
MAKE DIFFERENT INDEX POINTERS FATAL ERROR (12A only).
624 1-APR-80 DMN COMUNI CMP
MAKE ASCII & EBCDIC COLLATING SEQUENCES WORK CORRECTLY IN COBOL-74.
NEEDS COBOL EDIT 1004.
623 24-MAR-80 DMN COMUNI
DON'T INITIALIZE DBSTP$ WHEN DBMS IS OFF.
622 13-MAR-80 HAM CBLIO
MAKE OPEN FOR I/O WORK CORRECTLY.
621 29-FEB-80 DAW COMUNI
MAKE MROUT. AN ENTRY POINT, SO LSTATS WORKS WITH SORT ON THE -10.
620 25-FEB-80 LEM LIBOL.CTL
INSERT LABEL NEXT:: FOR ERR ROUTINE WHEN INVOKING GLOB FOR COBOL-74 OTS.
617 12-FEB-80 HAM CBLIO
MAKE FIX FOR IDX KEY POINTER CHECK INTO OFFICIAL EDIT (TO CORRECT
EDIT 574)
616 11-FEB-80 DAW CBLIO
ALLOW DISPLAY-9 VALUE OF ID (CODE WAS THERE, BUT NEVER WORKED).
615 7-FEB-80 DMN SIZE1 SIZ23
CHECK OVERFLOW FLAGS FOR "ON SIZE ERROR".
NEEDS COBOL EDIT 767.
614 [Not required in 12B, edit 605 for version 12].
613 10-JAN-80 HAM CBLIO
FIX RETURN FROM USE PROCEDURE (IGNORING ERROR) FOR SIXBIT, V FORMAT
LENGTH FIELD ERRORS
612 4-JAN-80 CLRH CBLIO
FIX DATE-WRITTEN FOR SIMULTANEOUS UPDATE FILES
611 JAN-80 CLRH CBLIO
(NOT REQUIRED FOR 12A, EDIT TO 12 ONLY)
610 27-NOV-79 HAM CBLIO (RRDIV1)
FIX SEQ READ INVALID KEY RETURN WITH EDIT 605
607 14-NOV-79 DC CBLIO
FIX EBCDIC NULL SCAN ACROSS BUFFERS
606 21-SEP-79 DMN DPDIV
FIX 4-WORD DIVIDE WHEN SIGN IS DIFFERENT
605 12-SEPT-79 HAM CBLIO
FIX ISAM START, BOTH RANDOM AMD SEQUENTIAL
*** VERSION 12A RELEASE ***
604 9-AUG-79 HAM CBLIO
CLEAR ATEND FLAG ON CLOSE REEL
603 7-AUG-79 HAM CBLIO
TAKE OUT CALL TO CLWSMU IN CLSWEL (FROM EDIT 576)
602 ******* NOT USED *****
601 25-JUN-79 HAM CBLIO
MAKE UPD CHANGES 1956 AND 1923 FOR FILE STATUS INTO EDIT
600 21-JUN-79 CLRH CBLIO
CORRECTLY SHUFFLE SIXBIT RECORDS IN SHFREC.
577 19-JUN-79 HAM CBLIO
PUT IN CHECK FOR NO CR-LF IN BLK-1 ASCII MTA FILE, ALLOW IT WITH WARNING
576 1-JUN-79 HAM CBLIO
PUT CHECKPOINT FILOP IN CLSWEL FOR 10'S SMU TYPE CLOSE (FLUSHES BUFFS)
575 8-MAY-79 MFY CBLIO
FIX OPEN FOR SPOOLED CDR WHEN FILE IS EMPTY OR NONEXISTENT.
574 4-MAY-79 CLRH CBLIO
CHECK RECORD POINTER AS WELL AS KEY DESCRIPTION OF ISAM FILE.
573 30-APR-79 HAM CBLIO
FIX EDIT 571 TO SAVE AC 7,14 BEFORE CALL TO SU.CL
572 NOT USED.
571 18-APR-79 CLRH CBLIO
AT C.CLOS, DO NOT CALL SU.CL UNTIL ALL BUFFERS ARE OUT
570 13-APR-79 HAM CBLIO
THIS TAKES OUT 557 AND REPLACES IT WITH CODE TO FORCE
THAWED ACCESS COMPT. LOOKUP FOR ALL READ ONLY OPENS
567 5-APR-79 CLRH PERF
FIX THREE PROBLEMS WITH THE LEVEL IN PERF.MAC
566 4-APR-79 HAM CBLIO
PUT IN LKPSIZ DEF THAT SHOULD HAVE BEEN IN EDIT 565
THIS EDIT IS NOT NEEDED FOR THESE SOURCES,BUT IS ADDED
TO CONFORM WITH HOSS SOURCES,WHICH WERE THE ONES THAT MISSED THIS
565 21-MAR-79 HAM CBLIO LSU
FIX OPNELO TO CALC FILE SIZE WHEN CALLED FROM LFENQ., BUT NOT AFTER
564 20-MAR-79 HAM CBLIO
FIX OPTIONAL FILE YES.NO TO EAT WHOLE ANSWER LINE UP TO EOL
563 20-MAR-79 DMN CBLIO
CHECK FOR ILLEGAL FILE NAME AND GIVE FATAL ERROR IF FOUND
562 12-MAR-79 MFY CBLIO
DUMMY EDIT TO GET 10 AND 20 SOURCES BACK IN SYNC.
561 12-MAR-79 HAM CBLIO
FIX MTA LABEL PROCESSING TO ALLOW FOR ANSI LABELS IN MONITOR VERSION 4
560 3-MAR-79 MFY CBLIO
FIX EDIT 544.
557 5-MAR-79 HAM CBLIO
REMOVE EXTENDED LOOKUP IN OPEN AND ALLOW FOR OPEN READ ONLY
WHEN ANOTHER PROGRAM HAS OPENED THE FILE FOR SIMULTANIOUS UPDATE.
556 26-FEB-79 HAM CBLIO
FIX RESET WITH SHARED BUFFER AREAS TO WORK FOR ISAM "SAVE" AREAS.
555 23-FEB-79 MFY CBLIO
FIX READ OF EBCDIC FILE WITH RECORDING MODE OF BINARY READ WRONG
NUMBER OF CHARACTERS.
554 20-FEB-79 DAW SIZ23
ENCLOSE QUAD-WORD ROUTINES IN BIS CONDITIONAL
553 19-FEB-79 DAW ACCEPT
ALLOW NO DIGITS FOLLOWING A DECIMAL POINT
552 2-FEB-79 CLRH CBLIO
FIX ISAM SEQUENTIAL READ AFTER A WRITE WHICH SPLITS
BOTH A DATA BLOCK AND AN INDEX BLOCK.
551 24-JAN-78 MFY COMUNI
FIX E0.6.1, E0.7.1, E0.9.1 NOT FOUND IN /R CASE
550 16-JAN-79 HAM LSU
FIX NULL CONVERSION IN LRDEQ.
547 NOT USED
546 8-DEC-78 DAW INSPEC
FIX SMASHING OF AC WHEN INSPECT REPLACING.
545 1-DEC-78 DMN CBLIO FTDEFS
STORE NO. OF CHARACTERS IN VAR. LEN. RECORD IN FILE TABLE.
544 29-NOV-78 DMN CBLIO
CHECK FOR MISSING HALF OF PPN AND FILL IN DEFAULT
*** VERSION 12 RELEASE ***
543 9-NOV-78 DMN CBLIO COBST
MOVE CODE TO SETUP .JBHRL TO COBST. THIS IS NEEDED FOR OVERLAYS
542 6-OCT-78 DMN CBLIO
FIX ASCII TO EBCDIC RECORD CONVERSION TO RECOGNIZE E-O-L CHARACTERS
541 6-OCT-78 DMN CBLIO
FIX BYTE MODE TO EBCDIC TAPE (GAVE ILL. ADDR. IN UUO.)
540 6-OCT-78 DMN COMUNI DPADD
ADD QUAD-WORD ROUNDING FUNCTION
537 19-SEP-78 DMN COMUNI STRNGL
FIX EDIT 521, USE TMP.DP
536 17-SEP-78 EHM CBLIO
MAKE LIBOL IDENTIFY AN OVERLAY FILE IT CAN'T FIND
535 16-SEP-78 EHM CBLIO
FIX LIBOL-12 TO RUN WITH IQL
534 12-SEP-78 EHM LSU
FIX EOF FOR LOW-VALUES READ OF ISAM FILES IN SIMULTANIOUS UPDATE
533 10-AUG-78 EHM CBLIO
FIX DISPLAY DOESN'T DISPLAY TRAILING SPACES.
532 20-JUN-78 EHM LSU
FIX ILLEGAL INSTRUCTION FROM LSU FOR SIMULTANIOUS UPDATE
531 20-JUN-78 EHM CBLIO
FIX ERROR ON WRITE OF NON-STANDARD LABELS TO NUL:
530 27-APR-78 EHM CBLIO COMUNI
FIX DEVICE NOT AVAILABLE ERROR TO GIVE THE CORRECT DEVICE NAME
527 27-APR-78 EHM EXPON
TEST FOR OVERFLOW AND UNDERFLOW BEFORE FIXING A FLOATING POINT NUMBER
526 14-APR-78 EHM CBLIO
FIX ASCII WRITES TO RANDOM FILE MAY PUT BIT 35 ON (TOPS-20)
*** VERSION 11 RELEASE ***
525 28-FEB-78 EHM
FIX EDIT 470. CHANGE WAIT UUO TO TAPE WAIT ALLOW SECOND CHANCE
524 27-FEB-78 DAW-EHM
LSU MAKE RETAIN/READ WORK CORRECTLY FOR COMP AND COMP-1 ISAM KEYS
523 21-FEB-78 EHM
PUT IN NEW SWITCH IMUPDT WHEN ON LIBOL DOES A CHECKPOINT FILOP.
TO UPDATE THE END OF FILE POINTERS TO MAKE ISAM FILES MORE STABLE
FOR TOPS20 USERS REQUIRES A PATCH TO THE COMPATIBILITY PACKAGE.
522 04-JAN-78 EHM
FIX USING 2 STRUCTURES FOR ISAM FILES WITH SELECT STATEMENT
521 NOT USED.
520 10-DEC-77 EHM
STOP RERUN DUMPING IN PROGRAMS WITH DBMS
517 11-NOV-77 DRO
LCM CONVERTS NULLS TO SPACES INSTEAD OF SPACES TO NULLS
516 8-NOV-77 DRO
LCM FIX FOR MPP SEND OF BAD ADDRESS
515 19-OCT-77 EHM
CHECK FOR DIFFERENCES IN ISAM FILES BETWEEN RESET TIME AND OPEN TIME.
514 DZN COBFUN
CHECK OTS LIST TOO IN FUNCBC.
513 LET USE SPECIFY PAGE FOR IPC
512 PREVENT MSC PAGE POOL FROM DISAPPEARING
511 CHECK FOR NEGATIVE END INDICATOR ON SEND VERB
510 ADD COBOL-74 CODE TO LCM
507 16-SEP-77 MDL
FOR "SAME AREA" FILES, CLEAR BUFFERS AT OPEN TIME FOR NON-ISAM
FILES.
506 07-SEP-77 MDL
FOR NUL: DEVICE, SET DEVICE DATA MODE TO BE THE SAME AS CORE
DATA MODE INSTEAD OF DEFAULTING TO ASCII.
505 NOT USED
504 15-AUG-77 VR
FIX CHECK FOR NO. OF INDEX LEVELS OF ISAM FILE AT OPEN TIME
503 11-JUL-77 VR
FIX SREAD-ISAM SO IT FINDS 2ND HALF OF SPLIT DATA BLOCK
502 24-JUN-77 EHM
FIX SEQUENTIAL READ OF AN ISAM FILE WITH A SPLIT BLOCK
501 24-JUN-77 MDL
"USE" PROCEDURE GRABBING WRONG FLAG FOR "USE" ERROR RECOVERY.
500 16-JUN-77 MDL
FIX "WRITE AFTER (OR BEFORE) POSITIONING DATA-NAME"
477 24-MAY-77 MDL
FIX "RESERVE NEG-NUM ALTERNATE AREAS" FOR NON-STANDARD BUFFERS
476 13-MAY-77 EHM
TEST FOR EBCDIC BLANK FOR FIRST TWO BYTES OF TAPE RECORD
475 03-MAY-77 EHM
FIX EDIT 473 TO WORK FOR RANDOM FILES
474 26-MAR-77 MDL
ONLY CLEAR NON-OVERLAY FREE CORE WHEN SPLITTING INDEX BLOCKS
AND USING OVERLAYS.
473 22-MAR-77 MDL
READ PARTIAL LAST LOGICAL BLOCK PROPERLY FOR SIXBIT AND
EBCDIC RANDOM AND IO FILES.
472 4-JAN-77 JM
COBFUN AND COMUNI FIX TO CUT BACK TO USE PAGE UUO'S
471 3-JAN-77 VR
LIBOL LOOPS WHEN STARTING TO EXECUTE A CORE IMAGE WITH
MANY SUBPROGRAMS AND OVERLAYS
470 30-DEC-76 MDL
FIRST OUTPUT BUFFER LOST WHEN ATTEMPTING TO DO OUTPUT
TO WRITE-LOCKED TAPE AND THEN PUTTING WRITE RING ON TAPE
467 19-JAN-76 DPL
FIX RESET CODE FOR ISAM FILES ON TOPS-20 WHEN SEGMENTATION IS
BEING USED
466 30-DEC-76 VR
DO NOT TRY AGAIN ON INVALID WRITE OF ISAM FILE -OR ON READ
WHEN FILE IS OPEN FOR I-O.
465 19-DEC-76 DPL
FIX ISAM READING AND WRITING FOR DISPLAY NUMERIC KEYS
463 17-SEP-76 DPL
FIX OPEN OF SIMULTANEOUS UPDATE FILE ON TOPS-20 WHEN A
USER-NUMBER IS PROVIDED, BUT IS [0,0]
462 17-SEP-76 DPL
ADD NEW FILE-STATUS OF 27 FOR THE WARNING ABOUT THE TOP LEVEL
INDEX BLOCK SPLITTING
461 16-SEP-76 DPL
FIX WRITING A RECORD IN A RANDOM FILE WITH
A KEY OF 0. WHEN THE RECORD TO BE WRITTEN WAS IN THE
LAST BLOCK, IT COULD GET WRITTEN IN THE WRONG PLACE
460 16-SEP-76 DPL
FIX FIXED LENGTH BLOCKED EBCDIC OUTPUT ON MAGTAPE. IT WAS WRITING
ONE WORD TOO MANY
457 16-SEP-76 DPL
FIX SO THAT THE LAST BLOCK
NUMBER OF A RANDOM FILE GETS COMPUTED
WHEN DOING SIMULTANEOUS UPDATE
456 10-SEP-76 DPL
ADD D.BPL AS INTERN TO FIX SIMUL UPDATE RANDOM ACCESS PROBLEM
OF BLOCKS GT 1 NOT GETTING UPDATED
455 03-SEP-76 DPL
ADD CHTAB AS INTERN FOR SIMUL UPDATE READ OF RANDOM FILES
WITH ZERO KEYS, ALSO IN LSU AND COMUNI
453 17-AUG-76 JC
FIX CBLIO SO IT CAN FIND THE OVR FILE FROM A SUBROUTINE
452 17-AUG-76 DPL
FOR TOPS20 FIX CBLIO SO LOGICAL DEVICE ASSIGNMENTS WORK
451 13-AUG-76 JC
FIX UP MOVES OF NUMERICS FOR BIS
450 13-AUG-76 JC
ADD NUMERIC ASSEMBLY SWITCH FOR STANDARD NUMERIC TEST
447 16-AUG-76 DPL
RETURN RECORDING MODE BYTE PTR TO SIMUL UPDATE INSTEAD OF
IN-CORE BYTE PTR SO LOW-VALUES READS WORK
445 11-AUG-76 DPL
ADD GDPSK INTERN FOR LSU TO FIX LOW-VALUES READS WITH DISPLAY
NUMERIC KEYS
444 17-AUG-76 DPL
FIX KILL CODE TO CHECK FOR USER HAVING SAME FILE OPEN FOR INPUT
AND OUTPUT, DO NON-SUPERSEDE CLOSE OF OUTPUT IF TRUE
442 01-JUL-76 SER
ALLOW FOR ISAM FILE INDEX BLOCK SPLITTING WHEN SETTING UP
BUFFERS BETWEEN FIRST AND SECOND OPEN
440 01-JUN-76 SER
REMOVE PART OF EDIT 414
437 01-JUN-76 SER
SET UP FOUR TABLES AND INITIALIZE THE COUNT PROPERLY FOR RANDOM FILES
UNDER SIMULTANEOUS UPDATE, PATCH IN LSU ALSO
432 23-FEB-76 DPL
MAKE SAME AREA CLAUSE WORK FOR ISAM AND SEQUENTIAL FILES TOGETHER
431 23-FEB-76 TOPS20 CODE
430 4-FEB-76 DPL
ADD CSORT SWITCH AROUND KILL: CODE SO STAND ALONE CSORT WON'T
PRINT 'LAST COBOL UUO CALLED.....' ERROR MESSAGE
426 2-FEB-76 DPL
MAKE SURE APPENDED DATA STARTS WHERE OLD DATA LEFT OFF, NOT ON
FULL BLOCK BOUNDARY
420 17-OCT-75 JEC
FIX SPACING WITH NO PAGE HEADER. - LINE -
417 21-OCT-75 JEC
MAKE SURE THAT CSORT TAKES NO MORE THAN 6 CHANNELS - CSORT -
416 25-SEP-75 JEC
FIXED FUNCOR ROUTINE TO RETURN START ADDRESS.
NOT IN V10 - COBFUN WAS EXTENSIVLY MODIFIED WHICH FIXED THE PROBLEM.
415 25-SEP-75 JEC
FIX EDIT 334 SO THAT SINGLE DIGTIT TESTS WORK.
NOT IN V10 - NUMBRS WAS REWRITTEN.
414 27-AUG-75 JEC
PUT IN INTERRUPT CODE FOR ON-LINE PRINTER AND SET LPT BUFFER TO 1.
413 30-JUN-75 JEC
FIX MESSAGE THAT BEGINS WITH " SO IT DOESN'T GO TO CTY.
412 30-JUN-75 JEC
FIX CALCULATION OF POINTER FOR UNSTRING WHEN DELIMITER IS "ALL".
12-MAR-75 GPS
ADDITION OF SUSPC, SUSPC1 SUBROUTINES TO
RESET FOR THE PURPOSE OF COMPUTING THE SPACE REQUIRED BY
SIMULTANEOUS UPDATE, AND GETTING IT. ALSO ADDITION OF THE
CALL TO THESE SUBROUTINES IN RESET.
16-JAN-75 ACK
1. CHANGE REFERENCE TO PARAMETER FILE
LBLPRM TO REFERENCE UNIVERSAL
FILE LBLPRM.
2. ADD CODE FOR SETTING UP THE PUSH DOWN
LIST WITH THE VALUE SUPPLIED BY
THE USER WHEN HE COMPILED THE PROGRAM
*** VERSION 7A RELEASE ***
411 MAKE SURE LPT DEVICE DOES NOT CAUSE "ILLEGAL MODE"
MONITOR MESSAGE AT RESET TIME.
ALSO FIX RECOVERY FROM "EOF FOUND INSTEAD OF A LABEL".
410 PUT OUT "$" IN MESSAGE TO TRY ANOTHER MAG TAPE SO OPERATOR SEES THE
MESSAGE, WHEN THE JOB IS RUNNING UNDER BATCH
407 IF POSSIBLE OUTPUT PHYSICAL DEVICE NAME
AS WELL AS LOGICAL DEVICE NAME- FOR DEVICE MESSAGES
406 FIX SORT RELEASE LENGTH CALCULATION SO WORD SIZE AGREES
WITH INTERNAL RECORD MODE
405 SET UP REF I12 FOR ISAM FILES AT MSVID FOR FILE VALUE OF ID PRINTOUT.
404 IN LINE.MAC FIX SPACING FOR RPT WRITER
403 PUT IN SIRUS CODE AND TRAILING BLANK SUPPRESSION (SWITCH OPTION)
402 FIX CORE PROBLEM IN CSORT; FOR .JBFF VS .JBREL
401 FIX EDIT SO THAT ZERO SUPPRESSION NO LONGER HAPPENS
AFTER A 9'S FIELD IS SEEN
400 FIX COBFUN SO THAT CHANNEL 0 IS OBTAINED LAST
377 FIX ISAM BUFFER PROBLEM IF ISAM FILE IS
SHARED AREA (BUFFER) WITH ANY OTHER FILE.
376 GIVE A MEANINFUL ERROR MSG IF UNEXPECTED EOF ON ISAM IDX FILE IS SEEN
375 ADD TO EDIT 371- IF ISAM FILE OPEN FOR INPUT ALLOW
FD > OR = TO ISAM MAX REC SIZE- AND IF FILE OPEN FOR OUTPUT ALLOW
FD < OR = TO ISAM MAX REC SIZE.
374 FIX TEST FOR OPTIONAL ISAM FILE AT RESET TIME
373 FIX UP CLOSE WITH DELETE FOR DTA FILES.
372 CORRECT BLOCK FACTOR CALC FOR ASCII NON-ISAM FILES
371 CHECK THAT USERS MAX REC DESC SAME AS ISAM MAXREC PARM.
370 SEQUENTIAL READING OF AN ISAM FILE MAY OCCASIONALLY
MISS SEVERAL RECORDS. THE PROBLEM OCCURS WHEN THE
SYMBOLIC KEY IS A NUMERIC DISPLAY ITEM AND A VERSION
NUMBER ERROR OCCURS.
343 THROUGH 367 ARE RESERVED FOR DEVELOPMENT
;********* VERSION 7 RELEASE **********
347 FIX STRING TO SPACE FILL EVEN IF NO UNSTRING
346 CBLIO - LIBIMP - CSORT
MAKE OVERLAYS WORK. CHECK THAT NO IO IS DONE IN AN
OVERLAY. WHEN ALLOCATING ISAM BUFFER SPACE BE SURE
YOU DON'T OVERLAP THE OVERLAY AREA, GIVE ERROR MESSAGE.
345 RE-ADJUST SUBROUTINES DISPATCH TABLE SIZE FOR MCS
344 FIX MEMORY MANAGEMENT BUG IN CSORT
343 THIS FIX PREVENTS AN EXTRA BLOCK FROM BEING APPENDED TO
A BINNARY FILE WHEN THE OUTPUT DEVICE IS A DTA.
342 MAKE EDIT 333 WORK FOR PROGRAMS WO/R SWITCH
AND MAKE CHN 0 THE LAST ONE USED (FOR RERUN)
CHANGES TO OVRLAY.MAC AND COBRG OF COMPILER
ALSO REQUIRES COBST ROUTINE IN LIBOL
341 FIX POSITIONING ; MULTI-FILE LABELLED REELS W/NO
POSITION CLAUSES
340 UPDATE JOBDAT SYMBOLS, CHANGES IN CSORT,UUO
337 FIX IN ACCEPT, NOT IN CBLIO, SEE JC
336 FIX FILE POSITIONING FOR MULTI-FILE TAPES
335 FIX GARBAGE IN RECORD W/VARIABLE LENGTH ISAM RECS
334 NOT IN CBLIO. JOHN DID EM
333 GET OVERLAY FILE FROM SAME PLACE AS MAIN PROGRAM
332 HANDLE VARIABLE LENGTH RECORDS FOR STAND ALONE SORT
330 FIX READING FROM NUL DEVICE SO THAT CBLIO DOESN'T CONFUSE IT WITH MTA
327 FIX STD LABELS FOR MTA WHEN READING > REEL 9
326 CHANGED CHTAB SO THAT 173 TO 20(ZERO) AND 175 TO 32 (:)
WHEN READING ASCII FILE TO SIXBIT RECORD JEC
325 FIX SPACING AND REPORT CODE FOR REPORT GEN IN LINE.325 JEC 4/5/74
324 FIX APPENDING TO RANDOM ACCESS FILES READ TO END
323 DONT DO ENTER WHEN LOOKUP OF ISAM DATA FILE FAILS
322 FIX APPENDING OF RECORDS FOR SEQUENTIAL I/O
321 LIBOL REFUSES TO TAKE A RERUN DUMP IF A FILE IS ASSIGNED
TO THE NULL DEVICE
320 ISAM - "MEM-PRO-VIO..." WHEN ZEROING FREE CORE AT UDIF11
317 MOVE THE TEST FOR EBCDIC FILES INTO THE MAIN LOOP
316 FIXES "ADDRESS CHECK..." WHEN SORT FILE SHARES SAME BUFFER AREA
315 FIX TO EDIT 301 ILG 1-FEB-74
314 *CSORT* PREFIX "?" TO "ERROR IN SORT I-O" MESSAGE
313 *CSORT* FIX REDUNDANT "RECORDS SORTED"
312 IF "ILL-MEM-REF" IN RSTLNK ROUTINE TELL USER HE MAY HAVE
LOADED A MACRO ROUTINE IN PLACE OF COBOL SUBROUTINE
311 ISAM - "MEMORY PROTECTION VIOLATION" WHEN WRITING AFTER
SPLITING THE TOP INDEX BLOCK
310 ISAM - "?KEYS OUT OF ORDER" CAUSED BY TESTING THE WRONG FLAG WORD
307 ISAM FILE READER GETS "VERSION NUMBER DISCREPANCY" WHEN A
WRITER CREATES A NEW INDEX LEVEL
306 ISAM - OPNI03 ASSUMES A 200 WORD BUFFER SIZE BUT IT MAY BE LARGER
305 CHANGE "NOT A LEGAL SIXBIT FILE" ERROR MS TO INDICATE THAT
INCORRECT BLOCKING FACTOR COULD BE CAUSE.
304 CORRECT VALUE OF ID AS GIVEN AFTER LOOKUP OR ENTER FAILS
303 FIX TO REPORT-WRITER
302 CORRECT MAG-TAPE POSITION AFTER READING LABELLED FILE
301 DO AN ENTER ON NON-DIRECTORY DEVICES FOR DIRECT,LPTSPL,ETC.
300 HANDLE NULLS IN ASCII RANDOM FILES CORRECTLY
277 PRECEDE ALL ERROR MESSAGES HAVING TO DO WITH POSSIBLE
WRONG REELS OR OPTIONAL FILES WITH "$"
276 DUPLICATE ISAM RECORDS IF DATA MODE DIFFERS BTWN RECORD AND DATA FILE
275 CODE TO CORRECT LOW-VALUES READ FOR ISAM AFTER INVALID KEY PATH TAKEN
274 CODE TO SUPPORT THE DATE75 FORMAT I.E. 15 BIT WIDE DATES
273 FIRST RANDOM READ WITH AN ACTUAL KEY POINTING BEYOND THE "EOF" DOES
NOT TAKE THE INVALID KEY RETURN
272 TYPE THE VERSION # NOT JUST EDIT # WITH ERROR MESSAGES
271 FIXES "VERSION NUMBER DISCREPANCY..." WHEN MORE
THAN ONE SECTOR PER LOGICAL BLOCK
270 STOPS "ILL-UUO-AT-PC..." WHEN TYPING OUT LIBOL ERROR MESSAGE
267 CHANGE GETCH. ROUTINE SO ^U WILL RUBOUT TYPED AHEAD CHARACTERS
\
;*** END OF LIBOL EDIT HISTORY ***
END