Trailing-Edge
-
PDP-10 Archives
-
bb-y390o-bm_tops20_v41_atpch_20
-
autopatch/cbl12c.ddc
There are no other files named cbl12c.ddc in the archive.
;
; COPYRIGHT (c) 1982, 1983, 1984, 1985 BY
; Digital Equipment Corporation, Maynard, MA.
;
; 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.
;
@DEFINE DIS: AP20:<AUTOPATCH.COBOL>
@DEFINE SDIS: AP20:<AUTOPATCH.SORT>
@MOUNT TAPE COBOL:/READ-ONLY/REMARK:"MOUNT TAPE BB-H506E-SM"
@ENABLE
@DUMPER
*TAPE COBOL:
*REWIND
*FILES
*SKIP 2
*RES PS:<*>*.MAC DIS:,-
*PS:<*>ALL.CMD DIS:,-
*PS:<*>ALLB.CMD DIS:,-
*PS:<*>*.REL DIS:,-
*PS:<*>RMSINT.UNV DIS:,-
*PS:<*>TCSINT.UNV DIS:,-
*PS:<*>TCSSYM.UNV DIS:
*RESTORE PS:<*>*.MAC SDIS:
*RES PS:<*>COBASM.MAC DIS:,-
*PS:<*>FTDEFS.UNV DIS:
*REWIND
*EXIT
@COPY DIS:EDIT.MAC DIS:EDITC.MAC
@DELETE SDIS:FORSRT.MAC,SDIS:SRTFOR.MAC
@COPY DIS:COPYRT.MAC DIS:COPYRT.CBL
@COPY SDIS:COPYRT.MAC SDIS:COPYRT.SRT