Trailing-Edge
-
PDP-10 Archives
-
bb-l014q-bm_tops20_v6_1_atpch17
-
autopatch/cbl13r.a17
There are no other files named cbl13r.a17 in the archive.
;
; COPYRIGHT (c) 1984,1986 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 PAT: AP20:<AUTOPATCH>
@MOUNT TAPE TAPE:/READ-ONLY
@DUMPER
*TAPE TAPE:
*REWIND
*FILES
*SKIP 8
*RESTORE AP20:<*>COB*.X09 PAT:,AP20:<*>ISAM.X09 PAT:,-
*AP20:<*>*.DPD PAT:
*RESTORE AP20:<*>COB*.X10 PAT:,-
*AP20:<*>*.DPD PAT:
*RESTORE -
*AP20:<*>COB*.X11 PAT:,AP20:<*>CPYLIB.X11 PAT:,-
*AP20:<*>*.DPD PAT:
*RESTORE -
*AP20:<*>COBOL.X12 PAT:,AP20:<*>COBOTS-V13.X12 PAT:,-
*AP20:<*>ISAM.X12 PAT:,AP20:<*>COBLIB.X12 PAT:,-
*AP20:<*>*.DPD PAT:
*RESTORE -
*AP20:<*>COBOL.X13 PAT:,AP20:<*>COBOTS-V13.X13 PAT:,-
*AP20:<*>COBLIB.X13 PAT:,-
*AP20:<*>*.DPD PAT:
*RESTORE -
*AP20:<*>COB*.X14 PAT:,-
*AP20:<*>*.DPD PAT:
*RESTORE -
*AP20:<*>COB*.X15 PAT:,-
*AP20:<*>*.DPD PAT:
*RESTORE -
*AP20:<*>COB*.X16 PAT:,-
*AP20:<*>*.DPD PAT:
*REWIND
*EXIT