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

Conference azur::mcc

Title:DECmcc user notes file. Does not replace IPMT.
Notice:Use IPMT for problems. Newsletter location in note 6187
Moderator:TAEC::BEROUD
Created:Mon Aug 21 1989
Last Modified:Wed Jun 04 1997
Last Successful Update:Fri Jun 06 1997
Number of topics:6497
Total number of notes:27359

4411.0. "fixing scripts/dictionary" by CTHQ::WOODCOCK () Tue Jan 19 1993 19:43

Greetings,

How does one *fix* or *delete* a bum script. I failed to edit a line in the
MS file and got the following error:

DAP> exit
Using parse table log file: sys$common:[mcc]mcc_fdictionary.log;2
Building containment tree file

Containment tree file built, objects=34056, size = 315620
Reading parse table file: sys$common:[mcc]mcc_fdictionary.bpt;2
Please wait while parse tables are updated
  Processing entity 666 920
%MCCPTB-W-STRERR, Unable to create string table entry for:
    child entity: DISK ; code: INVALID
Writing parse table file.  Please wait...
Created parse table file: sys$common:[mcc]mcc_fdictionary.bpt;3
Parse table build complete.


I then made further edits to the MS file and tried to reload and got:

DAP> load from mcc_script_rping_srvc_if.com
%DAP-I-LINENUMB, At or near line number 4.
%DAP-I-CMD_LINE, Command: CREATE CLASS SCRIPT  SUBCLASS RPING CODE 920
%MCC-E-ENTEXIST,  specified entity definition exists already

any help appreciated,
brad...


ps. As a seperate discussion I must also voice concern about dictionary 
updates. It has become obvious that MCC down time for dictionary updates is
too extensive. The argument has always been "So how often do you think the
customer will upgrade anyway, it was a tradeoff." I now believe that upgrades
will happen too often to shut down our business without impact. For example,
business comes to a stop every MCC upgrade. First for the BMS kit then for all
the 'other' kits which can be several hours on a good day. Then comes MIB
updates requiring the user to shut down business for another interval. Now it
is scripts again requiring business down time. You have my vote for a new
dictionary.
T.RTitleUserPersonal
Name		DateLines
4411.1Use UPDATE...MOLAR::DFLAT::PLOUFFEJerryWed Jan 20 1993 10:3525
Brad:

  Use the UPDATE command instead of LOAD after you edit the MSL source file.
  This will cause the current info to be deleted first then reloaded.  There
  should be sufficient documentation on the UPDATE command in the help text and
  in the Toolkit Reference Guide.

  > ps. As a seperate discussion I must also voice concern about dictionary 
  > updates. It has become obvious that MCC down time for dictionary updates is
  > too extensive. The argument has always been "So how often do you think the
  > customer will upgrade anyway, it was a tradeoff." I now believe that upgrades
  > will happen too often to shut down our business without impact. For example,
  > business comes to a stop every MCC upgrade. First for the BMS kit then for 
  > all he 'other' kits which can be several hours on a good day. Then comes MIB
  > updates requiring the user to shut down business for another interval. Now it
  > is scripts again requiring business down time. You have my vote for a new
  > dictionary.

  Thanks for the vote -- we are currently integrating new dictionary technology
  (for the Common Agent project) into DECmcc.  Your concerns are well known and
  this new technology will allow us to address some of them.  Please make sure 
  that Jim Carey knows your requirements.  He is in charge of the "Vnext" 
  release that will contain this new dictionary technology.

                                                                        - Jerry
4411.2Updates need not be done "On Line"FARMS::LYONSAhh, but fortunately, I have the key to escape reality.Wed Jan 20 1993 10:536
You can also update the MCC dictionary without having to "shutdown".

Simply copy the dictionary to a private area and do the update there.
When you are ready to include support for the new features, all you would need 
to do is copy the new dictionary back, and restart MCC, a matter of only
a few minutes.
4411.3still not homeCTHQ::WOODCOCKWed Jan 20 1993 12:0151
re: .1

