QuipuNameDefinitions DEFINITIONS ::=
BEGIN

IMPORTS
ABSTRACT-OPERATION, ABSTRACT-ERROR
    FROM AbstractServiceNotation
	{joint-iso-ccitt mhs-motis(6) asdc(2) modules(0) notation(1)}

NameError, ServiceError, SecurityError
    FROM DirctoryAbstractService
	{joint-iso-ccitt ds(5) modules(1) directoryAbstractService(2)}

DistinguishedName, RelativeDistinguishedName, Attribute,
ATTRIBUTE, ATTRIBUTE-SYNTAX, OBJECT-CLASS
    FROM InformationFramework
	{joint-iso-ccitt ds(5) modules(1) informationFramework(1)}

caseIgnoreStringSyntax
    FROM SelectedAttributeTypes
	{joint-iso-ccitt ds(5) modules(1) selectedAttributeTypes(5)}

TreeStructure, ACL, EDBInfo, MasterDSA, SlaveDSA,
DSA, QuipuVersion,
    FROM QuipuDirectoryDefinitions;

quipu OBJECT IDENTIFIER	::= {ccitt data(9) pss(2342) ucl(19200300) quipu(99)}
				-- interim QUIPU OID

attributeType OBJECT IDENTIFIER ::= {quipu attributeType(1)}    

attributeSyntax OBJECT IDENTIFIER ::= {quipu attributeSyntax(2)}

objectClass OBJECT IDENTIFIER ::= {quipu objectClass(3)}

treeStructure TreeStructure ::= {attributeType 1}

acl ACL ::= {attributeType 2}

eDBInfo EDBInfo ::= {attributeType 3}

masterDSA MasterDSA ::= {attributeType 4}

slaveDSA SlaveDSA ::= {attributeType 5}

control DSAControl ::= {attributeType 15}

quipuVersion QuipuVersion ::= {attributeType 16}

quipuDSA QuipuDSA ::= {objectClass 1}

quipuObject OBJECT-CLASS
  SUBCLASS OF TOP
  MUST CONTAIN { aCL}
	::= {objectClass 2}	

quipuNonLeafObject OBJECTCLASS
  SUBCLASS OF quipuObject
  MUST CONTAIN {masterDSA}
  MAY CONTAIN {slaveDSA,treeStructure}
	::= {objectClass 6}

friendlyCountryName ATTRIBUTE
  WITH ATTRIBUTE-SYNTAX
  caseIgnoreStringSyntax
	::= {attributeType 8}
		-- example ``UK'', ``United Kingdom'' etc.

friendlyCountry OBJECT-CLASS
  SUBCLASS OF country, quipuObject
  MUST CONTAIN { friendlyCountryName }
	::= {objectClass 3}

fTAMAddress ATTRIBUTE
  WITH ATTRIBUTE-SYNTAX Presentation Address
	::=  {attributeType 10}

teletexAddress ATTRIBUTE
  WITH ATTRIBUTE-SYNTAX Presentation Address
	::=  {attributeType 11}

nIFTPAddress ATTRIBUTE
  WITH ATTRIBUTE-SYNTAX Presentation Address
	::=  {attributeType 12}

filestore ATTRIBUTE
  WITH ATTRIBUTE-SYNTAX distinguishedNameSyntax
	::= {attributeType 13}

filename ATTRIBUTE
  WITH ATTRIBUTE-SYNTAX caseIgnoreStringSyntax
	::= {attributeType 14}  

filestore OBJECT-CLASS
  SUBCLASS OF quipuObject
  MUST CONTAIN { commonName}
  MAY CONTAIN { fTAMAddress, teletexAddress, nIFTPAddress, description,
	info, seeAlso, localityName, organisationName, organisationUnitName }
::= {objectClass 5}


END