! 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.CTMYHPEF *ERLIBOL.CTLEWLIBOL.CTMYHPEF *ERCOBDDT.CTLEWCOBDDT.CTMYHPEF *ERISAM.CTLEWISAM.CTMYHPEF *ERLIBARY.CTLEWLIBARY.CTMYHPEF *ERCPYLIB.CTLEWCPYLIB.CTMYHPEF *ERRERUN.CTLEWRERUN.CTMYHPEF ! !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