Thanks for the info but I'm still not quite there. I tried the UPDATE as
described in help and got the following:

Help info...................
UPDATE Subtopic? ex
UPDATE
  EXAMPLES
      DAP>    UPDATE CLASS SAMPLE FROM MCC_SAMPLE_AM_SRVC_IF.COM
      DAP>    UPDATE CLASS CODE 15 FROM MCC_SAMPLE_AM_SRVC_IF.COM
      DAP>    UPDATE CLASS SAMPLE SUBCLASS LINE FROM MCC_SAMPLE_AM_SRVC_IF.COM
............................
the results:

DAP> update class script subclass rping from mcc_script_srvc_if.com
%DAP-E-FILEOPENERR, File not found or could not be opened
DAP> update class script subclass rping from mcc_script_rping_srvc_if.com
Deleting specified class from dictionary file...
(Control C and Y will be disabled while records are being deleted)
%DAP-I-LINENUMB, At or near line number 4.
%DAP-I-CMD_LINE, Command: CREATE CLASS SCRIPT  SUBCLASS RPING CODE 920
%MCC-E-ENTEXIST,  specified entity definition exists already
DAP> update class code 920 from mcc_script_rping_srvc_if.com
Deleting specified class from dictionary file...
(Control C and Y will be disabled while records are being deleted)
%DAP-I-LINENUMB, At or near line number 4.
%DAP-I-CMD_LINE, Command: CREATE CLASS SCRIPT  SUBCLASS RPING CODE 920
%MCC-E-ENTEXIST,  specified entity definition exists already


I get the feeling some of this info should be in the SCRIPT docs. I don't have
the TOOLKIT ref guide, I'm not supposed to need it for this ;-).


re: .2

> You can also update the MCC dictionary without having to "shutdown".

> Simply copy the dictionary to a private area and do the update there.
> When you are ready to include support for the new features, all you would need 
> to do is copy the new dictionary back, and restart MCC, a matter of only
> a few minutes.

Because of the number of concerns raised from this issue should the exact steps
be documented in the release notes or at least in the conference??? I'm still
not confident with your description above to try it because of my lack of
knowledge with the dictionary files. But at least now I know it can be done.

thanks,
brad...
4411.4more info pleaseGOSTE::CALLANDERWed Jan 20 1993 12:3626
    Brad, it looks like DAP isn't handling an update command when
    applied to a child entity class.  Could you do a few more checks
    first to see what is actually in the dictionary now.  Do:
    
    $MANAGE/TOOL/DICT
    DAP> SHO CLASS SCRIPT ! see if script is then and if rping is still
    DAP>                  ! in there as well
    DAP> SHOW SUBCLASS RPING ! and see whats there
    
    If you could post those results it would be appreciated.
    
    
    
    Now to get around it if you find that the child is still there even
    after your update attempltes please try:
        
    $MANAGE/TOOL/DICT
    DAP> DELETE CLASS SCRIPT SUBCLASS RPING
    DAP> LOAD FROM MCC_SCRIPT_RPING_SRVC_IF.COM
    DAP> EXIT
    
    That way you delete the subclass by hand and then do the load.
    Either way, no matter what you do, you have to do a parse table
    rebuild. The message saing that it deleted the entity class means
    that you are now out of synch unless you made sure that you did
    an exit after that last attempt.
4411.5still out of syncCTHQ::WOODCOCKWed Jan 20 1993 13:0356
Results don't look good. I definitely look 'out of sync' and the manual 
show commands prove it but didn't alleviate it. What next?? I'm beginning to
think this note should be renamed to "Tales from the SCRIPT" :).

brad...

DAP> show class script

