Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

COBOL.BWR -- Beware file for COBOL-74 version 12C
Nov 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.BWR -- Beware file for COBOL-74 version 12C               Page 2


1.  Differences between 12B and 12C

COBOL-74 has been changed to conform to the standard so that if a file
is  opened  for  I/O  the  file  must already exist.  The file will no
longer be created.

The default for WRITE without any advancing information  is  different
between COBOL-68 and COBOL-74.  This is not a change, but the COBOL-74
documentation has been changed to correctly state that the default  is
AFTER ADVANCING 1 LINE.

2.  Extra carriage-return problem

To comply with Federal regulations for a FIPS certified  compiler  the
following  "feature"  had to be provided.  In general, if a record was
written with WRITE AFTER ADVANCING and the  next  record  was  written
with WRITE BEFORE ADVANCING, then the first record must be overprinted
by the next record.  In particular, if the last record in  file-1  was
written  with WRITE AFTER ADVANCING and the first record in file-2 was
written with WRITE BEFORE ADVANCING and file-2 was output to the  same
device  (e.g.   a LPT:) immediately after file-1, then the last record
of file-1 must be overprinted by the first record of file-2.  The FCTC
has a test which does just that.

Clearly we need an extra carriage-return between the two records.  The
two choices were, put it at the front of the BEFORE ADVANCING file, or
at the end of the AFTER ADVANCING file.  We chose the latter since  we
believe  it  is the less common case (even though it is the default in
COBOL-74) and an extra carriage-return will do less harm at the end of
a file.

If, for some reason, you do not wish this "feature" then you can  edit
CBLIO.MAC  to  remove  it.   At  location  NOXCR.  replace the current
instruction by a JFCL.  Note that we cannot support this change as  it
violates the Federal standard.

3.  COBOL-74 old REL files

At the REL file level if anyone keeps COBOL REL files except in a LINK
library  file),  the  only  problem  is with COBOL-74 and COBDDT.  The
compiler output of Debug paragraph names was changed to  be  identical
with COBOL-68.  This means that COBDDT V12C would display an incorrect
paragraph name for a COBOL-74 paragraph compiled with  COBOL-74  V12A.
We  do not think that this is a problem since people tend to recompile
before debugging, and working library files  should  not  need  to  be
debugged again.  In any case all that has to be done is to recompile.

4.  COBOL 12A and COBDDT 12C incompatibility

Except for the above-mentioned problem,  all  programs  compiled  with
version 12A of COBOL can be debugged with COBDDT 12C with no problems.
However, COBDDT 12C supports qualification of variables by  specifying
the  filename  (e.g.   "DISPLAY  A  IN FILE-1").  This is a feature of
COBDDT 12C which was not supported by COBDDT 12A, and compiler support
needed  to  be  implemented.   Thus you cannot use this new feature of

COBOL.BWR -- Beware file for COBOL-74 version 12C               Page 3


COBDDT 12C until you recompile the program module using COBOL 12C.

COBOL.BWR -- Beware file for COBOL-74 version 12C               Page 4


[End of CBL12C.BWR]