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

! UPD ID= 68 on 11/2/81 at 9:00 PM by NIXON                             
!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, 1983, 1984 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:
!
!TO GET THE COBOL-74 DEFAULTS SET ANS82==-1 IN COBASM.MAC
!TO GET THE COBOL-8x DEFAULTS SET ANS82==+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 COBOTS/TIME:0:30:00/RESTART:YES/DEPEND:1
@SUBMIT COBDDT/RESTART:YES/DEPEND:2
@SUBMIT ISAM/RESTART:YES/DEPEND:3
@SUBMIT CPYLIB/RESTART:YES/DEPEND:4
@SUBMIT RERUN/RESTART:YES/DEPEND:5
@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
*ERCOBOTS.CTLEWCOBOTS.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 COBOTS.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 COBOTS/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