Trailing-Edge
-
PDP-10 Archives
-
BB-H580E-SB_1985
-
cbl12c.doc
There are 2 other files named cbl12c.doc in the archive. Click here to see a list.
CBL12C.DOC -- COBOL-74 V12C Documentation
October 1985
COPYRIGHT (C) 1985 BY
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE
INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER
COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY
OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY
TRANSFERRED.
THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
CORPORATION.
DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.
COBOL-74 V12C Documentation Page 2
1.0 SUMMARY
The major changes between COBOL V12B and COBOL V12C are:
Bug fixes (see sec 2.1 through 2.6).
COBOL version 12C consists of:
CBL74 version 12C(1574)
C74OTS version 12C(1141)
COBDDT version 12C(47)
ISAM version 12C(212)
LIBARY version 12C(31)
RERUN version 12C(7)
The above software will run on all supported monitors and has been
tested under TOPS-10 7.01.
COBOL-74 version 12C conforms to the full ANSI highest level except
for:
RPW It contains ANS-68 Report Writer
See section 3 for known deficiencies.
See COBOL INSTALLATION GUIDE for configuration switch setting and
compatibility issues.
1.1 Bibliography
COBOL-74 LANGUAGE MANUAL AA-5059B-TK, AD-5059B-T1
COBOL INSTALLATION GUIDE (COBOL.INS)
CBL12C.DOC AND SRT4D.DOC
COBOL-74 V12C Documentation Page 3
1.2 Required Software
The following software or later is required to build COBOL V12C.
Name Version
---- -------
MACRO 53A(1173)
LINK 4A(1220)
MAKLIB 2A(67)
COBOL-74 V12C Documentation Page 4
EXTERNAL CHANGES and OPTIONS
2.0 EXTERNAL CHANGES AND OPTIONS
2.1 COBOL BUG FIXES SINCE COBOL V12B(1131)
1300 Arg passing fails if arg is redefined but used as original later
1301 Optimizing SKIP instruction can cause Illegal Mem Ref
1302 Bad table link if RMS RECORD KEY is missing
1303 Bad code for RMS file with Depending Variable
1304 68274 fails if first item in COPY LIBRARY must be replaced
1305 Bad code for WRITE AFTER ADVANCING data-name
1306 Bad table link at 535214 if REL KEY is not defined
1307 Move 0 to COMP-3 item
1310 First of two LIB files is forgotten
1311 Bad placement Diag 179 when ref made to para def twice in sect
1312 Warning for +,+++... or -,---...
1313 No diag when CR LF and sect or para name follows IF cond clause
1314 Continue char after "(" gives bad subscript
1315 Save block for A/B params during Search 1 word short causes Ill inst in Phase E
1316 Copy replacing para name after * comment omits LF - diag State. Expec
1317 IF on 2500 char item fails
1320 COBOL-68 ref to OCCURS DEPEN items don't conform to ANSI-68 standards
1321 USE ... F.6 name OPGN F.6 name fails after first OPGN
1322 Check last para in prog for ending in uncond GOTO
1323 Test receiving alphanumeric edited field for size < sending field
1324 Non-BIS, transfer of more than 2047 characters fails
1325 Comments in DATE-COMP being dropped even w/ *, reset DCCFLG if scanning comm
1326 Edit 1322 broke CREF listings
1327 ID DIV subscript required - add call to SETOPB to Edit 1126
1330 Check memory size of OBJECT-COMPUTER, give warning and set to max if too large
COBOL-74 V12C Documentation Page 5
EXTERNAL CHANGES and OPTIONS
1331 Failure in phase E - WRITE ADVANCING data-name LINES, data-name syntaxed
1332 COLLATING SEQUENCE scanning too far
1333 Fatal error when using ORGANIZATION IS RELATIVE WITH CHECKPOINT OUTPUT
1334 Supersedes edits 1322 and 1326
1335 Declare DATAB entries for indexes if REPORT SECTION scanned
1336 Convert modes for INDEX and COMP-3 fields
1337 Fix MOVE literal to EDITED-DATA-FIELD of length 1
1340 Add warnings to 68274 for JUSTIFIED stmt w/
value and NOT in abbrev comb rel cond
1341 Test on mode of "A" operand to prevent multiple
trunc warnings if immediate mode
1342 Handle "D" in continuation column when
scanning for the end of a literal
1343 68274 - convert NOTE into a comment
1344 Bad code generated for a literal compare
1345 Trap illegal UUO's on TOPS10
1346 Address of conversion routine for depending on
field stored wrong
1347 Eliminate warning set up by edit 1312 for fields
with non floating symbols
1350 68274 Give warning for DISPLAY or STOP signed integer
1351 Avoid BAD TABLE LINK by storing READ .. INTO
operands in a fixed location in phase E
1352 Fix double precision floating point subtract
1353 If operand in literal compare too large, give
error rather than halt
1354 RMS START error - wrong alt. key made be used
if mult. keys at same starting loc.
1355 MOVE ZERO TO COMP-3 ITEM gets wrong value,
fix to edit 1307
1356 Allow qualification in DATA RECORDS ARE clause
1357 68274 EXAMINE replacing a word causes HALT
COBOL-74 V12C Documentation Page 6
EXTERNAL CHANGES and OPTIONS
1360 68274 conversion of a file with COPY REPLACING
1361 68274 dies if CVT is not requested
1362 Declare HLDSAV outside of MCS!TCS conditional code
1363 Fix syntaxing of SPECIAL-NAMES is defining both
collating seq and CHANNEL numbers
1364 Set size of delimiter to 1 if fig. const. and
source is edited field
1365 Size of STRING source wrong if num edited and
defined with OCCURS clause
1366 Correct edit 1335, set up CURHLD properly
1367 Correct edit 1343, return after converting
NOTE to comment
1370 Make CURAKT an absolute address so XPAND
will update it correctly
1371 Set CUREOP to B operand before generating
truncation warning
1372 Gives error message when COPY REPLACING finds ==
missing after BY.
1373 Corrects page advancing when more than
2 report header lines
1374 Check the collating sequence before
generating high-values
1375 Check to see if DATAB entry
contains DA.DEP field
1376 Correct diagnostic if line before
FD is too long
1377 Gives warning on truncation when converting FP to fix
1400 Fixes LABEL USE PROCEDURE for file specific format
1401 Flag error when statements are in EXIT paragraph
1402 Make COMPUTE do floating point divide
1403 EDIT WITHDRAWN - Do not install: Gives truncation
warning message after rounding
1404 Update byte pointer after LATTAB expands
COBOL-74 V12C Documentation Page 7
EXTERNAL CHANGES and OPTIONS
1405 Makes NEXT SENTENCE after ELSE without period get fatal
1406 Fix COPY REPLACING for continuation in A margin
1407 Fix COPY REPLACING in ID DIVISION
1410 FIX MOVE SPACES TO DATA ITEM IN LINKAGE SECTION
1411 Provide leading truncation warning in COMPUTE
statement when ROUNDED
1412 Makes LSU work with ISAM sequential access
1413 Fix 68274 conversion of DBMS statement
1414 DBMS USE procedures in the declaratives section
of subprogram are ignored
1415 Generate SET TALLY TO 0
1416 Generate warning message for 68274
1417 Fix 68274 conversion of write stmt.
1420 Fix generation of code for EBCDIC sorts
1421 Generate left truncation for RIGHT JUSTIFY.
1422 Fix conversion of DATE-COMPILED line
1423 68274 Fix conversion of FILE LIMITS
1424 Give fatal error on non-DISPLAY data declared
in file section
1425 68274 Fix conversion of RESERVE statement
1426 68274 Make TALLY a COMP item
1427 68274 Generates warning SHOULD BE UNSIGNED INTEGER
when data item is an unsigned integer.
1430 Store intermediary result in 2-wd temp
if d.p. floating point
1431 DBMS - syntax error on FIND statement if
identifier-2 not COMP
1432 Indirect command file for compiler doesn't type
outp warnings on TTY.
1433 Fix edit 1373 when report has no PAGE HEADING
report groups
COBOL-74 V12C Documentation Page 8
EXTERNAL CHANGES and OPTIONS
1434 Allow UNSTRING to return sign to signed
destination fields
1435 Prevent TI wait state after error message is printed
for /Y<cr-lf>
1436 Fix 68274 conversion in COMM. SECTION
1437 Generate error message for all undef. errors
on one line.
1440 COPY REPLACING of numeric literal loses next period
1440 COPY REPLACING loses terminal period if replacing a numeric literal.
1441 Fix edits 1402 and 1430 for NON-BIS compilers
1442 Move of separate sign display to 1-word comp moves zero
or minus sign only
1443 Add to Edit 1431 to check for decimal places
1444 68274 has problem with IS when comment columns exist
1445 68274 removes period if last clause is turned into a comment.
1446 Don't overwrite user-defined floating currency sign
with minus
1447 Fix Ill mem ref when PROGRAM-ID contains any character
other than "A"-"Z", "a"-"z", "0"-"9"
1450 Gives error message on FREE verb syntax error
1451 Fix bad-table link in phase E
1452 Fix error on RESET command
1453 Give truncation warning at correct LN, CP
1454 68274 has problems with period
1455 68274 has problems with NOTE
1456 Fix COMPUTE if first term uses 'ZERO'
1457 IF SET-NAME SET generated literal contains garbage
1460 Give error message if key is being subscripted
1461 COMPUTE w/ 2-wd floating point gives wrong results
1462 SEGMENT in place of SECTION can cause compiler
COBOL-74 V12C Documentation Page 9
EXTERNAL CHANGES and OPTIONS
failure
1463 Makes COPY REPLACING work if BY is not on same line.
1464 Correction to edit 1450, flags syntax error on FREE
1465 Declare word in phase D area of IMPURE for worker
in edit 1465
1466 Error on WRITE stmt w/ ADVANCING or POSITIONING clause
if in non ASCII file
1467 Resolve symbol ALCPA., as called by SCHIO2
after DBMS-20 V.6 edit 473.
1470 Declare two fields as external for edit 1447 and 1451
1471 First line of Page Head does not have <FF>.
1472 Fix DIVIDE literal INTO dn1, dn2, etc.
1473 Eliminate truncation warnings on moves involving
compiler-generated line/page counters
1474 Correction to edit 1450 for the "FREE" verb
1475 Correction to edit 1452 for the RESET code in
report writer
1476 Bad table link with catastrophe in phase E
Correction to edit 1123
1477 Adjust calculation of EPSILON to consider
decimal places of source
1500 Put warnings out where HIGH or LOW VALUES
used with numeric fields
1501 Put syntax error on alternate key if
variable length
1502 Put a warning out on any record which is
smaller than maximum record size
1503 WRITE ADVANCING gets fatal error message
when no recording mode is specified
1504 GETITM fails to compile in 68274 without
DBMS
1505 68274 halts if '** End of copy libary text **'
inserted before 'COPY'
1506 Have FIPS Flagger mark extensions in use of
figurative constants with numeric fields
COBOL-74 V12C Documentation Page 10
EXTERNAL CHANGES and OPTIONS
1507 Make handling of figurative constants more
consistent
********** NOTE
Edits 1510-1512 did not make it into tape 7
They have been copied down to tape 9
1510 At MLAC1., don't use ac TD, it's needed later
JEH,16-DEC-83,SPR:NONE
A:SRC MOVGEN
1511 Test for need of floating point correction factor
before test for rounding
JEH,19-DEC-83,SPR:20-19795
A:SRC EXPGEN
1512 Set up proper "FROM" address for MOVN instruction
JSM,19-DEC-83,SPR:20-19649
A:SRC MOVGEN
1513 Build second descriptor word correctly for fig.
const. passed as argument to subprogram
1514 Shut off AMRGN. flag while matching PRVTOK
against TYPE codes
1515 Restore core pointer (EAS1PC) before defining
implied indexes
1516 Don't clear sort record area if file named
in 'same record area' clause
1517 Fix line splitting for copy replacing
1520 Give error if 'DEPENDING ON D-N' and D-N
requires a subscript
1521 Use the device and PPN fields to find correct
libary file
Edits 1510-1512 did not get into tape 7
Moved here to get into tape 9
1510 At MLAC1., don't use ac TD, it's needed later
1511 Test for need of floating point correction factor
before test for rounding
1512 Set up proper "FROM" address for MOVN instruction
1522 Not applicable to V12C.
1523 Put 'SUBPROGRAM' on listing file
1524 Not applicable to V12C
COBOL-74 V12C Documentation Page 11
EXTERNAL CHANGES and OPTIONS
1525 Not applicable to V12C
1526 Not applicable to V12C
1527 Not applicable to V12C
1530 Not applicable to V12C
1531 Not applicable to V12C
1532 Not applicable to V12C
1533 Alternate keys getting error if record is variable
in length, fix edit 1501
1534 Edit 1115 generates a bogus byte pointer, causing ILL MEM REF
on systems with one-word global byte pointers implemented.
1535 Not applicable to V12C
1536 Reset ac16 to curfil value before using it
1537 Fix edit 1424, give error on COMP fields in ASCII record
1540 Not applicable to V12C
1541 Not applicable to V12C
1542 Fixed conversion of moving sixbit to ascii in
an if generation.
1543 Fix edit 1411 to not give warning if ON SIZE ERROR
clause is used.
1544 Not applicable to V12C
1545 Not applicable to V12C.
1546 Fix move of literal 000.0 to PIC 999V9.
1547 Make DEC extension warnings print at the
end of the listing.
1550 Clear flags on literals in SETOPN.
1551 Version 13 only
1552 Version 13 only
1553 Version 13 only
1554 Version 13 only
1555 Version 13 only
COBOL-74 V12C Documentation Page 12
EXTERNAL CHANGES and OPTIONS
1556 Version 13 only
1557 Version 13 only
1560 Clear the extend bit
1561 Not applicable to 12C
1562 Not applicable to 12C
1563 Not applicable to 12C
1564 Not applicable to 12C
1565 Not applicable to 12C
1566 Not applicable to 12C
1567 Check to see that SAME AREA file names do not match
the first file. Give E.174 if so.
1570 Not applicable to 12C.
1571 Not applicable to 12C.
1572 Not applicable to 12C.
1573 Not applicable to 12C.
1574 Not applicable to 12C.
COBOL-74 V12C Documentation Page 13
EXTERNAL CHANGES and OPTIONS
2.3 OTS BUG FIXES SINCE LIBOL V12B(674)
1000 SMU of relative file fails, falls into ISAM code
1001 SMU of ISAM sometimes fails if block got split
1002 Funct routine CBC fails if CORPT goes to 0 when overlays in use
1003 If file closed w/ DGLGTE doesn't exist, next file to be closed is deleted
1004 When trunc of COMP-1 field should produce 0, get weird neg number
1005 CLOSE w/ DELETE fails on TOPS-10 if LSU w/ Monitor 7.01
1006 Unable to REWRITE a non-null EBCDIC record
1007 Read unconditional code for Rel 5 doesn't work
1010 LOOKUP errors using ENTER arg block to determine error msg to print
1011 Fixes 1005 CLOSE w/ DELETE after non-SMU open, output doesn't delete file
1012 NON-BIS display of comp field with low-values is wrong
1013 Sequential relative ASCII file null record in block
causes rest of block to be skipped.
1014 Append extra <CR> to magtape files - match FCTC implementation
1015 allow COMPT. UUO to return correct file statues errnum
1016 Test for ISAM files when using CHECKPOINT EVERY n RECORDS
1017 RESET ERRNUM when retrying to OPEN a busy RMS file
1020 Test for use of CHECKPOINT with RMS files opened I-O
1021 make READ NEXT return correct record as ANSI standard states
1022 Deallocate memory if OPEN fails with RMS files
1023 Make pointer go to the next record after a REWRITE
1024 Make READ check for end of record by count rather than character
1025 Test CORPT. as well as HLOVL. to decide whether core
can be freed
1026 Reset buffer pointer before append FILOP.
1027 Zero buffer location so RETAIN NEXT of L-V
key get right block number
1030 Clear the SFD area when opening a SMU file
on an ersatz device from a SFD
COBOL-74 V12C Documentation Page 14
EXTERNAL CHANGES and OPTIONS
1031 Don't decrement byte/record count when finding
<CR><LF> in record
1032 STRING/UNSTRING - the destination character
count is off by one
1033 Do close abort on labeled mag tapes during
fatal error processing
1034 Zero out unused data block area after delete
1035 Make READ NEXT after DELETE on sixbit relative
not skipping record
1036 Zero out right half of UOUT. after checkpointing
1037 Change error message to "for OUTPUT only".
1040 Fix output byte pointer for sixbit keys
1041 Clear flags after multiply for SIZE ERROR
1042 Fix if error on open of sequential file
1043 Do not ignore end-of-file errors
1044 Space-fill record area at file open
1045 Use $MESSAGE in RMSGET as first RMS-20 call to
init RMS-20 global data symbols
1046 Fix RMS CHECKPOINTING for DELETE and REWRITE
1047 Dequeue locked record before job is aborted
1050 Set D.LBN for relative files accessed randomly
1051 Fix REWRITE after READ NEXT for relative file
1052 Extend blocked sixbit files correctly
1053 Gives correct error message
1054 Makes Declarative work with SMU open
1055 Extend blocked sixbit file correctly
1056 Prevent DBMS code from being loaded with non DBMS progs
EGM, 9-Mar-83,SPR:20-18340
1057 Correction to edit 1015 set correct value for error number
1060 Fix UNSTRING to handle alpha source with leading
spaces going into numeric fields
COBOL-74 V12C Documentation Page 15
EXTERNAL CHANGES and OPTIONS
1061 Fix bytesize on open of MAGTAPE with
RECORDING MODE SIXBIT
1062 If programs blocking factor doesn't equal index
file's factor, give run-time failure
1063 Give warning for relative files under SMU if
FDB doesn't have max number
1064 Get checkpointing of files inside implicit FREE
1065 Make FREE RECORD KEY work for SMU after RETAIN NEXT
1066 Add GJ.BLK, and GJ.ATR for long form GTJFN
1067 Correction to edit 1065
1070 Chg NUMS.7 table for NUMSTD=0 OTS' so numeric
digits will be converted
1071 Zero out FS.EN before assembling error nbr
for file status 2
1072 Don't turn on sign bit in word 2 if result
zero
1073 Add call to $ERASE if RMS file closed with delete
1074 Fix twos complement routine in ACEPT. routine
1075 Prevent multi-level ISAM file from skipping records
when using START, READ NEXT sequence
1076 Add error handling routine in COBST for failure on
GET of OTS
1077 Update pointers for current record, next record
last record if DYNAMIC access and REWRITE
1100 Do checkpointing write for SMU records.(10-ONLY)
1101 Fix LIBOL.CTL to properly save LIBO12.
1102 Make edit 1007 conditional on monitor level
1103 On Fake Read for SMU Retain on TOPS-10, check for
EOF Return and don't cause program failure if so.
1104 Remove warning message to run seteof. set file
to maximum allowably byte count instead.
1105 Put a '?' in front of warning to make it FATAL
1106 Move the definition of RMS$10 from LIBSHR to COMUNI
COBOL-74 V12C Documentation Page 16
EXTERNAL CHANGES and OPTIONS
1107 (For non-BIS) In routine ADD.21, don't clear overflow
flags, just the carry flag which the routine tests on
1110 Location of SNRBP. is zeroed out and caused error if
SMU is used with segmentation.
1111 Delete edit 1106.
1112 Don't put a <CR> at end of STD-ASCII mag tape file
1113 Use procedure with filename-1 OPEN option.
1114 Eliminate extra <CRLF> on Rewrite of ASCII Record
1115 TOPS-10 7.02 system labeled tapes, fatal runtime
error message - DV.DIR bit now set
1116 Reset file status before re-trying file open
1117 Not applicable to V12C
1120 Not applicable to V12C
1121 Not applicable to V12C
1122 Not applicable to V12C
1123 Not applicable to V12C
1124 Not applicable to V12C
1125 Not applicable to V12C
1126 Define feature test switch and code to print ascii
text files with blank lines
1127 Remove obsoleted code from COBST.
1130 Insert conversion factor in SEQIO read with
external format of ASCII and internal format of
SIXBIT.
1131 Not applicable to 12C.
1132 Not applicable to 12C.
1133 Not applicable to 12C.
1134 LSU - Reset SU.FR flag if open fails
1135 Not applicable to 12C.
1136 Change error message for DEQ without ENQ.
COBOL-74 V12C Documentation Page 17
EXTERNAL CHANGES and OPTIONS
1137 Fix overlay lookups
1140 Not applicable to 12C.
1141 Not applicable to 12C.
COBOL-74 V12C Documentation Page 18
EXTERNAL CHANGES and OPTIONS
2.5 LIBARY BUG FIXES
Edit 31 Allow empty source modules in .lib files.
2.6 ISAM BUG FIXES
200 RESTORE .FBSIZE TO + INFINITY FOR COBOL-20
201 DEVELOPMENT EDIT - SENT OUT WITH AUTOPATCH TAPE 5
202 FIX ERROR MESSAGE SO ALL IS PRINTED
203 PRINT KEY VALUE FOR DUP OR KEYS OUT OF ORDER MSG
201 ALLOW A CONTROL-Z TO EXIT UTILITY
204 PRINT RECORD CONTENT FOR KEYS OUT OF ORDER MSG AND
RECORD TOO SHORT MSG.
205 DISPLAY ERROR MSG ACCORDING TO BIT SETTINGS OF FILE
STATUS.
206 DO NOT DISPLAY COMMA AFTER LAST ERROR MESSAGE GENERATED
207 FIX 205 TO WORK CORRECTLY.
210 Fix 204 to work correctly.
211 Fix reading of COBOL labels on tape
containing packed ISAM file
212 Fix index block length calculation to
use two word headers rather than 1.
2.7 COBDDT BUG FIXES
Note, This version of COBDDT will not work with versions of COBOL
prior to v12A. The filename qualification feature will not
work with versions of COBOL prior to v12B.
27 fix problem with step when breakpoints are cleared.
COBOL-74 V12C Documentation Page 19
DEFICIENCIES
3.0 DEFICIENCIES
3.1 Deficiencies from COBOL v12 and v12A
COPY REPLACING has some problems in that it is not possible to
replace either part of PIC xyz without replacing the whole.
i.e. REPLACING ==PIC S9(10)==
will work
but
REPLACING ==PIC== or REPLACING ==S9(10)== will not.
Note, it was never the intent (and it contravenes the ANSI
standard) for COPY REPLACING to replace part of a data-item.
REPLACING AA by BB should not turn AA-XYZ into BB-XYZ.
The LINK supplied with 7.00 for loading the monitor will not load
COBOL-74 subroutines. Use field image LINK for this case.
COBOL-74 V12C Documentation Page 20
DEFICIENCIES
********
* NOTE *
********
We do not recommend that this change be installed unless your
installation is having problems transferring data TO an IBM
machine.
The ASCII to EBCDIC translation table was changed in version 12
(as the result of several SPRs) so that the translation of
graphics was more correct. However it is still not correct
according to IBM documentation, we are currently investigating
wha t VAX does to see if there can be a DEC to IBM standard we
can live with. However it seems that we now in some cases
generate incorrect EBCDIC characters for minus zero. The interim
solution for those who see this problem is to put the translation
t able back the way it was in version 11 knowing then that the
translation of some graphics will be wrong.
In CHREQV.MAC change
E 133,255 to E 133,340
E 134,340 to 134
E 135,275 to E 135,320
E 136,137 to 136
E 140,171 to 140
E 175,320 to E 175,260
E 176,241 to 176
and before CAE insert
DSAE 134,155
DSAE 136,117
DSAE 140,174
DSAE 176,155
COBOL-74 V12C Documentation Page 21
DEFICIENCIES
3.2 Deficiencies from before COBOL v12
Program ID same as filename, procedure name or data name results
in spurious error messages.
If A=B and C=D or E for subscripted A and C gives wrong code,
cause "SUBSCRIPT not POSITIVE" run time message if subscripts not
COMP or INDEX.
Error not detected.
A RESET FINAL clause is legitimate only when FINAL is given as a
control. Violation of this rule goes undiagnosed. A RESET
clause can only accompany a sum clause. A RESET clause
accompanying a source clause receives no diagnostic.
Incorrect error message.
DATA-NAME RC which is defined on last line of the working-storage
section is incorrectly diagnosed as undefined in the declaratives
area of procedure division. It is considered to be defined ok in
the report section, however.
Incorrect error message.
COBOL rules make the presence of a data-name optional in the
control footing report description provided there is no need to
reference the report group. In the case where the data-name is
present the program compiles without error. In the case where
the data name is not present the compiler seems to be disallowing
sections in the procedure division.
DBMS error handling
Errors which relate to the schema are not tabulated in the error
count, and they go only to the TTY.
If "USE AFTER ERROR PROCEDURE ON x" where x is "INPUT", "OUTPUT
or "I-O" and "USE AFTER ERROR PROCEDURE ON file-name" are both
specified, then file-name may not be OPENed for x.
User error is not diagnosed: When the value of an 88-level item
is not the correct class, and the item is subordinate to a group
item which has the clause "USAGE INDEX", the program will compile
without an error diagnostic.
COBOL-74 V12C Documentation Page 22
DEFICIENCIES
4.0 Installation Instructions
See the COBOL-74 Installation Guide (COBOL.INS) for complete
installation instructions.
5.0 INTERNAL CHANGES
5.1 I/O Performance Metering
[END OF FILE CBL12C.DOC]