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

! UPD ID= 3372 on 1/30/81 at 9:12 AM by WRIGHT                          
!BLDCBL.CTL
!
!USED TO SUBMIT ALL THE .CTL FILES REQUIRED TO BUILD THE COBOL SYSTEM
!THIS FILE RUNS ON EITHER TOPS-20 OR TOPS-10 ON ALL SUPPORTED MONITORS
!SUBMIT WITH COMMAND	SUBMIT BLDCBL
!
!THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
!  OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
!
!COPYRIGHT (C) 1979, 1981 BY DIGITAL EQUIPMENT CORPORATION
!
!IF ANY NON-STANDARD ASSEMBLY SWITCHES ARE DESIRED THEY SHOULD BE
!	INSERTED IN COBASM.MAC
!
!INSTALLATION SPECIFIC ASSIGNMENTS SHOULD BE PUT IN THE FOLLOWING FILE:
! ON TOPS-20 IN A TAKE FILE COBOL.CMD
! ON TOPS-10 IN A MIC  FILE COBOL.MIC
!	  OR IN A TECO FILE COBOL.TEC
!IF THIS FILE IS ABSENT THEN ALL REQUIRED FILES ARE ASSUMED TO EXIST ON DSK:
!
!IF LISTINGS ARE DESIRED, THE EMPTY FILE
!LISTEM.MAC SHOULD BE IN DSK:
!
!FOR COBOL-68 SET ANS68==1 AND ANS74==0 IN COBASM.MAC
!FOR COBOL-74 SET ANS68==0 AND ANS74==1 IN COBASM.MAC
!
!IF A DEBUG VERSION IS REQUIRED
!DEBUG==1 MUST BE IN COBASM.MAC
!
!IF A DBMS VERSION IS REQUIRED
!DBMS==1 MUST BE IN COBASM.MAC
!
!TEST FOR WHICH SYSTEM
@GOTO TOPS20	!TOPS20 VERSION
.GOTO TOPS10	!TOPS10 VERSION

TOPS20::
@TAKE COBOL.CMD
!
!SUBMIT CTL FILES IN CORRECT ORDER
!
@SUBMIT COBOL/TIME:1:0:0/RESTART:YES/DEPEND:0
@SUBMIT LIBOL/TIME:0:30:00/RESTART:YES/DEPEND:1
@SUBMIT COBDDT/RESTART:YES/DEPEND:2
@SUBMIT ISAM/RESTART:YES/DEPEND:3
@SUBMIT LIBARY/RESTART:YES/DEPEND:4
@SUBMIT CPYLIB/RESTART:YES/DEPEND:5
@SUBMIT RERUN/RESTART:YES/DEPEND:6
@GOTO OK

TOPS10::
!SEE IF WE NEED TO MODIFY THE CONTROL FILES FIRST
!
!SEE IF MIC FILE EXISTS
!.TYPE COBOL.MIC
!.IF (NOERROR) .GOTO NOMOD
!
!HERE TO MODIFY THE CTL FILES
!
.TYPE COBOL.TEC
.IF (ERROR) .GOTO NOMOD
!
!READ THE COBOL.TEC FILE IN A TECO Q REGISTER
.R TECO
*ERCOBOL.TECAAAAAAHXA
*ERCOBOL.CTLEWCOBOL.CTMY<N.DO COBOL.MIC;0LKGA>HPEF
*ERLIBOL.CTLEWLIBOL.CTMY<N.DO COBOL.MIC;0LKGA>HPEF
*ERCOBDDT.CTLEWCOBDDT.CTMY<N.DO COBOL.MIC;0LKGA>HPEF
*ERISAM.CTLEWISAM.CTMY<N.DO COBOL.MIC;0LKGA>HPEF
*ERLIBARY.CTLEWLIBARY.CTMY<N.DO COBOL.MIC;0LKGA>HPEF
*ERCPYLIB.CTLEWCPYLIB.CTMY<N.DO COBOL.MIC;0LKGA>HPEF
*ERRERUN.CTLEWRERUN.CTMY<N.DO COBOL.MIC;0LKGA>HPEF
!
!SUBMIT CTM (MODIFIED CTL) FILES IN CORRECT ORDER
.SUBMIT COBOL.CTM/TIME:1:0:0/RESTART:YES/DEPEND:0
.SUBMIT LIBOL.CTM/TIME:0:30:00/RESTART:YES/DEPEND:1
.SUBMIT COBDDT.CTM/RESTART:YES/DEPEND:2
.SUBMIT ISAM.CTM/RESTART:YES/DEPEND:3
.SUBMIT LIBARY.CTM/RESTART:YES/DEPEND:4
.SUBMIT CPYLIB.CTM/RESTART:YES/DEPEND:5
.SUBMIT RERUN.CTM/RESTART:YES/DEPEND:6
.GOTO OK
!
!
NOMOD::
!SUBMIT CTL FILES IN CORRECT ORDER
!
.SUBMIT COBOL/TIME:1:0:0/RESTART:YES/DEPEND:0
.SUBMIT LIBOL/TIME:0:30:00/RESTART:YES/DEPEND:1
.SUBMIT COBDDT/RESTART:YES/DEPEND:2
.SUBMIT ISAM/RESTART:YES/DEPEND:3
.SUBMIT LIBARY/RESTART:YES/DEPEND:4
.SUBMIT CPYLIB/RESTART:YES/DEPEND:5
.SUBMIT RERUN/RESTART:YES/DEPEND:6
.GOTO OK
OK::!END OF BLDCBL.CTL