-> Class (1) : SCRIPT
     Definition (3) : PRESENTATION_NAME
     Definition (3) : INSTANCE_REQUIRED
     Definition (3) : DYNAMIC
     Definition (3) : INSTANCE_DATATYPE
     Subclass (2) : COMMAND 77
     Subclass (2) : DISK 900
     Subclass (2) : DIRECTORY 901
     Subclass (2) : MEMORY 902
     Subclass (2) : SYSGEN 903
     Subclass (2) : DISK 900
     Attribute (5) : NAME 1
     Attribute (5) : LOCATION 100
     Attribute (5) : IMPLEMENTATIONDESC 101
     Attribute (5) : RESPONSIBLEPERSON 102
     Attribute (5) : PHONENUMBER 103
     Attribute (5) : MAILACCOUNT 104
     Attribute (5) : REMARKS 105
     Attribute (5) : TEXTFILE 106
     Directive (6) : SHOW 1
     Directive (6) : SET 2
     Directive (6) : DIRECTORY 26
     Directive (6) : REGISTER 29
     Directive (6) : DEREGISTER 30
     Directive (6) : ERASE 33
     Directive (6) : RENAME 34
     Attribute_Partition (11) : IDENTIFIERS 1
     Attribute_Partition (11) : REFERENCES 5

DAP> show subclass rping

   Class (1) : SCRIPT
---> Subclass (2) : RPING

DAP> DELETE CLASS SCRIPT SUBCLASS RPING
(Control C and Y will be disabled while records are being deleted)
%MCC-E-NOENTITY,  no corresponding entity instance exists
DAP> LOAD FROM MCC_SCRIPT_RPING_SRVC_IF.COM
%DAP-C-XIST,  specified entity definition exists already
DAP>
    
>    That way you delete the subclass by hand and then do the load.
>    Either way, no matter what you do, you have to do a parse table
>    rebuild. The message saing that it deleted the entity class means
>    that you are now out of synch unless you made sure that you did
>    an exit after that last attempt.
4411.6Please pull back the curtainTOOK::GUERTINMCC Managing everything for everyone everywhereWed Jan 20 1993 13:407
    Okay.  Your previous reply indicated that the Subclass RPING is NOT in
    the dictionary (because there were no definitions for it).  So the LOAD
    should have worked.  If you place the MCC_SCRIPT_RPING_SRVC_IF.COM as
    a reply it may be obvious (such as two CREATE CLASS SCRIPT SUBCLASS
    RPING commands).
    
    -Matt.
4411.7here's the comCTHQ::WOODCOCKWed Jan 20 1993 13:48984
Here it is. Would a reinstall of MCC clear this up? Although it is interesting
what kind of trouble a user can get into with scripts/dictionary I'm getting
ready to install the upgrade.

cheers,
brad...

! BUILT VIA MS SPECIFICATION: mcc_script_rping_srvc_if
! MSL Version T1.3.0
CREATE CLASS SCRIPT -
	SUBCLASS rping CODE 920
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 5 -
VALUE "rping"
!	instance_required
SET DEFINITION CODE 12 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	dynamic
SET DEFINITION CODE 10 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	instance_datatype
SET DEFINITION CODE 17 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
200 
PREVIOUS
CREATE ATTRIBUTE_PARTITION Identifiers CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 11 -
VALUE "Identifiers"
!	attribute_list
SET DEFINITION CODE 16 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
200 
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE Name CODE 200
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 255
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 4 -
VALUE "Name"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE_PARTITION Status CODE 2
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 6 -
VALUE "Status"
!	attribute_list
SET DEFINITION CODE 16 TYPE LU COUNT 9 LENGTH 4 -
  VALUE -
