[Search for users]
[Overall Top Noters]
[List of all Conferences]
[Download this site]
| 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 |
1477.0. "Pb with SET datatype with SET directive" by TENERE::HAYES (A European Telecomet ...) Tue Sep 10 1991 10:45
Hello,
I have added a constructed datatypes SET in the MSL
because one of my customers wants to use it.
He wants to use the SET directive on this SETTABLE characteristic attribute,
and it DOES NOT WORK.
1)- The SRM does not forbid it to the best of my knowledge, otherwise
can someone tell me where ?
MCC> SET PBX TOTO SIEVE CONSTRUCT = QualityOfServiceAlarm
The FCL PM complains that this SET datatype is not SETTABLE
The IMPM displays only the severity level rule datatype and
get lost displaying a correct SET window form.
It seems that an in_p can carry such a datatype but not an out_p ..
2)- Can someone explain this to me ?
Any hint is welcome
PS: I attached an extraction of my MSL
Best Regards
Catherine
(*
TITLE: PBX Access Module (AM) Service Interface Specification
MODULE NAME: MCC_PBX_AM_SRVC_IF.MS
Copyright (c) Digital Equipment Corporation, 1180
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.
*)
(*
Facility:
MCC_PBX_AM_SRVC_IF.MS for Toolkit Design Framework MM, PBX.
Abstract:
This module is the management definition (MD) for the PBX AM
Service Interface.
The Entity Model described by this management specification is com-
prised of a global entity class called PBX and a subordinate en-
tity class called PORT. The following diagram models their relation-
ship:
+-----------+
| |
| PBX |
| |
+-----+-----+
|
+-----+-----+
| |
| PORT |
| |
+-----------+
Note that this management specification is, out of necessity, simplistic.
Service interface management specifications that describe actual network
entities should include all information (e.g. Global Entity, Module Enti-
ties, Subordinate Entities, Attributes, Attribute Groups, data Types,
Requests, Responses, Arguments, Exceptions, etc.) that is necessary to
fully define the entity to be managed.
This management specification defines:
The PBX entity and the PBX service commands,
SHOW PBX X ALL CHAR
SET PBX X PACKET THRESHOLD =xx
SHOW PBX X PORT Y ALL CHAR
Author:
Toolkit PL
CATHERINE HAYES
Creation Date: 04-12-90
Modification History:
*)
MANAGEMENT SPECIFICATION MCC_PBX_am_srvc_if;
VERSION = T1.0.1;
SYMBOL-PREFIX = MCC_;
(* BEGIN Type definitions
Note that all TYPE definitions are registered values and must
be unique across DECmcc *)
TYPE
ComparatorType = 3004 (
GreaterThan = 0,
Equals = 1,
LessThan = 2 );
TYPE
SeverityLevels = 3005 (
Critical = 0,
Major = 1,
Minor = 2,
Warning = 3,
Clear = 4,
Indeterminate = 5 );
TYPE
SeverityLevelRule = 3006 RECORD
Comparator = 0 : ComparatorType;
SeverityLevel = 1 : SeverityLevels;
END;
TYPE
TypeRule = 3007 (
ProcessingAlarm =0,
QualityOfServiceAlarm =1,
EquipmentAlarm =2,
EnvironmentalAlarm =3,
TransmissionAlarm =4,
AttributeChangeEvent =5,
SecurityAttackAlarm =6 );
TYPE SieveConstruct = 3009
SET TypeRule,SeverityLevelRule,FullName;
GLOBAL ENTITY PBX = 726 :
IDENTIFIER = ( Name, Number ),
SYMBOL = CLASS_PBX,
(* PBX switches is a Global Entity
and is accessed, in this case, via the PBX AM. *)
IDENTIFIER ATTRIBUTES
ATTRIBUTE Name = 1 : FullName
DNS_IDENT = PRIMARY_NAME,
ACCESS = NONSETABLE,
DISPLAY = TRUE,
SYMBOL = ATTR_NAME,
CATEGORIES = ( CONFIGURATION )
END ATTRIBUTE Name;
ATTRIBUTE Number = 2 : Unsigned32
DNS_IDENT = ALTERNATE_NAME,
ACCESS = NONSETABLE,
DISPLAY = TRUE,
SYMBOL = ATTR_NUMBER,
CATEGORIES = ( CONFIGURATION )
END ATTRIBUTE Number;
END ATTRIBUTES; (* IDENTIFIER *)
CHARACTERISTIC ATTRIBUTES
ATTRIBUTE Sieve Construct = 4 : SieveConstruct
ACCESS = SETTABLE,
DISPLAY = TRUE,
SYMBOL = ATTR_SIEVECON
END ATTRIBUTE Sieve Construct;
ATTRIBUTE Destination Adress = 3 : DestinationAdr
ACCESS = SETTABLE,
DISPLAY = TRUE,
SYMBOL = PBX_ATTR_DESTADR
END ATTRIBUTE Destination Adress;
ATTRIBUTE Region Identifier = 15 : Integer16
ACCESS = SETTABLE,
DISPLAY = TRUE,
SYMBOL = PBX_REGION_ID,
CATEGORIES = ( CONFIGURATION )
END ATTRIBUTE Region Identifier;
ATTRIBUTE Switch Number = 20 : Integer16
ACCESS = SETTABLE,
DISPLAY = TRUE,
SYMBOL = PBX_SWITCH_NB,
CATEGORIES = ( CONFIGURATION )
END ATTRIBUTE Switch Number;
ATTRIBUTE Local Packets Threshold = 25 : Unsigned32
ACCESS = SETTABLE,
DISPLAY = TRUE,
UNITS = "Packets",
SYMBOL = PBX_THLD_LOCAL_PKT,
CATEGORIES = ( CONFIGURATION )
END ATTRIBUTE Local Packets Threshold;
END ATTRIBUTES; (* CHARACTERISTIC *)
DIRECTIVE SHOW = 01 :
DIRECTIVE-TYPE = EXAMINE,
DISPLAY = TRUE,
CATEGORIES = ( CONFIGURATION ),
RESPONSE All Attributes Shown = 1 :
SYMBOL = SHOW_SUCCESS,
TEXT = "Examination of attributes shows :",
ARGUMENT Arg Show Values = 1 : Attrib_List
SYMBOL = ARG_SHOW_VALUES
END ARGUMENT Arg Show Values;
END RESPONSE All Attributes Shown;
EXCEPTION Unsupported Attribute Group = 1 :
SYMBOL = SHOW_UNSUPPORTED_GROUP,
TEXT = "Unsupported attribute group.",
END EXCEPTION Unsupported Attribute Group;
EXCEPTION Encode Errors = 257 :
SYMBOL = ENCODE_ERRORS,
TEXT = "An error occurred while encoding the PBX package",
ARGUMENT ILV Status = 17 : MCCError
SYMBOL = ARG_ILV_STATUS
END ARGUMENT ILV Status;
END EXCEPTION Encode Errors;
EXCEPTION No Instance = 382 : (*change*)
SYMBOL = NO_INSTANCE,
TEXT = "No instance has been created.",
END EXCEPTION No Instance;
EXCEPTION Attributes Not Read = 384 : (*change*)
SYMBOL = ATTRS_NOT_READ,
TEXT = "Data base error while reading rule information.",
ARGUMENT MIR Status = 18 : MCCError
SYMBOL = ARG_MIR_STATUS
END ARGUMENT MIR Status;
END EXCEPTION Attributes Not Read;
END DIRECTIVE SHOW;
DIRECTIVE SET = 2 :
DIRECTIVE-TYPE = MODIFY,
DISPLAY = TRUE,
CATEGORIES = ( CONFIGURATION ),
(* Description: modifies values for specified attribute(s)
attributes must be from the same attribute group *)
REQUEST
ARGUMENT Attribute Values = 5 : Attrib_List
ECHO = TRUE,
DISPLAY = TRUE,
REQUIRED = FALSE,
DEFAULT = NO DEFAULT,
SYMBOL = ARG_SET_VALUE_LIST
END ARGUMENT Attribute Values;
END REQUEST;
RESPONSE Set Complete = 2 :
SYMBOL = SET_SUCCESS,
TEXT = "Modification completed successfully.",
ARGUMENT Argument Set List = 1 : Attrib_List
DISPLAY = TRUE,
SYMBOL = ARG_SET_VALUES
END ARGUMENT Argument Set List;
END RESPONSE Set Complete;
EXCEPTION Set Incomplete = 3 :
SYMBOL = SET_INCOMPLETE,
TEXT = "Problem modifying attribute.",
ARGUMENT Argument Set List = 1 : Attrib_List
DISPLAY = TRUE,
SYMBOL = ARG_SET_LIST
END ARGUMENT Argument Set List;
END EXCEPTION Set Incomplete;
EXCEPTION Attributes Not Read = 384 : (*change*)
SYMBOL = ATTRS_NOT_READ,
TEXT = "Data base error while reading rule information.",
ARGUMENT MIR Status = 18 : MCCError
SYMBOL = ARG_MIR_STATUS
END ARGUMENT MIR Status;
END EXCEPTION Attributes Not Read;
EXCEPTION Encode Errors = 257 : (*change*)
SYMBOL = CHAR_ENCODE_ERROR,
TEXT = "An error occurred while encoding the PBX package",
ARGUMENT ILV Status = 17 : MCCError
SYMBOL = ARG_ILV_STATUS
END ARGUMENT ILV Status;
END EXCEPTION Encode Errors;
END DIRECTIVE SET;
DIRECTIVE Deregister = 30 :
DIRECTIVE-TYPE = ACTION,
DISPLAY = TRUE,
SYMBOL = CONFIG_DEREGISTER,
CATEGORIES = ( CONFIGURATION ),
RESPONSE Deregister Success = 1 :
SYMBOL = DEREGISTER_SUCCESS,
TEXT = "Deregistration Successful",
END RESPONSE Deregister Success;
RESPONSE Deregister No Op = 2 :
SYMBOL = DEREGISTER_NO_OP,
TEXT = "Entity was not registered",
END RESPONSE Deregister No Op;
END DIRECTIVE Deregister;
DIRECTIVE Directory = 26 :
DIRECTIVE-TYPE = EXAMINE,
DISPLAY = TRUE,
SYMBOL = CFG_DIRECTORY,
CATEGORIES = ( CONFIGURATION ),
RESPONSE Directory Success = 1 :
SYMBOL = DIRECTORY_SUCCESS,
TEXT = "Directory successful.",
ARGUMENT Show Values = 1 : ATTRIB_LIST
SYMBOL = SHOW_VALUES
END ARGUMENT Show Values;
END RESPONSE Directory Success;
RESPONSE Directory Empty = 2 :
SYMBOL = DIR_EMPTY,
TEXT = "Empty Group to Directory",
END RESPONSE Directory Empty;
RESPONSE MCC_K_DIR_PARTIAL_SUCCESS = 3 :
SYMBOL = DIR_PARTIAL_SUCCESS,
TEXT = "Directory successful, entity has only been partially registered.",
ARGUMENT MCC_K_DIRECTORY_VALUES = 1 : ATTRIB_LIST
SYMBOL = DIRECTORY_VALUES
END ARGUMENT MCC_K_DIRECTORY_VALUES;
END RESPONSE MCC_K_DIR_PARTIAL_SUCCESS;
(* EXCEPTION Common exceptions only *)
END DIRECTIVE Directory;
DIRECTIVE Register = 29 :
DIRECTIVE-TYPE = ACTION,
DISPLAY = TRUE,
SYMBOL = CONFIG_REGISTER,
CATEGORIES = ( CONFIGURATION ),
REQUEST
ARGUMENT Number = 2 : Unsigned32
REQUIRED = TRUE,
SYMBOL = ARG_REGISTER_NUMBER
END ARGUMENT;
END REQUEST;
RESPONSE Register Success = 1 :
SYMBOL = REGISTER_SUCCESS,
TEXT = "Registration Successful",
END RESPONSE Register Success;
RESPONSE Register Dup = 2 :
SYMBOL = REGISTER_ALRDY_EXISTS,
TEXT = "Entity already registered",
END RESPONSE Register Dup;
RESPONSE PARTIAL_REGISTER = 3 :
SYMBOL = PARTIAL_REGISTER,
TEXT = "Partial registration success, unable to communicate with target. Please retry later to complete the registration.",
END RESPONSE PARTIAL_REGISTER;
RESPONSE ARG_PARTIAL = 4 :
SYMBOL = ARG_PARTIAL,
TEXT = "Partial registration success, required class specific arguments were not supplied.",
END RESPONSE ARG_PARTIAL;
EXCEPTION REG_UNREC_ID = 1 :
SYMBOL = REG_UNREC_ID,
TEXT = "Unrecognized registration name. The namespace name must be a fullname, include a leading ""."".",
END EXCEPTION REG_UNREC_ID;
EXCEPTION REG_BAD_ID = 2 :
SYMBOL = REG_BAD_ID,
TEXT = "The registration name is already used by another entity class.",
END EXCEPTION REG_BAD_ID;
EXCEPTION REG_BAD_DUP = 3 :
SYMBOL = REG_BAD_DUP,
TEXT = "Inconsistent duplicate registration: entity already registered, but ID information is inconsistent with existing registration of this or another entity.",
END EXCEPTION REG_BAD_DUP;
EXCEPTION REG_ID_IN_USE = 4 :
SYMBOL = REG_ID_IN_USE,
TEXT = "Duplicate registration identifier, identifier already in use by another entity.",
ARGUMENT Identifier Already Used = 1 : Attrib_List
DISPLAY = TRUE,
SYMBOL = ARG_DUP_IDENTIFIER
END ARGUMENT Identifier Already Used;
END EXCEPTION REG_ID_IN_USE;
EXCEPTION REG_NS_NOACCESS = 5 :
SYMBOL = REG_NS_NOACCESS,
TEXT = "Unable to register name, problem while accessing the namespace.",
END EXCEPTION REG_NS_NOACCESS;
EXCEPTION REG_NS_PROT = 6 :
SYMBOL = REG_NS_PROT,
TEXT = "Unable to register name, protection violation in the namespace.",
END EXCEPTION REG_NS_PROT;
EXCEPTION REG_NS_NODIR = 7 :
SYMBOL = REG_NS_NODIR,
TEXT = "Unable to register name, required namespace directory does not exist.",
END EXCEPTION REG_NS_NODIR;
EXCEPTION Bad ilv Arguments = 315 :
SYMBOL = BAD_ARGUMENT,
TEXT = "An error occurred while de/encoding the arguments",
ARGUMENT ILV Status = 17 : MCCError
SYMBOL = ARG_ILV_STATUS
END ARGUMENT ILV Status;
END EXCEPTION Bad ilv Arguments;
EXCEPTION DNS error = 316 :
SYMBOL = DNS_ERROR,
TEXT = "An error occurred while calling DNS",
ARGUMENT DNS Status = 18 : MCCError
SYMBOL = ARG_DNS_STATUS
END ARGUMENT DNS Status;
END EXCEPTION DNS error;
EXCEPTION Create entity first = 317 :
SYMBOL = REG_NEEDS_CREATE,
TEXT = "CREATE your entity first",
END EXCEPTION Create entity first ;
EXCEPTION Encode Errors = 257 :
SYMBOL = ENCODE_ERRORS,
TEXT = "An error occurred while encoding the PBX package",
ARGUMENT ILV Status = 17 : MCCError
SYMBOL = ARG_ILV_STATUS
END ARGUMENT ILV Status;
END EXCEPTION Encode Errors;
END DIRECTIVE Register;
DIRECTIVE CREATE = 12 :
DIRECTIVE-TYPE = ACTION,
DISPLAY = TRUE,
SYMBOL = CREATE_INST,
CATEGORIES = ( CONFIGURATION ),
REQUEST
ARGUMENT Region Identifier = 15 : Integer16
ECHO = TRUE,
DISPLAY = TRUE,
REQUIRED = FALSE,
DEFAULT = 1,
SYMBOL = ARG_CREATE_REGION_ID
END ARGUMENT Region Identifier;
ARGUMENT Switch Number = 20 : Integer16
ECHO = TRUE,
DISPLAY = TRUE,
REQUIRED = FALSE,
DEFAULT = 1,
SYMBOL = ARG_CREATE_SWITCH_NB
END ARGUMENT Switch Number ;
ARGUMENT Local Packets Threshold = 25 : Unsigned32
ECHO = TRUE,
DISPLAY = TRUE,
REQUIRED = FALSE,
DEFAULT = 1,
SYMBOL = ARG_CREATE_THLD_LOCAL_PKT
END ARGUMENT Local Packets Threshold ;
ARGUMENT Sieve Construct = 30 : SieveConstruct
ECHO = TRUE,
DISPLAY = TRUE,
REQUIRED = FALSE,
DEFAULT = 1,
SYMBOL = ARG_CREATE_SIEVECON
END ARGUMENT Sieve Construct ;
END REQUEST;
RESPONSE Create Success = 1 :
SYMBOL = CREATE_SUCCESS,
TEXT = "Entity successfully created.",
END RESPONSE Create Success;
EXCEPTION Create Already Exists = 2 :
SYMBOL = CREATE_ALRDY_EXISTS,
TEXT = "Attempt to create duplicate entity rejected.",
END EXCEPTION Create Already Exists;
EXCEPTION No Parent Entity Exists = 3 :
SYMBOL = NO_PARENT_ENTITY,
TEXT = "No Parent Exists for SubEntity",
END EXCEPTION No Parent Entity Exists;
EXCEPTION Mir Access Incomplete = 4 :
SYMBOL = MIR_ACCESS_INCOMPLETE,
TEXT = "Mir access cannot be completed",
ARGUMENT MIR Status = 18 : MCCError
DISPLAY = TRUE,
SYMBOL = ARG_MIR_STATUS
END ARGUMENT MIR Status;
END EXCEPTION Mir Access Incomplete;
EXCEPTION Bad Arguments = 315 :
SYMBOL = BAD_ARGUMENT,
TEXT = "An error occurred while de/encoding the arguments",
ARGUMENT ILV Status = 17 : MCCError
SYMBOL = ARG_ILV_STATUS
END ARGUMENT ILV Status;
END EXCEPTION Bad Arguments;
END DIRECTIVE CREATE;
DIRECTIVE DELETE = 13 :
DIRECTIVE-TYPE = ACTION,
DISPLAY = TRUE,
SYMBOL = DELETE_INST,
CATEGORIES = ( CONFIGURATION ),
REQUEST
(* No arguments *)
END REQUEST;
RESPONSE DELETE Success = 1 :
SYMBOL = DELETE_SUCCESS,
TEXT = "Entity successfully deleted.",
END RESPONSE DELETE Success;
EXCEPTION DELETE Nothing = 2 :
SYMBOL = DELETE_NOTHING,
TEXT = "Entity does not exist ",
END EXCEPTION DELETE Nothing;
EXCEPTION Delete Problems = 3 :
SYMBOL = DELETE_PROBLEMS,
TEXT = "Error while Deleting entity",
END EXCEPTION Delete Problems;
EXCEPTION Mir Access Incomplete = 4 :
SYMBOL = MIR_ACCESS_INCOMPLETE,
TEXT = "Mir access cannot be completed",
ARGUMENT MIR Status = 18 : MCCError
DISPLAY = TRUE,
SYMBOL = ARG_MIR_STATUS
END ARGUMENT MIR Status;
END EXCEPTION Mir Access Incomplete;
EXCEPTION Child Entity Exists = 5 :
SYMBOL = CHILD_ENTITY_EXISTS,
TEXT = "Cannot delete Parent Entity when Children entities exist",
END EXCEPTION Child Entity Exists;
EXCEPTION Bad Arguments = 315 :
SYMBOL = BAD_ARGUMENT,
TEXT = "An error occurred while de/encoding the arguments",
ARGUMENT ILV Status = 17 : MCCError
SYMBOL = ARG_ILV_STATUS
END ARGUMENT ILV Status;
END EXCEPTION Bad Arguments;
END DIRECTIVE DELETE;
END ENTITY PBX;
END SPECIFICATION MCC_PBX_am_srvc_if.
| T.R | Title | User | Personal
Name | Date | Lines |
|---|
| 1477.1 | Have you tried using ADD|REMOVE ? | CHRISB::BRIENEN | DECmcc Bridge|Station|SNMP Management. | Tue Sep 10 1991 13:06 | 0 |
| 1477.2 | Three questions before I try ADD/REMOVE | TENERE::HAYES | A European Telecomet ... | Fri Sep 13 1991 13:20 | 155 |
| Hello,
I have tried again the SieveConstruct attribute with SET to give you more
information.
I will try ADD and REMOVE, but before I have three questions
at the end ...Could you have a look ?
MCC> SET PBX TOTO SIEVE CONSTRUCT = QualityOfServiceAlarm
The FCL PM complains that this SET datatype is not SETTABLE
$mana/enter
DECmcc (V1.1.0)
MCC> set pbx newnew sieve const = ProcessingAlarm
%MCC-E-NOTINPUTDT, no input allowed for datatype
MCC> show pbx newnew all char
*****************************************************
* FCL PM Arguments before call_function: *
*****************************************************
VERB code: 1
PARTITION code: 4
AES dump of ENTITY IN:
depth=1 class code= 726 instance = �
ILV dump of IN_P: in_p is NULL
ILV dump of IN_Q: in_q is NULL
TIME SPEC is: 0, NOW
**********************************************
FCL PM Arguments on return from call_function:
CVR returned:
%MCC-S-COMMON_EXCEPTIO, success with common exception reply
ILV dump of OUT_P:
[ 3 ] (
[ 6 ] (
[ 0 ] (
[ 1 ] 01
[ 2 ] 02 d6
[ 3 ] 01
[ 4 ] 05
[ 5 ] aa 00 04 00 29 cc e0 e5 63 69 8f cc 92 00 0a 00 01 06 6e 65
77 6e 65 77 00 00
)
)
[ 1 ] 02
)
AES dump of ENTITY OUT:
depth=1 class code= 726 instance = �
PBX TENERE_NS:.newnew
AT 11-SEP-1991 08:59:12 Characteristics
No such entity: PBX TENERE_NS:.newnew
Unknown Entity = PBX TENERE_NS:.newnew ,
MCC> create pbx newnew sieve const = EquipmentAlarm
%MCC-E-NOTINPUTDT, no input allowed for datatype
MCC> exit
The IMPM displays the following ADD window .
Region Identifier |_____________________
Switch Number |_____________________
Local Packet Threshold |_____________________
Sieve Construct |_____________________ MB2 expand field ->
I see the enumerated datatype
corresponding to TypeRule
I select AttributeChangeEvent
Comparator |_____________________ MB2 expand field ->
I see the comparators
I select equals
Severity Level |_____________________ MB2 expand field ->
I see the severity enumerated
datatype
I select warning
|_____________________ MB2 expand field ->
I get this
| -
| | I write a fullname here
| -
|
|
|
|___________________
Number |_____________________
For me, this seems to be a logical problem on the IMPM:
- How do I select an item from the SET?
There is no indication of which elements are members of the SET.
- How do the IMPM distinguish between a SET, SEQUENCE and RECORD?
I suppose the SET OF and SEQUENCE OF are simpler since they have the same
datatype.
- Is it possible to update a member of a set?
If possible, how do you select the wanted number of the SET?
In the SRM, V1.1 page 269 (9.3.5 Record) it sayes:
"Record data types differs from Sequence data types, in that Record data types
have names fields which appear in the user representation, where the elements
of a Sequence data type do not have names."
The "missing" presentation name is documented in the SRM:
The record has the Output BNF: <field-name><field-value>
However the SET/SEQUENCE have: <base-value>
One way to handle this is to make a RECORD "container" for all elements in
the SET and SEQUENCE.
QUESTIONS :
- Does this mean that the SET and SEQUENCE datatypes should be avoided because the
IMPM has problems to handle those, and these datatypes should be used
only internally ?
- Do WE DEC plan to include presentation name in these datatypes?
Another question related to SEQUENCE and RECORD:
- Is it possible to define an item as optional?
Best regards
Catherine
|
| 1477.3 | | VERNA::V_GILBERT | | Fri Sep 13 1991 17:49 | 14 |
| Catherine,
1. SET is not an input datatype, but SET OF is.
2. Your definition of SieveConstruct does not look correct. All elements of
a SET OF are of the same base type. It looks like you might want to
define a record with several fields in it. Each field in the record
has its own presentation name and units. Each field has its own datatype.
Or if you do not want presentation names, you could use a SEQUENCE.
I am surprised that the MS compiler allowed your definition of SieveConstruct
through without error, but it does not seem correct to me.
Verna
|