;RPGTP2 Control file to create RPGII-20 source tape ; ;Copyright (C) 1976 Bob Currier and Cerritos College ; ; ; .MOUNT MTA TAPE/REELID:9TR/VID:"RPGII-20 SOURCE TAPE"/WENABL ; ;Set default processor to be KL,-20 and turn off DEBUG and STATS ; .TECO RPGASM.MAC =N%CPU==DI3JSDEBUG==DI0JSSTATS==DI0JSONESEG==DI1 =EX .R BACKUP *TAPE TAPE *SSNAME "RPGII-20 DISTRIBUTION TAPE" *NOMULTIREEL *INTERCHANGE *SAVE RPG20.CTL,RPGL20.CTL,- *RELEAS.DOC,RPGII.HLP,CLEANT.MAC,DIAGS.MAC,GENCOM.MAC,- *GETASY.MAC,GETCPY.MAC,GETERA.MAC,GETGEN.MAC,GETSRC.MAC,IMPURE.MAC,- *INTERM.MAC,LOOKUP.MAC,PREDIT.MAC,PURE.MAC,PURAB.MAC,PUREC.MAC,PURED.MAC,- *PUREE.MAC,PURFG.MAC,PUTAS1.MAC,PUTAS2.MAC,PUTAS3.MAC,PUTBIN.MAC,PUTERA.MAC,- *PUTGEN.MAC,PUTLST.MAC,RPGASM.MAC,RPGCOM.MAC,RPGERR.MAC,RPGIIA.MAC,RPGIIB.MAC,- *RPGIIC.MAC,RPGIID.MAC,RPGIIE.MAC,RPGIIF.MAC,RPGIIG.MAC,RPGIIK.MAC,RPGIIP.MAC,- *RPGUNV.MAC,STINFL.MAC,SRTTAB.MAC,TRYNAM.MAC,XPAND.MAC,XPNPPL.MAC,RPGII.SHR,- *RPGIIC.SHR,RPGIID.SHR,RPGIIE.SHR,RPGIIF.SHR,RPGIIK.SHR,RPGLIB.CTL,CDD.MAC,- *CBLIO.MAC,CHREQV.MAC,COMP.MAC,COMUNI.MAC,DEBUG.MAC,DIV11.MAC,DPADD.MAC,- *DPDIV.MAC,DPMUL.MAC,DPSUB.MAC,DSPLY.MAC,EASTBL.MAC,EDIT.MAC,FLGDF.MAC,- *FTDEFS.MAC,GC.MAC,GD.MAC,MAGNEG.MAC,MOVE.MAC,MOVSGN.MAC,NUMEQV.MAC,PC.MAC,- *PD.MAC,RPGIO.MAC,RPGIMP.MAC,RPGMAN.MAC,RPGPUR.MAC,RPGPRM.MAC,RPGSWI.MAC,- *SETRET.MAC,SPAC.MAC,SQRT.MAC,SUBSCR.MAC,UUOHAN.MAC,RPGLIB.SHR,LIBA.REX,- *A.CMD,B.CMD,C.CMD,D.CMD,E.CMD,F.CMD,G.CMD,K.CMD,LOADA.CMD,LOADC.CMD,- *LOADD.CMD,LOADE.CMD,LOADF.CMD,LOADK.CMD,TEST3.RPG,TEST4.RPG,TESTIT.RPG,- *RPGDAT.RGD,DATRPG.RGD,UNV:UUOSYM.UNV,UNV:MACTEN.UNV,REL:HELPER *SAVE RPG20.CTL,RPGL20.CTL,- *RELEAS.DOC,RPGII.HLP,CLEANT.MAC,DIAGS.MAC,GENCOM.MAC,- *GETASY.MAC,GETCPY.MAC,GETERA.MAC,GETGEN.MAC,GETSRC.MAC,IMPURE.MAC,- *INTERM.MAC,LOOKUP.MAC,PREDIT.MAC,PURE.MAC,PURAB.MAC,PUREC.MAC,PURED.MAC,- *PUREE.MAC,PURFG.MAC,PUTAS1.MAC,PUTAS2.MAC,PUTAS3.MAC,PUTBIN.MAC,PUTERA.MAC,- *PUTGEN.MAC,PUTLST.MAC,RPGASM.MAC,RPGCOM.MAC,RPGERR.MAC,RPGIIA.MAC,RPGIIB.MAC,- *RPGIIC.MAC,RPGIID.MAC,RPGIIE.MAC,RPGIIF.MAC,RPGIIG.MAC,RPGIIK.MAC,RPGIIP.MAC,- *RPGUNV.MAC,STINFL.MAC,SRTTAB.MAC,TRYNAM.MAC,XPAND.MAC,XPNPPL.MAC,RPGII.SHR,- *RPGIIC.SHR,RPGIID.SHR,RPGIIE.SHR,RPGIIF.SHR,RPGIIK.SHR,RPGLIB.CTL,CDD.MAC,- *CBLIO.MAC,CHREQV.MAC,COMP.MAC,COMUNI.MAC,DEBUG.MAC,DIV11.MAC,DPADD.MAC,- *DPDIV.MAC,DPMUL.MAC,DPSUB.MAC,DSPLY.MAC,EASTBL.MAC,EDIT.MAC,FLGDF.MAC,- *FTDEFS.MAC,GC.MAC,GD.MAC,MAGNEG.MAC,MOVE.MAC,MOVSGN.MAC,NUMEQV.MAC,PC.MAC,- *PD.MAC,RPGIO.MAC,RPGIMP.MAC,RPGMAN.MAC,RPGPUR.MAC,RPGPRM.MAC,RPGSWI.MAC,- *SETRET.MAC,SPAC.MAC,SQRT.MAC,SUBSCR.MAC,UUOHAN.MAC,RPGLIB.SHR,LIBA.REX,- *A.CMD,B.CMD,C.CMD,D.CMD,E.CMD,F.CMD,G.CMD,K.CMD,LOADA.CMD,LOADC.CMD,- *LOADD.CMD,LOADE.CMD,LOADF.CMD,LOADK.CMD,TEST3.RPG,TEST4.RPG,TESTIT.RPG,- *RPGDAT.RGD,DATRPG.RGD,UNV:UUOSYM.UNV,UNV:MACTEN.UNV,REL:HELPER *REWIND *CHECK *REWIND *PRINT TTY: *UNLOAD *EXIT ; ;Restore old RPGASM.MAC ; .DELETE RPGASM.MAC .RENAME RPGASM.MAC=RPGASM.BAK