300 1 2 3 4 5 6 7 8 
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE CommandExecuted CODE 300
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 16 -
VALUE "Command Executed"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE SiteNames CODE 1
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 10 -
VALUE "Site Names"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE Date CODE 2
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 4 -
VALUE "Date"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE Time CODE 3
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 4 -
VALUE "Time"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE PingSource CODE 4
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 11 -
VALUE "Ping Source"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE PingDestination CODE 5
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 16 -
VALUE "Ping Destination"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE min CODE 6
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 31
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 3 -
VALUE "min"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	units
SET DEFINITION CODE 13 TYPE T COUNT 1 LENGTH 2 -
VALUE "ms"
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE avg CODE 7
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 31
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 3 -
VALUE "avg"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	units
SET DEFINITION CODE 13 TYPE T COUNT 1 LENGTH 2 -
VALUE "ms"
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE max CODE 8
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 31
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 3 -
VALUE "max"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	units
SET DEFINITION CODE 13 TYPE T COUNT 1 LENGTH 2 -
VALUE "ms"
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE_PARTITION Characteristics CODE 4
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 15 -
VALUE "Characteristics"
!	attribute_list
SET DEFINITION CODE 16 TYPE LU COUNT 4 LENGTH 4 -
  VALUE -
102 103 104 105 
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE Description CODE 102
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 11 -
VALUE "Description"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE Category CODE 103
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 8 -
VALUE "Category"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE Command CODE 104
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 7 -
VALUE "Command"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE ATTRIBUTE Timeout CODE 105
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 49
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 16
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 7 -
VALUE "Timeout"
!	access
SET DEFINITION CODE 7 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	predictable
SET DEFINITION CODE 27 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
PREVIOUS
PREVIOUS
CREATE DIRECTIVE SHOW CODE 1
!	directive_type
SET DEFINITION CODE 20 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 4 -
VALUE "SHOW"
PREVIOUS
CREATE RESPONSE AllAttributesShown CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 20 -
VALUE "All Attributes Shown"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 31 -
VALUE "Examination of attributes show:"
PREVIOUS
CREATE ARGUMENT ArgShowValues CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 15 -
VALUE "Arg Show Values"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 66
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
CREATE EXCEPTION UnsupportedAttributeGroup CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 27 -
VALUE "Unsupported Attribute Group"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 28 -
VALUE "Unsupported attribute group."
PREVIOUS
PREVIOUS
CREATE EXCEPTION EncodeErrors CODE 257
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 13 -
VALUE "Encode Errors"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 51 -
VALUE "An error occurred while encoding the SCRIPT package"
PREVIOUS
CREATE ARGUMENT ILVStatus CODE 17
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 10 -
VALUE "ILV Status"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 44
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
CREATE EXCEPTION ScriptError CODE 2
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 12 -
VALUE "Script Error"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 43 -
VALUE "The script has reported an error condition."
PREVIOUS
CREATE ARGUMENT ErroringCommand CODE 100
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 16 -
VALUE "Erroring Command"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
CREATE ARGUMENT ErrorText CODE 101
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 10 -
VALUE "Error Text"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
CREATE EXCEPTION ScriptNoOutput CODE 3
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 16 -
VALUE "Script No Output"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 34 -
VALUE "The script has produced no output."
PREVIOUS
PREVIOUS
CREATE EXCEPTION ShowProblems CODE 4
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 13 -
VALUE "Show Problems"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 50 -
VALUE "A MIR error occured while show script information."
PREVIOUS
CREATE ARGUMENT MIRStatus CODE 18
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 10 -
VALUE "MIR Status"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 44
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
CREATE EXCEPTION NoScript CODE 5
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 9 -
VALUE "No Script"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 28 -
VALUE "Script not found in the MIR."
PREVIOUS
PREVIOUS
CREATE EXCEPTION TimeOut CODE 6
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 8 -
VALUE "Time Out"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 25 -
VALUE "The Script has timed out."
PREVIOUS
CREATE ARGUMENT TimeoutValue CODE 19
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 13 -
VALUE "Timeout Value"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 49
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 16
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
PREVIOUS
CREATE DIRECTIVE CREATE CODE 12
!	directive_type
SET DEFINITION CODE 20 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 2
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 6 -
VALUE "CREATE"
PREVIOUS
CREATE REQUEST CREATE CODE 12
CREATE ARGUMENT Description CODE 102
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 11 -
VALUE "Description"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	echo
SET DEFINITION CODE 21 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	value_required
SET DEFINITION CODE 5 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 0
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
PREVIOUS
PREVIOUS
CREATE ARGUMENT Category CODE 103
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 8 -
VALUE "Category"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	echo
SET DEFINITION CODE 21 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	value_required
SET DEFINITION CODE 5 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 0
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
PREVIOUS
PREVIOUS
CREATE ARGUMENT Command CODE 104
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 7 -
VALUE "Command"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 3
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	echo
SET DEFINITION CODE 21 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	value_required
SET DEFINITION CODE 5 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 0
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
PREVIOUS
PREVIOUS
CREATE ARGUMENT Timeout CODE 105
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 7 -
VALUE "Timeout"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 49
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 16
!	echo
SET DEFINITION CODE 21 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	value_required
SET DEFINITION CODE 5 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 0
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
PREVIOUS
PREVIOUS
PREVIOUS
CREATE RESPONSE ScriptCreated CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 14 -
VALUE "Script Created"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 28 -
VALUE "Script created successfully."
PREVIOUS
PREVIOUS
CREATE EXCEPTION ScriptAlreadyExists CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 21 -
VALUE "Script Already Exists"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 44 -
VALUE "Attempt to create duplicate script rejected."
PREVIOUS
PREVIOUS
CREATE EXCEPTION CreateProblems CODE 2
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 15 -
VALUE "Create Problems"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 55 -
VALUE "A MIR error occurred while creating script information."
PREVIOUS
CREATE ARGUMENT MIRStatus CODE 18
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 10 -
VALUE "MIR Status"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 44
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
PREVIOUS
CREATE DIRECTIVE DELETE CODE 13
!	directive_type
SET DEFINITION CODE 20 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 2
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 6 -
VALUE "DELETE"
PREVIOUS
CREATE REQUEST DELETE CODE 13
PREVIOUS
CREATE RESPONSE DeleteSuccess CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 14 -
VALUE "Delete Success"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 28 -
VALUE "Script deleted successfully."
PREVIOUS
PREVIOUS
CREATE EXCEPTION NoScript CODE 2
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 9 -
VALUE "No Script"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 36 -
VALUE "The Script did not exist in the MIR."
PREVIOUS
PREVIOUS
CREATE EXCEPTION DeleteProblems CODE 3
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 15 -
VALUE "Delete Problems"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 55 -
VALUE "A MIR error occurred while deleting script information."
PREVIOUS
CREATE ARGUMENT MIRStatus CODE 18
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 10 -
VALUE "MIR Status"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 44
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
PREVIOUS
CREATE DIRECTIVE SET CODE 2
!	directive_type
SET DEFINITION CODE 20 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	categories
SET DEFINITION CODE 8 TYPE LU COUNT 1 LENGTH 4 -
  VALUE -
