[Search for users] [Overall Top Noters] [List of all Conferences] [Download this site]

Conference 44.370::system_management

Title:system management communications forum
Moderator:CHEST::THOMPSON
Created:Fri Mar 21 1986
Last Modified:Thu Jul 08 1993
Last Successful Update:Fri Jun 06 1997
Number of topics:490
Total number of notes:2018

436.0. "DecGraph V1.6 (EASE 5.4-1A) - Patch required" by SBPEXE::OTTEN (The light at the end of the tunnel is a train) Tue Jul 16 1991 12:52

Running DECgraph V1.6 in Batch mode - Patch


********************   CAUTION:  FOR INTERNAL USE ONLY   *********************
*                                                                            *
*      THIS INFORMATION IS FOR USE BY DIGITAL EQUIPMENT CORP. AND ITS        *
*      EMPLOYEES ONLY.  PLEASE USE EXTREME CARE IF YOU MUST DISCUSS ANY      *
*      PART OF THIS INFORMATION WITH ANYONE WHO IS NOT A DIGITAL EMPLOYEE.   *
*                                                                            *
******************************************************************************
  \\15-NOV-1990
  \\(LAYERED_PRODUCTS)
     
     
   PROBLEM:
           When running DECgraph V1.6 in batch mode, the error message,
           "%SYSTEM-F-FILENOTACC, file not found accessed on channel"
           is received.

  SOLUTION:
           The following command file will correct DECgraph V1.6 so that it
           works as documented.  Note the restriction described as part of the
           following command file.

           To apply the patch, extract everything from, and including $ !++ to
           the end of this file into a VMS .COM file and execute that command
           file, following all instructions.
           



$ !++
$ !
$ ! Patch to correct the DECgraph batch problem, where executing DECgraph
$ ! in batch mode returns File Not Accessed on Channel.
$ !--
$       OLD_DEFAULT = F$ENVIRONMENT("DEFAULT")
$       ON WARNING THEN GOTO EXIT
$       ON CONTROL_Y THEN GOTO EXIT
$       TYPE SYS$INPUT/PAGE
$       DECK

        This procedure applies a patch to the GRAPHSHR.EXE image. It 
        should only be used on DECgraph V1.6 images. The problem this 
        patch addresses will be corrected in the next release of DECgraph. 

        There must be no users running DECgraph during this patching 
        procedure.


   PROBLEM ADDRESSED:

        When running DECgraph in batch mode, the error message

                %SYSTEM-F-FILNOTACC, file not accessed on channel

        is received.

   
   PATCHED FUNCTIONALITY:

        DECgraph V1.6 will work as documented.
        

   RESTRICTIONS/NOTES

        There is one restriction.  In an attempt to run DECgraph from a 
        command file, and do not have SYS$INPUT redefined to SYS$COMMAND, 
        you will receive the error: 
                %SYSTEM-F-FILNOTACC, file not accessed on channel.  
        In order to resolve this, enter the following in you command 
        procedure:
                $DEFINE SYS$INPUT SYS$COMMAND
        If you have installed the GRAPHSHR.EXE image via the VMS INSTALL 
        utility, you must replace the image before the patch will take 
        effect:

                $ INSTALL
                INSTALL> REPLACE SYS$SHARE:GRAPHSHR.EXE
                INSTALL> EXIT
                $
        

$       EOD
$       INQUIRE CONT "Press return to apply the patch"
$       SET DEFAULT SYS$COMMON:[SYSLIB]
$       WRITE SYS$OUTPUT "Patching GRAPHSHR.EXE image"
$       PATCH GRAPHSHR.EXE
SET ECO 1
REPLACE/INSTRUCTION 000057DA
'PUSHAB  B^00005774'
EXIT
'BRB PB.1'
'PAT.1: .LONG 4'
'PAT.4: .LONG 5'
'PAT.2: .WORD 4'
'.WORD 322'
'PAT.3: .LONG 0'
'PAT.5: .LONG 0'
'.LONG 0'
'PB.1: MOVAL PAT.1, PAT.3'
'MOVAL PAT.4, PAT.5'
'CLRQ -(SP)'
'CLRL -(SP)'
'PUSHAB L^PAT.2'
'CLRQ -(SP)'
'CLRL -(SP)'
'CALLS #7, @#7FFEE0D8'
'MOVL R0,R7'
'BLBS R7, PB.2'
'PUSHL R7'
'CALLS #1, @00060754'
'PB.2: CMPL PAT.1, #3'
'BEQL PB.3'
'JMP 59B4'
'PB.3: PUSHAB  L^00005774'
EXIT
UPDATE
EXIT
$       WRITE SYS$OUTPUT "All done..."
$ EXIT:
$       ON CONTROL_Y THEN EXIT
$       ON WARNING THEN EXIT
$       SET DEFAULT 'OLD_DEFAULT'
$       EXIT


T.RTitleUserPersonal
Name
DateLines