| This is the actual log file generated by the base note!!!!!!
$ type MCC_RPTS_NODE4_LINE_TRAFFIC_DTR.LOG
$ SET NOON
$!
$! This command procedure is always run when anybody on the entire
system
$! logs in. It is equivalent to LOGIN.COM except that the instructions
$! contained herein are executed everytime anyone on the VMS system
$! logs in to their account.
$!
$! For interactive processes, turn on Control T, and set the terminal
type
$ IF F$EXTRACT(0,3,f$getdvi("TT:", "devnam")) .eqs. "_MB" THEN $EXIT
$!
$ IF (F$MODE() .EQS. "INTERACTIVE") THEN SET CONTROL=T
$! IF (F$MODE() .EQS. "INTERACTIVE") THEN SET TERMINAL/INQUIRE
$!
$! For MicroVAX systems only, use the command MOUNT/NOASSIST.
$!
$ IF (.NOT. F$TRNLNM("SYS$MICROVAX")) THEN GOTO SKIP_MICROVAX_COMMANDS
$! MOU*NT :== MOUNT/NOASSIST
$SKIP_MICROVAX_COMMANDS:
$!
$! Place your site-specific LOGIN commands below
$!
$ IF F$MODE() .NES. "INTERACTIVE" THEN EXIT
$!
$! This command procedure is a framework for building an individual
$! login command procedure. It is executed every time that you log
$! into your account.
$!
$ IF F$MODE() .NES. "INTERACTIVE" THEN GOTO ENDINTER
$ENDINTER:
$ IF F$MODE() .NES. "BATCH" THEN GOTO ENDBATCH
$!
$! Put commands you want executed only in batch mode between this
comment
$! and the "ENDBATCH:" symbol.
$!
$
$ENDBATCH:
$!
$! Put commands that you want executed in any mode of login below.
$!
$
$!mcc_rpts_node4_line_traffic_dtr.com
$!************************************************************
$! Copyright (c) Digital Equipment Corporation, 1990
$! All Rights Reserved. Unpublished rights reserved
$! under the copyright laws of the United States.
$!
$! The software contained on this media is proprietary
$! to and embodies the confidential technology of
$! Digital Equipment Corporation. Possession, use,
$! duplication or dissemination of the software and
$! media is authorized only pursuant to a valid written
$! license from Digital Equipment Corporation.
$!
$! RESTRICTED RIGHTS LEGEND Use, duplication, or
$! disclosure by the U.S. Government is subject to
$! restrictions as set forth in Subparagraph (c)(1)(ii)
$! of DFARS 252.227-7013, or in FAR 52.227-19, as
$! applicable.
$!************************************************************
$!********************************
$! This command procedure is submitted by
mcc_rpts_node4_line_traffic.com
$! This procedure is submitted with four parameters.
$!********************************
$ ! Generate the reports.
$ THIS_PROCESS = ""
$ PID = F$PID(THIS_PROCESS)
$! show sym PID
$ TIME = F$TIME()
$ DAY = F$CVTIME(TIME,,"DAY")
$ MONTH= F$CVTIME(TIME,,"MONTH")
$ YEAR = F$CVTIME(TIME,,"YEAR")
$ HOUR = F$CVTIME(TIME,,"HOUR")
$ MIN = F$CVTIME(TIME,,"Minute")
$ SEC = F$CVTIME(TIME,,"second")
$ HUNDREDTH = F$CVTIME(TIME,,"HUNDREDTH")
$!
$define mcc$node1 "ALL"
$define mcc$line1 "ALL"
$define mcc$date1 "18-MAY-1993 15:00:00.00"
$define mcc$date2 "18-MAY-1993 22:00:00.00"
$define mcc$report_file "NODE4_LINE_TRAFFIC.JDT_RPT"
$datatrieve
VAX DATATRIEVE V6.0
Digital Query and Report System
Type HELP for help
:node4_line_traffic_rpt
Element "NODE4_LINE_TRAFFIC_RPT" not found in dictionary.
exit
$exit
SYSTEM job terminated at 20-MAY-1993 13:48:44.28
Accounting information:
Buffered I/O count: 128 Peak working set size: 4315
Direct I/O count: 192 Peak page file size: 15802
Page faults: 4610 Mounted volumes: 0
Charged CPU time: 0 00:00:02.44 Elapsed time: 0 00:00:08.36
A second twist!!!!!!!
From the dollar sign prompt, I executed the command lines from the log
file above. This resulted in the following error:
"%SYSTEM-F-ACCVIO, access violation, reason mask=01, virtual
address=2818006E, PC=00000000, PSL=00000000"
HOWEVER, the file named in the log file above "NODE4_LINE_TRAFFIC.JDT_RPT"
is created when run from the dollar sign and appears to contain all the
correct information.
Below is the data being exported:
DECmcc (V1.3.0)
MCC> SHOW EXPORTING NODE4 CBOANC LINE SVA-0 EXPORT TARGET -
_MCC> DKA100:[MCC.EXPORT]CBO_ANC_JDR.RDB, IN DOMAIN REPORT
Node4 CBOANC Line SVA-0
AT 20-MAY-1993 15:04:11
Exporting parameters are:
Exporting state = SUSPENDED,
State since = 19-MAY-1993 08:11:31.66,
Export period = 0 01:00:00.00,
Begin time = 18-MAY-1993 14:34:00.03,
End time = 25-MAY-2012 00:00:00.00,
Export target =
"DKA100:[MCC.EXPORT]CBO_ANC_JDR.RDB",
Request time = 18-MAY-1993 14:34:00.03,
Requested by = "SYSTEM",
Time of last successful poll = "19-MAY-1993 07:35:22.86",
Number of successful polls = 18,
Time of last failed poll = "NONE",
Last poll failure reason = "N/A",
Number of failed polls = 0,
Last export time = "19-MAY-1993 07:35:26.23",
Time of last export failure = "NONE",
Last export failure reason = "N/A",
Number of export failures = 0,
Sequence name = "EXPORT",
Initial sequence number = 0,
Current sequence number = 18
Below is the DATATRIEVE information:
$ DTR
VAX DATATRIEVE V6.0
Digital Query and Report System
Type HELP for help
DTR> SHOW DICTIONARY
The default directory is _CDD$TOP.REPORTS
DTR> SHOW ALL
Domains:
* CIRCUIT_ERROR_DOMAIN;1 * CIRCUIT_GRAPH;1
* CIRCUIT_ID_TEMP;1 * LINE_ERROR_DOMAIN;1
* LINE_TEMP;1 * NODE4_LINE_SUM_TMP;1 *
NODE4_NODE_SUM_TMP;1
Records:
* CIRCUIT_GRAPH_RECORD;1 * CIRCUIT_TEMP_RECORD;1
* CIRCUIT_TRAFFIC_ERR_RECORD;1 * LINE_TRAFFIC_ERR_RECORD;1
* NODE4_LINE_SUM_TMP_REC;1 * NODE4_LINE_TRAFFIC_REC;1
* NODE4_NODE_SUM_TMP_REC;1
Procedures:
* NODE4_CIRCT_DAILY_GRAPH;1 * NODE4_CIRCT_HOURLY_GRAPH;1
* NODE4_LINE_BANDWIDTH_RPT;1 * NODE4_LINE_ERROR_RPT;1
* NODE4_LINE_ERROR_SUM_RPT;1 * NODE4_LINE_TRAFFIC_RPT;1
* NODE4_LINE_TRAFFIC_SUM_RPT;1 * NODE4_NODE_ERROR_RPT;1
* NODE4_NODE_ERROR_SUM_RPT;1 * NODE4_NODE_TRAFFIC_RPT;1
* NODE4_NODE_TRAFFIC_SUM_RPT;1 * PHASEIV;2 * PHASEIV;1
* PRINT_CIRCUIT_DAY_UTILIZATION;1
*
PRINT_CIRCUIT_HOUR_UTILIZATION;1
* STORE_NODE4_LINE_SUM;1 * STORE_NODE4_NODE_SUM;1
Databases:
* MCC_EXPORT;1
The default directory is _CDD$TOP.REPORTS
No established collections.
No ready sources.
No loaded tables.
DTR> SHOW MCC_EXPORT
Relational database MCC_EXPORT :
DKA100:[MCC.EXPORT]CBO_ANC_JDR.RDB;1
DTR>
|