0 
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 3 -
VALUE "SET"
PREVIOUS
CREATE REQUEST SET CODE 2
CREATE ARGUMENT AttributeValues CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 16 -
VALUE "Attribute Values"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 66
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	echo
SET DEFINITION CODE 21 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
!	value_required
SET DEFINITION CODE 5 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 0
!	default_allowed
SET DEFINITION CODE 3 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 0
PREVIOUS
PREVIOUS
PREVIOUS
CREATE RESPONSE SetSuccess CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 11 -
VALUE "Set Success"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 36 -
VALUE "Modification completed successfully."
PREVIOUS
CREATE ARGUMENT ArgumentSetList CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 17 -
VALUE "Argument Set List"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 66
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
CREATE EXCEPTION SetIncomplete CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 14 -
VALUE "Set Incomplete"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 28 -
VALUE "Problem modifying attribute."
PREVIOUS
CREATE ARGUMENT ArgumentSetList CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 17 -
VALUE "Argument Set List"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 66
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 65535
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
CREATE EXCEPTION NoScript CODE 2
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 9 -
VALUE "No Script"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 36 -
VALUE "The Script did not exist in the MIR."
PREVIOUS
PREVIOUS
CREATE EXCEPTION SetProblems CODE 3
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 12 -
VALUE "Set Problems"
!	reply_text
SET DEFINITION CODE 19 TYPE T COUNT 1 LENGTH 56 -
VALUE "A MIR error occurred while modifying script information."
PREVIOUS
CREATE ARGUMENT MIRStatus CODE 1
!	presentation_name
SET DEFINITION CODE 6 TYPE T COUNT 1 LENGTH 10 -
VALUE "MIR Status"
!	value_data_type
SET DEFINITION CODE 1 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 44
!	value_length
SET DEFINITION CODE 2 TYPE LU COUNT 1 LENGTH 4 -
  VALUE 4
!	display
SET DEFINITION CODE 9 TYPE BU COUNT 1 LENGTH 1 -
  VALUE 1
PREVIOUS
PREVIOUS
PREVIOUS
PREVIOUS
PREVIOUS
4411.8Its best to use the Developers DictionaryMOLAR::ROBERTSKeith Roberts - Network Management ApplicationsWed Jan 20 1993 14:05106
  Brad,

  Its best to use the Toolkit Developers dictionary when playing around
  with the Script AM (or when developing any MM for that matter).  The
  Developers Dictionary is small .. updates occur pretty quickly and
  you don't lock the system dictionary.

  He is a script to copy the files and setup the logicals 

  /keith

$! **********************************************************************
$! *                                                                    *
$! *  mcc_build_dev_dict.com                                            *
$! *                                                                    *
$! **********************************************************************
$! * ****************************************************************** *
$! * *                                                                * *
$! * *  ************************************************************  * *
$! * *  *                                                          *  * *
$! * *  *   Copyright (c) Digital Equipment Corporation, 1992      *  * *
$! * *  *   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 procedure will build a developers dictionary in the Current
$!  directory by coping the necessary files from the DECmcc Examples
$!  directory.
$!
$  say :== write sys$output
$  cwd = f$environment("default")
$!
$  say "                                                                    "
$  say "  ******************************************************************"
$  say "                                                                    "
$  say "                          DECmcc Toolkit                            "
$  say "                   Build Developers Dictionary                      "
$  say "                                                                    "
$  say "     This script will build the DECmcc Developers Dictionary        "
$  say "     in the current directory, ''cwd'                               "
$  say "     Also, logicals will be set to access your private Dictionary   "
$  say "                                                                    "
$  say "  ******************************************************************"
$  say " "
$!
$  inquire copy_files   "  * Do you want to copy the files   (Y/N) [Y] "
$  say " "
$  inquire purge_files  "  * Do you want to purge files replaced by this script (Y/N) [Y] "
$  say " "
$  inquire set_logicals "  * Do you want to set the logicals (Y/N) [Y] "
$  if (copy_files.EQS."")   then copy_files   = "Y"
$  if (set_logicals.EQS."") then set_logicals = "Y"
$  if (purge_files.EQS."")  then purge_files  = "Y"
$!
$  if (copy_files)
$  then
$    copy mcc_examples:mcc_dev_fdictionary.dat mcc_fdictionary.dat
$    copy mcc_examples:mcc_dev_fdictionary.bpt mcc_fdictionary.bpt
$!
$    say " "
$    say "  Created:  mcc_fdictionary.dat"
$    say "  Created:  mcc_fdictionary.bpt"
$  endif
$!
$  if (purge_files)
$  then
$    purge/nolog mcc_fdictionary.dat
$    purge/nolog mcc_fdictionary.bpt
$  endif
$!
$  if (set_logicals)
$  then
$    define/nolog mcc_system 'cwd',mcc_specific,mcc_common
$!
$    say " "
$    say "  Add to your System or Login startup file:
$    say " "
$    say "      define mcc_system ''cwd',mcc_specific,mcc_common"
$    say " "
$    say " "
$    say "  Building of Developers Dictionary Complete"
$    say " "
$    say " --------------------------------------------------------------"
$    say " "
$    say " "
$  endif
$!
$  exit
4411.9Corrupt dictionaryMOLAR::DFLAT::PLOUFFEJerryWed Jan 20 1993 14:1614
Brad:

  The DAP command file looks fine.  I have seen this kind of situation
  before.  It indicates that your dictionary is corrupt.  I don't want to 
  have to describe the exact situation here, and you probably don't want to
  hear it either, but I'm pretty sure that this is the case.

  Sorry, but there is no recourse other than to start over with a valid
  dictionary. :(

  BTW, was a dictionary LOAD, DELETE or UPDATE command ever interrupted in some
  way?  That is the only situation that I know of that can corrupt a dictionary.

                                                                        - Jerry
4411.10TOOK::GUERTINMCC Managing everything for everyone everywhereThu Jan 21 1993 07:494
    You mean you can't even delete the garbage record by specifying the
    exact class code? (DAP> DELETE CLASS SCRIPT SUBCLASS CODE 920)
    
    -Matt.
4411.11Try it...MOLAR::DFLAT::PLOUFFEJerryThu Jan 21 1993 10:455
Brad:

  Please try Matt's suggestion.  Let us know if it works...

                                                        - Jerry
4411.12loaded and runningCTHQ::WOODCOCKThu Jan 21 1993 15:4512
Sorry, too late. I upgraded yesterday and got back to looking at this before I
read the note. The dictionary still looked incorrect after the upgrade 
but...the load command took.

>>  DAP> DELETE CLASS SCRIPT SUBCLASS CODE 920
    
Actually I had tried   DAP> DELETE CLASS SCRIPT SUBCLASS RPING
which didn't work so I never got a chance to try it using the code number as
suggested above. In any case it is loaded and working.

thanks,
brad...
4411.13Should this be QARed?TOOK::GUERTINMCC Managing everything for everyone everywhereFri Jan 22 1993 07:5713
    The reason I asked about code is that the name (RPING) does not have to
    be in the dictionary for a record to exist, but the number (920) does.
    So by specifying 920, we could make some assumptions about the state of
    the dictionary.
    
    It would be useful to know whether this is a DAP bug or whether you
    inadvertently control-y'ed out (or the process died some horrible
    death) and corrupted the dictionary.  I would not want MCC V1.3 to
    go to SSB with this kind of behavior.
    
    -Matt.
4411.14how it happenedCTHQ::WOODCOCKFri Jan 22 1993 09:2222
>    The reason I asked about code is that the name (RPING) does not have to
>    be in the dictionary for a record to exist, but the number (920) does.
>    So by specifying 920, we could make some assumptions about the state of
>    the dictionary.
    
>    It would be useful to know whether this is a DAP bug or whether you
>    inadvertently control-y'ed out (or the process died some horrible
>    death) and corrupted the dictionary.  I would not want MCC V1.3 to
>    go to SSB with this kind of behavior.
    
There was no inadvertently control-y. I simply missed an edit in the MS file
and loaded it. I had used the DISK MS file as a template and failed to edit

  CHILD ENTITY rping = 920 :  !it was still defined as DISK instead of rping
                               with the 920 code    
    
I then got the load error and all the behaviour decribed in the previous notes.
All the other edits for attributes seem to be fine.

best regards,
brad...
4411.15Developer's Dictionary will be on BMS V1.3 SSB kitMOLAR::BLACKWed Jan 27 1993 09:5312
    
    Per Keith's note (4411.8) and your experience I have added the
    developer's dictionary to the BMS V1.3 SSB kit.  This should 
    accelerate your development cycle and reduce your frustration during
    initial integration.  I will mail you the release note that explains
    how to use the dictionary--your can currently get the dictionary by
    installing the toolkit.
    
    Regards,
    
    Darryl