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

;                    COPYRIGHT (c) 1980, 1981, 1982
;                    DIGITAL EQUIPMENT CORPORATION
;
;     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.
@def bli: v3p0:,netpkg:<brelease>,netpkg:<blis16>
@def dsk: dsk:,bli:,mcb:,v3p0:
@i log
@bli:blis16/lis/lib kdpdat
@bli:blis16/lis/optl:3 kdp,kdpkmc,kdpini
@bli:blscrf
*,kdpdat=kdpdat.r16
*kdp,kdp=kdp/d
*kdpkmc,kdpkmc=kdpkmc/d
*kdpini,kdpini=kdpini/d
@append v3p0:ff,kdp.xrf kdp.lst
@append v3p0:ff,kdpkmc.xrf kdpkmc.lst
@append v3p0:ff,kdpini.xrf kdpini.lst
@delete kdp.xrf,kdpkmc.xrf,kdpini.xrf
@append kdp.gxr,kdpkmc.gxr,kdpini.gxr kdpdat.gxr
@sort
*sort/record:150/key:1,40,alpha,ascend/ascii kdpdat.gxr kdp.sor
@delete kdpdat.gxr,kdp.gxr,kdpkmc.gxr,kdpini.gxr
@conden
*kdp.gxr=kdp.sor
@delete kdp.sor
@bli:blis16/lis/lib dcpdat
@bli:blis16/lis/optl:3 dcp,dcpnmx,dcpini
@bli:blscrf
*,dcpdat=dcpdat.r16
*dcp,dcp=dcp/d
*dcpnmx,dcpnmx=dcpnmx/d
*dcpini,dcpini=dcpini/d
@append v3p0:ff,dcp.xrf dcp.lst
@append v3p0:ff,dcpnmx.xrf dcpnmx.lst
@append v3p0:ff,dcpini.xrf dcpini.lst
@delete dcp.xrf,dcpnmx.xrf,dcpini.xrf
@append dcp.gxr,dcpnmx.gxr,dcpini.gxr dcpdat.gxr
@sort
*sort/record:150/key:1,40,alpha,ascend/ascii dcpdat.gxr dcp.sor
@delete dcpdat.gxr,dcp.gxr,dcpnmx.gxr,dcpini.gxr
@conden
*dcp.gxr=dcp.sor
@delete dcp.sor
;@bli:blis16/lis/optl:3 crini
;@bli:blis16/lis/optl:3 leini
@run v3p0:dnmac
*kdpmc,kdpmc/cr/nl:meb=kdp:KMCMAC,kdp:KDPMCX
;*dcp,dcp/cr=mcb:mcblib/pa:1,dcp:dcp
;*cr,cr/crf=mcb:mcblib.m11/pa:1,mcb:sclib.m11/pa:1,dsk:urdlib.m11/pa:1,cr
;*le,le/crf=mcb:mcblib.m11/pa:1,mcb:sclib.m11/pa:1,dsk:urdlib.m11/pa:1,le
;*nrd,nrd/crf=mcb:mcblib.m11/pa:1,mcb:sclib.m11/pa:1,dsk:urdlib.m11/pa:1,dsk:nrmlib.m11/pa:1,dsk:nrd.m11
;*nrdllc,nrdllc=mcb:mcblib/pa:1,dsk:nrdllc
;*nrm,nrm/crf=mcb:mcblib.m11/pa:1,mcb:sclib.m11/pa:1,dsk:urdlib.m11/pa:1,dsk:nrmlib.m11/pa:1,dsk:nrm.m11
!!*nrmllc,nrmllc/crf=mcb:mcblib.m11/pa:1,mcb:sclib.m11/pa:1,dsk:urdlib.m11/pa:1,dsk:nrmlib.m11/pa:1,dsk:nrmllc.m11
@bli:blis16/lis/lib dtedat
@bli:blis16/lis/optl:3 dte,dtenmx,dteini
@bli:blscrf
*,dtedat=dtedat.r16
*dte,dte=dte/d
*dtenmx,dtenmx=dtenmx/d
*dteini,dteini=dteini/d
@append v3p0:ff,dte.xrf dte.lst
@append v3p0:ff,dtenmx.xrf dtenmx.lst
@append v3p0:ff,dteini.xrf dteini.lst
@delete dte.xrf,dtenmx.xrf,dteini.xrf
@append dte.gxr,dtenmx.gxr,dteini.gxr dtedat.gxr
@sort
*sort/record:150/key:1,40,alpha,ascend/ascii dtedat.gxr dte.sor
@delete dtedat.gxr,dte.gxr,dtenmx.gxr,dteini.gxr
@conden
*dte.gxr=dte.sor
@delete dte.sor
@bli:blis16/lis/lib dmcdat
@bli:blis16/lis/optl:3 dmc,dmcnmx,dmcini
@bli:blis16/lis/optl:3 dmr
@bli:blscrf
*,dmcdat=dmcdat.r16
*dmc,dmc=dmc/d
*dmcnmx,dmcnmx=dmcnmx/d
*dmcini,dmcini=dmcini/d
*dmr,dmr=dmr/d
@append v3p0:ff,dmc.xrf dmc.lst
@append v3p0:ff,dmcnmx.xrf dmcnmx.lst
@append v3p0:ff,dmcini.xrf dmcini.lst
@append v3p0:ff,dmr.xrf dmr.lst
@delete dmc.xrf,dmcnmx.xrf,dmcini.xrf,dmr.xrf
@append dmc.gxr,dmcnmx.gxr,dmcini.gxr,dmr.gxr dmcdat.gxr
@sort
*sort/record:150/key:1,40,alpha,ascend/ascii dmcdat.gxr dmc.sor
@delete dmcdat.gxr,dmc.gxr,dmcnmx.gxr,dmcini.gxr,dmr.gxr
@conden
*dmcdmr.gxr=dmc.sor
@del dmc.sor
@def dsk: