Google
 

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.