DPTCMON `P6®X¾˜Õq¾ÈÚ|J#**********************************************************************JBATCH LS=YES"J#**********************************************************************JF* *** PATCH FILE DPTCMON 1.1 DX10 3.5  LAST UPDATE 07/22/82 FJ#**********************************************************************J:* ***S P E C I A L  I N S T R U C T I O N S *** :* '2*  PCS MUST BE USED TO APPLY THESE PATCHES. 2* '* TITLE:DPTCMON * 'D * ABSTRACT: DX COMMON COMMUNICATIONS DSR PARTS PATCH FILE. THIS D6* PATCH FILE CORRECTS PROBLEMS IN THE DX COMMON 6:* COMMUNICATIONS DSR MODULES, WHICH ARE LINKED INTO :2* EACH PROTOCOL OVERLAY DURING INSTALLATION. 26* THIS PATCH FILE IS RUN AGAINST EACH PROTOCOL'S 66* LINKMAP AND PATCHED IN EACH PROTOCOL OVERLAY. 6* 'L$*********************************************************************** L:* ***S P E C I A L  I N S T R U C T I O N S *** :* ':*  WHEN BUILDING THE DSR USING THE PROC 'BCD' (BUILD :8*  COMMUNICATIONS DSR), THIS PATCH FILE IS APPLIED8<*  USING THE CURRENT 'PCS' PROC (PATCH COMMUNICATIONS <:*  SYSTEM) LOCATED ON THE COMMON COMMUNICATIONS DSR :>*  PARTS DIRECTORY, DXCMO. THIS DIRECTORY IS LOCATED ON >@*  THE DX10 SYSTEM GENERATION PARTS DIRECTORY, .S$SYSGEN. @>*  USE OF THE 'PCS' PROC IS DESCRIBED IN THE DX10 COMMON >:*  COMMUNICATIONS DSR OBJECT INSTALLATION DOCUMENT. :B*  ALL PROTOCOL DSRS MUST BE GENERATED AND THE SYSTEM 'ALGS' B**  PERFORMED BEFORE PATCHING BEGINS.** '<*  FOLLOW THE INSTRUCTIONS IN THE OBJECT INSTALLATION <@:*  MANUAL(S) FOR THE COMMUNICATION PACKAGE(S) BEING :*  INSTALLED. * '*  NOTE:#D*  THIS PATCH FILE SHOULD ONLY BE EXECUTED BY USING THE 'PCS' D@*  PROC AS THIS PROC WILL ASSIGN ANY SYNONYMS REQUIRED FOR @*  PROPER EXECUTION.* 'L$************************************************************************L* '8* *** S Y N O N Y M A S S I G N M E N T S ***8* ',Q$SYN !REQUIRED: CLEAR SECRET SYNONYMS ,4.SYN $E$C="0" !ERROR COUNT WITHIN A PATCH FILE 4N%************************************************************************* N ***** LINK DEFINED SYNONYMS N%************************************************************************* N#SYN COMP,COMPAT#SYN AISR,ALFISR#SYN CISR,COMISR* ' .SYN COMP= À "",AISR="",CISR=""N%************************************************************************* N(***** EVALUATED SYNONYMS, REQUIRE: (6*  "@DSR" MUST BE VALUE OF OVERLAY BEING PATCHED64*  "@DSRCMON" MUST BE VALUE OF OVERLAY ORIGIN 4* ' .IF "@DSRCMON",NE,"NONE"$.EVAL C$$PAT="@DSRCMON+@COMPAT"$ .ENDIF% N%**************************************************************************N$* *** PATCHESRELEASE 1.1.0$N%**************************************************************************NJ*=P1884 MBC07/02/82STR #12829DPTCMON COMISR V1.1 DX10 V3.5 J* 'J* ! WHEN PLACING A CALL MANUALLY (USING 3780/2780) AND THE MODEM HAS JF*  RING INDICATOR (RI) ON, A 12 SECOND TIMEOUT OCCURS CAUSING ANF4*  ERROR BEFORE DIALING IS COMPLETE.THIS PATCH4À CAUSES THE ISR TO>*  IGNORE RI AND LOOK FOR DSR ONLY WHEN PLACING A CALL. >* ' .IF "@COMISR",NE,"NONE" $.EVAL COMISR="@COMISR+@DSRCMON" $8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>0540", 8 V=>1303,D=>1307,C=>1307EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>0548", 8 V=>04E4,D=>C920,C=>C920EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>054A", 8: V=>008A,D="@C$$PAT+>000E",C="@C$$PAT+>000E",RELOC=YES :EC' * ADDRESS OF WAITCP 8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@C$$PAT+>000E", 8: V=>DEAD,D="@COMISR+>03E2",C="@COMISR+>03E2",RELOC=YES :EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>054C", 8 V=(>D928,>0012,>008A), " D=(>0088,>1003,>C920),C=>D9AB"EC'0MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>00À 552",  : V=>C920,D="@COMISR+0002",C="@COMISR+>0002",RELOC=YES :EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>0554", 80 V="@COMISR+>0002",D=>0088,C=>0088,RELOC=NO 0EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>0556", 8 V=>0088,D=>0460,C=0460 EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@COMISR+>0558", 8: V=>045B,D="@C$$PAT+>0002",C="@C$$PAT+>0002",RELOC=YES :EC'&* NOTE: COMMON USAGE OF PATCH AREA&8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@C$$PAT+>0002", 8. V=(>DEAD,>DEAD,>DEAD,>DEAD,>DEAD,>DEAD), .4 D=(>04E4,>008A,>D928,>0012,>008A,>045B),C=>D985 4EC' .ENDIF% *$'N%**************************************************************************NJ*=P1885 MBC07/02/82STR #12830DPTCMON ALFISR V1.1 DX10 V3.5 J* '* €F! WHEN PLACING A CALL MANUALLY (USING 3780/2780) AND THE MODEM HAS FF*  RING INDICATOR (RI) ON, A 12 SECOND TIMEOUT OCCURS CAUSING ANFH*  ERROR BEFORE DIALING IS COMPLETE.THIS PATCH CAUSES THE ISR TOH>*  IGNORE RI AND LOOK FOR DSR ONLY WHEN PLACING A CALL. >* ' .IF "@ALFISR",NE,"NONE" $.EVAL ALFISR="@ALFISR+@DSRCMON" $8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>056E", 8 V=>1301,D=>1305,C=>1305EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>0572", 8 V=>04E4,D=>C920,C=>C920EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>0574", 8: V=>008A,D="@C$$PAT+>0000",C="@C$$PAT+>0000",RELOC=YES :EC' * ADDRESS OF WAITCP 8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@C$$PAT+>0000", 8: V=>0202,D="@ALFISR+>03E8",C="@ALFISR+>03E8",RELOC=YES :.S>@EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>0576", 8 V=(>D928,>0012,>008A), " D=(>0088,>1003,>C920),C=>D9AB"EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>057C", 8: V=>C920,D="@ALFISR+0002",C="@ALFISR+>0002",RELOC=YES :EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>057E", 80 V="@ALFISR+>0002",D=>0088,C=>0088,RELOC=NO 0EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>0580", 8 V=>0088,D=>0460,C=0460 EC'8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@ALFISR+>0582", 8: V=>045B,D="@C$$PAT+>0002",C="@C$$PAT+>0002",RELOC=YES :EC'&* NOTE: COMMON USAGE OF PATCH AREA&8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@C$$PAT+>0002", 8. V=(>DEAD,>DEAD,>DEAD,>DEAD,>DEAD,>DEAD), .4 D=(>04E4,>008A,>D928,>0012,>008A,>045B),C=>D985 4EC'€ .ENDIF% *$'N%**************************************************************************N *  INSERT NEW PATCHES HERE  N%**************************************************************************NLS'.SYN DSR="",DSRCMON="".SYN C$$PAT="",COMPAT="".SYN ALFISR="",COMISR=""* '@CM R=ME,M="@$E$C ERRORS IN PATCH STREAM @$CLST.CMN@$PROT" @.IF @$E$C,NE,"0"  .EVAL $E$PCS="@$E$PCS+1"  .ENDIF% .SYN $PROT="" !* ' .STOP % <* NEXT AVAILABLE COMMON PATCH LOCATION IS C$$PAT+>0010 <="@C$$PAT+>0002",RELOC=YES :EC'&* NOTE: COMMON USAGE OF PATCH AREA&8MPI  PF=@IMAGE,MT=OV,MN=@DSR,ADR="@C$$PAT+>0002", 8. V=(>DEAD,>DEAD,>DEAD,>DEAD,>DEAD,>DEAD), .4 D=(>04E4,>008A,>D928,>0012,>008A,>045B),C=>D985 4EC'