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

;DBMS6.CTL		CTL EDIT 11	VERSION [6%320]		JUN-81
;USED TO LOAD DBMS V6 INTO FOROTS V6.
;
;*****     WARNING---THIS CTL FILE IS USED TO BUILD DBMS-20 ON
;                    THE DEVELOPMENT SYSTEMS IN MARLBORO. IT IS NOT
;                    GUARANTEED TO RUN ON ANY OTHER SYSTEM. THE USER
;                    SHOULD CHECK THIS CTL FILE FOR ANY INSTALLATION
;                    DEPENDENT ITEMS.
;
;
;COPYRIGHT 1975,1976,1980,1981 DIGITAL EQUIPMENT CORP., MARLBORO, MASS.
;
;*****	ALWAYS DOES A "TAKE SETUP.CMD" TO CREATE ENVIRONMENT.
;	EXAMINE THE INSTALLATION GUIDE AND DBMSV6.INS BEFORE SUBMITTING
;	THIS CTL FILE.
;
;	YOU MUST INCLUDE A COPY OF THE LATEST RELEASED FORLIB.REL IN YOUR AREA.
;	DBMS MUST NOT BE IN THIS COPY OF FORLIB.
;
;

; MAC FILES FOR INFORMATIONAL USE ONLY:
;
; DSK:	CMLSYM,	DBDML,	DBGETF,	DBSDCL,	DMLERR,	DMLIO,	DMLVOK,	GENDCL,	STRDCL,
;	STRUNV


;REQUIRED FILES:	(LATEST RELEASED VERSIONS)
;
;<SUBSYS>	MAKLIB		LINK
;
;<REL>		SCAN.REL	WILD.REL	HELPER.REL
;
;[SELF]:	DBSANY.REL	DBS20.REL	DBSFG.REL
;		GENME2.REL	GENMS2.REL	GENIO2.REL
;		STRLIB.REL	SCHIO2.REL
;		DBMS6.CTL
;		DDLANY.REL	DDL20.REL
;		FMLANY.REL
;		MNDANY.REL
;		DBCS2F.CMD
;
;
;OUTPUT:	SCHEMA.EXE   FORDML.EXE   DBMEND.EXE   DBINFO.EXE
;		SCHEMA.MAP   FORDML.MAP   DBMEND.MAP   DBINFO.MAP
;
;		DBMSF.EXE, DBMSF.MAP AND FORLIB.REL
;
;OUTPUT LISTINGS:	DBMS6.LOG
;

; SYS:	= FILES ON SYS:
; USER:	= FILES SUPPLIED BY THE USER
; DSK:	= FILES SUPPLIED BY DEC

; OUTPUT:	FORLIB.REL	FORLIB.MAP
; USER:	FORLIB	;  WITHOUT DBMS IN IT
; DSK:	DBSFG,	DBS20,	DBSANY,	SCHIO2

; OUTPUT:	DBMSF.EXE	DBMSF.MAP
; DSK:	DBSFG,	DBS20,	DBSANY,	SCHIO2

;MAKE A RECORD OF WHAT IS BEING USED
@DEFINE DSK:
@TAKE DSK:SETUP.CMD
@INFO LOGICAL
@GET SYS:LINK
@INFO VERSION
@GET SYS:MAKLIB
@INFO VERSION

@VDIRECT SYS:MAKLIB.EXE,SYS:LINK.EXE,SYS:SCAN.REL,SYS:WILD.REL,SYS:HELPER.REL,DDL*.REL,FML*.REL,MND*.REL,DBS*.REL,INF*.REL,GEN*.REL,STRHI.REL,SCHIO2.REL,DBMS6.CTL,%%%%%2.CMD,DBCS2%.CMD,*.HLP,*.FIX,
@CHECKSUM SEQUENTIAL
@
@ERROR
DBOTS::
;	**********    FORLIB (V6)   **********
@ERROR %
@VDIRECT FORLIB.REL
@IF (ERROR) @GOTO NOFORT
@ERROR
;IF MODULE FORMEM EXISTS THEN THIS MUST BE V6
@R MAKLIB
*NUL:=FORLIB/EXTRACT:FORMEM
@IF (ERROR) @GOTO TRUBLE
@R MAKLIB
*FORLIB=FORLIB/DELETE:(FORDBM,FORDST)
*FORLIB=FORLIB,DBSFG/APPEND,DBS20/APPEND,DBSANY/APPEND,SCHIO2/APPEND
*FORLIB=FORLIB/INDEX
@IF (ERROR) @GOTO TRUBLE

;	**********     DBMSF (FORTRAN V6)     **********
@LINK
*@DBCS2F.CMD
@GET DBMSF.EXE
@IF (ERROR) @GOTO TRUBLE
@SAVE DSK:DBMSF.EXE 700 734
@IF (ERROR) @GOTO TRUBLE
@EXPUNGE
@ERROR

@VDIRECT DBMSF.*,FORLIB.REL,
@CHECKSUM SEQUENTIAL
@

;	**********   TELL HOW WE DID   **********

@PLEASE -- DBMS-20 CREATION SUCCESSFUL!!!
@GOTO ENDOF

TRUBLE::
@PLEASE -- DBMS-20 CREATION NOT SUCCESSFUL???
ENDOF::
@EXPUNGE
@LOGO
;		[ END OF DBMS6.CTL ]