<************************* SST 10-81 *********************************
< THIS PATCH FILE CONTAINS USER-SUPPLIED PATCHES TO CP-V F00,
< ORGANIZED SO THAT THE FILE MAY BE BOOTED DIRECTLY.
< AS THIS PATCH FILE IS NOT OFFICIAL, AND AS THE USER-SUPPLIED
< PATCHES HAVE NOT BEEN VERIFIED BY HONEYWELL LADC, EXTREME CARE
< SHOULD BE EXERCISED IN USING THIS FILE.
< **THIS FILE IS NOT SIDRABLE! NOTIFY YOUR FIELD ENGINEERING
< CONTACT (THE TAC) OF ANY PROBLEMS.*********************************
<******************
< NOTE: CONDITIONAL SYMBOL 'ELLAF01' REFERS TO THE NEW VERSION
< OF ELLA RELEASED FOR THE FIRST TIME ON THE SEPTEMBER, 1980, SST.
< VERSION F01 IS THE ONLY SUPPORTED VERSION.
<
#ELLAF01=1
<
< DEFINE SYMBOLS FOR THE APPROPRIATE L6G VERSION IF THE MODULE L6R
<   IS PRESENT IN THE MONITOR.
<
#L6R
#L6GA00=0
#L6GB00=0
#
<
< L6R VERSION C00, RELEASED IN 1980, DEFINES THE SYMBOL 'L6GC00' AS 1.
< L6R VERSION C01, RELEASED FEBRUARY 1981, DEFINES 'L6GC01' = 1.
#L6GC00
#L6GC01=0
#
#L6GC01
#L6GC00=0
#
<
< 10/4/79                                                         #32289
< NOTE: SIDR#32289, DATED 10/2/79, IS TURNED ON BY SETTING        #32289
<       CONDITIONAL SYMBOL 'X560'. USE '#X560=1'                  #32289
#X560=0
<************************************************************
< VOLINIT VERSION E02 IS THE ONLY VERSION CURRENTLY SUPPORTED:
#E02VOL=1
<
<************************************************************
< ROOT PATCHES FOLLOW
<************************************************************
< STAR FILES SHOULD BE ACCOUNTED FOR AS TEMPORARY GRANS, AND      X32960
/WRTF+.32E/BANZ @(BANZ WRTF+.331/        GB  EXP-F 810616 001-009 X32960
/@/LI,5 .132/                            GB  EXP-F 810616 002-009 X32960
/@/B WRTF+.331/                          GB  EXP-F 810616 003-009 X32960
< CAUSE DATE AS WELL AS TIME TO PRINT ON OC:                      X32958
#TEMPT=TABLES+.156                       FHK EXP-F 810106 001-021 X32958
#DATE=LITERALS+.AC                       FHK EXP-F 810106 002-021 X32958
#TEMP2=@@                                FHK EXP-F 810106 003-021 X32958
/@@/0/                                   FHK EXP-F 810106 004-021 X32958
/@/O/                                    FHK EXP-F 810106 005-021 X32958
/@/0/                                    FHK EXP-F 810106 006-021 X32958
/@/0/                                    FHK EXP-F 810106 007-021 X32958
/CLOCK4+.C3/LI,2 .0F15(LI,2 .0715/       FHK EXP-F 810106 008-021 X32958
/CLOCK4+.C5/AI,3 .407A(AI,3 .157A/       FHK EXP-F 810106 009-021 X32958
/CLOCK4+.C7/B @(STD,2 TEMPT/             FHK EXP-F 810106 010-021 X32958
/@/STD,2 TEMPT/                          FHK EXP-F 810106 011-021 X32958
/@/STD,2 TEMP2/                          FHK EXP-F 810106 012-021 X32958
/@/LW,3 DATE/                            FHK EXP-F 810106 013-021 X32958
/@/LI,2 .4040/                           FHK EXP-F 810106 014-021 X32958
/@/SLD,2 16/                             FHK EXP-F 810106 015-021 X32958
/@/AI,3 .1561/                           FHK EXP-F 810106 016-021 X32958
/@/SCS,3 -8/                             FHK EXP-F 810106 017-021 X32958
/@/STD,2 TEMP2+2/                        FHK EXP-F 810106 018-021 X32958
/@/B CLOCK4+.C8/                         FHK EXP-F 810106 019-021 X32958
/CLOCK4+.CE/LI,1 TEMP2(LI,1 TEMPT/       FHK EXP-F 810106 020-021 X32958
#TEMP2;KTEMPT;KDATE;K1                   FHK EXP-F 810106 021-021 X32958
< THE SWAPPER CLOBBERS THE FIRST WORD OF THE SEEK ADDRESS WHEN    X32577
< IT INSERTS THE TIC INTO THE CLIST. SOLUTION IS TO RESTRICT      X32577
< MAXIMUM USER SIZE TO .B7 PAGES.                                 X32577
/BOOTSUBR+.12B/CI,11 .B7(CI,11 .B8/      JBC EXP-F 801112 001-002 X32577
/BOOTSUBR+.12D/LI,11 .B7(LI,11 .B8/      JBC EXP-F 801112 002-002 X32577
< FIX HOTAVR ON FREE TAPES                                        X32393
/HOTAVR+.2E/BCS,6 HOTAVR+.11(BCS,6 HOTAVR+.55/  -F 800905 001-001 X32393
#NSCPU                                   JBC F00 04/22/80 001-008 XE-007
< THIS PATCH WILL RESET THE MASTER-PERM BIT THAT GETS SET         XE-007
< IF THE MP PERFORMANCE PATCH (#31662) IS INSTALLED.  THE BIT     XE-007
<CAN BE RESET BY ANY PROGRAM (MASTER OR SLAVE) BY EXECUTING       XE-007
< A CAL1,6 WITH AN FPT OF X'0B000000' (CAL1,6 =X'0B000000').      XE-007
<THIS IS THE "SET CPU" CAL. NOTE THAT WITH 31662                  XE-007
<INSTALLED A PROGRAM THAT GOES MASTER MODE AND THEN GOES BACK     XE-007
<SLAVE WILL STILL BE BLOCKED TO THE MASTER ONLY. THE COMMENTS     XE-007
<ON #31662 INDICATE THAT YOU NEED TO RESET THE BITS YOURSELF (AND XE-007
<INDICATE THAT YOU CAN RUN ON A SLAVE CPU IN MASTER MODE, WHICH   XE-007
<YOU REALLY CANT DO), THEREFORE YOU HAVE TO REFERENCE UB:MPFLGS   XE-007
<AND LOAD THE PROGRAM WITH MONSTK. IF YOU WILL INCLUDE THIS       XE-007
<PATCH ALL THAT YOUR PROGRAMS WILL HAVE TO DO IS THE CAL1,6 TO    XE-007
<CLEAR THE MASTER-PERM BIT.                                       XE-007
/ALTCP+.E8/B @(B SCHED+.4D/              JBC F00 04/22/80 002-008 XE-007
/@/LB,7 UB:MPFLG,4/                      JBC F00 04/22/80 003-008 XE-007
/@/AND,7 $+3/                            JBC F00 04/22/80 004-008 XE-007
/@/B SCHED+.4D/                          JBC F00 04/22/80 006-008 XE-007
/@/.000000BF/                            JBC F00 04/22/80 007-008 XE-007
#1                                       JBC F00 04/22/80 008-008 XE-007
#NSCPU                                   JBC F00 04/21/80 001-009 XE-008
< THIS PATCH WILL CAUSE ENTRY TO INCLUDE THE PROCESSOR NUMBER     XE-008
< IN THE TRAP INFORMATION THAT IS STORED INTO J:TRAP(16-31).      XE-008
< THE OLD FORMAT WAS :                                            XE-008
<      BITS 16-23 => TRAP CC'S                                    XE-008
<      BITS 24-31 => TRAP LOCATION (X'40',X'41'...)               XE-008
< THE NEW FORMAT WILL BE:                                         XE-008
<        BITS 16-19 => S:PNO (PROCESSOR NUMBER)                   XE-008
<        BITS 20-23 => TRAP CONDITION CODES                       XE-008
<        BITS 24-31 => TRAP LOCATION                              XE-008
<                                                                 XE-008
/ENTRY+.6A/B @(LI,9 .FFFF/               JBC F00 04/21/80 002-009 XE-008
/@/LW,0 TCATCH+.74/                      JBC F00 04/21/80 003-009 XE-008
/@/SLS,0 12/                             JBC F00 04/21/80 004-009 XE-008
/@/LI,1 .F000/                           JBC F00 04/21/80 005-009 XE-008
/@/STS,0 8/                              JBC F00 04/21/80 006-009 XE-008
/@/LI,9 .FFFF/                           JBC F00 04/21/80 007-009 XE-008
/@/B ENTRY+.6B/                          JBC F00 04/21/80 008-009 XE-008
#1                                       JBC F00 04/21/80 009-009 XE-008
< WHEN USER DOES M:DEVICE (PAGE) ON A DCB ASSIGNED TO DISC, USER'SX32072
< BUFFER ADDRESS IN DCB GETS CLOBBERED. REASON IS THAT 10D        X32072
< DOES AN M:WRITE OF A 4-BYTE RECORD WITH '1' IN COLUMN 1. THE    X32072
< APPROPRIATENESS OF THIS ACTION IS QUESTIONABLE, SINCE IF USER   X32072
< IS USING VERTICAL FORMS CONTROL HE IS UNLIKELY TO BE USING M:DEVX32072
< (PAGE).                                                         X32072
/IOD+.A6/B IORT+.29C(B IOD+.BB)/         FHK F00 01/02/80 001-001 X32072
< MAKE COC ECHO THE SUB CHARACTER AS'#', NOT ':'                  X32498
#REGCOC                                  GH  F00 01/02/80 001-004 X32498
/COCR+.6BD/NOP (AI,5 1/                  GH  F00 01/02/80 002-004 X32498
/COCR+.6BE/;Q+1(AI,5 -.14/               GH  F00 01/02/80 003-004 X32498
#                                        GH  F00 01/02/80 004-004 X32498
ALLOCAT1//
FIX0//
FIX2//
FIX1//
GHOST10//
GHOST12//
GHOST11//
CLOSE//
< STAR FILES SHOULD BE ACCOUNTED FOR AS TEMPORARY GRANS, AND      X32960
< SHOULD BE RELEASED BACK TO TEMP. 3 PATCHES TO ROOT, 5 TO CLOSE  X32960
CLOSE/DLT+.29F/B @(LW,13 LITERALS+.18/   GB  EXP-F 810616 004-009 X32960
/@/LW,13 16,6/                           GB  EXP-F 810616 005-009 X32960
/@/CI,13 .40000/                         GB  EXP-F 810616 006-009 X32960
/@/BANZ DLT+.2A4/                        GB  EXP-F 810616 007-009 X32960
/@/LW,13 LITERALS+.18/                   GB  EXP-F 810616 008-009 X32960
/@/B DLT+.2A0/                           GB  EXP-F 810616 009-009 X32960
DEBUG//
ECBOV//
ENQOV//
KEYIN//
LDLNK//
< IF DELTA CANT GET ENOUGH PAGES TO DO ITS THING, IT              X32953
< SHOULD RELEASE THE ONES IT ALREADY HAS, TO KEEP HIM             X32953
< FROM LOOPING FOREVER ON RETURN FROM M:LINK.                     X32953
< ALSO, LNKTRC SHOULD TURN OFF 'DELTA ASSOCIATED' AND             X32953
< 'DELTA IN CONTROL' BEFORE ABORTING WITH B5-66.                  X32953
LDLNK/LNKTRC+.66A/B @(B LNKTRC+.54E/     FHK EXP-F 810602 009-015 X32953
/@/LW,3 S:CUN/                           FHK EXP-F 810602 010-015 X32953
/@/LH,5 UH:FLG,3/                        FHK EXP-F 810602 011-015 X32953
/@/AND,5 .+3/                            FHK EXP-F 810602 012-015 X32953
/@/STH,5 UH:FLG,3/                       FHK EXP-F 810602 013-015 X32953
/@/B LNKTRC+.54E/                        FHK EXP-F 810602 014-015 X32953
/@/.FBBF/                                FHK EXP-F 810602 015-015 X32953
< STOP A1-01 ABORTS UNDER DELTA WHEN EXECUTE-ONLY LMNS LDTRC      X32819
< TO NON-EXECUTE-ONLY.                                            X32819
LDLNK/LNKTRC+.16E/BAL,11 @(BAL,11 LNKTRC+.5B2/  -F 810603 001-005 X32819
/@/LW,5 LNKTRC+.F/                       DE  EXP-F 810603 002-005 X32819
/@/LI,4 0/                               DE  EXP-F 810603 003-005 X32819
/@/STS,4 JIT+.14/                        DE  EXP-F 810603 004-005 X32819
/@/B LNKTRC+.5B2/                        DE  EXP-F 810603 005-005 X32819
LTAPE//
MISOV//
MPC9210//
MPC9310//
MULOV//
< MAKE FILL/SPILL WORK WITH MORE SYSGENNED STREAMS THAN THE       X32845
< STANDARD L1,C1, AND P1.                                         X32845
MULOV/OPNLD+.399/B @(LB,6 SB:LTY,3/      IK  EXP-F 810417 001-009 X32845
/@/LI,3 TYPMNSZ/                         IK  EXP-F 810417 002-009 X32845
/@/LH,4 OH:NM,3/                         IK  EXP-F 810417 003-009 X32845
/@/CS,4 6/                               IK  EXP-F 810417 004-009 X32845
/@/BE $+3/                               IK  EXP-F 810417 005-009 X32845
/@/BDR,3 $-3/                            IK  EXP-F 810417 006-009 X32845
/@/B OPNLD+.390/                         IK  EXP-F 810417 007-009 X32845
/@/LW,6 3/                               IK  EXP-F 810417 008-009 X32845
/@/B OPNLD+.39A/                         IK  EXP-F 810417 009-009 X32845
OPEN//
< OPEN LOGIC SOMETIMES SETS NOU TO 3 WHEN 2 OR MORE USERS TRY     X32815
< TO OPEN IN SHARED MODE.                                         X32815
OPEN/OPNF+.333/B @(STW,9 0,1/            JL  EXP-F 810603 001-005 X32815
/@/AND,9 @+3/                            JL  EXP-F 810603 002-005 X32815
/@/STW,9 0,1/                            JL  EXP-F 810603 003-005 X32815
/@/B OPNF+.334/                          JL  EXP-F 810603 004-005 X32815
/@/.FF01FFFF/                            JL  EXP-F 810603 005-005 X32815
OPENTP//
< RING THE ALARM TO ALERT THE OPERATOR OF A MOUNT REQUEST         X32965
OPENTP/TYPR+.8C/MTW,1 TABLES+.1D(BAL,11 SCHED+.1BC/       001-003 X32965
OPENTP/TYPR+.8D/BAL,11 SCHED+.1BC(BAL,11 TYPR+.90/        002-003 X32965
OPENTP/TYPR+.8E/BAL,11 TYPR+.90(MTW,1 TABLES+.1D/F 810804 003-003 X32965
< IF A READ ERROR OCCURS WHILST PROCESSING THE LABELS OF AN       X32541
< ANS TAPE THE SYSTEM WILL LOOP.                                  X32541
OPENTP/OPNL+.359/CI,3 2(CI,3 6)/         MJH F00 01/02/80 001-002 X32541
OPENTP/OPNL+.35A/BL OPNL+.362(BNE OPNL+.362)/F00 01/02/80 002-002 X32541
RMAOV//
RTOV//
STEPOVR//
TQOV1//
TQOV2//
UMOV//
#
< PREVENT TPACCESS FROM OVERFLOWING INTO JB:ORG IF TAPE           X32932
< ACCESSES EXCEEDS 65535.                                         X32932
/IOQM+.32/NOP(PLW,11 TSTACK/             FHK EXP-F 810507 001-012 X32932
/IOQM+.36/BCR,8 IOQM+.3B(BCR,8 IOQM+.3C/ FHK EXP-F 810507 002-012 X32932
/IOQM+.37/BCR,4 @(BCR,4 IOQM+.3A/        FHK EXP-F 810507 003-012 X32932
/IOQM+.38/BCR,3 IOQM+.3A(BCR,3 IOQM+.3B/ FHK EXP-F 810507 004-012 X32932
/IOQM+.39/AI,1 .FFFFF(AI,1 .108/         FHK EXP-F 810507 005-012 X32932
/IOQM+.3B/PLW,11 TSTACK(MTW,1 JIT,1/     FHK EXP-F 810507 007-012 X32932
/@/AI,1 .FFEF7/                          FHK EXP-F 810507 008-012 X32932
/@/INT,11 JIT,1/                         FHK EXP-F 810507 009-012 X32932
/@/CI,11 .FFFF/                          FHK EXP-F 810507 010-012 X32932
/@/BNE IOQM+.3A/                         FHK EXP-F 810507 011-012 X32932
/@/B IOQM+.3B/                           FHK EXP-F 810507 012-012 X32932
<****************************************************************
<  TO INSTALL THE FOLLOWING PATCH YOU WILL **HAVE** TO DO A NEW
<  SYSGEN SPECIFYING A CLIST VALUE OF X'1E' FOR YOUR MPC TAPES
<
<*** DO NOT INSTALL THIS PATCH WITHOUT THE NEW SYSGEN ***
<*** IF YOU DO I WILL ASSURE YOU THAT YOUR SYSTEM WILL **
<*** NOT WORK PROPERLY (WILL PROBABLY NOT EVEN WORK)  ***
<*******************************************************************
<
#MPCTIO                                  JBC F00 01/07/80 001-058 XE-001
< THIS PATCH IS TO PROVIDE EXTENDED DEVICE STATUS                 XE-001
< FOR MPC TAPES.  IT WILL CAUSE 2 TYPE 16 ERROR LOG ENTRIES       XE-001
< TO BE GENERATED INSTEAD OF 1, THE 2ND ONE WILL HAVE THE 26 BYTESXE-001
< OF EXTENDED STATUS                                              XE-001
<****NOTICE**** YOU **MUST** HAVE THE SYSTEM GENED WITH A CLIST VAXE-001
< FOR THE MPC TAPES OF AT LEAST X'1E' (30). IF YOU DONT AND YOU   XE-001
< USE THIS PATCH ALL HELL WILL BREAK LOOSE ON YOUR SYSTEM.        XE-001
< PASS2 OPTION WOULD BE (CLIST,1E)                                XE-001
<                                                                 XE-001
#SEIDCW=@@                               JBC F00 01/07/80 002-058 XE-001
/@@/.A0003808/ EXT. SENSE IDCW           JBC F00 01/07/80 003-058 XE-001
< CODE TO GENERATE ANOTHER ERRORLOG ENTRY (TYPE=16)               XE-001
UMOV/MPCTIO+.4B/B @(BAL,5 ERHNDLR+.12/   JBC F00 01/07/80 005-058 XE-001
/@/BAL,5 ERHNDLR+.12/ GEN 1ST ENTRY      JBC F00 01/07/80 006-058 XE-001
/@/LH,6 DCT7,1/ GET CLIST                JBC F00 01/07/80 007-058 XE-001
/@/AI,6 11/ POINT TO NEW SENSE           JBC F00 01/07/80 008-058 XE-001
/@/LW,8 DCT12,1/ AIO WORD                JBC F00 01/07/80 009-058 XE-001
/@/AND,8 LITERALS+.53/ AND WITH M16      JBC F00 01/07/80 010-058 XE-001
/@/LI,9 .1609/ CONTROL INFO              JBC F00 01/07/80 011-058 XE-001
/@/STH,9 8/ PUT IN CONTROL               JBC F00 01/07/80 012-058 XE-001
/@/LI,9 0/ TIME PART                     JBC F00 01/07/80 013-058 XE-001
/@/STD,8 0,6/ PUT IN HEADER              JBC F00 01/07/80 014-058 XE-001
/@/SLS,6 1/ MAKE INTO WORD               JBC F00 01/07/80 015-058 XE-001
/@/LI,5 MPCTIO+.4C/ RETURN ADDRESS       JBC F00 01/07/80 016-058 XE-001
/@/B ERHNDLR+.12/ GOTO ERRLOG            JBC F00 01/07/80 017-058 XE-001
< NEXT PART OF PATCH                                              XE-001
< THIS PART DETECTS WHEN WE ARE GOING TO DO A SENSE (ORDER=04)    XE-001
< IF WE ARE WE BUILD THE FOLLOWING:                               XE-001
< SENSE WITH COMMAND CHAIN                                        XE-001
< TIC TO NEW PART OF CLIST                                        XE-001
< NEW PART OF CLIST HAS                                           XE-001
< CONTROL FOR EXTEND SENSE WITH CC                                XE-001
< READ OF 26 BYTES                                                XE-001
< IDCW FOR SENSE                                                  XE-001
< SENSE BUFFER (7 WORDS)                                          XE-001
UMOV/MPCTIO+.2DD/B @(AND,9 HANDLERS+.105/    F00 01/07/80 018-058 XE-001
/@/AND,9 HANDLERS+.105/ DO IT            JBC F00 01/07/80 019-058 XE-001
/@/LB,0 8/ GET ORDER CODE                JBC F00 01/07/80 020-058 XE-001
/@/CI,0 4/ SENSE?                        JBC F00 01/07/80 021-058 XE-001
/@/BNE MPCTIO+.2DE/ NO GO BACK           JBC F00 01/07/80 022-058 XE-001
/@/BAL,0 HANDLERS+.1D8/ BAL,0 RE:ENT     JBC F00 01/07/80 023-058 XE-001
/@/LD,12 SEIDCW/ GET THE IDCW            JBC F00 01/07/80 024-058 XE-001
/@/BAL,0 MPCTIO+.304/ BAL,0 DEVNUM       JBC F00 01/07/80 025-058 XE-001
/@/LW,9 MPCTIO+.279/ GET WORD WITH CC BIT    F00 01/07/80 026-058 XE-001
/@/AND,9 HANDLERS+.105/ AND,9 NBYT2      JBC F00 01/07/80 027-058 XE-001
/@/STD,8 0,7/ PUT IN IOCD                JBC F00 01/07/80 028-058 XE-001
/@/AI,7 1/ POINT TO NEXT                 JBC F00 01/07/80 029-058 XE-001
/@/LH,5 DCT7,1/ GET CLIST                JBC F00 01/07/80 030-058 XE-001
/@/AI,5 9/                               JBC F00 01/07/80 031-058 XE-001
/@/LW,8 LITERALS+.1F/ LW,8 Y08 GET THE TIC   F00 01/07/80 032-058 XE-001
/@/OR,8 5/ MERGE IN NEW IOCD ADDRS       JBC F00 01/07/80 033-058 XE-001
/@/LI,9 0/                               JBC F00 01/07/80 034-058 XE-001
/@/STD,8 0,7/ PUT IN TIC                 JBC F00 01/07/80 035-058 XE-001
/@/AI,7 8/ POINT TO NEW IOCDS            JBC F00 01/07/80 036-058 XE-001
/@/STD,9 10,5/ ZERO THE CONTROLER        JBC F00 01/07/80 037-058 XE-001
/@/SLS,5 1/                              JBC F00 01/07/80 038-058 XE-001
/@/STW,9 12,5/ SENSE AREA                JBC F00 01/07/80 039-058 XE-001
/@/AI,5 4/ POINT TO IDCW                 JBC F00 01/07/80 040-058 XE-001
/@/SLS,5 2/ MAKE INTO A BA(IDCW)         JBC F00 01/07/80 041-058 XE-001
/@/LD,8 MPCTIO+.278/ GET CONTROL IOCD    JBC F00 01/07/80 042-058 XE-001
/@/AND,8 LITERALS+.9B/ AND,8 YFF         JBC F00 01/07/80 043-058 XE-001
/@/OR,8 5/ MERGE IN IDCW ADDRESS         JBC F00 01/07/80 045-058 XE-001
/@/STD,8 0,7/ PUT IN CONTRL IOCD         JBC F00 01/07/80 046-058 XE-001
/@/AI,7 2/ POINT TO WHERE IDCW GOES      JBC F00 01/07/80 047-058 XE-001
/@/STD,12 0,7/ PUT IN IDCW               JBC F00 01/07/80 048-058 XE-001
/@/WD,0 .27/ ENABLE                      JBC F00 01/07/80 049-058 XE-001
/@/AI,7 -1/ BACK UP POINTER              JBC F00 01/07/80 050-058 XE-001
/@/LD,8 MPCTIO+.27A/ GET THE READ IOCD   JBC F00 01/07/80 051-058 XE-001
/@/AND,8 LITERALS+.9B/ AND,8 YFF         JBC F00 01/07/80 052-058 XE-001
/@/AND,9 HANDLERS+.105/ AND,9 NBYT2      JBC F00 01/07/80 053-058 XE-001
/@/AI,9 26/ PUT IN BC                    JBC F00 01/07/80 054-058 XE-001
/@/AI,5 8/ ADDRS OF SENSE BUFFER         JBC F00 01/07/80 055-058 XE-001
/@/OR,8 5/ MERGE IN BUFFER ADDRS         JBC F00 01/07/80 056-058 XE-001
/@/B MPCTIO+.2DE/ CONTINUE               JBC F00 01/07/80 057-058 XE-001
#SEIDCW;K1                               JBC F00 01/07/80 058-058 XE-001
< MANY NSLP'S (34xx,74xx) HAVE TROUBLE RECOGNIZING PAPER MOTION   XNSLPP
< UNDER SHORT-RECORD ERROR CONDITIONS. THIS PATCH REMOVES THE     XNSLPP
< PAPER MOTION TEST, AND SHOULD STOP THE CASES OF INFINITE        XNSLPP
< REPEAT LINES ON THE LP.                                         XNSLPP
#NSLP                                    DCP F00 09/06/79 001-003 XNSLPP
UMOV/NSLP+.3A/BAZ NSLP+.30(BAZ NSLP+.4B/ DCP F00 09/06/79 002-003 XNSLPP
#                                        DCP F00 09/06/79 003-003 XNSLPP
RECOVER//
*
GENMD :P11
DELETE
< REPLACEMENT FOR GENMD OF SAME NUMBER DATED 800804:              X32732
< 9BINREAD CALCULATES CHECKSUM INCORRECTLY WHEN THE               X32732
< BYTE COUNT IS NOT DIVISIBLE BY 4.                               X32732
< GENMD'S TO :P11.                                                X32732
,9BINREAD+A9,22300004(22300001).         FHK EXP-F 801007 001-004 X32732
,9BINREAD+AA,B2460000+8DCBADR(52460000+6BINBUF).-F 801007 002-004 X32732
,9BINREAD+AB,2540006D(2140002C).         FHK EXP-F 801007 003-004 X32732
,9BINREAD+AC,680000AF+9BINREAD(681000AE+9BINREAD).        004-004 X32732
,9BINREAD+AC,680000AF+9BINREAD(681000AE+9BINREAD).        005-005 X32732
GENMD ANLZ
DELETE
< REPLACEMENT FOR GENMD OF SAME NUMBER DATED 06/21/81             XE-009
< (PATCH LOCATIONS CORRECTED, PROPERLY, THIS TIME)                XE-009
< PATCH TO MAKE ANLZ WORK OK FOR TAC USE                          XE-009
< PATCH WILL CAUSE DI AD COMMAND TO CAUSE ANLZ                    XE-009
< TO PRINT OUTPUT AS THOUGH IT WERE GOING TO LP INSTEAD OF UC     XE-009
< YOU MUST DO A !PLATEN 132 BEFORE CALLING ANLZ                   XE-009
< GENMD TO ANLZ:                                                  XE-009
:GENMD,ANALZ PP+766,68000006+PATCH.      JBC EXP-F 810716 001-017 XE-009
:GENMD,ANALZ PATCH+06,22100393+PP(0).    JBC EXP-F 810716 002-017 XE-009
:GENMD,ANALZ PATCH+07,3510000D+PATCH(0). JBC EXP-F 810716 003-017 XE-009
:GENMD,ANALZ PATCH+08,2280E4C3(0).       JBC EXP-F 810716 004-017 XE-009
:GENMD,ANALZ PATCH+09,6800000B+PATCH(0). JBC EXP-F 810716 005-017 XE-009
:GENMD,ANALZ PATCH+0A,2280D3D7(0).       JBC EXP-F 810716 006-017 XE-009
:GENMD,ANALZ PATCH+0B,09100002+DATA(0).  JBC EXP-F 810716 007-017 XE-009
:GENMD,ANALZ PATCH+0C,680008AC+PP(0).    JBC EXP-F 810716 008-017 XE-009
:GENMD,ANALZ PATCH+0D,0.                 JBC EXP-F 810716 009-017 XE-009
:GENMD,ANALZ PP+8AB,6800000A+PATCH(09100002+DATA).        010-017 XE-009
:GENMD,ANALZ PP+8CB,80000008(0000D3D7).  JBC EXP-F 810716 011-017 XE-009
:GENMD,ANALZ PP+206,2200000E+PATCH(22000393+PP).-F 810716 012-017 XE-009
:GENMD,ANALZ PATCH+0E,2210009A+DATA(0).  JBC EXP-F 810716 013-017 XE-009
:GENMD,ANALZ PATCH+0F,22000393+PP(0).    JBC EXP-F 810716 014-017 XE-009
:GENMD,ANALZ PATCH+10,3300000D+PATCH(0). JBC EXP-F 810716 015-017 XE-009
:GENMD,ANALZ PATCH+11,E8300000(0).       JBC EXP-F 810716 016-017 XE-009
:GENMD,ANALZ PATCH+12,68000979+PP(0).    JBC EXP-F 810716 017-017 XE-009
< CORRECT PROBLEM WHICH ALLOWED CERTAIN DUMP FILES TO BE          X32668
< ACCESSED BY LOW-PRIVILEGED USERS.                               X32668
< GENMD TO ANLZ                                                   X32668
,PP+265,04100013+PATCH(04100335+PP).     RMS EXP-F 810624 001-018 X32668
,PATCH+13,11000000+M:EO.                 RMS EXP-F 810624 002-018 X32668
,PATCH+14,F8000030.                      RMS EXP-F 810624 003-018 X32668
,PATCH+15,00000268+PP.                   RMS EXP-F 810624 004-018 X32668
,PATCH+16,00000268+PP.                   RMS EXP-F 810624 005-018 X32668
,PATCH+17,8000019E+BIGBUF.               RMS EXP-F 810624 006-018 X32668
,PATCH+18,00000800.                      RMS EXP-F 810624 007-018 X32668
,PATCH+19,000000BC+BIGBUF.               RMS EXP-F 810624 008-018 X32668
,PP+328,F7480009(F7480001).              RMS EXP-F 810624 009-018 X32668
,PP+332,01000202(01010202).              RMS EXP-F 810624 010-018 X32668
,PP+335,02000002(11000000+M:EO).         RMS EXP-F 810624 011-018 X32668
,PP+336,0(F8000030).                     RMS EXP-F 810624 012-018 X32668
,PP+337,0(00000268+PP).                  RMS EXP-F 810624 013-018 X32668
,PP+338,05010202(00000268+PP).           RMS EXP-F 810624 014-018 X32668
,PP+339,D5D6D5C5(8000019E+BIGBUF).       RMS EXP-F 810624 015-018 X32668
,PP+33A,40404040(00000800).              RMS EXP-F 810624 016-018 X32668
,PP+33B,0(000000BC+BIGBUF).              RMS EXP-F 810624 017-018 X32668
< PERMIT DISPLAY OF SYMBOLS CONTAINING '$'                        X32826
< GENMD TO ANLZ:                                                  X32826
:GENMD,ANALZ SCANNER+35,616C6B5D(616C5B5D).  EXP-F 810603 001-001 X32826
GENMD BATCH
DELETE
GENMD CCI
DELETE
<CCI SHOULDN'T SAY 'COMMAND FILE IS BUSY' WHEN IT'S NOT.          X32759
< GENMDS TO CCI:                                                  X32759
,OPNXS+1C,21A00A01(21A00014).            SW  EXP-F 800804 001-006 X32759
,OPNFD+3E,68000000+CCIPCH(25A00079).     SW  EXP-F 800804 002-006 X32759
,CCIPCH+00,21A00A01;.                    SW  EXP-F 800804 003-006 X32759
,68300034+OPNFD;.                        SW  EXP-F 800804 004-006 X32759
,25A00079;.                              SW  EXP-F 800804 005-006 X32759
,6800003F+OPNFD.                         SW  EXP-F 800804 006-006 X32759
< THE BP REF MANUAL (P.34) SAYS THAT M:C CANNOT BE ASSGNED WITH   X32043
< THE ASSIGN COMMAND. HOWEVER, CCI ALLOWS ASSIGNS TO DEVICES, BUT X32043
< CCI LOOPS PRINTING OUT THE ASSIGN COMMAND, AND THE JOB CANNOT BEX32043
< ABORTED WITHOUT AN OPERATOR RECOVERY. SUGGESTED FIX:            X32043
:GENMD,CCI ASSG+FD,6830043F+ASSG(68300117+ASSG). 01/02/80 001-001 X32043
GENMD COBOL
DELETE
< MOVE OF AN ELEMENTARY DATA ITEM TO A GROUP ITEM                 X32621
< WITH AN OCCURS DEPENDING CLAUSE DOES NOT WORK PROPERLY          X32621
< GENMD IS TO COBOL-F04                                           X32621
:GENMD,COBOL42A MDF01+145,6AA002F4+MDF01(6AB0D122).       001-003 X32621
:GENMD,COBOL42A MDF01+146,02000000(61200000). F04  801125 002-003 X32621
:GENMD,COBOL42A BBA00+1C9,680001AD+BBA00(68000206+BBA00). 003-003 X32621
GENMD COCG
DELETE
< THESE GENMDS TO COCG REMOVE THE NEED TO SET SS2 ON A BOOT       X32595
:GENMD COCG+96,698000A4(69COOOA4).       MK  F00 01/02/80 001-003 X32595
:GENMD COCG+9C,70000000(6C000000).       MK  F00 01/02/80 002-003 X32595
:GENMD COCG+9D,70000000(684000A4).       MK  F00 01/02/80 003-003 X32595
GENMD CONTROL
DELETE
GENMD DEFCOM
DELETE
GENMD DELTA
DELETE
< IF DELTA CANT GET ENOUGH PAGES TO DO ITS THING, IT              X32953
< SHOULD RELEASE THE ONES IT ALREADY HAS, TO KEEP HIM             X32953
< FROM LOOPING FOREVER ON RETURN FROM M:LINK.                     X32953
< ALSO, LNKTRC SHOULD TURN OFF 'DELTA ASSOCIATED' AND             X32953
< 'DELTA IN CONTROL' BEFORE ABORTING WITH B5-66.                  X32953
< GENMDS TO DELTA: (ALSO PATCHES TO LDLNK)                        X32953
,DEL+63B,6980002C+PCH(698007F5+DEL).     FHK EXP-F 810602 001-015 X32953
,PCH+2C,350000E5+ALPHA.                  FHK EXP-F 810602 002-015 X32953
,PCH+2D,6AF00D56+DEL.                    FHK EXP-F 810602 003-015 X32953
,PCH+2E,680007F5+DEL.                    FHK EXP-F 810602 004-015 X32953
,DEL+5FC,6980002F+PCH(698007F5+DEL).     FHK EXP-F 810602 005-015 X32953
,PCH+2F,3500010B+ALPHA.                  FHK EXP-F 810602 006-015 X32953
,PCH+30,6AF00D67+DEL.                    FHK EXP-F 810602 007-015 X32953
,PCH+31,680007F5+DEL.                    FHK EXP-F 810602 008-015 X32953
GENMD DEVDMP
DELETE
GENMD EDIT
DELETE
< ALLOW 1-CHARACTER RESPONSES TO EDIT'S 'DELETE...' AND 'X TO ABORX32964
< GENMDS TO EDIT:                                                 X32964
,BPMPT1+10,1(4).                         FHK EXP-F 810804 001-012 X32964
,BPMPT1+2C,1(4).                         FHK EXP-F 810804 002-012 X32964
,P+6AB,68000050+PATCHP(72300301+D).      FHK EXP-F 810804 003-012 X32964
,PATCHP+51,21B+P(0).                     FHK EXP-F 810804 005-012 X32964
,PATCHP+52,72300301+D(0).                FHK EXP-F 810804 006-012 X32964
,PATCHP+53,680006AC+P(0).                FHK EXP-F 810804 007-012 X32964
,P+A8B,68000054+PATCHP(72300301+D).      FHK EXP-F 810804 008-012 X32964
,PATCHP+54,6A7016FF+P(0).                FHK EXP-F 810804 009-012 X32964
,PATCHP+55,21B+P(0).                     FHK EXP-F 810804 010-012 X32964
,PATCHP+56,72300301+D(0).                FHK EXP-F 810804 011-012 X32964
,PATCHP+57,68000A8C+P(0).                FHK EXP-F 810804 012-012 X32964
< EDIT XEQ FILENAME IN BATCH SHOULD WORK, BUT CAUSES A404.        X32685
< GENMD TO EDIT:                                                  X32685
,P+1557,68000062+PATCHP(68001562+P).     FHK EXP-F 800905 001-003 X32685
,PATCHP+62,3238159A+P.                   FHK EXP-F 800905 002-003 X32685
,PATCHP+63,68001562+P.                   FHK EXP-F 800905 003-003 X32685
GENMD ELLA
DELETE
< REPLACEMENT FOR PATCH OF SAME NUMBER DATED 01/03/80.            X32597
< ONE CARD HAS BEEN ADDED TO AVOID ORDER DEPENDENCY, AND THE      X32597
< PATCH HAS BEEN VERIFIED TO BE APPLICABLE TO BOTH ELLA F00       X32597
< AND ELLA F01. THE PATCH HAS ALSO BEEN CHANGED TO USE THE LAST   X32597
< 12 PATCH LOCATIONS IN ELLA, RATHER THAN 12 IN THE MIDDLE.       X32597
<SEPARATE ELLA'S OVERFLOW MESSAGE INTO TWO MESSAGES.              X32597
<  "**OVERFLOW OF MOD/IO TABLES."  (AS CURRENT) AND               X32597
<  "**OVERFLOW OF SORT TABLES." WHEN ELLA CANNOT OBTAIN           X32597
<  SUFFICIENT PAGES (CIRCUMVENT WITH A LARGER CORE LIMIT).        X32597
<  NOTE SHOULD BE MADE IN THE CP-V SYSTEMS PROGRAMMING MANUAL.    X32597
< GENMD TO ELLA, USES PATCH LOCATIONS X'1C' THRU X'27':           X32597
,RT+6DE,6800001E+PAT(680006E7+RT).       SW  EXP-F 801009 002-021 X32597
,RT+6E7,6800001C+PAT(22E00023).          SW  EXP-F 801009 003-021 X32597
,RT+6EE,C640E7E7(C640E2D6);              SW  EXP-F 801009 004-021 X32597
,E7E7E7E7(D9E340D6);                     SW  EXP-F 801009 005-021 X32597
,40E3C1C2(D940D4D6);                     SW  EXP-F 801009 006-021 X32597
,D3C5E24B(C461C9D6);                     SW  EXP-F 801009 007-021 X32597
,C640D4D6(40E3C1C2);                     SW  EXP-F 801009 008-021 X32597
,C461C9D6(D3C5E240).                     SW  EXP-F 801009 009-021 X32597
,PAT+1C,22E006F2+RT;                     SW  EXP-F 801009 010-021 X32597
,6800001F+PAT.                           SW  EXP-F 801009 011-021 X32597
,PAT+1E,22E00012+PAT;                    SW  EXP-F 801009 012-021 X32597
,B2F0000E;                               SW  EXP-F 801009 013-021 X32597
,35F006EE+RT;                            SW  EXP-F 801009 014-021 X32597
,20E00001;                               SW  EXP-F 801009 015-021 X32597
,B2F0000E;                               SW  EXP-F 801009 016-021 X32597
,35F006EF+RT;                            SW  EXP-F 801009 017-021 X32597
,22E0001C;                               SW  EXP-F 801009 018-021 X32597
,680006E8+RT.                            SW  EXP-F 801009 019-021 X32597
,PAT+26,C64040E2;                        SW  EXP-F 801009 020-021 X32597
,D6D9E340.                               SW  EXP-F 801009 021-021 X32597
#ELLAF00
< INSERT GENMDS SPECIFIC TO ELLA F00 HERE:
#
#ELLAF01
< INSERT GENMDS SPECIFIC TO ELLA F01 HERE:
#
GENMD ERR:FIL
DELETE
GENMD FILL
DELETE
< REMOVE UNNECESSARY 4 PAGE LIMIT FOR FILL INCREMENTAL FILELIST.  X32803
< RECREATE DELETED FILES WHEN FILELIST WASN'T WRITTEN DUE TO      X32803
< EXCEEDING 4 PAGES. GENMDS TO FILL:                              X32803
:GENMD,FILL BACKUP+87,70000000(21701FE0).ML  EXP-F 801111 001-002 X32803
:GENMD,FILL BACKUP+88,70000000(6810008C+BACKUP).-F 801111 002-002 X32803
GENMD FORT
DELETE
GENMD FRES
DELETE
< CORRECT FRES COMPUTATION OF RAD AND DISC CHARGES.               X32933
< GENMD TO FRES:                                                  X32933
,START+4BC,6800005C+PATCH(22300000).     FHK EXP-F 810520 001-009 X32933
,PATCH+5C,72300000+J:EXTENT.             FHK EXP-F 810520 002-009 X32933
,PATCH+5D,21300040.                      FHK EXP-F 810520 003-009 X32933
,PATCH+5E,68400062+PATCH.                FHK EXP-F 810520 004-009 X32933
,PATCH+5F,32300000+SL:EPS.               FHK EXP-F 810520 005-009 X32933
,PATCH+60,66320000+PRDPRM.               FHK EXP-F 810520 006-009 X32933
,PATCH+61,66320000+PRDCRM.               FHK EXP-F 810520 007-009 X32933
,PATCH+62,22300000.                      FHK EXP-F 810520 008-009 X32933
,PATCH+63,680004BD+START.                FHK EXP-F 810520 009-009 X32933
GENMD FSAVE
DELETE

GENMD LABEL
DELETE

GENMD LDEV
DELETE
GENMD LEMUR
DELETE
< LEMUR SHOULD CLOSE M:LL BEFORE LINKING TO LOADER AND            X32827
< NOT CAUSE A FUNNY ERROR IF THE USER HAS M:LL SET TO A FILE.     X32827
< GENMDS TO LEMUR:                                                X32827
:GENMD,LEMUR PATCH+0,15000000+M:LL.      RBW EXP-F 810108 001-010 X32827
:GENMD,LEMUR PATCH+1,80000000.           RBW EXP-F 810108 002-010 X32827
:GENMD,LEMUR PATCH+2,00000002.           RBW EXP-F 810108 003-010 X32827
:GENMD,LEMUR ADD#+1EF,68000003+PATCH(04800000+LINKFPT).   004-010 X32827
:GENMD,LEMUR PATCH+4,21900020.           RBW EXP-F 810108 006-010 X32827
:GENMD,LEMUR PATCH+5,68400007+PATCH.     RBW EXP-F 810108 007-010 X32827
:GENMD,LEMUR PATCH+6,04100000+PATCH.     RBW EXP-F 810108 008-010 X32827
:GENMD,LEMUR PATCH+7,04800000+LINKFPT.   RBW EXP-F 810108 009-010 X32827
:GENMD,LEMUR PATCH+8,680001F0+ADD#.      RBW EXP-F 810108 010-010 X32827
GENMD LOADER
DELETE
< !MODIFY MAY NOT WORK, BECAUSE THE BTD WASN'T ZEROED FOR         X32970
< THE RDDBUG FPT.                                                 X32970
< GENMD TO LOADER:                                                X32970
FIN,FINISH+F0,04100303+FINISH(0410013F+FINISH). -F 810827 001-008 X32970
FIN,FINISH+2FE,1440D6E4(2840D6E4).       GMO EXP-F 810827 002-008 X32970
FIN,FINISH+303,1000A2D4(E340D5C1).       GMO EXP-F 810827 003-008 X32970
FIN,FINISH+304,3C000010(D4C5E24B).       GMO EXP-F 810827 004-008 X32970
FIN,FINISH+305,80000005(4BE2D6D4).       GMO EXP-F 810827 005-008 X32970
FIN,FINISH+306,0000008C(C540C4C5).       GMO EXP-F 810827 006-008 X32970
FIN,FINISH+307,80000009(D3C5E3C5).       GMO EXP-F 810827 007-008 X32970
FIN,FINISH+308,00000000(C4404040).       GMO EXP-F 810827 008-008 X32970
GENMD LOGON
DELETE
< NOTIFY THE OPERATOR OF UNSUCCESSFUL LOGON ATTEMPTS.             X32929
< GENMD TO LOGON:                                                 X32929
,DISPLINE,1(0).                          FHK EXP-F 810603 001-002 X32929
,SECTION1+273,22200000+KEYBUFF(22200043+SECTION1).        002-002 X32929
< ACCNTSUM CAN'T HANDLE ELAPSED TIMES GREATER THAN 24 HOURS       X32682
< GENMD TO LOGON:                                                 X32682
:GENMD SECTION2+173,32B000EE+SECTION3(31D0000F).-F 801231 001-007 X32682
:GENMD SECTION2+175,6920020D+SECTION3(20D15180).-F 801231 003-007 X32682
:GENMD SECTION3+20D,20D15180(0).         RMS EXP-F 801231 004-007 X32682
:GENMD SECTION3+20E,33F0000B(0).         RMS EXP-F 801231 005-007 X32682
:GENMD SECTION3+20F,6920020D+SECTION3(0).RMS EXP-F 801231 006-007 X32682
:GENMD SECTION3+210,68000176+SECTION2(0).RMS EXP-F 801231 007-007 X32682
< THESE  GENMDS TO LOGON FIX PROBLEM OF HALF-DUPLEX LINES NOT     X32801
< DISCONNECTING WHEN USER HANGS UP.                               X32801
:GENMD,LOGON SECTION1 7F3,68000041+PATCH(2220ADF6).       001-017 X32801
:GENMD,LOGON PATCH+41,2220ADF6.          GM  EXP-F 801230 002-017 X32801
:GENMD,LOGON PATCH+42,0420B21C.          GM  EXP-F 801230 003-017 X32801
:GENMD,LOGON PATCH+43.                   GM  EXP-F 801230 004-017 X32801
:GENMD,LOGON PATCH+44,4BF08C2D.          GM  EXP-F 801230 005-017 X32801
:GENMD,LOGON PATCH+45,21F00002.          GM  EXP-F 801230 006-017 X32801
:GENMD,LOGON PATCH+46,6830004C+PATCH.    GM  EXP-F 801230 007-017 X32801
:GENMD,LOGON PATCH+47,21F00003.          GM  EXP-F 801230 008-017 X32801
:GENMD,LOGON PATCH+48,6830004C+PATCH.    GM  EXP-F 801230 009-017 X32801
:GENMD,LOGON PATCH+49,21F00007.          GM  EXP-F 801230 010-017 X32801
:GENMD,LOGON PATCH+4A,6830004C+PATCH.    GM  EXP-F 801230 011-017 X32801
:GENMD,LOGON PATCH+4B,680007F5+SECTION1. GM  EXP-F 801230 012-017 X32801
:GENMD,LOGON PATCH+4C,0480004E+PATCH.    GM  EXP-F 801230 013-017 X32801
:GENMD,LOGON PATCH+4D,680007F5+SECTION1. GM  EXP-F 801230 014-017 X32801
:GENMD,LOGON PATCH+4E,06200000.          GM  EXP-F 801230 015-017 X32801
:GENMD,LOGON PATCH+4F,40000000.          GM  EXP-F 801230 016-017 X32801
:GENMD,LOGON PATCH+50,00800080.          GM  EXP-F 801230 017-017 X32801
< A BATCH USER WITH EXIT CONTROL CAN CLOBBER GRANULE ACCOUNTING FOX32562
:GENMD,LOGON SECTION2+405,32200000+SL:EPS(32208C19).      001-002 X32562
:GENMD,LOGON SECTION2+414,32200000+SL:EPS(32208C19).      002-002 X32562
GENMD LYNX
DELETE
< MAKE LYNX HANDLE LOWERCASE 'RUN'                                X32818
< GENMD TO LYNX:                                                  X32818
,LYNXPP+114,6800002F+PATCH(3810002A+LYNX01). EXP-F 810603 001-004 X32818
,PATCH+2F,49100014+LYNX01.               DE  EXP-F 810603 002-004 X32818
,PATCH+30,3810002A+LYNX01.               DE  EXP-F 810603 003-004 X32818
,PATCH+31,68000115+LYNXPP.               DE  EXP-F 810603 004-004 X32818
GENMD L6G
DELETE
GENMD OLTEST
DELETE
GENMD PASS2
DELETE
GENMD PASS3
DELETE
GENMD PCL
DELETE
< CORRECT PCL'S HANDLING OF SCC IN BLDCB.                         X32816
< GENMDS TO PCL:                                                  X32816
,REW+4E,68000036+PATCH(6AB00000+BLDCB).  TS  EXP-F 810603 001-007 X32816
,PATCH+36,32500001+LISTPOS.              TS  EXP-F 810603 002-007 X32816
,PATCH+37,6AB00000+BLDCB.                TS  EXP-F 810603 003-007 X32816
,PATCH+38,73E0000A.                      TS  EXP-F 810603 004-007 X32816
,PATCH+39,69300050+REW.                  TS  EXP-F 810603 005-007 X32816
,PATCH+3A,35500001+LISTPOS.              TS  EXP-F 810603 006-007 X32816
,PATCH+3B,68000058+REW.                  TS  EXP-F 810603 007-007 X32816
< PCL SOMETIMES FAILS TO BLANK OUT ALL CHARACTERS OF A PASSWORD.  X32676
< GENMD TO PCL:                                                   X32676
,PCL+C1,6800005E+PATCH(201FFFFF).        FHK EXP-F 800905 001-006 X32676
,PATCH+5E,322E0053.                      FHK EXP-F 800905 002-006 X32676
,PATCH+5F,21200015.                      FHK EXP-F 800905 003-006 X32676
,PATCH+60,683000C2+PCL.                  FHK EXP-F 800905 004-006 X32676
,PATCH+61,201FFFFF.                      FHK EXP-F 800905 005-006 X32676
,PATCH+62,680000C2+PCL.                  FHK EXP-F 800905 006-006 X32676
GENMD PIGEON
DELETE
< PIGEON ONLY ZEROES OUT STATUS BYTES FOR 128 LINES. CP-V         X32799
< ALLOWS UP TO 255 TOTAL USERS, OF WHICH UP TO 245 COULD          X32799
< LOGICALLY BE ONLINE USERS (10 DEFAULT GHOSTS). ALTHOUGH         X32799
< PIGEON SETS MAX#LINES TO 512, THIS GENMD TO PIGEON WILL         X32799
< CLEAR OUT 254 BUTES INSTEAD OF THE CURRENT 128.                 X32799
,PIGPD+1C,FF028270(80028270).            RMS EXP-F 801118 001-001 X32799
GENMD PPS
DELETE
GENMD RATLER
DELETE
GENMD RBBAT
DELETE
< RBBAT CAN HANG AS A RESULT OF AN ILLEGAL KEYIN FROM AN IRBT.    X32820
< GENMD TO RBBAT:                                                 X32820
,RBG+8DF,69400849+RBG(69400850+RBG).     GAF EXP-F 810603 001-001 X32820
< ZERO OUT SSIG WHEN RELEASING STREAM BACK TO FREE CHAIN,         XRBBAT
< THUS REDUCING FALSE 'INSUFFICIENT STREAMS' MESSAGES.            XRBBAT
< GENMDS TO RBBAT:                                                XRBBAT
,RBG+E6F,680000F4+RBBP(68000E65+RBG).    HBA EXP-F 810128 001-003 XRBBAT
,RBBP+F4,75A60000+SSIG.                  HBA EXP-F 810128 002-003 XRBBAT
,RBBP+F5,68000E65+RBG.                   HBA EXP-F 810128 003-003 XRBBAT
GENMD STATS
DELETE
GENMD SUMMARY
DELETE
< SUMMARY WASTES PAPER FOR ITS SNAPSHOT HEADER LINE               X32265
:GENMD HEADER+8,682100C4(691100C4).      GF  F00 01/02/80 001-001 X32265
GENMD TEL
DELETE
< MAKE TEL'S LOWERCASE 'L'(AS IN PCL 'LIST') WORK.                X32817
< GENMD TO TEL:                                                   X32817
,PATCH+00,21B00093.                      DE  EXP-F 810603 002-004 X32817
,PATCH+01,693000C0+TEL.                  DE  EXP-F 810603 003-004 X32817
,PATCH+02,680000AE+TEL.                  DE  EXP-F 810603 004-004 X32817
< FIX TEL STATUS COMMAND TO USE CONSOLE MINUTES IN FIFTH RATE     X32940
< FACTOR, INSTEAD OF I/O OPERATIONS, AND TO DIVIDE FINAL CHARGE   X32940
< BY DECIMAL 10000 INSTEAD OF HEX '10000'.                        X32940
< GENMD TO TEL:                                                   X32940
,TEL+BD4,68000BDD+TEL(22C0FFFF).         FHK EXP-F 810520 001-003 X32940
,TEL+BD5,1710(4BC08C1D).                 FHK EXP-F 810520 002-003 X32940
,TEL+BF8,36E00BD5+TEL(36E00000+Y0001).   FHK EXP-F 810520 003-003 X32940
< CORRECT PLATEN COMMAND TO ALLOW LOWERCASE OR TRAILING BLANK.    X32825
< GENMD TO TEL:                                                   X32825
,TEL+4CD,21100000(216000D5).             SW  EXP-F 810106 001-001 X32825
< DUE TO A BAD TEST IN SETAMR, A BATCH USER CAN DO A '!SET FOR    X32032
< M:C. AS A RESULT, CCI LOOPS AND JOB CAN'T BE ABORTED.           X32032
< GENMD TO TEL:                                                   X32032
:GENMD,TEL SET+5D3,03D47AC3(04D47AE4),40404040. -F 800905 001-003 X32032
:GENMD,TEL SET+5DF,04D47AE4(03D47AC3),C3404040. -F 800905 002-003 X32032
:GENMD,TEL SET+5CD,1169D94A(1169D948).   FHK EXP-F 800905 003-003 X32032
GENMD TPG
DELETE
GENMD VOLINIT
DELETE
