Trailing-Edge
-
PDP-10 Archives
-
BB-4148F-BM_1984
-
documentation/dbms61.bwr
There are no other files named dbms61.bwr in the archive.
DBMS.BWR -- Beware file for DBMS-20 Version 6.1(1171)
June 84
COPYRIGHT (C) 1974,1984 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.
DBS6A.BWR Page 2
DBMS.BWR -- Beware file for DBMS-20 Version 6.1(1171)
June 1984
1.0 PROBLEMS WITH OTHER SOFTWARE PRODUCTS THAT INTERACT WITH DBMS-20
1. Edit 1056 to COBOL Version 12B (68 and 74) must be installed
in order to properly install DBMS-20 Version 6.1. This edit
changes the way in which DBMS globals are resolved at
link-time, and prevents DBMS code from being loaded with
non-DBMS programs. Without edit 1056 installed to
LIBOL/C74LIB, the DBMS-20 installation will appear to be
successful, but attempts to load non-DBMS programs will
always produce the undefined global DBSTP$.
You may use the COBOL-12B produced by installing Autopatch
tape 7 for installing DBMS-20 Version 6.1. The edit levels
for COBOL-12B on Autopatch tape 7 are 1507/1103 for the
compiler/OTS. You can not use the COBOL-12B produced by
installing Autopatch tape 6, even though the edit levels are
1457/1064, since only half of edit 1056 was distributed on
that tape.
Or you may install the edit by hand. The FILCOMs for edit
1056 (PCO 20-LIBOL-81) are supplied below. You must then
rebuild LIBOL.REL and C74LIB.REL using the new LIBOL.CTL.
File 1) CE:COBVER.MAC[4,116] created: 1115 04-Mar-1983
File 2) DSK:COBVER.MAC[4,206] created: 1029 10-Mar-1983
1)1 LBLEDT==1055 ;EDIT LEVEL
1) LBLMJR==12 ;MAJOR RELEASE VERSION
****
2)1 LBLEDT==1056 ;EDIT LEVEL
2) LBLMJR==12 ;MAJOR RELEASE VERSION
**************
1)12 ;.ENDA
****
2)12 ;
2) ;.EDIT 1056 Prevent DBMS code from being loaded with non DBMS progs
2) ; EGM,9-Mar-83,SPR:20-18340
2) ; A:SRC COMUNI.MAC,RESOLV.MAC
2) ; A:MSC LIBOL.CTL
2) ;.ENDA
**************
[End FILCOM]
File 1) CS:COMUNI.MAC[4,114] created: 1544 11-May-1981
File 2) DSK:COMUNI.MAC[4,206] created: 1558 09-Mar-1983
1)1 ;V12A*******
****
2)1 ;EDITS
DBS6A.BWR Page 3
2) ;EGM 9-Mar-83 [1056] DBSTP$ ref causes DBCS load for non DBMS prog
2) ;V12B*******
2) ;V12A*******
**************
1)3 ELMT%% DBSTP%,1,<EXP DBSTP$##>;; ;POINTER TO DBMS CLEANUP ROUTINE
1) SYML%% LEVEL.,<.-1>
****
2)3 ;**;[1056] @ ELMT%% DBSTP%, Replace 1 line, EGM, 9-Mar-83
2) ELMT%% DBSTP%,1,<EXP %DBSTP##>;; ;[1056]POINTER TO DBMS CLEANUP
2) ;; ;[1056] ROUTINE, RESOLVES TO DBSTP$
2) SYML%% LEVEL.,<.-1>
**************
[End FILCOM]
File 1) CS:LIBOL.CTL[4,114] created: 1518 09-Jul-1981
File 2) DSK:LIBOL.CTL[4,206] created: 1028 10-Mar-1983
1)6 *LIBOL=LIBOL/DELETE:RESOLV
1) *LIBOL=LIBOL/DELETE:RSVGAT
1) *COBFUN.TMP=LIBOL/EXTR:COBFUN
1) *LIBOL=LIBOL/DELETE:COBFUN
1) *LIBOL=LIBOL,DBMBLD:DBSCOB/APPEND,DBS20/APPEND,DSK:COBFUN.TMP/APPEND,DBMBLD:DBSANY/APPEND,SCHIO2/APPEND
1) @IF (ERROR) @GOTO TRUBLE
1) *LIBOL=LIBOL/INDEX
1) @IF (ERROR) @GOTO TRUBLE
1) !
1) @DEL COBFUN.TMP
1) !
****
2)6 *CBDSTP.TMP=LIBOL/EXTRACT:(%DBSTP,DBSTP$) ;[1056]
2) *LIBOL=LIBOL/DELETE:RESOLV
2) *LIBOL=LIBOL/DELETE:RSVGAT
2) *LIBOL=LIBOL/DELETE:%DBSTP ;[1056]
2) *LIBOL=LIBOL/DELETE:DBSTP$ ;[1056]
2) *COBFUN.TMP=LIBOL/EXTR:COBFUN
2) *LIBOL=LIBOL/DELETE:COBFUN
2) *LIBOL=LIBOL,DBMBLD:DBSCOB/APPEND,DBS20/APPEND,DSK:COBFUN.TMP/APPEND, -
2) *DBMBLD:DBSANY/APPEND,SCHIO2/APPEND,DSK:CBDSTP.TMP/APPEND ;[1056]
2) @IF (ERROR) @GOTO TRUBLE
2) *LIBOL=LIBOL/INDEX
2) @IF (ERROR) @GOTO TRUBLE
2) !
2) @DEL CBDSTP.TMP,COBFUN.TMP ;[1056]
2) !
**************
1)7 *C74LIB=C74LIB/DELETE:RESOLV
1) *C74LIB=C74LIB/DELETE:RSVGAT
1) *COBFUN.TMP=C74LIB/EXTR:COBFUN
1) *C74LIB=C74LIB/DELETE:COBFUN
1) *C74LIB=C74LIB,DBMBLD:DBSCOB/APPEND,DBS20/APPEND,DSK:COBFUN.TMP/APPEND,DBMBLD:DBSANY/APPEND,SCHIO2/APPEND
1) @IF (ERROR) @GOTO TRUBLE
1) *C74LIB=C74LIB/INDEX
1) @IF (ERROR) @GOTO TRUBLE
1) !
1) @DEL COBFUN.TMP
DBS6A.BWR Page 4
1) !
****
2)7 *CBDSTP.TMP=C74LIB/EXTRACT:(%DBSTP,DBSTP$) ;[1056]
2) *C74LIB=C74LIB/DELETE:RESOLV
2) *C74LIB=C74LIB/DELETE:RSVGAT
2) *C74LIB=C74LIB/DELETE:%DBSTP ;[1056]
2) *C74LIB=C74LIB/DELETE:DBSTP$ ;[1056]
2) *COBFUN.TMP=C74LIB/EXTR:COBFUN
2) *C74LIB=C74LIB/DELETE:COBFUN
2) *C74LIB=C74LIB,DBMBLD:DBSCOB/APPEND,DBS20/APPEND,DSK:COBFUN.TMP/APPEND, -
2) *DBMBLD:DBSANY/APPEND,SCHIO2/APPEND,DSK:CBDSTP.TMP/APPEND ;[1056]
2) @IF (ERROR) @GOTO TRUBLE
2) *C74LIB=C74LIB/INDEX
2) @IF (ERROR) @GOTO TRUBLE
2) !
2) @DEL CBDSTP.TMP,COBFUN.TMP ;[1056]
2) !
**************
[End FILCOM]
File 1) CS:RESOLV.MAC[4,114] created: 1645 04-Feb-1981
File 2) DSK:RESOLV.MAC[4,206] created: 1557 09-Mar-1983
1)1 ;THE PURPOSE OF THIS ROUTINE IS TO RESOLVE DBMS
****
2)1 ;EDITS
2) ;EGM 9-Mar-83 [1056] Prevent inclusion of DBCS for non DBMS progs
2) ;V12B*******
2) ;***********
2)
2) ;THE PURPOSE OF THIS ROUTINE IS TO RESOLVE DBMS
**************
1)1 TITLE DBSTP$ DUMMY CLEANUP FOR DBMS AT PROGRAM TERMINATION
****
2)1 ;**;[1056] @ DBMS. + 3L, Add 12 lines, EGM, 9-Mar-83
2) TITLE %DBSTP ALLOWS LINK TIME DECISION IN CHOICE OF DBSTP$ ;[1056]
2)
2) ;BY PLACING THIS ROUTINE IN THE LIBRARY FILE AFTER DBGATE ;[1056]
2) ; (WHICH CONTAINS THE DBCS DBSTP$) AND BEFORE THE DUMMY DBSTP$ ;[1056]
2) ; (SEE BELOW),CAN PREVENT LOADING DBCS CODE WHEN DBMS NOT USED ;[1056]
2)
2) ENTRY %DBSTP ;[1056]
2) EXTERN DBSTP$ ;[1056]
2) %DBSTP==DBSTP$ ;[1056]
2)
2) PRGEND ;[1056]
2)
2) TITLE DBSTP$ DUMMY CLEANUP FOR DBMS AT PROGRAM TERMINATION
**************
[End FILCOM]
Note that this edit is also directly applicable to DBMS-20
Version 6.
DBS6A.BWR Page 5
2. There is a problem with the current Autopatch tapes which
makes it difficult to install DBMS-20 Versions 6 and 6.1.
The Autopatch build procedures for C74LIB do not properly
encorporate edit 1056 into all cases. In particular, when
both COBOL 68 and 74 are being built, the C74LIB produced is
incorrect, and using it will cause the DBMS-20 installation
procedure to fail or produce a library which will cause an
undefined global while LINKing applications that use DBMS.
If you plan to rebuild both COBOL-12B 68 and 74 using
Autopatch tapes through number 7, in Autopatch file
CBL12B.CTL, change the MAKLIB command sequence of C74LIB
after the tag BOTH:: to be as follows:
@RUN MAKLIB
*CBDSTP.TMP=C74LIB/EXTR:(%DBSTP,DBSTP$)
*C74LIB=C74LIB/DELETE:RESOLV
*C74LIB=C74LIB/DELETE:RSVGAT
*C74LIB=C74LIB/DELETE:%DBSTP
*C74LIB=C74LIB/DELETE:DBSTP$
*COBFUN.TMP=C74LIB/EXTR:COBFUN
*C74LIB=C74LIB/DELETE:COBFUN
*C74LIB=C74LIB,DBSCOB/APPEND,DBS20/APPEND,COBFUN.TMP/APPEND,-
*DBSANY/APPEND,SCHIO2/APPEND,CBDSTP.TMP/APPEND
*C74LIB=C74LIB/INDEX
3. COBOL edit 1414 to allow DBMS USE procedures in subprograms
does not work for COBOL-74 Version 12B. No correction to
this problem is available at present.
4. COBOL-12B (68 and 74) does not allow FIND or STORE SUPPRESS
transitions from RECORD!AREA to set-names or vice versa, and
also does not allow a MOVE CURRENCY statement without the
optional FOR phrase.
5. For IQL-20EXTD Version 3.3, two IQL-20 executable modules
(IQE.EXE, and IQSCH.EXE) must be reloaded since they contain
private copies of a previous Version of DBMS-20 and using
them with DBMS-20 Version 6.1 may cause procedural
difficulties. In order to reload these modules:
1. Restore the contents of the PS:<IQL-SOURCE> (third) and
PS:<IQL-BUILD> (fourth) savesets to disk.
2. Verify that the DBMS-20 Version 6.1 software is installed
and available in SYS: (requires SYS:LIBO12.EXE and
SYS:DBMS.REL).
3. Reload IQE.EXE by typing:
@LOAD @IQE.CMD
@SAVE IQE
DBS6A.BWR Page 6
4. Reload IQSCH.EXE by typing:
@LINK
*/REQUIRE:SBIND
*IQSCH.REL,IQLIB.REL/SEARCH,SYS:LIBOL.REL/SEARCH
*IQLVER.REL/COUNT/GO
@SAVE IQSCH
You cannot use IQSCH.CMD to properly load an IQSCH with
DBMS-20 Version 6.1.