(object Petal
    version    	42
    _written   	"Rose 4.5.8054"
    charSet    	0)

(object Design "Logical View"
    is_unit    	TRUE
    is_loaded  	TRUE
    defaults   	(object defaults
	rightMargin 	0.250000
	leftMargin 	0.250000
	topMargin  	0.250000
	bottomMargin 	0.500000
	pageOverlap 	0.250000
	clipIconLabels 	TRUE
	autoResize 	TRUE
	snapToGrid 	FALSE
	gridX      	16
	gridY      	16
	defaultFont 	(object Font
	    size       	10
	    face       	"Arial"
	    bold       	FALSE
	    italics    	FALSE
	    underline  	FALSE
	    strike     	FALSE
	    color      	0
	    default_color 	TRUE)
	showMessageNum 	3
	showClassOfObject 	TRUE
	notation   	"Unified")
    root_usecase_package 	(object Class_Category "Use Case View"
	quid       	"32FA94490007"
	exportControl 	"Public"
	global     	TRUE
	logical_models 	(list unit_reference_list)
	logical_presentations 	(list unit_reference_list
	    (object UseCaseDiagram "Main"
		quid       	"32FA9449007E"
		title      	"Main"
		zoom       	100
		max_height 	28350
		max_width  	21600
		origin_x   	0
		origin_y   	0
		items      	(list diagram_item_list))))
    root_category 	(object Class_Category "Logical View"
	quid       	"32FA94490006"
	exportControl 	"Public"
	global     	TRUE
	subsystem  	"Component View"
	quidu      	"32FA94490008"
	logical_models 	(list unit_reference_list
	    (object Association "$UNNAMED$0"
		quid       	"32FA954D0243"
		roles      	(list role_list
		    (object Role "theCustomers"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"DataMemberName"
				value      	"$relationship"))
			quid       	"32FA954E014A"
			label      	"theCustomers"
			supplier   	"Logical View::Business Services::Customers"
			quidu      	"32FA94B6003D"
			is_navigable 	TRUE
			is_aggregate 	TRUE)
		    (object Role "colCustomers2"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"DataMemberName"
				value      	"$relationship"))
			quid       	"32FA954E014B"
			label      	"colCustomers2"
			supplier   	"Logical View::Business Services::Customer"
			quidu      	"32FA94BA00BB"
			client_cardinality 	(value cardinality "0..*")
			is_navigable 	TRUE)))
	    (object Association "$UNNAMED$1"
		quid       	"32FA95FB0031"
		roles      	(list role_list
		    (object Role "theShoppingBasket"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"DataMemberName"
				value      	"$relationship"))
			quid       	"32FA95FB0239"
			label      	"theShoppingBasket"
			supplier   	"Logical View::Business Services::ShoppingBasket"
			quidu      	"32FA94A50011"
			is_navigable 	TRUE
			is_aggregate 	TRUE)
		    (object Role "colBasketItems2"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"DataMemberName"
				value      	"$relationship"))
			quid       	"32FA95FB023A"
			label      	"colBasketItems2"
			supplier   	"Logical View::Business Services::ShoppingBasketItem"
			quidu      	"32FA94A8001F"
			client_cardinality 	(value cardinality "0..*")
			exportControl 	"Private"
			is_navigable 	TRUE)))
	    (object Association "$UNNAMED$2"
		quid       	"3303C3710163"
		roles      	(list role_list
		    (object Role "theOrder"
			quid       	"3303C3720331"
			label      	"theOrder"
			supplier   	"Logical View::Business Services::Order"
			quidu      	"32FA94C200D1"
			is_navigable 	TRUE)
		    (object Role "theCustomer"
			quid       	"3303C37203B3"
			label      	"theCustomer"
			supplier   	"Logical View::Business Services::Customer"
			quidu      	"32FA94BA00BB"
			is_navigable 	TRUE)))
	    (object Class_Category "User Services"
		attributes 	(list Attribute_Set
		    (object Attribute
			tool       	"VisualBasic"
			name       	"TierPackage"
			value      	"User Services"))
		quid       	"32FA9449000F"
		documentation 	"User services provide the visual interface for presenting information and gathering data in an application. The user services connect the user with the application and request the business and/or data services needed by the user to execute business tasks."
		visible_categories 	(list visibility_relationship_list
		    (object Visibility_Relationship
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"VisualBasic"
				name       	"TierPackage"
				value      	"Business Services"))
			quid       	"32FA9449001B"
			supplier   	"Logical View::Business Services"
			quidu      	"32FA94490011")
		    (object Visibility_Relationship
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"VisualBasic"
				name       	"TierPackage"
				value      	"Data Services"))
			quid       	"32FA9449001C"
			supplier   	"Logical View::Data Services"
			quidu      	"32FA94490019"))
		exportControl 	"Public"
		subsystem  	"Component View"
		quidu      	"32FA94490008"
		logical_models 	(list unit_reference_list
		    (object Class "Browser"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 222))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	FALSE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94A401DC"
			stereotype 	"Form"
			used_nodes 	(list uses_relationship_list
			    (object Uses_Relationship
				quid       	"32FAA328024E"
				supplier   	"Logical View::Business Services::ShoppingBasket"
				quidu      	"32FA94A50011")
			    (object Uses_Relationship
				quid       	"32FAA3430379"
				supplier   	"Logical View::Business Services::ShoppingBasketItem"
				quidu      	"32FA94A8001F")
			    (object Uses_Relationship
				quid       	"32FAA35402FB"
				supplier   	"Logical View::Business Services::Order"
				quidu      	"32FA94C200D1")
			    (object Uses_Relationship
				quid       	"3303C3180093"
				supplier   	"Logical View::Business Services::Customer"
				quidu      	"32FA94BA00BB"))
			language   	"Visual Basic"))
		logical_presentations 	(list unit_reference_list
		    (object ClassDiagram "Package Overview"
			quid       	"32FA94490010"
			title      	"Package Overview"
			zoom       	100
			max_height 	28350
			max_width  	21600
			origin_x   	0
			origin_y   	0
			items      	(list diagram_item_list))))
	    (object Class_Category "Business Services"
		attributes 	(list Attribute_Set
		    (object Attribute
			tool       	"VisualBasic"
			name       	"TierPackage"
			value      	"Business Services"))
		quid       	"32FA94490011"
		documentation 	"Business services respond to requests from the user (or other business services) in order to execute a business task. They accomplish this by requesting the data services needed and applying formal procedures and business rules to the relevant data. This protocol insulates the user from direct interaction with the database. Because business rules tend to change more frequently than the specific business tasks they support, they are ideal candidates for encapsulating in components that are physically separate from the application logic itself."
		visible_categories 	(list visibility_relationship_list
		    (object Visibility_Relationship
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"VisualBasic"
				name       	"TierPackage"
				value      	"User Services"))
			quid       	"32FA9449001D"
			supplier   	"Logical View::User Services"
			quidu      	"32FA9449000F")
		    (object Visibility_Relationship
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"VisualBasic"
				name       	"TierPackage"
				value      	"Data Services"))
			quid       	"32FA9449001E"
			supplier   	"Logical View::Data Services"
			quidu      	"32FA94490019"))
		exportControl 	"Public"
		subsystem  	"Component View"
		quidu      	"32FA94490008"
		logical_models 	(list unit_reference_list
		    (object Class "ShoppingBasket"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94A50011"
			stereotype 	"Class Module"
			used_nodes 	(list uses_relationship_list
			    (object Uses_Relationship
				quid       	"3303C2FC02F5"
				supplier   	"Logical View::Data Services::Catalog"
				quidu      	"32FA94AD02D9"))
			operations 	(list Operations
			    (object Operation "ItemCount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A50101"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "NextItemNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A50183"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "TotalCost"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A5022E"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A502B0"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "AddItem"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A50332"
				documentation 	
| PGS note 1 - optional arguments must be of type Variant, so Quantity is a Variant even
| though ShoppingBasketItem.Quantity is a long
| PGS note 2 - we do not hold on to the catalogItem pointer we recieve, so it should be released
| when it goes out of scope (i.e. when this method returns)
				
				parameters 	(list Parameters
				    (object Parameter "ByRef catalogItemIn"
					type       	"Object")
				    (object Parameter "ByVal vQuantity"
					type       	"Single")
				    (object Parameter "ByVal vColor"
					type       	"String")
				    (object Parameter "ByVal vSize"
					type       	"String"))
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "RemoveItem"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A6021B"
				parameters 	(list Parameters
				    (object Parameter "ndx"
					type       	"Long"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "RemoveAllItems"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A6030B"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "GetItem"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A60365"
				parameters 	(list Parameters
				    (object Parameter "ByVal itemNum"
					type       	"Long"))
				result     	"Object"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6A501ED"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Terminate"
				quid       	"32FAA6A6007C"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "colBasketItems"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A500CF"
				type       	"Collection")
			    (object ClassAttribute "lngCurrentBasketItem"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A500E3"
				type       	"Long")
			    (object ClassAttribute "lngNextItemNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A500ED"
				type       	"Long")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6A501A7"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "ShoppingBasketItem"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94A8001F"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "ItemNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A8019C"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ItemNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A8023C"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "lNewValue"
					type       	"Long"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A8039A"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A90049"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Quantity"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A901A7"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Quantity"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A90247"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "lNewValue"
					type       	"Long"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Color"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94A903A6"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Color"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AA005E"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Size"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AA01BD"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Size"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AA025D"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "DiscountedPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AA03BB"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "DiscountedPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AB006A"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ExtPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AB01C8"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ExtPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AB0268"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "UpdateItem"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AB03C7"
				documentation 	
| Updates Item Quantity, Color, Size
| Calculates ExtPrice
				
				parameters 	(list Parameters
				    (object Parameter "ByVal vQuantity"
					type       	"Single")
				    (object Parameter "ByVal vColor"
					type       	"String")
				    (object Parameter "ByVal vSize"
					type       	"String"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6A603DA"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6A703C7"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				quid       	"32FAA6A8013E"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "mItemNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A80105"
				type       	"Long")
			    (object ClassAttribute "mProductCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A8011A"
				type       	"Variant")
			    (object ClassAttribute "mQuantity"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A8012E"
				type       	"Long")
			    (object ClassAttribute "mColor"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A80142"
				type       	"Variant")
			    (object ClassAttribute "mSize"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A80156"
				type       	"Variant")
			    (object ClassAttribute "mDiscountedPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A8016A"
				type       	"Variant")
			    (object ClassAttribute "mExtPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A8017E"
				type       	"Variant")
			    (object ClassAttribute "ERROR_SHOPPINGBASKETITEM"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A80192"
				type       	"Variant"
				initv      	"vbObjectError + 0")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6A60394"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "Order"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94C200D1"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "GetSalesTax"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C2026B"
				documentation 	" Calculate SalesTax on Order Item Total"
				parameters 	(list Parameters
				    (object Parameter "strStateOrProvince"
					type       	"String"))
				result     	"Currency"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OrderID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C2030C"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OrderID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C20366"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "lngNewValue"
					type       	"Long"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CustomerID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C30032"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CustomerID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C3008C"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "lngNewValue"
					type       	"Long"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OrderDate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C3014A"
				stereotype 	"Get"
				result     	"Date"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OrderDate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C301A5"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "datNewValue"
					type       	"Date"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "FreightCharge"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C30259"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "FreightCharge"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C302B3"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "varNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "SalesTax"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C30371"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "SalesTax"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C303CB"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "varNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Submit"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C40098"
				parameters 	(list Parameters
				    (object Parameter "ByVal objBasket"
					type       	"Object")
				    (object Parameter "ByVal objCustomer"
					type       	"Object"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ItemTotal"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C4019C"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ItemTotal"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C401F6"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "varNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OrderTotal"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C402AA"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OrderTotal"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C40304"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "varNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "AddItemToOrder"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C403B9"
				parameters 	(list Parameters
				    (object Parameter "ByVal objBasketItem"
					type       	"Object"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Prepare"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C50071"
				documentation 	
| Prepares the Order
| Gets an OrderID from the Order Number Object
| Copies ShoppingBasketItems into the OrderDetailItems Collection
| Calculates ItemTotal, FreightCharge, SalesTax and OrderTotal
|
				
				parameters 	(list Parameters
				    (object Parameter "ByVal objBasket"
					type       	"AWBasket.ShoppingBasket")
				    (object Parameter "ByVal objCustomer"
					type       	"AWCustomer.Customer"))
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "GetOrderID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C50175"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C501CF"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "AddPayment"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C5022A"
				parameters 	(list Parameters
				    (object Parameter "lngOrderID"
					type       	"Long")
				    (object Parameter "strCreditCard"
					type       	"String")
				    (object Parameter "strCardName"
					type       	"String")
				    (object Parameter "strCardNumber"
					type       	"String")
				    (object Parameter "datCardExpire"
					type       	"Date"))
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "AddHeaderToOrder"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C60054"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "UpdateInventory"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C6009A"
				parameters 	(list Parameters
				    (object Parameter "vProductCode"
					type       	"String")
				    (object Parameter "vQuantity"
					type       	"Double"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6AA02C7"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6AB032D"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C2017B"
				type       	"Integer")
			    (object ClassAttribute "lngOrderID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C2018F"
				documentation 	" Order properties"
				type       	"Long")
			    (object ClassAttribute "lngCustomerID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C201A3"
				type       	"Long")
			    (object ClassAttribute "datOrderDate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C201C1"
				type       	"Date")
			    (object ClassAttribute "varItemTotal"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C201D5"
				type       	"Variant")
			    (object ClassAttribute "varSalesTax"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C201E9"
				type       	"Variant")
			    (object ClassAttribute "varFreightCharge"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C20207"
				type       	"Variant")
			    (object ClassAttribute "varOrderTotal"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C2021B"
				type       	"Variant")
			    (object ClassAttribute "lngPaymentID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C20239"
				type       	"Long")
			    (object ClassAttribute "lngNextOrderDetailID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C20257"
				documentation 	" Next OrderDetailID number"
				type       	"Long")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6AA02B3"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "AuthorizePayment"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94C70287"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "AuthorizePayment"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C703B3"
				parameters 	(list Parameters
				    (object Parameter "lngPaymentMethod"
					type       	"Long")
				    (object Parameter "strCardNumber"
					type       	"String")
				    (object Parameter "strCardName"
					type       	"String")
				    (object Parameter "dblCardAmount"
					type       	"Double")
				    (object Parameter "datCardExpire"
					type       	"Date"))
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6AC02CA"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6AD0068"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				quid       	"32FAA6AD019F"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C7039F"
				type       	"Integer")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6AC02C0"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "Payment"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94C90171"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "PostPayment"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94C90261"
				parameters 	(list Parameters
				    (object Parameter "lngOrderID"
					type       	"Long")
				    (object Parameter "strCardType"
					type       	"String")
				    (object Parameter "strCardNumber"
					type       	"String")
				    (object Parameter "strCardName"
					type       	"String")
				    (object Parameter "dblCardAmount"
					type       	"Double")
				    (object Parameter "datCardExpire"
					type       	"Date"))
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "GetPaymentID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94CA017D"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94CA01E1"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6AE0074"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6AE01F0"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C9024D"
				type       	"Integer")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6AE0060"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "SalesTax"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94CA03A3"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "GetSalesTax"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94CB0098"
				parameters 	(list Parameters
				    (object Parameter "strState"
					type       	"String")
				    (object Parameter "lngSalesAmount"
					type       	"Long"))
				result     	"Double"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6AF006B"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6AF0198"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				quid       	"32FAA6AF0260"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CB007A"
				type       	"Integer")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6AF0057"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "TakeANumber"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94CC0021"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "GetAscendingFast"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94CC01E4"
				parameters 	(list Parameters
				    (object Parameter "strPropGroupIn"
					type       	"String"))
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "SpamInit"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94CC02D4"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "GetAscendingSequential"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94CC034C"
				parameters 	(list Parameters
				    (object Parameter "strPropGroupIn"
					type       	"String"))
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6B000F9"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6B00316"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				quid       	"32FAA6B10028"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "incQty"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC0107"
				type       	"Variant"
				initv      	"100")
			    (object ClassAttribute "brsOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC011B"
				type       	"Integer")
			    (object ClassAttribute "strError"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC012F"
				type       	"String")
			    (object ClassAttribute "strPropGroup"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC01B2"
				type       	"String")
			    (object ClassAttribute "lngNextNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC01D0"
				type       	"Long")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6B000EF"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "TakeANumberUpdate"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94CD02A3"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "Update"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94CE0024"
				parameters 	(list Parameters
				    (object Parameter "vInc"
					type       	"Long")
				    (object Parameter "vmyPropGroup"
					type       	"String"))
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6B1032B"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6B200FC"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				quid       	"32FAA6B20246"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "ERROR_NUMBER"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CD03A8"
				type       	"Variant"
				initv      	"vbObjectError + 0")
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CD03DA"
				type       	"Integer")
			    (object ClassAttribute "brsOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CE0010"
				type       	"Boolean")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6B10317"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "Customer"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94BA00BB"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "CustomerID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BA0314"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CustomerID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BA0382"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CustomerFirstName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BB0077"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CustomerFirstName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BB00E5"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CustomerLastName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BB01CB"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CustomerLastName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BB022F"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "BillingAddress"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BB0316"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "BillingAddress"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BB0384"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "City"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BC0082"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "City"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BC00E6"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "StateOrProvince"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BC01CD"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "StateOrProvince"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BC023B"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "PostalCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BC0321"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "PostalCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BC038F"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Country"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BD008E"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Country"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BD00F2"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "PhoneNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BD01D8"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "PhoneNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BD0246"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "EmailAddress"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BD0322"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "EmailAddress"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BD0391"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CreditCard"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BE008F"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CreditCard"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BE00FD"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CardName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BE01D9"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CardName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BE0248"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CardNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BE032E"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CardNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BE039C"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CardExpire"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BF009A"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "CardExpire"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BF00FF"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Save"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BF01E5"
				documentation 	" Writes customer record to DB, Sets CustomerID property"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BF0235"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94BF02A3"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6B700DB"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "mCustomerID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA015C"
				documentation 	" Object properties"
				type       	"Variant")
			    (object ClassAttribute "mCustomerFirstName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA017A"
				type       	"Variant")
			    (object ClassAttribute "mCustomerLastName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA018E"
				type       	"Variant")
			    (object ClassAttribute "mBillingAddress"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA01A2"
				type       	"Variant")
			    (object ClassAttribute "mCity"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA01B6"
				type       	"Variant")
			    (object ClassAttribute "mStateOrProvince"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA01CA"
				type       	"Variant")
			    (object ClassAttribute "mPostalCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA01DE"
				type       	"Variant")
			    (object ClassAttribute "mCountry"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA01FC"
				type       	"Variant")
			    (object ClassAttribute "mPhoneNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA0210"
				type       	"Variant")
			    (object ClassAttribute "mEmailAddress"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA022E"
				type       	"Variant")
			    (object ClassAttribute "mCreditCard"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA0242"
				type       	"Variant")
			    (object ClassAttribute "mCardNumber"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA0260"
				type       	"Variant")
			    (object ClassAttribute "mCardName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA027E"
				type       	"Variant")
			    (object ClassAttribute "mCardExpire"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA0292"
				type       	"Variant")
			    (object ClassAttribute "bEnvOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA02E2"
				type       	"Integer")
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA0300"
				type       	"Integer")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6B700C7"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class_Utility "Main"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 29)))
			quid       	"3303A89500B4"
			documentation 	"The main subroutine of the application"
			stereotype 	"Module"
			operations 	(list Operations
			    (object Operation "Main"
				quid       	"3303A8990244"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0))
			language   	"Visual Basic")
		    (object Class "Customers"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94B6003D"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "Class_Terminate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B6014C"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "CustomerCount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B601BA"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "AddCustomer"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B60228"
				parameters 	(list Parameters
				    (object Parameter "ByVal vCustomerID"
					type       	"Variant")
				    (object Parameter "ByVal vCustomerFirstName"
					type       	"Variant")
				    (object Parameter "ByVal vCustomerLastName"
					type       	"Variant")
				    (object Parameter "ByVal vBillingAddress"
					type       	"Variant")
				    (object Parameter "ByVal vCity"
					type       	"Variant")
				    (object Parameter "ByVal vStateOrProvince"
					type       	"Variant")
				    (object Parameter "ByVal vPostalCode"
					type       	"Variant")
				    (object Parameter "ByVal vCountry"
					type       	"Variant")
				    (object Parameter "ByVal vPhoneNumber"
					type       	"Variant")
				    (object Parameter "ByVal vEmailAddress"
					type       	"Variant"))
				result     	"Object"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "RemoveCustomer"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B70374"
				parameters 	(list Parameters
				    (object Parameter "ndx"
					type       	"Integer"))
				result     	"Integer"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "LookupCustomerByLastName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B8005E"
				documentation 	
| LookupCustomerByLastName adds customers to the collection
| It sets the current customer to 1
| It returns the number of customers found and put into the collection
| Returns an error if anything goes wrong
| Client can enumerate the customers by calling GetCustomer repeatedly
|
				
				parameters 	(list Parameters
				    (object Parameter "ByVal vCustomerLastName"
					type       	"Variant"))
				result     	"Integer"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "LookupCustomerByID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B80127"
				parameters 	(list Parameters
				    (object Parameter "ByVal vCustomerID"
					type       	"Variant"))
				result     	"AWCustomer.Customer"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "GetCustomer"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B801F9"
				documentation 	
| GetCustomer returns a Customer in the collection
| It returns an error if the collection is empty
| To enumurate customers 2..n, make repeated calls to GetCustomer
|
				
				result     	"Object"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6A90121"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6A90370"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B60110"
				type       	"Integer")
			    (object ClassAttribute "colCustomers"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B60124"
				type       	"Collection")
			    (object ClassAttribute "lngCurrentCustomer"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B60138"
				type       	"Long")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6A9010D"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Association "$UNNAMED$3"
			quid       	"32FA94A800F1"
			roles      	(list role_list
			    (object Role "$UNNAMED$4"
				quid       	"32FA94A800FB"
				supplier   	"Logical View::Business Services::ShoppingBasketItem"
				quidu      	"32FA94A8001F")
			    (object Role "ctxObject"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94A800FC"
				label      	"ctxObject"
				supplier   	"Logical View::Business Services::MTxAS::ObjectContext"
				quidu      	"32EF92EA0157"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$5"
			quid       	"32FA94B600E8"
			roles      	(list role_list
			    (object Role "$UNNAMED$6"
				quid       	"32FA94B600E9"
				supplier   	"Logical View::Business Services::Customers"
				quidu      	"32FA94B6003D")
			    (object Role "ctxObject"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B600EA"
				label      	"ctxObject"
				supplier   	"Logical View::Business Services::MTxAS::ObjectContext"
				quidu      	"32EF92EA0157"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$7"
			quid       	"32FA94B600FC"
			roles      	(list role_list
			    (object Role "$UNNAMED$8"
				quid       	"32FA94B600FD"
				supplier   	"Logical View::Business Services::Customers"
				quidu      	"32FA94B6003D")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B600FE"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$9"
			quid       	"32FA94C20167"
			roles      	(list role_list
			    (object Role "$UNNAMED$10"
				quid       	"32FA94C20168"
				supplier   	"Logical View::Business Services::Order"
				quidu      	"32FA94C200D1")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C20169"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$11"
			quid       	"32FA94C7036D"
			roles      	(list role_list
			    (object Role "$UNNAMED$12"
				quid       	"32FA94C7036E"
				supplier   	"Logical View::Business Services::AuthorizePayment"
				quidu      	"32FA94C70287")
			    (object Role "ctxObject"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C7036F"
				label      	"ctxObject"
				supplier   	"Logical View::Business Services::MTxAS::ObjectContext"
				quidu      	"32EF92EA0157"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$13"
			quid       	"32FA94C70381"
			roles      	(list role_list
			    (object Role "$UNNAMED$14"
				quid       	"32FA94C70382"
				supplier   	"Logical View::Business Services::AuthorizePayment"
				quidu      	"32FA94C70287")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C70383"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$15"
			quid       	"32FA94C9021B"
			roles      	(list role_list
			    (object Role "$UNNAMED$16"
				quid       	"32FA94C9021C"
				supplier   	"Logical View::Business Services::Payment"
				quidu      	"32FA94C90171")
			    (object Role "ctxObject"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C9021D"
				label      	"ctxObject"
				supplier   	"Logical View::Business Services::MTxAS::ObjectContext"
				quidu      	"32EF92EA0157"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$17"
			quid       	"32FA94C90239"
			roles      	(list role_list
			    (object Role "$UNNAMED$18"
				quid       	"32FA94C9023A"
				supplier   	"Logical View::Business Services::Payment"
				quidu      	"32FA94C90171")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94C9023B"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$19"
			quid       	"32FA94CB0066"
			roles      	(list role_list
			    (object Role "$UNNAMED$20"
				quid       	"32FA94CB0067"
				supplier   	"Logical View::Business Services::SalesTax"
				quidu      	"32FA94CA03A3")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CB0068"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$21"
			quid       	"32FA94CC00E9"
			roles      	(list role_list
			    (object Role "$UNNAMED$22"
				quid       	"32FA94CC00EA"
				supplier   	"Logical View::Business Services::TakeANumber"
				quidu      	"32FA94CC0021")
			    (object Role "ctxObject"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC00EB"
				label      	"ctxObject"
				supplier   	"Logical View::Business Services::MTxAS::ObjectContext"
				quidu      	"32EF92EA0157"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$23"
			quid       	"32FA94CC014D"
			roles      	(list role_list
			    (object Role "$UNNAMED$24"
				quid       	"32FA94CC014E"
				supplier   	"Logical View::Business Services::TakeANumber"
				quidu      	"32FA94CC0021")
			    (object Role "spmMgr"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC014F"
				label      	"spmMgr"
				supplier   	"SharedPropertyGroupManager"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$25"
			quid       	"32FA94CC0161"
			roles      	(list role_list
			    (object Role "$UNNAMED$26"
				quid       	"32FA94CC0162"
				supplier   	"Logical View::Business Services::TakeANumber"
				quidu      	"32FA94CC0021")
			    (object Role "spmGroup"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC0163"
				label      	"spmGroup"
				supplier   	"SharedPropertyGroup"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$27"
			quid       	"32FA94CC017F"
			roles      	(list role_list
			    (object Role "$UNNAMED$28"
				quid       	"32FA94CC0180"
				supplier   	"Logical View::Business Services::TakeANumber"
				quidu      	"32FA94CC0021")
			    (object Role "spmPropMaxNum"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC0181"
				label      	"spmPropMaxNum"
				supplier   	"SharedProperty"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$29"
			quid       	"32FA94CC0193"
			roles      	(list role_list
			    (object Role "$UNNAMED$30"
				quid       	"32FA94CC0194"
				supplier   	"Logical View::Business Services::TakeANumber"
				quidu      	"32FA94CC0021")
			    (object Role "spmPropNextNum"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CC019D"
				label      	"spmPropNextNum"
				supplier   	"SharedProperty"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$31"
			quid       	"32FA94CD0394"
			roles      	(list role_list
			    (object Role "$UNNAMED$32"
				quid       	"32FA94CD0395"
				supplier   	"Logical View::Business Services::TakeANumberUpdate"
				quidu      	"32FA94CD02A3")
			    (object Role "ctxObject"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CD0396"
				label      	"ctxObject"
				supplier   	"Logical View::Business Services::MTxAS::ObjectContext"
				quidu      	"32EF92EA0157"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$33"
			quid       	"32FA94CD03C6"
			roles      	(list role_list
			    (object Role "$UNNAMED$34"
				quid       	"32FA94CD03C7"
				supplier   	"Logical View::Business Services::TakeANumberUpdate"
				quidu      	"32FA94CD02A3")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94CD03C8"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$35"
			quid       	"3304E3050316"
			roles      	(list role_list
			    (object Role "colCustomers2"
				quid       	"3304E3050317"
				label      	"colCustomers2"
				supplier   	"Logical View::Business Services::Customers"
				quidu      	"32FA94B6003D"
				client_cardinality 	(value cardinality "0..*")
				is_navigable 	TRUE)
			    (object Role "theCustomers"
				quid       	"3304E3050318"
				label      	"theCustomers"
				supplier   	"Logical View::Business Services::Customers"
				quidu      	"32FA94B6003D"
				is_navigable 	TRUE
				is_aggregate 	TRUE)))
		    (object Class_Category "MTxAS"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"HelpFile"
				value      	"C:\\MTX\\help\\mtx10.hlp")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"HelpContext"
				value      	"0"))
			quid       	"32EF92E903A9"
			documentation 	"This is the class library for Microsoft Transaction Services"
			exportControl 	"Public"
			logical_models 	(list unit_reference_list
			    (object Class "ObjectControl"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ImplementationType"
					value      	("ImplementationTypeSet" 201))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"HelpFile"
					value      	"C:\\MTX\\help\\mtx10.hlp")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"HelpContext"
					value      	"2120434"))
				quid       	"32EF92EA002E"
				documentation 	"ObjectControl"
				stereotype 	"Interface"
				operations 	(list Operations
				    (object Operation "Activate"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA006D"
					documentation 	"Called when this object is Activated"
					result     	"HRESULT"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "Deactivate"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA007D"
					documentation 	"Called when this object is Deactivated"
					result     	"HRESULT"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "CanBePooled"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA008C"
					documentation 	"Called when deactivated to see if this object can be pooled."
					parameters 	(list Parameters
					    (object Parameter "ByRef pbPoolable"
						type       	"Boolean"))
					result     	"HRESULT"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0))
				language   	"Visual Basic")
			    (object Class "AppServer"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ImplementationType"
					value      	("ImplementationTypeSet" 201)))
				quid       	"32EF92EA00AB"
				stereotype 	"Interface"
				operations 	(list Operations
				    (object Operation "GetObjectContext"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA00DA"
					documentation 	"Returns the current context for the object."
					result     	"ObjectContext"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "SafeRef"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA00EA"
					documentation 	"Returns a wrapped MTx reference."
					parameters 	(list Parameters
					    (object Parameter "ByVal vRefIn"
						type       	"Variant"))
					result     	"Variant"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0))
				language   	"Visual Basic")
			    (object Class "IMTxAS"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ImplementationType"
					value      	("ImplementationTypeSet" 201)))
				quid       	"32EF92EA00FB"
				stereotype 	"Interface"
				operations 	(list Operations
				    (object Operation "GetObjectContext"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA0138"
					documentation 	"Returns the current context for the object."
					result     	"ObjectContext"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "SafeRef"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA0139"
					documentation 	"Returns a wrapped MTx reference."
					parameters 	(list Parameters
					    (object Parameter "ByVal vRefIn"
						type       	"Variant"))
					result     	"Variant"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0))
				language   	"Visual Basic")
			    (object Class "ObjectContext"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ImplementationType"
					value      	("ImplementationTypeSet" 201))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"HelpFile"
					value      	"C:\\MTX\\help\\mtx10.hlp")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"HelpContext"
					value      	"2120409"))
				quid       	"32EF92EA0157"
				documentation 	
|ObjectContext - Each Object has an ObjectContext, provided by the Transction Server. The GetObjectContext API gets a reference to the Context, which provides Transaction and Security Identity.
|
|Example:
|
|Context = GetObjectContext()
|Account = Context.CreateInstance("Account")
| ' Instance of Account instantiated, and   
| ' Account methods can be called
|
|OK: Context.SetComplete
|ERR: Context.SetAbort
|
				
				stereotype 	"Interface"
				operations 	(list Operations
				    (object Operation "CreateInstance"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA0186"
					documentation 	"Creates an object using current object's context."
					parameters 	(list Parameters
					    (object Parameter "ByVal bstrProgID"
						type       	"String"))
					result     	"Variant"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "SetComplete"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA0196"
					documentation 	"Indicates that the object has completed its work and a transaction can be committed."
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "SetAbort"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA01A5"
					documentation 	"Indicates that the object has completed its work and the transaction must be aborted."
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "EnableCommit"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA01B5"
					documentation 	"Indicates that the object is not yet finished its work but would allow the transaction to commit."
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "DisableCommit"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA01B6"
					documentation 	"Indicates that the object is not yet finished its work and any attempt to commit the transaction will force an abort."
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "IsInTransaction"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA01C5"
					documentation 	"Returns TRUE if this object context has an active transaction."
					result     	"Boolean"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "IsSecurityEnabled"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA01D4"
					documentation 	"Returns TRUE if security is enabled."
					result     	"Boolean"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0)
				    (object Operation "IsCallerInRole"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"OperationKind"
						value      	("OperationKindSet" 205)))
					quid       	"32EF92EA01E4"
					documentation 	"Returns TRUE if the caller's Userid is included in the identified role."
					parameters 	(list Parameters
					    (object Parameter "ByVal bstrRole"
						type       	"String"))
					result     	"Boolean"
					concurrency 	"Sequential"
					opExportControl 	"Public"
					uid        	0))
				language   	"Visual Basic"))
			logical_presentations 	(list unit_reference_list
			    (object ClassDiagram "Package Overview"
				quid       	"32EF92EA000F"
				title      	"Package Overview"
				zoom       	100
				max_height 	28350
				max_width  	21600
				origin_x   	0
				origin_y   	0
				items      	(list diagram_item_list
				    (object ClassView "Class" "Logical View::Business Services::MTxAS::ObjectControl" @1
					ShowCompartmentStereotypes 	TRUE
					IncludeAttribute 	TRUE
					IncludeOperation 	TRUE
					location   	(244, 515)
					label      	(object ItemLabel
					    Parent_View 	@1
					    location   	(81, 406)
					    nlines     	1
					    max_width  	326
					    justify    	0
					    label      	"ObjectControl")
					stereotype 	(object ItemLabel
					    Parent_View 	@1
					    location   	(81, 356)
					    anchor     	10
					    nlines     	1
					    max_width  	326
					    justify    	0
					    label      	"<<Interface>>")
					icon       	"Interface"
					icon_style 	"Label"
					quidu      	"32EF92EA002E"
					compartment 	(object Compartment
					    Parent_View 	@1
					    location   	(81, 466)
					    icon_style 	"Icon"
					    anchor     	2
					    nlines     	4
					    max_width  	331)
					width      	344
					height     	342
					annotation 	8)
				    (object ClassView "Class" "Logical View::Business Services::MTxAS::AppServer" @2
					ShowCompartmentStereotypes 	TRUE
					IncludeAttribute 	TRUE
					IncludeOperation 	TRUE
					location   	(239, 154)
					label      	(object ItemLabel
					    Parent_View 	@2
					    location   	(37, 70)
					    nlines     	1
					    max_width  	404
					    justify    	0
					    label      	"AppServer")
					stereotype 	(object ItemLabel
					    Parent_View 	@2
					    location   	(37, 20)
					    anchor     	10
					    nlines     	1
					    max_width  	404
					    justify    	0
					    label      	"<<Interface>>")
					icon       	"Interface"
					icon_style 	"Label"
					quidu      	"32EF92EA00AB"
					compartment 	(object Compartment
					    Parent_View 	@2
					    location   	(37, 130)
					    icon_style 	"Icon"
					    anchor     	2
					    nlines     	3
					    max_width  	409)
					width      	422
					height     	292
					annotation 	8)
				    (object ClassView "Class" "Logical View::Business Services::MTxAS::IMTxAS" @3
					ShowCompartmentStereotypes 	TRUE
					IncludeAttribute 	TRUE
					IncludeOperation 	TRUE
					location   	(230, 878)
					label      	(object ItemLabel
					    Parent_View 	@3
					    location   	(28, 794)
					    nlines     	1
					    max_width  	404
					    justify    	0
					    label      	"IMTxAS")
					stereotype 	(object ItemLabel
					    Parent_View 	@3
					    location   	(28, 744)
					    anchor     	10
					    nlines     	1
					    max_width  	404
					    justify    	0
					    label      	"<<Interface>>")
					icon       	"Interface"
					icon_style 	"Label"
					quidu      	"32EF92EA00FB"
					compartment 	(object Compartment
					    Parent_View 	@3
					    location   	(28, 854)
					    icon_style 	"Icon"
					    anchor     	2
					    nlines     	3
					    max_width  	409)
					width      	422
					height     	292
					annotation 	8)
				    (object ClassView "Class" "Logical View::Business Services::MTxAS::ObjectContext" @4
					ShowCompartmentStereotypes 	TRUE
					IncludeAttribute 	TRUE
					IncludeOperation 	TRUE
					location   	(715, 515)
					label      	(object ItemLabel
					    Parent_View 	@4
					    location   	(512, 281)
					    nlines     	1
					    max_width  	406
					    justify    	0
					    label      	"ObjectContext")
					stereotype 	(object ItemLabel
					    Parent_View 	@4
					    location   	(512, 231)
					    anchor     	10
					    nlines     	1
					    max_width  	406
					    justify    	0
					    label      	"<<Interface>>")
					icon       	"Interface"
					icon_style 	"Label"
					quidu      	"32EF92EA0157"
					compartment 	(object Compartment
					    Parent_View 	@4
					    location   	(512, 341)
					    icon_style 	"Icon"
					    anchor     	2
					    nlines     	9
					    max_width  	412)
					width      	424
					height     	592
					annotation 	8)))))
		    (object Class_Category "RDO"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"HelpFile"
				value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"HelpContext"
				value      	"310312"))
			quid       	"32EE5A2A0064"
			documentation 	"RDO Objects and Collections provide a framework for  using code to create and manipulate components of a remote ODBC database system. "
			exportControl 	"Public"
			logical_models 	(list unit_reference_list
			    (object Association "$UNNAMED$36"
				quid       	"32EE5A4E03C0"
				roles      	(list role_list
				    (object Role "$UNNAMED$37"
					quid       	"32EE5A4E03C1"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEngine"
					quidu      	"32EE5A4100E6")
				    (object Role "<<Get>> rdoEnvironments"
					quid       	"32EE5A4F000A"
					documentation 	"Contains all active rdoEnvironment objects of the rdoEngine object"
					label      	"<<Get>> rdoEnvironments"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironments"
					quidu      	"32EE5B380295"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$38"
				quid       	"32EE5A4F0078"
				roles      	(list role_list
				    (object Role "$UNNAMED$39"
					quid       	"32EE5A4F0079"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEngine"
					quidu      	"32EE5A4100E6")
				    (object Role "<<Get>> rdoErrors"
					quid       	"32EE5A4F007A"
					documentation 	"Contains all stored rdoError objects"
					label      	"<<Get>> rdoErrors"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoErrors"
					quidu      	"32EE5B5C0212"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$40"
				quid       	"32EE5A4F007B"
				roles      	(list role_list
				    (object Role "$UNNAMED$41"
					quid       	"32EE5A4F007C"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEngine"
					quidu      	"32EE5A4100E6")
				    (object Role "<<Get>> rdoDefaultCursorDriver"
					quid       	"32EE5A4F007D"
					documentation 	"Indicates where cursors are created"
					label      	"<<Get>> rdoDefaultCursorDriver"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::CursorDriverConstants"
					quidu      	"32EE5A30001E"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$42"
				quid       	"32EE5A4F029E"
				roles      	(list role_list
				    (object Role "$UNNAMED$43"
					quid       	"32EE5A4F029F"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEngine"
					quidu      	"32EE5A4100E6")
				    (object Role "<<Get>> rdoLocaleID"
					quid       	"32EE5A4F02A0"
					documentation 	"Locale ID used to load resources"
					label      	"<<Get>> rdoLocaleID"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::rdoLocaleIDConstants"
					quidu      	"32EE5A380000"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$44"
				quid       	"32EE5A700352"
				roles      	(list role_list
				    (object Role "$UNNAMED$45"
					quid       	"32EE5A700353"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
					quidu      	"32EE5A5300F0")
				    (object Role "<<Get>> rdoTables"
					quid       	"32EE5A700354"
					documentation 	"Contains all rdoTable objects in a database"
					label      	"<<Get>> rdoTables"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoTables"
					quidu      	"32EE5B17028D"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$46"
				quid       	"32EE5A700387"
				roles      	(list role_list
				    (object Role "$UNNAMED$47"
					quid       	"32EE5A700388"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
					quidu      	"32EE5A5300F0")
				    (object Role "<<Get>> rdoResultsets"
					quid       	"32EE5A700389"
					documentation 	"Contains all open rdoResultset objects in an rdoConnection"
					label      	"<<Get>> rdoResultsets"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultsets"
					quidu      	"32EE5B2F01B8"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$48"
				quid       	"32EE5A71000A"
				roles      	(list role_list
				    (object Role "$UNNAMED$49"
					quid       	"32EE5A710046"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
					quidu      	"32EE5A5300F0")
				    (object Role "<<Get>> LastQueryResults"
					quid       	"32EE5A710047"
					documentation 	"The last resultset returned by a call on the connection to a prepared statement"
					label      	"<<Get>> LastQueryResults"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
					quidu      	"32EE5A8900E6"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$50"
				quid       	"32EE5A710048"
				roles      	(list role_list
				    (object Role "$UNNAMED$51"
					quid       	"32EE5A710049"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
					quidu      	"32EE5A5300F0")
				    (object Role "<<Get>> CursorDriver"
					quid       	"32EE5A71004A"
					documentation 	"Determines where the cursor is to be created"
					label      	"<<Get>> CursorDriver"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::CursorDriverConstants"
					quidu      	"32EE5A30001E"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$52"
				quid       	"32EE5A7100B4"
				roles      	(list role_list
				    (object Role "$UNNAMED$53"
					quid       	"32EE5A7100B5"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
					quidu      	"32EE5A5300F0")
				    (object Role "<<Get>> rdoQueries"
					quid       	"32EE5A7100B6"
					documentation 	"rdoQueries collection"
					label      	"<<Get>> rdoQueries"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQueries"
					quidu      	"32EE5B510033"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$54"
				quid       	"32EE5A840230"
				roles      	(list role_list
				    (object Role "$UNNAMED$55"
					quid       	"32EE5A840231"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumn"
					quidu      	"32EE5A7100E6")
				    (object Role "<<Get>> Type"
					quid       	"32EE5A840232"
					documentation 	"Indicates the type or data type of an object"
					label      	"<<Get>> Type"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::DataTypeConstants"
					quidu      	"32EE5A340399"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$56"
				quid       	"32EE5A84029E"
				roles      	(list role_list
				    (object Role "$UNNAMED$57"
					quid       	"32EE5A84029F"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumn"
					quidu      	"32EE5A7100E6")
				    (object Role "<<Get>> Attributes"
					quid       	"32EE5A8402A0"
					documentation 	"Indicates characteristics of an rdoColumn object"
					label      	"<<Get>> Attributes"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::AttributeConstants"
					quidu      	"32EE5A3400D2"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$58"
				quid       	"32EE5A84037A"
				roles      	(list role_list
				    (object Role "$UNNAMED$59"
					quid       	"32EE5A84037B"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumn"
					quidu      	"32EE5A7100E6")
				    (object Role "<<Get>> Status"
					quid       	"32EE5A84037C"
					documentation 	"Returns/Sets the column buffer status"
					label      	"<<Get>> Status"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::ColumnStatusConstants"
					quidu      	"32EE5A3C0078"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$60"
				quid       	"32EE5A8900B4"
				roles      	(list role_list
				    (object Role "$UNNAMED$61"
					quid       	"32EE5A8900B5"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoTable"
					quidu      	"32EE5A8403B6")
				    (object Role "<<Get>> rdoColumns"
					quid       	"32EE5A8900B6"
					documentation 	"Contains stored rdoColumn objects"
					label      	"<<Get>> rdoColumns"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumns"
					quidu      	"32EE5B0E03D4"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$62"
				quid       	"32EE5AB70028"
				roles      	(list role_list
				    (object Role "$UNNAMED$63"
					quid       	"32EE5AB70029"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
					quidu      	"32EE5A8900E6")
				    (object Role "<<Get>> rdoColumns"
					quid       	"32EE5AB7002A"
					documentation 	"Contains stored rdoColumn objects"
					label      	"<<Get>> rdoColumns"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumns"
					quidu      	"32EE5B0E03D4"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$64"
				quid       	"32EE5AB70064"
				roles      	(list role_list
				    (object Role "$UNNAMED$65"
					quid       	"32EE5AB70065"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
					quidu      	"32EE5A8900E6")
				    (object Role "<<Get>> Type"
					quid       	"32EE5AB70066"
					documentation 	"Indicates the type or data type of an object"
					label      	"<<Get>> Type"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::ResultsetTypeConstants"
					quidu      	"32EE5A33014B"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$66"
				quid       	"32EE5AB70104"
				roles      	(list role_list
				    (object Role "$UNNAMED$67"
					quid       	"32EE5AB70105"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
					quidu      	"32EE5A8900E6")
				    (object Role "<<Get>> ActiveConnection"
					quid       	"32EE5AB70106"
					documentation 	"Returns/Sets the parent connection object."
					label      	"<<Get>> ActiveConnection"
					supplier   	"_rdoConnection"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$68"
				quid       	"32EE5AB70140"
				roles      	(list role_list
				    (object Role "$UNNAMED$69"
					quid       	"32EE5AB70141"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
					quidu      	"32EE5A8900E6")
				    (object Role "<<Get>> LockType"
					quid       	"32EE5AB70142"
					documentation 	"Determines the type of concurrency handling"
					label      	"<<Get>> LockType"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::LockTypeConstants"
					quidu      	"32EE5A3102A9"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$70"
				quid       	"32EE5AB70172"
				roles      	(list role_list
				    (object Role "$UNNAMED$71"
					quid       	"32EE5AB70173"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
					quidu      	"32EE5A8900E6")
				    (object Role "<<Get>> Status"
					quid       	"32EE5AB701AE"
					documentation 	"Current row status"
					label      	"<<Get>> Status"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::RowStatusConstants"
					quidu      	"32EE5A3A0276"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$72"
				quid       	"32EE5ADD0334"
				roles      	(list role_list
				    (object Role "$UNNAMED$73"
					quid       	"32EE5ADD0335"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoPreparedStatement"
					quidu      	"32EE5AB701E0")
				    (object Role "<<Get>> Type"
					quid       	"32EE5ADD0336"
					documentation 	"Indicates the type or data type of an object"
					label      	"<<Get>> Type"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::QueryTypeConstants"
					quidu      	"32EE5A380371"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$74"
				quid       	"32EE5ADD03A2"
				roles      	(list role_list
				    (object Role "$UNNAMED$75"
					quid       	"32EE5ADD03A3"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoPreparedStatement"
					quidu      	"32EE5AB701E0")
				    (object Role "<<Get>> rdoParameters"
					quid       	"32EE5ADD03A4"
					documentation 	"Contains all rdoParameter objects of an rdoQuery"
					label      	"<<Get>> rdoParameters"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoParameters"
					quidu      	"32EE5B240349"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$76"
				quid       	"32EE5ADD03A5"
				roles      	(list role_list
				    (object Role "$UNNAMED$77"
					quid       	"32EE5ADD03A6"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoPreparedStatement"
					quidu      	"32EE5AB701E0")
				    (object Role "<<Get>> LockType"
					quid       	"32EE5ADD03D4"
					documentation 	"Determines the type of concurrency handling"
					label      	"<<Get>> LockType"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::LockTypeConstants"
					quidu      	"32EE5A3102A9"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$78"
				quid       	"32EE5ADE0028"
				roles      	(list role_list
				    (object Role "$UNNAMED$79"
					quid       	"32EE5ADE0029"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoPreparedStatement"
					quidu      	"32EE5AB701E0")
				    (object Role "<<Get>> rdoColumns"
					quid       	"32EE5ADE002A"
					documentation 	"Contains stored rdoColumn objects"
					label      	"<<Get>> rdoColumns"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumns"
					quidu      	"32EE5B0E03D4"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$80"
				quid       	"32EE5ADE005A"
				roles      	(list role_list
				    (object Role "$UNNAMED$81"
					quid       	"32EE5ADE005B"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoPreparedStatement"
					quidu      	"32EE5AB701E0")
				    (object Role "<<Get>> CursorType"
					quid       	"32EE5ADE005C"
					documentation 	"Determines the type of cursor"
					label      	"<<Get>> CursorType"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::ResultsetTypeConstants"
					quidu      	"32EE5A33014B"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$82"
				quid       	"32EE5ADE0096"
				roles      	(list role_list
				    (object Role "$UNNAMED$83"
					quid       	"32EE5ADE0097"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoPreparedStatement"
					quidu      	"32EE5AB701E0")
				    (object Role "<<Get>> ActiveConnection"
					quid       	"32EE5ADE0098"
					documentation 	"Parent Connection"
					label      	"<<Get>> ActiveConnection"
					supplier   	"_rdoConnection"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$84"
				quid       	"32EE5AF500DC"
				roles      	(list role_list
				    (object Role "$UNNAMED$85"
					quid       	"32EE5AF500DD"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
					quidu      	"32EE5ADE00C8")
				    (object Role "<<Get>> Type"
					quid       	"32EE5AF500DE"
					documentation 	"Indicates the type or data type of an object"
					label      	"<<Get>> Type"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::QueryTypeConstants"
					quidu      	"32EE5A380371"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$86"
				quid       	"32EE5AF501B8"
				roles      	(list role_list
				    (object Role "$UNNAMED$87"
					quid       	"32EE5AF501B9"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
					quidu      	"32EE5ADE00C8")
				    (object Role "<<Get>> rdoParameters"
					quid       	"32EE5AF501EA"
					documentation 	"Contains all rdoParameter objects of an rdoQuery"
					label      	"<<Get>> rdoParameters"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoParameters"
					quidu      	"32EE5B240349"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$88"
				quid       	"32EE5AF50226"
				roles      	(list role_list
				    (object Role "$UNNAMED$89"
					quid       	"32EE5AF50227"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
					quidu      	"32EE5ADE00C8")
				    (object Role "<<Get>> LockType"
					quid       	"32EE5AF50228"
					documentation 	"Determines the type of concurrency handling"
					label      	"<<Get>> LockType"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::LockTypeConstants"
					quidu      	"32EE5A3102A9"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$90"
				quid       	"32EE5AF50258"
				roles      	(list role_list
				    (object Role "$UNNAMED$91"
					quid       	"32EE5AF50259"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
					quidu      	"32EE5ADE00C8")
				    (object Role "<<Get>> rdoColumns"
					quid       	"32EE5AF5025A"
					documentation 	"Contains stored rdoColumn objects"
					label      	"<<Get>> rdoColumns"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumns"
					quidu      	"32EE5B0E03D4"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$92"
				quid       	"32EE5AF50294"
				roles      	(list role_list
				    (object Role "$UNNAMED$93"
					quid       	"32EE5AF50295"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
					quidu      	"32EE5ADE00C8")
				    (object Role "<<Get>> CursorType"
					quid       	"32EE5AF50296"
					documentation 	"Determines the type of cursor"
					label      	"<<Get>> CursorType"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::ResultsetTypeConstants"
					quidu      	"32EE5A33014B"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$94"
				quid       	"32EE5AF502C6"
				roles      	(list role_list
				    (object Role "$UNNAMED$95"
					quid       	"32EE5AF502C7"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
					quidu      	"32EE5ADE00C8")
				    (object Role "<<Get>> ActiveConnection"
					quid       	"32EE5AF502C8"
					documentation 	"Parent Connection"
					label      	"<<Get>> ActiveConnection"
					supplier   	"_rdoConnection"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$96"
				quid       	"32EE5B0503CA"
				roles      	(list role_list
				    (object Role "$UNNAMED$97"
					quid       	"32EE5B0503CB"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironment"
					quidu      	"32EE5AF50302")
				    (object Role "<<Get>> rdoConnections"
					quid       	"32EE5B0503CC"
					documentation 	"Contains all open rdoConnection objects opened in an rdoEnvironment object"
					label      	"<<Get>> rdoConnections"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnections"
					quidu      	"32EE5B1A023A"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$98"
				quid       	"32EE5B060014"
				roles      	(list role_list
				    (object Role "$UNNAMED$99"
					quid       	"32EE5B060015"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironment"
					quidu      	"32EE5AF50302")
				    (object Role "<<Get>> CursorDriver"
					quid       	"32EE5B060016"
					documentation 	"Determines where the cursor is to be created"
					label      	"<<Get>> CursorDriver"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::CursorDriverConstants"
					quidu      	"32EE5A30001E"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$100"
				quid       	"32EE5B0E02F8"
				roles      	(list role_list
				    (object Role "$UNNAMED$101"
					quid       	"32EE5B0E02F9"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoParameter"
					quidu      	"32EE5B060082")
				    (object Role "<<Get>> Type"
					quid       	"32EE5B0E02FA"
					documentation 	"Indicates the type or data type of an object"
					label      	"<<Get>> Type"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::DataTypeConstants"
					quidu      	"32EE5A340399"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$102"
				quid       	"32EE5B0E0366"
				roles      	(list role_list
				    (object Role "$UNNAMED$103"
					quid       	"32EE5B0E0367"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoParameter"
					quidu      	"32EE5B060082")
				    (object Role "<<Get>> Direction"
					quid       	"32EE5B0E0368"
					documentation 	"Determines how an argument is passed to or from a procedure"
					label      	"<<Get>> Direction"
					supplier   	"Logical View::Business Services::RDO::rdoConstants::DirectionConstants"
					quidu      	"32EE5A37000A"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$104"
				quid       	"32EE5B17028A"
				roles      	(list role_list
				    (object Role "$UNNAMED$105"
					quid       	"32EE5B17028B"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumns"
					quidu      	"32EE5B0E03D4")
				    (object Role "<<Get>> Item"
					quid       	"32EE5B17028C"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"_rdoColumn"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$106"
				quid       	"32EE5B1A0190"
				roles      	(list role_list
				    (object Role "$UNNAMED$107"
					quid       	"32EE5B1A0191"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoTables"
					quidu      	"32EE5B17028D"
					is_aggregate 	TRUE)
				    (object Role "<<Get>> Item"
					quid       	"32EE5B1A0192"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoTable"
					quidu      	"32EE5A8403B6"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$108"
				quid       	"32EE5B24030C"
				roles      	(list role_list
				    (object Role "$UNNAMED$109"
					quid       	"32EE5B24030D"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnections"
					quidu      	"32EE5B1A023A")
				    (object Role "<<Get>> Item"
					quid       	"32EE5B240348"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"_rdoConnection"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$110"
				quid       	"32EE5B2F00DC"
				roles      	(list role_list
				    (object Role "$UNNAMED$111"
					quid       	"32EE5B2F00DD"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoParameters"
					quidu      	"32EE5B240349"
					is_aggregate 	TRUE)
				    (object Role "<<Get>> Item"
					quid       	"32EE5B2F010E"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoParameter"
					quidu      	"32EE5B060082"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$112"
				quid       	"32EE5B380262"
				roles      	(list role_list
				    (object Role "$UNNAMED$113"
					quid       	"32EE5B380263"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultsets"
					quidu      	"32EE5B2F01B8")
				    (object Role "<<Get>> Item"
					quid       	"32EE5B380294"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"_rdoResultset"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$114"
				quid       	"32EE5B510000"
				roles      	(list role_list
				    (object Role "$UNNAMED$115"
					quid       	"32EE5B510001"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironments"
					quidu      	"32EE5B380295")
				    (object Role "<<Get>> Item"
					quid       	"32EE5B510032"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"_rdoEnvironment"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$116"
				quid       	"32EE5B5C0136"
				roles      	(list role_list
				    (object Role "$UNNAMED$117"
					quid       	"32EE5B5C0172"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQueries"
					quidu      	"32EE5B510033"
					is_aggregate 	TRUE)
				    (object Role "<<Get>> Item"
					quid       	"32EE5B5C0173"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
					quidu      	"32EE5ADE00C8"
					is_navigable 	TRUE)))
			    (object Association "$UNNAMED$118"
				quid       	"32EE5B6A03D4"
				roles      	(list role_list
				    (object Role "$UNNAMED$119"
					quid       	"32EE5B6A03D5"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoErrors"
					quidu      	"32EE5B5C0212"
					is_aggregate 	TRUE)
				    (object Role "<<Get>> Item"
					quid       	"32EE5B6A03D6"
					documentation 	"Returns a specific member of a collection"
					label      	"<<Get>> Item"
					supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoError"
					quidu      	"32EE5A4F02DA"
					is_navigable 	TRUE)))
			    (object Class_Category "rdoConstants"
				quid       	"32EFB05302B2"
				documentation 	"This package contains the constants used by RDO"
				exportControl 	"Public"
				logical_models 	(list unit_reference_list
				    (object Class "AttributeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310342"))
					quid       	"32EE5A3400D2"
					documentation 	"Attributes Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdFixedColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3402BC"
						documentation 	"The column size is fixed (default for numeric columns)."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdVariableColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A34032A"
						documentation 	"The column size is variable (VarChar and LongVarChar columns only)."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdAutoIncrColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A340366"
						documentation 	"The column value for new rows is automatically incremented to a unique integer that can't be changed."
						type       	"Integer"
						initv      	"16"
						exportControl 	"Public")
					    (object ClassAttribute "rdUpdatableColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A340367"
						documentation 	"The column value can be changed."
						type       	"Integer"
						initv      	"32"
						exportControl 	"Public")
					    (object ClassAttribute "rdTimestampColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A340398"
						documentation 	"The column is a timestamp value. This attribute is set only for rdClientBatch cursors."
						type       	"Integer"
						initv      	"64"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "ColumnStatusConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310031"))
					quid       	"32EE5A3C0078"
					documentation 	"Column Status Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdColUnmodified"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3D0000"
						documentation 	"The row has not been modified or has been updated successfully."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdColModified"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3D0001"
						documentation 	"The row has been modified."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "CursorDriverConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310318"))
					quid       	"32EE5A30001E"
					documentation 	"CursorDriver Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdUseIfNeeded"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A300280"
						documentation 	"The ODBC driver will choose the appropriate style of cursors. Server-side cursors are used if they are available."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdUseOdbc"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A300320"
						documentation 	"Use the ODBC cursor library."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdUseServer"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A30035C"
						documentation 	"Use server-side cursors."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdUseClientBatch"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A30035D"
						documentation 	"Use the optimistic batch cursor library."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public")
					    (object ClassAttribute "rdUseNone"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A310014"
						documentation 	"Result set is not returned as a cursor."
						type       	"Integer"
						initv      	"4"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "DataTypeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310348"))
					quid       	"32EE5A340399"
					documentation 	"Data Type Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdTypeCHAR"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3501D6"
						documentation 	"Fixed-length character string. Length set by Size property."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeNUMERIC"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A350212"
						documentation 	"Signed, exact, numeric value with precision p and scale s (1  p 15; 0  s  p)."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeDECIMAL"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3502B2"
						documentation 	"Signed, exact, numeric value with precision p and scale s (1  p 15; 0  s  p)."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeINTEGER"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3502B3"
						documentation 	"Signed, exact numeric value with precision 10, scale 0 (signed: -231  n  231-1; unsigned:  0  n  232-1)."
						type       	"Integer"
						initv      	"4"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeSMALLINT"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A35035C"
						documentation 	"Signed, exact numeric value with precision 5, scale 0 (signed: -32,768  n  32,767, unsigned: 0  n  65,535)."
						type       	"Integer"
						initv      	"5"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeFLOAT"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A35038E"
						documentation 	"Signed, approximate numeric value with mantissa precision 15 (zero or absolute value 10-308  to 10308)."
						type       	"Integer"
						initv      	"6"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeREAL"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A360014"
						documentation 	"Signed, approximate numeric value with mantissa precision 7 (zero or absolute value 10-38  to 1038)."
						type       	"Integer"
						initv      	"7"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeDOUBLE"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A360082"
						documentation 	"Signed, approximate numeric value with mantissa precision 15 (zero or absolute value 10-308  to 10308)."
						type       	"Integer"
						initv      	"8"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeDATE"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3600BE"
						documentation 	"Date -- data source dependent."
						type       	"Integer"
						initv      	"9"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeTIME"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3600BF"
						documentation 	"Time -- data source dependent."
						type       	"Integer"
						initv      	"10"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeTIMESTAMP"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3600F0"
						documentation 	"TimeStamp -- data source dependent."
						type       	"Integer"
						initv      	"11"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeVARCHAR"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3601CC"
						documentation 	"Variable-length character string. Maximum length 255."
						type       	"Integer"
						initv      	"12"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeLONGVARCHAR"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A360208"
						documentation 	"Variable-length character string. Maximum length determined by data source."
						type       	"Integer"
						initv      	"-1"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeBINARY"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A360209"
						documentation 	"Fixed-length binary data. Maximum length 255."
						type       	"Integer"
						initv      	"-2"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeVARBINARY"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3602A8"
						documentation 	"Variable-length binary data. Maximum length 255."
						type       	"Integer"
						initv      	"-3"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeLONGVARBINARY"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3602DA"
						documentation 	"Variable-length binary data. Maximum data source dependent."
						type       	"Integer"
						initv      	"-4"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeBIGINT"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3602DB"
						documentation 	"Signed, exact numeric value with precision 19 (signed) or 20 (unsigned), scale 0; (signed: -263  n  263-1; unsigned:  0  n  264-1)."
						type       	"Integer"
						initv      	"-5"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeTINYINT"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A360384"
						documentation 	"Signed, exact numeric value with precision 3, scale 0; (signed: -128  n  127, unsigned: 0  n  255)."
						type       	"Integer"
						initv      	"-6"
						exportControl 	"Public")
					    (object ClassAttribute "rdTypeBIT"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3603B6"
						documentation 	"Single binary digit."
						type       	"Integer"
						initv      	"-7"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "DirectionConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310368"))
					quid       	"32EE5A37000A"
					documentation 	"Direction Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdParamInput"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3701F4"
						documentation 	"The parameter is used to pass information to the procedure."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdParamInputOutput"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A37029E"
						documentation 	"The parameter is used to pass information both to and from the procedure."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdParamOutput"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A37030C"
						documentation 	"The parameter is used to return information from the procedure as in an output parameter in SQL."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdParamReturnValue"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A37033E"
						documentation 	"The parameter is used to return the return status value from a procedure."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "EditModeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310324"))
					quid       	"32EE5A310015"
					documentation 	"EditMode Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdEditNone"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A31023A"
						documentation 	"No editing operation is in progress."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdEditInProgress"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A310276"
						documentation 	"Edit method has been invoked, and the current record is in the copy buffer."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdEditAdd"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3102A8"
						documentation 	"AddNew method has been invoked, and the current record in the copy buffer is a new record that hasn't been saved in the database."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "LockTypeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310328"))
					quid       	"32EE5A3102A9"
					documentation 	"LockType Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdConcurReadOnly"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A320154"
						documentation 	"Cursor is read-only. No updates are allowed."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdConcurLock"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A320190"
						documentation 	"Pessimistic concurrency."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdConcurRowVer"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A320191"
						documentation 	"Optimistic concurrency based on row ID."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public")
					    (object ClassAttribute "rdConcurValues"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3201C2"
						documentation 	"Optimistic concurrency based on row values."
						type       	"Integer"
						initv      	"4"
						exportControl 	"Public")
					    (object ClassAttribute "rdConcurBatch"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3201FE"
						documentation 	"Optimistic concurrency using batch mode updates. Status values returned for each row successfully updated."
						type       	"Integer"
						initv      	"5"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "OptionConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310334"))
					quid       	"32EE5A32026C"
					documentation 	"Options Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdAsyncEnable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A33006E"
						documentation 	"Execute the query asynchronously."
						type       	"Integer"
						initv      	"32"
						exportControl 	"Public")
					    (object ClassAttribute "rdExecDirect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A33010E"
						documentation 	"Use the ODBC SQLExecDirect API function to execute query."
						type       	"Integer"
						initv      	"64"
						exportControl 	"Public")
					    (object ClassAttribute "rdFetchLongColumns"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A33010F"
						documentation 	"Download all the data for long character and long binary columns."
						type       	"Integer"
						initv      	"128"
						exportControl 	"Public")
					    (object ClassAttribute "rdBackgroundFetch"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A33014A"
						documentation 	"Download all the data for long character and long binary columns."
						type       	"Integer"
						initv      	"256"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "PromptConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310313"))
					quid       	"32EE5A2D026C"
					documentation 	"Prompt Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdDriverPrompt"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A2F024E"
						documentation 	"The driver manager displays the ODBC Data Sources dialog box."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdDriverNoPrompt"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A2F02F8"
						documentation 	"The driver manager uses the connection string provided in Connect.  If sufficient information is not provided, the OpenConnection method returns a trappable error."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdDriverComplete"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A2F032A"
						documentation 	"If the connection string provided includes the DSN keyword, the driver manager uses the string as provided in Connect, otherwise it behaves as it does when rdDriverPrompt is specified."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdDriverCompleteRequired"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A2F0366"
						documentation 	"Behaves like rdDriverComplete except the driver disables the controls for any information not required to complete the connection."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "QueryTypeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310014"))
					quid       	"32EE5A380371"
					documentation 	"Query Type Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdQSelect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A39021C"
						documentation 	"Select"
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdQAction"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3902BC"
						documentation 	"Action"
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdQProcedures"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3902BD"
						documentation 	"Procedural"
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdQCompound"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3902F8"
						documentation 	"The query contains both action and select statements"
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "ResultsetTypeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310337"))
					quid       	"32EE5A33014B"
					documentation 	"Resultset Type Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdOpenForwardOnly"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3303A2"
						documentation 	"Fixed set, non-scrolling."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdOpenKeyset"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3303DE"
						documentation 	"Updatable, fixed set, scrollable query result set cursor."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdOpenDynamic"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3303DF"
						documentation 	"Updatable, dynamic set, scrollable query result set cursor."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdOpenStatic"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A340028"
						documentation 	"Read-only, fixed set."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "RowStatusConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310025"))
					quid       	"32EE5A3A0276"
					documentation 	"Row Status Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdRowUnmodified"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3B01FE"
						documentation 	"The row has not been modified or has been updated successfully."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdRowModified"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3B02A8"
						documentation 	"The row has been modified and not updated in the database."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdRowNew"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3B02DA"
						documentation 	"The row has been inserted with the AddNew method, but not yet inserted into the database."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdRowDeleted"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3B0384"
						documentation 	"The row has been deleted, but not yet deleted in the database."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public")
					    (object ClassAttribute "rdRowDBDeleted"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3B03B6"
						documentation 	"The row has been deleted locally and in the database."
						type       	"Integer"
						initv      	"4"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "SQLRetcodeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310019"))
					quid       	"32EE5A39032A"
					documentation 	"SQL Retcode Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdSQLSuccess"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3A0168"
						documentation 	"The operation is successful."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdSQLSuccessWithInfo"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3A0208"
						documentation 	"The operation is successful, and additional information is available."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdSQLNoDataFound"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3A0209"
						documentation 	"No additional data is available."
						type       	"Integer"
						initv      	"100"
						exportControl 	"Public")
					    (object ClassAttribute "rdSQLError"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3A0244"
						documentation 	"An error occurred performing the operation."
						type       	"Integer"
						initv      	"-1"
						exportControl 	"Public")
					    (object ClassAttribute "rdSQLInvalidHandle"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3A0245"
						documentation 	"The handle supplied is invalid."
						type       	"Integer"
						initv      	"-2"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "UpdateCriteriaConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310037"))
					quid       	"32EE5A3E0136"
					documentation 	"Update Criteria Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdCriteriaKey"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3E0398"
						documentation 	"Uses just the key column(s) in the Where clause."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdCriteriaAllCols"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3F001E"
						documentation 	"Uses the key column(s) and all updated columns in the Where clause."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdCriteriaUpdCols"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3F0050"
						documentation 	"Uses the key column(s) and all the columns in the Where clause."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdCriteriaTimeStamp"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3F0051"
						documentation 	"Uses just the timestamp column if available (will generate a runtime error if no timestamp column is in the resultset)."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "UpdateOperationConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310034"))
					quid       	"32EE5A3D006E"
					documentation 	"Update Operation Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdOperationUpdate"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3E005A"
						documentation 	"Uses an Update statement for each modified row."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdOperationDelIns"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3E0104"
						documentation 	"Uses a pair of Delete and Insert statements for each modified row."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "UpdateReturnCodeConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310042"))
					quid       	"32EE5A3F008C"
					documentation 	"Update Return Code Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdUpdateSuccessful"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3F0352"
						documentation 	"The developer handled the update and was successful in doing so."
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public")
					    (object ClassAttribute "rdUpdateWithCollisions"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A41000A"
						documentation 	"The developer handled the update, was successful, but some rows produced collisions (batch mode only)."
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdUpdateFailed"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A410078"
						documentation 	"The developer attempted to handle the update, but encountered an error when doing so."
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdUpdateNotHandled"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A4100AA"
						documentation 	"The developer did not handle the update, RDO should continue notifying, and if no one handles the update RDO should update the data itself."
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public"))
					language   	"Visual Basic")
				    (object Class "rdoLocaleIDConstants"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 200))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310005"))
					quid       	"32EE5A380000"
					documentation 	"rdoLocaleID  Constants"
					stereotype 	"Enum"
					class_attributes 	(list class_attribute_list
					    (object ClassAttribute "rdLocaleEnglish"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380226"
						documentation 	"English"
						type       	"Integer"
						initv      	"1"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleFrench"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380258"
						documentation 	"French"
						type       	"Integer"
						initv      	"2"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleGerman"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380294"
						documentation 	"German"
						type       	"Integer"
						initv      	"3"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleItalian"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3802C6"
						documentation 	"Italian"
						type       	"Integer"
						initv      	"4"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleJapanese"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A3802C7"
						documentation 	"Japanese"
						type       	"Integer"
						initv      	"5"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleSpanish"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380302"
						documentation 	"Spanish"
						type       	"Integer"
						initv      	"6"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleChinese"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380303"
						documentation 	"Chinese"
						type       	"Integer"
						initv      	"7"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleSimplifiedChinese"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380334"
						documentation 	"Simplified Chinese"
						type       	"Integer"
						initv      	"8"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleKorean"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380335"
						documentation 	"Korean"
						type       	"Integer"
						initv      	"9"
						exportControl 	"Public")
					    (object ClassAttribute "rdLocaleSystem"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"IsConst"
							value      	TRUE)
						    (object Attribute
							tool       	"Visual Basic"
							name       	"Subscript"
							value      	""))
						quid       	"32EE5A380370"
						documentation 	"System"
						type       	"Integer"
						initv      	"0"
						exportControl 	"Public"))
					language   	"Visual Basic"))
				logical_presentations 	(list unit_reference_list
				    (object ClassDiagram "Constants"
					quid       	"32EFA6AD00BE"
					title      	"Constants"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::PromptConstants" @5
						ShowCompartmentStereotypes 	TRUE
						location   	(266, 136)
						label      	(object ItemLabel
						    Parent_View 	@5
						    location   	(90, 107)
						    nlines     	1
						    max_width  	352
						    justify    	0
						    label      	"PromptConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@5
						    location   	(90, 57)
						    anchor     	10
						    nlines     	1
						    max_width  	352
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A2D026C"
						width      	370
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::EditModeConstants" @6
						ShowCompartmentStereotypes 	TRUE
						location   	(819, 136)
						label      	(object ItemLabel
						    Parent_View 	@6
						    location   	(625, 107)
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"EditModeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@6
						    location   	(625, 57)
						    anchor     	10
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A310015"
						width      	406
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::OptionConstants" @7
						ShowCompartmentStereotypes 	TRUE
						location   	(1364, 136)
						label      	(object ItemLabel
						    Parent_View 	@7
						    location   	(1194, 107)
						    nlines     	1
						    max_width  	340
						    justify    	0
						    label      	"OptionConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@7
						    location   	(1194, 57)
						    anchor     	10
						    nlines     	1
						    max_width  	340
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A32026C"
						width      	358
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::RowStatusConstants" @8
						ShowCompartmentStereotypes 	TRUE
						location   	(1921, 136)
						label      	(object ItemLabel
						    Parent_View 	@8
						    location   	(1711, 107)
						    nlines     	1
						    max_width  	420
						    justify    	0
						    label      	"RowStatusConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@8
						    location   	(1711, 57)
						    anchor     	10
						    nlines     	1
						    max_width  	420
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3A0276"
						width      	438
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::QueryTypeConstants" @9
						ShowCompartmentStereotypes 	TRUE
						location   	(2519, 136)
						label      	(object ItemLabel
						    Parent_View 	@9
						    location   	(2309, 107)
						    nlines     	1
						    max_width  	420
						    justify    	0
						    label      	"QueryTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@9
						    location   	(2309, 57)
						    anchor     	10
						    nlines     	1
						    max_width  	420
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A380371"
						width      	438
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::LockTypeConstants" @10
						ShowCompartmentStereotypes 	TRUE
						location   	(3106, 136)
						label      	(object ItemLabel
						    Parent_View 	@10
						    location   	(2909, 107)
						    nlines     	1
						    max_width  	394
						    justify    	0
						    label      	"LockTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@10
						    location   	(2909, 57)
						    anchor     	10
						    nlines     	1
						    max_width  	394
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3102A9"
						width      	412
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::SQLRetcodeConstants" @11
						ShowCompartmentStereotypes 	TRUE
						location   	(3711, 136)
						label      	(object ItemLabel
						    Parent_View 	@11
						    location   	(3488, 107)
						    nlines     	1
						    max_width  	446
						    justify    	0
						    label      	"SQLRetcodeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@11
						    location   	(3488, 57)
						    anchor     	10
						    nlines     	1
						    max_width  	446
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A39032A"
						width      	464
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::ResultsetTypeConstants" @12
						ShowCompartmentStereotypes 	TRUE
						location   	(332, 378)
						label      	(object ItemLabel
						    Parent_View 	@12
						    location   	(92, 349)
						    nlines     	1
						    max_width  	480
						    justify    	0
						    label      	"ResultsetTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@12
						    location   	(92, 299)
						    anchor     	10
						    nlines     	1
						    max_width  	480
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A33014B"
						width      	498
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::UpdateOperationConstants" @13
						ShowCompartmentStereotypes 	TRUE
						location   	(1023, 378)
						label      	(object ItemLabel
						    Parent_View 	@13
						    location   	(765, 349)
						    nlines     	1
						    max_width  	516
						    justify    	0
						    label      	"UpdateOperationConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@13
						    location   	(765, 299)
						    anchor     	10
						    nlines     	1
						    max_width  	516
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3D006E"
						width      	534
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::UpdateCriteriaConstants" @14
						ShowCompartmentStereotypes 	TRUE
						location   	(1713, 378)
						label      	(object ItemLabel
						    Parent_View 	@14
						    location   	(1479, 349)
						    nlines     	1
						    max_width  	468
						    justify    	0
						    label      	"UpdateCriteriaConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@14
						    location   	(1479, 299)
						    anchor     	10
						    nlines     	1
						    max_width  	468
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3E0136"
						width      	486
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::UpdateReturnCodeConstants" @15
						ShowCompartmentStereotypes 	TRUE
						location   	(2423, 378)
						label      	(object ItemLabel
						    Parent_View 	@15
						    location   	(2147, 349)
						    nlines     	1
						    max_width  	552
						    justify    	0
						    label      	"UpdateReturnCodeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@15
						    location   	(2147, 299)
						    anchor     	10
						    nlines     	1
						    max_width  	552
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3F008C"
						width      	570
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::CursorDriverConstants" @16
						ShowCompartmentStereotypes 	TRUE
						location   	(3114, 378)
						label      	(object ItemLabel
						    Parent_View 	@16
						    location   	(2896, 349)
						    nlines     	1
						    max_width  	436
						    justify    	0
						    label      	"CursorDriverConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@16
						    location   	(2896, 299)
						    anchor     	10
						    nlines     	1
						    max_width  	436
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A30001E"
						width      	454
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::DirectionConstants" @17
						ShowCompartmentStereotypes 	TRUE
						location   	(3706, 378)
						label      	(object ItemLabel
						    Parent_View 	@17
						    location   	(3515, 349)
						    nlines     	1
						    max_width  	382
						    justify    	0
						    label      	"DirectionConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@17
						    location   	(3515, 299)
						    anchor     	10
						    nlines     	1
						    max_width  	382
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A37000A"
						width      	400
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::DataTypeConstants" @18
						ShowCompartmentStereotypes 	TRUE
						location   	(4274, 378)
						label      	(object ItemLabel
						    Parent_View 	@18
						    location   	(4080, 349)
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"DataTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@18
						    location   	(4080, 299)
						    anchor     	10
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A340399"
						width      	406
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::AttributeConstants" @19
						ShowCompartmentStereotypes 	TRUE
						location   	(280, 620)
						label      	(object ItemLabel
						    Parent_View 	@19
						    location   	(93, 591)
						    nlines     	1
						    max_width  	374
						    justify    	0
						    label      	"AttributeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@19
						    location   	(93, 541)
						    anchor     	10
						    nlines     	1
						    max_width  	374
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3400D2"
						width      	392
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::ColumnStatusConstants" @20
						ShowCompartmentStereotypes 	TRUE
						location   	(891, 620)
						label      	(object ItemLabel
						    Parent_View 	@20
						    location   	(655, 591)
						    nlines     	1
						    max_width  	472
						    justify    	0
						    label      	"ColumnStatusConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@20
						    location   	(655, 541)
						    anchor     	10
						    nlines     	1
						    max_width  	472
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3C0078"
						width      	490
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::DataTypeConstants" @21
						ShowCompartmentStereotypes 	TRUE
						location   	(1512, 620)
						label      	(object ItemLabel
						    Parent_View 	@21
						    location   	(1318, 591)
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"DataTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@21
						    location   	(1318, 541)
						    anchor     	10
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A340399"
						width      	406
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::rdoLocaleIDConstants" @22
						ShowCompartmentStereotypes 	TRUE
						location   	(2103, 622)
						label      	(object ItemLabel
						    Parent_View 	@22
						    location   	(1886, 593)
						    nlines     	1
						    max_width  	434
						    justify    	0
						    label      	"rdoLocaleIDConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@22
						    location   	(1886, 543)
						    anchor     	10
						    nlines     	1
						    max_width  	434
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A380000"
						width      	452
						height     	182
						annotation 	8
						autoResize 	TRUE)))))
			    (object Class_Category "rdoObjects"
				quid       	"32EFB0B0023A"
				documentation 	"This package contains the extensibility classes for the Remote Data Objects"
				visible_categories 	(list visibility_relationship_list
				    (object Visibility_Relationship
					quid       	"330372080258"
					supplier   	"Logical View::Business Services::RDO::rdoConstants"
					quidu      	"32EFB05302B2"))
				exportControl 	"Public"
				logical_models 	(list unit_reference_list
				    (object Class "rdoColumn"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310105"))
					quid       	"32EE5A7100E6"
					documentation 	"Represents a column of data with a common data type and a common set of properties."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Value"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7102D0"
						documentation 	"Determines the value of an object"
						stereotype 	"Get"
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Value"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A7200DC"
						documentation 	"Determines the value of an object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Type"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A730064"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Get"
						result     	"DataTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7301E0"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A730398"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Size"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A74035C"
						documentation 	"Indicates the size of an rdoColumn object"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Size"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A750122"
						documentation 	"Indicates the size of an rdoColumn object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AllowZeroLength"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7600E6"
						documentation 	"Indicates if a zero-length string is valid for the Value property"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AllowZeroLength"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A76029E"
						documentation 	"Indicates if a zero-length string is valid for the Value property"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Attributes"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A770258"
						documentation 	"Indicates characteristics of an rdoColumn object"
						stereotype 	"Get"
						result     	"AttributeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Updatable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7703DE"
						documentation 	"Indicates whether changes can be made to a remote data object"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Updatable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A7801AE"
						documentation 	"Indicates whether changes can be made to a remote data object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "OrdinalPosition"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A790168"
						documentation 	"Relative position of an rdoColumn object within the collection"
						stereotype 	"Get"
						result     	"Integer"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Required"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A790320"
						documentation 	"Indicates whether an rdoColumn requires a non-Null value"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SourceColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7A0122"
						documentation 	"Indicates the rdoColumn object data's original source column name"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SourceColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A7A02DA"
						documentation 	"Indicates the rdoColumn object data's original source column name"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SourceTable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7B0230"
						documentation 	"Indicates the rdoColumn object data's original source table name"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SourceTable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A7C0000"
						documentation 	"Indicates the rdoColumn object data's original source table name"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ChunkRequired"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7C0334"
						documentation 	"Indicates if data must be accessed using the GetChunk method"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AppendChunk"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A7D0104"
						documentation 	"Appends data from a string expression to an rdoColumn object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Chunk"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "GetChunk"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A7E0050"
						documentation 	"Returns the contents of an rdoColumn object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Size"
							type       	"Long"))
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ColumnSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A7F00F0"
						documentation 	"Returns the number of bytes in an rdoColumn object"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BatchConflictValue"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A7F02DA"
						documentation 	"Returns a value currently in the database that is newer than the Value property as determined by an optimistic batch update conflict."
						stereotype 	"Get"
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "OriginalValue"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A800118"
						documentation 	"Returns the value of the column as first fetched from the database."
						stereotype 	"Get"
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Status"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A800302"
						documentation 	"Returns/Sets the column buffer status"
						stereotype 	"Get"
						result     	"ColumnStatusConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Status"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A8100D2"
						documentation 	"Returns/Sets the column buffer status"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"ColumnStatusConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "KeyColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A820096"
						documentation 	"Returns/sets a value that specifies if this column is part of the primary key."
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "KeyColumn"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A82024E"
						documentation 	"Returns/sets a value that specifies if this column is part of the primary key."
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "DataChanged"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A830208"
						documentation 	"Fired when the value of the column has changed"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "WillChangeData"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A830352"
						documentation 	"Fired before data is changed in the column"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef newvalue"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoColumns"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310281"))
					quid       	"32EE5B0E03D4"
					documentation 	"Contains all rdoColumn objects of an rdoResultset or rdoTable object."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B1001CC"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B16003C"
						documentation 	"Refreshes the column definitions"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B1601C2"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"_rdoColumn"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoConnection"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310068"))
					quid       	"32EE5A5300F0"
					documentation 	"Represents an open connection to a remote data source and a specific database on that data source, or an allocated but as yet unconnected object, which can be used to subsequently establish a connection. "
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "QueryTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A530384"
						documentation 	"Timeout value for query execution"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "QueryTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A540186"
						documentation 	"Timeout value for query execution"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoTables"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A55014A"
						documentation 	"Contains all rdoTable objects in a database"
						stereotype 	"Get"
						result     	"rdoTables"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoPreparedStatements"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A550334"
						stereotype 	"Get"
						result     	"rdoPreparedStatements"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoResultsets"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A560172"
						documentation 	"Contains all open rdoResultset objects in an rdoConnection"
						stereotype 	"Get"
						result     	"rdoResultsets"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Connect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A560366"
						documentation 	"Provides information about the source of an open rdoConnection"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Connect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A5701A4"
						documentation 	"Provides information about the source of an open rdoConnection"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A580190"
						documentation 	"User-defined name for a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A5803B6"
						documentation 	"User-defined name for a remote data object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowsAffected"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A59037A"
						documentation 	"The number of rows affected"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Transactions"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5A017C"
						documentation 	"Indicates whether a Cursor supports transactions"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Updatable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5A03A2"
						documentation 	"Indicates whether a Cursor is updatable"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Version"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5B0140"
						documentation 	"ODBC driver version"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "hDbc"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5B035C"
						documentation 	"The ODBC connection handle"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "StillExecuting"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5C0168"
						documentation 	"Indicates whether an asynchronous query is still executing"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AsyncCheckInterval"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5C038E"
						documentation 	"Polling interval for asynchronous queries"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AsyncCheckInterval"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A5D0190"
						documentation 	"Polling interval for asynchronous queries"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Close"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A5E01C2"
						documentation 	"Close the connections"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Execute"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A5E02D0"
						documentation 	"Executes a query or SQL statement on an object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Source"
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "OpenResultset"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A5F0258"
						documentation 	"Creates a new rdoResultset object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Name"
							type       	"String")
						    (object Parameter "Optional ByVal Type"
							type       	"Variant")
						    (object Parameter "Optional ByVal LockType"
							type       	"Variant"))
						result     	"rdoResultset"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CreatePreparedStatement"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A610208"
						parameters 	(list Parameters
						    (object Parameter "ByVal Name"
							type       	"String"))
						result     	"rdoPreparedStatement"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BeginTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A6201CC"
						documentation 	"Begins a new transaction"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CommitTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A620348"
						documentation 	"Commits any outstanding transactions"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RollbackTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A630118"
						documentation 	"Rolls back any outstanding transactions"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Cancel"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A630226"
						documentation 	"Cancels an asynchronous query or pending results against the rdoResultset object"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LastQueryResults"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A6303DE"
						documentation 	"The last resultset returned by a call on the connection to a prepared statement"
						stereotype 	"Get"
						result     	"rdoResultset"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorDriver"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A6401EA"
						documentation 	"Determines where the cursor is to be created"
						stereotype 	"Get"
						result     	"CursorDriverConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorDriver"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A650028"
						documentation 	"Determines where the cursor is to be created"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"CursorDriverConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LoginTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A66001E"
						documentation 	"Login timeout in seconds"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LoginTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A66023A"
						documentation 	"Login timeout in seconds"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "EstablishConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A6701FE"
						documentation 	"Connect to data source"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Prompt"
							type       	"Variant")
						    (object Parameter "Optional ByVal Readonly"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "StillConnecting"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A690032"
						documentation 	"Still connecting to data source."
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CreateQuery"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A6901EA"
						documentation 	"Creates a new rdoQuery object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Name"
							type       	"String"))
						result     	"rdoQuery"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoQueries"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A6A00FA"
						documentation 	"rdoQueries collection"
						stereotype 	"Get"
						result     	"rdoQueries"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LogMessages"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A6A0320"
						documentation 	"Determines the pathname of the ODBC trace file"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LogMessages"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A6B023A"
						documentation 	"Determines the pathname of the ODBC trace file"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Connect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A6C01FE"
						documentation 	"Fired after a connection is made to the data source"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByVal ErrorOccurred"
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BeforeConnect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A6D0186"
						documentation 	"Fired before the call to SQLDriverConnect"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef ConnectString"
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Disconnect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A6E0096"
						documentation 	"Fired after a connection has been closed"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "QueryComplete"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A6E01E0"
						documentation 	"Fired after an asynchronous query has completed"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef Query"
							type       	"rdoQuery"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "QueryTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A6F00FA"
						documentation 	"Fired after the query execution time has exceeded the queryTimeout value"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef Query"
							type       	"rdoQuery"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "WillExecute"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A700014"
						documentation 	"Fired before the query is run."
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef Query"
							type       	"rdoQuery"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoConnections"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310289"))
					quid       	"32EE5B1A023A"
					documentation 	"Contains all rdoConnection objects opened or created in an rdoEnvironment object, or allocated and appended to the rdoConnections collection using the Add method."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B1B0186"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Remove"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B1E0384"
						documentation 	"Removes a specific member from a collection."
						parameters 	(list Parameters
						    (object Parameter "ByVal ItemToRemove"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Add"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B200186"
						documentation 	"Add item to collection"
						parameters 	(list Parameters
						    (object Parameter "ByRef prdoConnection"
							type       	"rdoConnection"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B220172"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B2202EE"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"_rdoConnection"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoEngine"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310047"))
					quid       	"32EE5A4100E6"
					documentation 	"The Remote Data Object Engine object. The base object. Created automatically when you first access RDO in your application."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "rdoDefaultLoginTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A41033E"
						documentation 	"Timeout value for connecting to a data source"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultLoginTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A4201EA"
						documentation 	"Timeout value for connecting to a data source"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultUser"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A4301A4"
						documentation 	"Default user name assigned to any new rdoEnvironment"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultUser"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A4302EE"
						documentation 	"Default user name assigned to any new rdoEnvironment"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultPassword"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A440244"
						documentation 	"Default password assigned to any new rdoEnvironment"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultPassword"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A44038E"
						documentation 	"Default password assigned to any new rdoEnvironment"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoEnvironments"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A450348"
						documentation 	"Contains all active rdoEnvironment objects of the rdoEngine object"
						stereotype 	"Get"
						result     	"rdoEnvironments"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoErrors"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A46014A"
						documentation 	"Contains all stored rdoError objects"
						stereotype 	"Get"
						result     	"rdoErrors"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoVersion"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A460302"
						documentation 	"Version of the RDO library associated with the object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultCursorDriver"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A4700D2"
						documentation 	"Indicates where cursors are created"
						stereotype 	"Get"
						result     	"CursorDriverConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultCursorDriver"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A47028A"
						documentation 	"Indicates where cursors are created"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"CursorDriverConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultErrorThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A48024E"
						documentation 	"Default Error Threshold for ODBC connections"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoDefaultErrorThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A490050"
						documentation 	"Default Error Threshold for ODBC connections"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoRegisterDataSource"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A4A00E6"
						documentation 	"Registers a database with ODBC"
						parameters 	(list Parameters
						    (object Parameter "ByVal DSN"
							type       	"String")
						    (object Parameter "ByVal Driver"
							type       	"String")
						    (object Parameter "ByVal Silent"
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoCreateEnvironment"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A4C0064"
						documentation 	"Creates a new rdoEnvironment object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Name"
							type       	"String")
						    (object Parameter "ByVal User"
							type       	"String"))
						result     	"_rdoEnvironment"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoLocaleID"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A4D00FA"
						documentation 	"Locale ID used to load resources"
						stereotype 	"Get"
						result     	"rdoLocaleIDConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoLocaleID"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A4D0244"
						documentation 	"Locale ID used to load resources"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"rdoLocaleIDConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "InfoMessage"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5A4E01CC"
						documentation 	"SQL error object are added to rdoErros collection"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoEnvironment"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310248"))
					quid       	"32EE5AF50302"
					documentation 	"Defines a logical set of connections for a particular user ID. Contains both open and allocated (but unopened) connections, provides mechanisms for simultaneous transactions, and provides a security context for data manipulation language (DML) operations on the database. rdoEnvironments(0) created automatically."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "rdoConnections"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AF601E0"
						documentation 	"Contains all open rdoConnection objects opened in an rdoEnvironment object"
						stereotype 	"Get"
						result     	"rdoConnections"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AF7001E"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "UserName"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AF70244"
						documentation 	"Determines a value representing a user of an rdoEnvironment object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "UserName"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AF80190"
						documentation 	"Determines a value representing a user of an rdoEnvironment object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Password"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AF901F4"
						documentation 	"Represents the password used during the creation of an rdoEnvironment"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LoginTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AFA0258"
						documentation 	"Timeout value for connecting to data source"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LoginTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AFB035C"
						documentation 	"Timeout value for connecting to data source"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorDriver"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AFD015E"
						documentation 	"Determines where the cursor is to be created"
						stereotype 	"Get"
						result     	"CursorDriverConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorDriver"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AFE003C"
						documentation 	"Determines where the cursor is to be created"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"CursorDriverConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "hEnv"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AFF00A0"
						documentation 	"The ODBC environment handle"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BeginTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AFF02C6"
						documentation 	"Begins a new transaction"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Close"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B000096"
						documentation 	"Closes an open remote data object"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CommitTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B0001A4"
						documentation 	"Ends the current transaction and saves the changes"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RollbackTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B0002BC"
						documentation 	"Ends the transaction and restores the database to its state before the most recent BeginTrans"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "OpenConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B01008C"
						documentation 	"Opens a connection to an ODBC data source"
						parameters 	(list Parameters
						    (object Parameter "ByVal dsName"
							type       	"String")
						    (object Parameter "Optional ByVal Prompt"
							type       	"Variant")
						    (object Parameter "Optional ByVal Readonly"
							type       	"Variant")
						    (object Parameter "Optional ByVal Connect"
							type       	"Variant"))
						result     	"_rdoConnection"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BeginTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5B04028A"
						documentation 	"Fired after the beginTrans method has completed"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CommitTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5B0500C8"
						documentation 	"Fired after the CommitTrans method has completed"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RollbackTrans"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5B0502B2"
						documentation 	"Fired after the RollbackTrans method has completed"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoEnvironments"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310300"))
					quid       	"32EE5B380295"
					documentation 	"Contains all active rdoEnvironment objects of the rdoEngine object. rdoEnvironments(0) is created automatically."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B3B0168"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Remove"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B3D03AC"
						documentation 	"Removes a specific member from a collection."
						parameters 	(list Parameters
						    (object Parameter "ByVal ItemToRemove"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Add"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B43017C"
						documentation 	"Adds a member to a Collection object."
						parameters 	(list Parameters
						    (object Parameter "ByRef prdoEnvironment"
							type       	"rdoEnvironment"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B480096"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B4A01CC"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"_rdoEnvironment"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoError"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310060"))
					quid       	"32EE5A4F02DA"
					documentation 	"Contains details about remote data access errors. Used to handle all ODBC errors and messages generated by RDO. Created automatically."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Number"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5001B8"
						documentation 	"A numeric value specifying a native error"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Source"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A500302"
						documentation 	"A value indicating the source of a remote data access error"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Description"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A510096"
						documentation 	"A descriptive string associated with an error"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "HelpContext"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A51024E"
						documentation 	"A Windows Help file topic context ID"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "HelpFile"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5103D4"
						documentation 	"Fully qualified path to the Windows Help file"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SQLState"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A5201A4"
						documentation 	"The type of error as defined by the X/Open and SQL Access Group SQL"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SQLRetcode"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A520320"
						documentation 	"Error return code from the most recent RDO operation"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoErrors"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310308"))
					quid       	"32EE5B5C0212"
					documentation 	"Contains all stored rdoError objects which pertain to a single operation involving Remote Data Objects (RDO)."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B63037A"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B65021C"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B660244"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"rdoError"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Clear"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B690334"
						documentation 	"Removes all objects in a collection."
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoParameter"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310268"))
					quid       	"32EE5B060082"
					documentation 	"Represents a parameter associated with an rdoQuery object. Query parameters can be input, output, or both."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B060352"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5B0700E6"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Type"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B0800DC"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Get"
						result     	"DataTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Type"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5B0802D0"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"DataTypeConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Value"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B090398"
						documentation 	"Determines the data value of an object"
						stereotype 	"Get"
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Value"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5B0A01A4"
						documentation 	"Determines the data value of an object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Direction"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B0B02A8"
						documentation 	"Determines how an argument is passed to or from a procedure"
						stereotype 	"Get"
						result     	"DirectionConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Direction"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5B0C0078"
						documentation 	"Determines how an argument is passed to or from a procedure"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"DirectionConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AppendChunk"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B0D01B8"
						documentation 	"Appends data from a string expression to an rdoParameter object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Chunk"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoParameters"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310294"))
					quid       	"32EE5B240349"
					documentation 	"Contains all the rdoParameter objects of an rdoQuery object once the SQL statement is successfully parsed. Contains an rdoParameter object for each marked parameter in the query."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B260172"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B27001E"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B2701D6"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"rdoParameter"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoPreparedStatement"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310207"))
					quid       	"32EE5AB701E0"
					documentation 	"A prepared query definition"
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "QueryTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AB80168"
						documentation 	"Determines the ODBC's driver manager query timeout value"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "QueryTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AB90014"
						documentation 	"Determines the ODBC's driver manager query timeout value"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Type"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ABA0154"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Get"
						result     	"QueryTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MaxRows"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ABA037A"
						documentation 	"Determines the maximum number of rows returned from a query"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MaxRows"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5ABB01AE"
						documentation 	"Determines the maximum number of rows returned from a query"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BindThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ABC02EE"
						documentation 	"Determines the size of the largest column automatically bound under ODBC"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BindThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5ABD019A"
						documentation 	"Determines the size of the largest column automatically bound under ODBC"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoParameters"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ABE0316"
						documentation 	"Contains all rdoParameter objects of an rdoQuery"
						stereotype 	"Get"
						result     	"rdoParameters"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ABF01B8"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AC000D2"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowsAffected"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AC1024E"
						documentation 	"Number of rows affected by the most recently invoked Execute method"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SQL"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AC200FA"
						documentation 	"Determines the SQL statement defining the executed query"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SQL"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AC30046"
						documentation 	"Determines the SQL statement defining the executed query"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LockType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AC403DE"
						documentation 	"Determines the type of concurrency handling"
						stereotype 	"Get"
						result     	"LockTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LockType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AC503A2"
						documentation 	"Determines the type of concurrency handling"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"LockTypeConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoColumns"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AC70384"
						documentation 	"Contains stored rdoColumn objects"
						stereotype 	"Get"
						result     	"rdoColumns"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "KeysetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AC80230"
						documentation 	"Determines the number of rows in the keyset buffer"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "KeysetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AC900DC"
						documentation 	"Determines the number of rows in the keyset buffer"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowsetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ACA01E0"
						documentation 	"Determines the number of cursor rows kept in memory"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowsetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5ACB001E"
						documentation 	"Determines the number of cursor rows kept in memory"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "hStmt"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ACC019A"
						documentation 	"The ODBC statement handle"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "StillExecuting"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ACD0046"
						documentation 	"Indicates whether an asynchronous query is still executing"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ACD02DA"
						documentation 	"Determines the type of cursor"
						stereotype 	"Get"
						result     	"ResultsetTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5ACE017C"
						documentation 	"Determines the type of cursor"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"ResultsetTypeConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ActiveConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AD001A4"
						documentation 	"Parent Connection"
						stereotype 	"Get"
						result     	"_rdoConnection"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ActiveConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 209)))
						quid       	"32EE5AD1015E"
						documentation 	"Parent Connection"
						stereotype 	"Set"
						parameters 	(list Parameters
						    (object Parameter "ByRef "
							type       	"_rdoConnection"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Prepared"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AD202D0"
						documentation 	"Indicates whether the query should be prepared"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Prepared"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AD301B8"
						documentation 	"Indicates whether the query should be prepared"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LogMessages"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AD402BC"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LogMessages"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AD500FA"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Close"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AD6026C"
						documentation 	"Closes an open remote data object"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Execute"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AD70078"
						documentation 	"Executes a query or SQL statement on an object"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Options"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "OpenResultset"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AD8010E"
						documentation 	"Creates a new rdoResultset object"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Type"
							type       	"Variant")
						    (object Parameter "Optional ByVal LockType"
							type       	"Variant"))
						result     	"rdoResultset"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Cancel"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5ADA0050"
						documentation 	"Cancels an asynchronous query or pending results against the rdoResultset object"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Updatable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ADA01D6"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Connect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ADB0014"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ErrorThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ADB023A"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ErrorThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5ADC0078"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoQueries"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310305"))
					quid       	"32EE5B510033"
					documentation 	"Contains rdoQuery objects that have been added to the rdoQueries collection either automatically via the CreateQuery method, or with the Add method."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B530168"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B55003C"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B5602C6"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"rdoQuery"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoQuery"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310207"))
					quid       	"32EE5ADE00C8"
					documentation 	"An SQL query definition that can include zero or more parameters."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "QueryTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5ADE0398"
						documentation 	"Determines the ODBC's driver manager query timeout value"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "QueryTimeout"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5ADF0168"
						documentation 	"Determines the ODBC's driver manager query timeout value"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Type"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE000B4"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Get"
						result     	"QueryTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MaxRows"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE00230"
						documentation 	"Determines the maximum number of rows returned from a query"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MaxRows"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AE10000"
						documentation 	"Determines the maximum number of rows returned from a query"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BindThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE1033E"
						documentation 	"Determines the size of the largest column automatically bound under ODBC"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BindThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AE2010E"
						documentation 	"Determines the size of the largest column automatically bound under ODBC"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoParameters"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE3005A"
						documentation 	"Contains all rdoParameter objects of an rdoQuery"
						stereotype 	"Get"
						result     	"rdoParameters"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE30212"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AE3035C"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowsAffected"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE402A8"
						documentation 	"Number of rows affected by the most recently invoked Execute method"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SQL"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE500B4"
						documentation 	"Determines the SQL statement defining the executed query"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "SQL"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AE5026C"
						documentation 	"Determines the SQL statement defining the executed query"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LockType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE601B8"
						documentation 	"Determines the type of concurrency handling"
						stereotype 	"Get"
						result     	"LockTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LockType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AE60302"
						documentation 	"Determines the type of concurrency handling"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"LockTypeConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoColumns"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE701EA"
						documentation 	"Contains stored rdoColumn objects"
						stereotype 	"Get"
						result     	"rdoColumns"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "KeysetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE70398"
						documentation 	"Determines the number of rows in the keyset buffer"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "KeysetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AE80168"
						documentation 	"Determines the number of rows in the keyset buffer"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowsetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AE900BE"
						documentation 	"Determines the number of cursor rows kept in memory"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowsetSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AE90276"
						documentation 	"Determines the number of cursor rows kept in memory"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "hStmt"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AEA0230"
						documentation 	"The ODBC statement handle"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "StillExecuting"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AEB00AA"
						documentation 	"Indicates whether an asynchronous query is still executing"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AEB0302"
						documentation 	"Determines the type of cursor"
						stereotype 	"Get"
						result     	"ResultsetTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CursorType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AEC0104"
						documentation 	"Determines the type of cursor"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"ResultsetTypeConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ActiveConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AEC0398"
						documentation 	"Parent Connection"
						stereotype 	"Get"
						result     	"_rdoConnection"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ActiveConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 209)))
						quid       	"32EE5AED0168"
						documentation 	"Parent Connection"
						stereotype 	"Set"
						parameters 	(list Parameters
						    (object Parameter "ByRef "
							type       	"_rdoConnection"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Prepared"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AEE00BE"
						documentation 	"Indicates whether the query should be prepared"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Prepared"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AEE0276"
						documentation 	"Indicates whether the query should be prepared"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LogMessages"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AEF01C2"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LogMessages"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AEF037A"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Close"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AF00258"
						documentation 	"Closes an open remote data object"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Execute"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AF00334"
						documentation 	"Executes a query or SQL statement on an object"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Options"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "OpenResultset"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AF103D4"
						documentation 	"Creates a new rdoResultset object"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Type"
							type       	"Variant")
						    (object Parameter "Optional ByVal LockType"
							type       	"Variant"))
						result     	"rdoResultset"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Cancel"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AF30014"
						documentation 	"Cancels an asynchronous query or pending results against the rdoResultset object"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Updatable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AF300F0"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Connect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AF3023A"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ErrorThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AF30384"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ErrorThreshold"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AF400E6"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoResultset"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310141"))
					quid       	"32EE5A8900E6"
					documentation 	"The rows resulting from a query"
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Bookmark"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8A003C"
						documentation 	"Determines a bookmark that uniquely identifies the current row"
						stereotype 	"Get"
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Bookmark"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A8A0294"
						documentation 	"Determines a bookmark that uniquely identifies the current row"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "rdoColumns"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8C00C8"
						documentation 	"Contains stored rdoColumn objects"
						stereotype 	"Get"
						result     	"rdoColumns"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BOF"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8C0320"
						documentation 	"Indicates whether the current row is before the first row"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Bookmarkable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8D00F0"
						documentation 	"Indicates whether an rdoResultset object supports bookmarks"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "EOF"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8D02E4"
						documentation 	"Indicates whether the current row is after the last row"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LockEdits"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8E0122"
						documentation 	"Indicates the locking in effect during editing"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8E02DA"
						documentation 	"User-defined name for a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A8F00DC"
						documentation 	"User-defined name for a remote data object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"String"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Transactions"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9001E0"
						documentation 	"Indicates whether an object supports transaction operations"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Type"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A91008C"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Get"
						result     	"ResultsetTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowCount"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A91035C"
						documentation 	"Indicates the number of rows available in an rdoResultset object"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Updatable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9201CC"
						documentation 	"Indicates whether a remote data object can be changed"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Restartable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9203B6"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "EditMode"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9301F4"
						documentation 	"Indicates the editing state for the current row"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "PercentPosition"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9303AC"
						documentation 	"Determines the current row's location in the rdoResultset object"
						stereotype 	"Get"
						result     	"Single"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "PercentPosition"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A9401B8"
						documentation 	"Determines the current row's location in the rdoResultset object"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Single"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "hStmt"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A95021C"
						documentation 	"Determines the ODBC statement handle"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AbsolutePosition"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A950398"
						documentation 	"Determines the absolute row number of an rdoResultset object's current row"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AbsolutePosition"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A960168"
						documentation 	"Determines the absolute row number of an rdoResultset object's current row"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "StillExecuting"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A970190"
						documentation 	"Indicates whether an asynchronous query is still executing"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LastModified"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9703B6"
						documentation 	"Returns the bookmark of the last row modified"
						stereotype 	"Get"
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BatchSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9801C2"
						documentation 	"Number of records in Batch Update"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BatchSize"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A98037A"
						documentation 	"Number of records in Batch Update"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "UpdateOperation"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9A0028"
						documentation 	"Returns/sets a value that specifies if the optimistic batch update should use an Update statement or a Delete followed by an Insert."
						stereotype 	"Get"
						result     	"Integer"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "UpdateOperation"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A9A032A"
						documentation 	"Returns/sets a value that specifies if the optimistic batch update should use an Update statement or a Delete followed by an Insert."
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Integer"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "UpdateCriteria"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A9C0082"
						documentation 	"Returns/sets a value that specifies how the WHERE clause is constructed for each row during an optimistic batch update operation."
						stereotype 	"Get"
						result     	"Integer"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "UpdateCriteria"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5A9C02A8"
						documentation 	"Returns/sets a value that specifies how the WHERE clause is constructed for each row during an optimistic batch update operation."
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"Integer"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "AddNew"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A9D02D0"
						documentation 	"Initializes copy buffer for a new row"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Close"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A9E0064"
						documentation 	"Closes an open remote data object"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Delete"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A9E017C"
						documentation 	"Deletes the current row"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Edit"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A9E02C6"
						documentation 	"Copies the current row to the copy buffer for editing"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MoveFirst"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A9E03D4"
						documentation 	"Moves the current row pointer to the first row in the result set"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MoveLast"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A9F0172"
						documentation 	"Moves the current row pointer to the last row in the result set"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Options"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MoveNext"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA0012C"
						documentation 	"Moves the current row pointer to the next row in the result set"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MovePrevious"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA00244"
						documentation 	"Moves the current row pointer to the previous row in the result set"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Update"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA00352"
						documentation 	"Saves the copy buffer to the database"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Requery"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA10122"
						documentation 	"Re-executes the query on which the rdoResultset object is based"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Options"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Move"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA200AA"
						documentation 	"Repositions the current row in an rdoResultset object"
						parameters 	(list Parameters
						    (object Parameter "ByVal Rows"
							type       	"Long"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "MoreResults"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA300A0"
						documentation 	"Discards the current rdoResultset and indicates if an additional result set is available"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Cancel"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA302C6"
						documentation 	"Cancels a query running in asynchronous mode or cancels pending results"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CancelUpdate"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA40104"
						documentation 	"Cancels pending updates"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "GetRows"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA40280"
						documentation 	"Retrieves multiple rows into an array"
						parameters 	(list Parameters
						    (object Parameter "ByVal NumRows"
							type       	"Variant"))
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BatchUpdate"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA5023A"
						documentation 	"Performs a batched optimistic update."
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal SingleRow"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "CancelBatch"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AA601FE"
						documentation 	"Cancels all uncommitted changes in the local cursor (used in batch mode)."
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal SingleRow"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ActiveConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AA70186"
						documentation 	"Returns/Sets the parent connection object."
						stereotype 	"Get"
						result     	"_rdoConnection"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ActiveConnection"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 209)))
						quid       	"32EE5AA7033E"
						documentation 	"Returns/Sets the parent connection object."
						stereotype 	"Set"
						parameters 	(list Parameters
						    (object Parameter "ByRef "
							type       	"_rdoConnection"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BatchCollisionCount"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AA80366"
						documentation 	"Number of collision rows"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "BatchCollisionRows"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AA90136"
						documentation 	"Array of collision rows"
						stereotype 	"Get"
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LockType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AA90320"
						documentation 	"Determines the type of concurrency handling"
						stereotype 	"Get"
						result     	"LockTypeConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "LockType"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AAA015E"
						documentation 	"Determines the type of concurrency handling"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"LockTypeConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Status"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AAB0122"
						documentation 	"Current row status"
						stereotype 	"Get"
						result     	"RowStatusConstants"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Status"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AAB0348"
						documentation 	"Current row status"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal "
							type       	"RowStatusConstants"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "GetClipString"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AAC0302"
						documentation 	"Retrieves multiple rows into a string"
						parameters 	(list Parameters
						    (object Parameter "ByVal NumRows"
							type       	"Long")
						    (object Parameter "Optional ByVal ColumnDelimiter"
							type       	"Variant")
						    (object Parameter "Optional ByVal RowDelimiter"
							type       	"Variant"))
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Collect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5AAE038E"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"Variant"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Collect"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 210)))
						quid       	"32EE5AB001C2"
						stereotype 	"Let"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Resync"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5AB10370"
						documentation 	"Fetch batch conflict values for the current row"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Associate"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB201AE"
						documentation 	"Fired after a new connection associated with the object"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "ResultsChanged"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB20398"
						documentation 	"Fired after current rowset is changed"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Dissociate"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB300C8"
						documentation 	"Fired after the connection is set to nothing"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowStatusChanged"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB30280"
						documentation 	"Fired after the state of current row has changed"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowCurrencyChange"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB40014"
						documentation 	"Fired after the resultset is positioned to a new row or no row at all"
						stereotype 	"Event"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "WillAssociate"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB40190"
						documentation 	"Fired before a new connection is associated with the object"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef Connection"
							type       	"rdoConnection"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "WillDissociate"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB50154"
						documentation 	"Fired before the connection is set to nothing"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef Cancel"
							type       	"Boolean"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "WillUpdateRows"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 218)))
						quid       	"32EE5AB600A0"
						documentation 	"Fired before an update to the server occurs"
						stereotype 	"Event"
						parameters 	(list Parameters
						    (object Parameter "ByRef ReturnCode"
							type       	"Integer"))
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoResultsets"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310297"))
					quid       	"32EE5B2F01B8"
					documentation 	"Contains all open rdoResultset objects in an rdoConnection."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B32015E"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B340032"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B3500C8"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"_rdoResultset"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoTable"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310134"))
					quid       	"32EE5A8403B6"
					documentation 	"The stored definition of a base table or SQL view"
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "rdoColumns"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A8501F4"
						documentation 	"Contains stored rdoColumn objects"
						stereotype 	"Get"
						result     	"rdoColumns"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Name"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A85033E"
						documentation 	"Indicates the name of a remote data object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Updatable"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A86010E"
						documentation 	"Indicates whether changes can be made to a remote data object"
						stereotype 	"Get"
						result     	"Boolean"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "RowCount"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A86028A"
						documentation 	"Indicates the number of rows accessed in an rdoResultset object"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Type"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5A87005A"
						documentation 	"Indicates the type or data type of an object"
						stereotype 	"Get"
						result     	"String"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "OpenResultset"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5A870212"
						documentation 	"Creates a new rdoResultset object"
						parameters 	(list Parameters
						    (object Parameter "Optional ByVal Type"
							type       	"Variant")
						    (object Parameter "Optional ByVal LockType"
							type       	"Variant"))
						result     	"rdoResultset"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Class "rdoTables"
					attributes 	(list Attribute_Set
					    (object Attribute
						tool       	"Visual Basic"
						name       	"ImplementationType"
						value      	("ImplementationTypeSet" 201))
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpFile"
						value      	"C:\\WINDOWS\\SYSTEM\\rdo96.hlp")
					    (object Attribute
						tool       	"Visual Basic"
						name       	"HelpContext"
						value      	"310285"))
					quid       	"32EE5B17028D"
					documentation 	"Contains all stored rdoTable objects in a database."
					stereotype 	"Interface"
					operations 	(list Operations
					    (object Operation "Count"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B180136"
						documentation 	"Indicates the number of members in a Remote Data Object collection"
						stereotype 	"Get"
						result     	"Long"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Refresh"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 205)))
						quid       	"32EE5B18035C"
						documentation 	"Refreshes the table definitions"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0)
					    (object Operation "Item"
						attributes 	(list Attribute_Set
						    (object Attribute
							tool       	"Visual Basic"
							name       	"OperationKind"
							value      	("OperationKindSet" 207))
						    (object Attribute
							tool       	"Visual Basic"
							name       	"PropertyKind"
							value      	("PropertyKindSet" 206)))
						quid       	"32EE5B19012C"
						documentation 	"Returns a specific member of a collection"
						stereotype 	"Get"
						parameters 	(list Parameters
						    (object Parameter "ByVal Index"
							type       	"Variant"))
						result     	"rdoTable"
						concurrency 	"Sequential"
						opExportControl 	"Public"
						uid        	0))
					language   	"Visual Basic")
				    (object Association "$UNNAMED$120"
					quid       	"32FFCBBA0221"
					roles      	(list role_list
					    (object Role "$UNNAMED$121"
						quid       	"32FFCBBB00A6"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumns"
						quidu      	"32EE5B0E03D4"
						is_navigable 	TRUE
						is_aggregate 	TRUE)
					    (object Role "<<Get>> Item"
						quid       	"32FFCBBB00BA"
						label      	"<<Get>> Item"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoColumn"
						quidu      	"32EE5A7100E6"
						is_navigable 	TRUE)))
				    (object Association "$UNNAMED$122"
					quid       	"32FFCC1E0062"
					roles      	(list role_list
					    (object Role "$UNNAMED$123"
						quid       	"32FFCC210215"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnections"
						quidu      	"32EE5B1A023A"
						is_navigable 	TRUE
						is_aggregate 	TRUE)
					    (object Role "<<Get>> Item"
						quid       	"32FFCC21021F"
						label      	"<<Get>> Item"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
						quidu      	"32EE5A5300F0"
						is_navigable 	TRUE)))
				    (object Association "$UNNAMED$124"
					quid       	"32FFCC380268"
					roles      	(list role_list
					    (object Role "$UNNAMED$125"
						quid       	"32FFCC390057"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironments"
						quidu      	"32EE5B380295"
						is_navigable 	TRUE
						is_aggregate 	TRUE)
					    (object Role "<<Get>> Item"
						quid       	"32FFCC390061"
						label      	"<<Get>> Item"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironment"
						quidu      	"32EE5AF50302"
						is_navigable 	TRUE)))
				    (object Association "$UNNAMED$126"
					quid       	"3300A6DE025B"
					roles      	(list role_list
					    (object Role "OpenResultset"
						quid       	"3300A6DF0234"
						label      	"OpenResultset"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
						quidu      	"32EE5A8900E6"
						is_navigable 	TRUE)
					    (object Role "$UNNAMED$127"
						quid       	"3300A6DF023E"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
						quidu      	"32EE5ADE00C8")))
				    (object Association "$UNNAMED$128"
					quid       	"3300C360039F"
					roles      	(list role_list
					    (object Role "CreateQuery"
						quid       	"3300C36200A9"
						label      	"CreateQuery"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoQuery"
						quidu      	"32EE5ADE00C8"
						is_navigable 	TRUE)
					    (object Role "$UNNAMED$129"
						quid       	"3300C36200B3"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
						quidu      	"32EE5A5300F0")))
				    (object Association "$UNNAMED$130"
					quid       	"330100FD00F7"
					roles      	(list role_list
					    (object Role "<<Get>>rdoEnvironments"
						quid       	"330100FD03BE"
						label      	"<<Get>>rdoEnvironments"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironment"
						quidu      	"32EE5AF50302"
						is_navigable 	TRUE)
					    (object Role "$UNNAMED$131"
						quid       	"330100FD03C8"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEngine"
						quidu      	"32EE5A4100E6")))
				    (object Association "$UNNAMED$132"
					quid       	"3301014C0399"
					roles      	(list role_list
					    (object Role "OpenConnection"
						quid       	"3301014D02D3"
						label      	"OpenConnection"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
						quidu      	"32EE5A5300F0"
						is_navigable 	TRUE)
					    (object Role "$UNNAMED$133"
						quid       	"3301014D034B"
						supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironment"
						quidu      	"32EE5AF50302"))))
				logical_presentations 	(list unit_reference_list
				    (object ClassDiagram "Package Overview"
					quid       	"32EFAE650208"
					title      	"Package Overview"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoErrors" @23
						ShowCompartmentStereotypes 	TRUE
						location   	(1279, 196)
						label      	(object ItemLabel
						    Parent_View 	@23
						    location   	(1113, 62)
						    nlines     	1
						    max_width  	332
						    justify    	0
						    label      	"rdoErrors")
						stereotype 	(object ItemLabel
						    Parent_View 	@23
						    location   	(1113, 12)
						    anchor     	10
						    nlines     	1
						    max_width  	332
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B5C0212"
						compartment 	(object Compartment
						    Parent_View 	@23
						    location   	(1113, 122)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	5
						    max_width  	368
						    compartmentItems 	(list Compartment
							"<<Get>> + Count()"
							"+ Refresh()"
							"<<Get>> + Item()"
							"+ Clear()"))
						width      	350
						height     	392
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEngine" @24
						ShowCompartmentStereotypes 	TRUE
						location   	(517, 171)
						label      	(object ItemLabel
						    Parent_View 	@24
						    location   	(282, 62)
						    nlines     	1
						    max_width  	470
						    justify    	0
						    label      	"rdoEngine")
						stereotype 	(object ItemLabel
						    Parent_View 	@24
						    location   	(282, 12)
						    anchor     	10
						    nlines     	1
						    max_width  	470
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A4100E6"
						compartment 	(object Compartment
						    Parent_View 	@24
						    location   	(282, 122)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	4
						    max_width  	525
						    compartmentItems 	(list Compartment
							"+ rdoCreateEnvironment()"
							"+ rdoRegisterDataSource()"
							"<<Event>> + InfoMessage()"))
						width      	488
						height     	342
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$38" @25
						location   	(932, 168)
						stereotype 	TRUE
						quidu      	"32EE5A4F0078"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoErrors" @26
							Parent_View 	@25
							location   	(373, -126)
							label      	(object SegLabel @27
							    Parent_View 	@26
							    location   	(944, 135)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	372
							    justify    	0
							    label      	"+<<Get>> rdoErrors"
							    pctDist    	0.076142
							    height     	34
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5A4F007A"
							client     	@25
							supplier   	@23
							line_style 	3
							origin_attachment 	(932, 168)
							terminal_attachment 	(1104, 168))
						    (object RoleView "$UNNAMED$39" @28
							Parent_View 	@25
							location   	(373, -126)
							stereotype 	TRUE
							quidu      	"32EE5A4F0079"
							client     	@25
							supplier   	@24
							line_style 	3
							origin_attachment 	(932, 168)
							terminal_attachment 	(761, 168))))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEnvironments" @29
						ShowCompartmentStereotypes 	TRUE
						location   	(506, 604)
						label      	(object ItemLabel
						    Parent_View 	@29
						    location   	(342, 495)
						    nlines     	1
						    max_width  	328
						    justify    	0
						    label      	"rdoEnvironments")
						stereotype 	(object ItemLabel
						    Parent_View 	@29
						    location   	(342, 445)
						    anchor     	10
						    nlines     	1
						    max_width  	328
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B380295"
						compartment 	(object Compartment
						    Parent_View 	@29
						    location   	(342, 555)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	4
						    max_width  	228
						    compartmentItems 	(list Compartment
							"+ Add()"
							"+ Refresh()"
							"+ Remove()"))
						width      	346
						height     	342
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$36" @30
						location   	(484, 387)
						stereotype 	TRUE
						quidu      	"32EE5A4E03C0"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoEnvironments" @31
							Parent_View 	@30
							location   	(-75, 93)
							label      	(object SegLabel @32
							    Parent_View 	@31
							    location   	(479, 399)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	510
							    justify    	0
							    label      	"+<<Get>> rdoEnvironments"
							    pctDist    	0.291262
							    height     	6
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5A4F000A"
							client     	@30
							supplier   	@29
							line_style 	3
							origin_attachment 	(484, 387)
							terminal_attachment 	(484, 433))
						    (object RoleView "$UNNAMED$37" @33
							Parent_View 	@30
							location   	(-75, 93)
							stereotype 	TRUE
							quidu      	"32EE5A4E03C1"
							client     	@30
							supplier   	@24
							line_style 	3
							origin_attachment 	(484, 387)
							terminal_attachment 	(484, 342))))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @34
						ShowCompartmentStereotypes 	TRUE
						location   	(1577, 1567)
						label      	(object ItemLabel
						    Parent_View 	@34
						    location   	(1319, 1133)
						    nlines     	1
						    max_width  	516
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@34
						    location   	(1319, 1083)
						    anchor     	10
						    nlines     	1
						    max_width  	516
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						compartment 	(object Compartment
						    Parent_View 	@34
						    location   	(1319, 1193)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	17
						    max_width  	578
						    compartmentItems 	(list Compartment
							"+ Execute()"
							"+ OpenResultset()"
							"+ CreatePreparedStatement()"
							"+ BeginTrans()"
							"+ CommitTrans()"
							"+ RollbackTrans()"
							"+ Cancel()"
							"+ Close()"
							"+ EstablishConnection()"
							"+ CreateQuery()"
							"<<Event>> + Connect()"
							"<<Event>> + BeforeConnect()"
							"<<Event>> + QueryComplete()"
							"<<Event>> + QueryTimeout()"
							"<<Event>> + Disconnect()"
							"<<Event>> + WillExecute()"))
						width      	534
						height     	992
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnections" @35
						ShowCompartmentStereotypes 	TRUE
						location   	(676, 1530)
						label      	(object ItemLabel
						    Parent_View 	@35
						    location   	(518, 1501)
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"rdoConnections")
						stereotype 	(object ItemLabel
						    Parent_View 	@35
						    location   	(518, 1451)
						    anchor     	10
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B1A023A"
						width      	334
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$122" @36
						location   	(939, 1760)
						stereotype 	TRUE
						quidu      	"32FFCC1E0062"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @37
							Parent_View 	@36
							location   	(219, 470)
							label      	(object SegLabel @38
							    Parent_View 	@37
							    location   	(927, 1721)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	-0.033898
							    height     	40
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32FFCC21021F"
							client     	@36
							supplier   	@34
							line_style 	3
							origin_attachment 	(939, 1760)
							terminal_attachment 	(1310, 1760))
						    (object RoleView "$UNNAMED$123" @39
							Parent_View 	@36
							location   	(219, 470)
							stereotype 	TRUE
							quidu      	"32FFCC210215"
							client     	@36
							supplier   	@35
							vertices   	(list Points
							    (939, 1760)
							    (707, 1760)
							    (707, 1621))
							line_style 	3
							origin_attachment 	(939, 1760)
							terminal_attachment 	(707, 1621))))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEnvironment" @40
						ShowCompartmentStereotypes 	TRUE
						location   	(971, 1041)
						label      	(object ItemLabel
						    Parent_View 	@40
						    location   	(795, 807)
						    nlines     	1
						    max_width  	352
						    justify    	0
						    label      	"rdoEnvironment")
						stereotype 	(object ItemLabel
						    Parent_View 	@40
						    location   	(795, 757)
						    anchor     	10
						    nlines     	1
						    max_width  	352
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5AF50302"
						compartment 	(object Compartment
						    Parent_View 	@40
						    location   	(795, 867)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	9
						    max_width  	553
						    compartmentItems 	(list Compartment
							"+ CommitTrans()"
							"+ RollbackTrans()"
							"+ BeginTrans()"
							"+ OpenConnection()"
							"<<Event>> + BeginTrans()"
							"<<Event>> + CommitTrans()"
							"<<Event>> + RollbackTrans()"
							"+ Close()"))
						width      	370
						height     	592
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$130" @41
						location   	(212, 851)
						stereotype 	TRUE
						quidu      	"330100FD00F7"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$131" @42
							Parent_View 	@41
							location   	(-58, 731)
							stereotype 	TRUE
							quidu      	"330100FD03C8"
							client     	@41
							supplier   	@24
							vertices   	(list Points
							    (212, 851)
							    (212, 147)
							    (273, 147))
							line_style 	3
							origin_attachment 	(212, 851)
							terminal_attachment 	(273, 147))
						    (object RoleView "<<Get>>rdoEnvironments" @43
							Parent_View 	@41
							location   	(-58, 731)
							label      	(object SegLabel @44
							    Parent_View 	@43
							    location   	(632, 1002)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	498
							    justify    	0
							    label      	"+<<Get>>rdoEnvironments"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"330100FD03BE"
							client     	@41
							supplier   	@40
							vertices   	(list Points
							    (212, 851)
							    (212, 1043)
							    (786, 1043))
							line_style 	3
							origin_attachment 	(212, 851)
							terminal_attachment 	(786, 1043))))
					    (object AssociationViewNew "$UNNAMED$124" @45
						location   	(566, 1003)
						stereotype 	TRUE
						quidu      	"32FFCC380268"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @46
							Parent_View 	@45
							location   	(296, 523)
							label      	(object SegLabel @47
							    Parent_View 	@46
							    location   	(620, 844)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	0.245589
							    height     	160
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32FFCC390061"
							client     	@45
							supplier   	@40
							line_style 	3
							origin_attachment 	(566, 1003)
							terminal_attachment 	(786, 1003))
						    (object RoleView "$UNNAMED$125" @48
							Parent_View 	@45
							location   	(296, 523)
							stereotype 	TRUE
							quidu      	"32FFCC390057"
							client     	@45
							supplier   	@29
							vertices   	(list Points
							    (566, 1003)
							    (506, 1003)
							    (506, 775))
							line_style 	3
							origin_attachment 	(566, 1003)
							terminal_attachment 	(506, 775))))
					    (object AssociationViewNew "$UNNAMED$132" @49
						location   	(1423, 916)
						stereotype 	TRUE
						quidu      	"3301014C0399"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$133" @50
							Parent_View 	@49
							location   	(1153, -104)
							stereotype 	TRUE
							quidu      	"3301014D034B"
							client     	@49
							supplier   	@40
							line_style 	3
							origin_attachment 	(1423, 916)
							terminal_attachment 	(1156, 916))
						    (object RoleView "OpenConnection" @51
							Parent_View 	@49
							location   	(1153, -104)
							label      	(object SegLabel @52
							    Parent_View 	@51
							    location   	(1540, 798)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+OpenConnection"
							    pctDist    	1.047619
							    height     	119
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"3301014D02D3"
							client     	@49
							supplier   	@34
							vertices   	(list Points
							    (1423, 916)
							    (1535, 916)
							    (1535, 1071))
							line_style 	3
							origin_attachment 	(1423, 916)
							terminal_attachment 	(1535, 1071))))
					    (object AssociationViewNew "$UNNAMED$96" @53
						location   	(701, 1240)
						stereotype 	TRUE
						quidu      	"32EE5B0503CA"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoConnections" @54
							Parent_View 	@53
							location   	(-340, 192)
							label      	(object SegLabel @55
							    Parent_View 	@54
							    location   	(660, 1398)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	486
							    justify    	0
							    label      	"+<<Get>> rdoConnections"
							    pctDist    	0.800000
							    height     	42
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5B0503CC"
							client     	@53
							supplier   	@35
							line_style 	3
							origin_attachment 	(701, 1240)
							terminal_attachment 	(701, 1439))
						    (object RoleView "$UNNAMED$97" @56
							Parent_View 	@53
							location   	(-340, 192)
							stereotype 	TRUE
							quidu      	"32EE5B0503CB"
							client     	@53
							supplier   	@40
							vertices   	(list Points
							    (701, 1240)
							    (701, 1126)
							    (786, 1126))
							line_style 	3
							origin_attachment 	(701, 1240)
							terminal_attachment 	(786, 1126))))))
				    (object ClassDiagram "rdoConnection"
					quid       	"32EE5A2B038E"
					title      	"rdoConnection"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	685
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @57
						ShowCompartmentStereotypes 	TRUE
						IncludeAttribute 	TRUE
						IncludeOperation 	TRUE
						location   	(1458, 1051)
						font       	(object Font
						    size       	9)
						label      	(object ItemLabel
						    Parent_View 	@57
						    location   	(1312, 1025)
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@57
						    location   	(1312, 977)
						    anchor     	10
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						width      	310
						height     	172
						annotation 	8
						autoResize 	TRUE)))
				    (object ClassDiagram "rdoErrors"
					quid       	"32EFAE020370"
					title      	"rdoErrors"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoError" @58
						ShowCompartmentStereotypes 	TRUE
						location   	(1107, 571)
						label      	(object ItemLabel
						    Parent_View 	@58
						    location   	(878, 362)
						    nlines     	1
						    max_width  	458
						    justify    	0
						    label      	"rdoError")
						stereotype 	(object ItemLabel
						    Parent_View 	@58
						    location   	(878, 312)
						    anchor     	10
						    nlines     	1
						    max_width  	458
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A4F02DA"
						compartment 	(object Compartment
						    Parent_View 	@58
						    location   	(878, 422)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	8
						    max_width  	479
						    compartmentItems 	(list Compartment
							"<<Get>> + Number()"
							"<<Get>> + Source()"
							"<<Get>> + Description()"
							"<<Get>> + HelpContext()"
							"<<Get>> + HelpFile()"
							"<<Get>> + SQLState()"
							"<<Get>> + SQLRetcode()"))
						width      	476
						height     	542
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoErrors" @59
						ShowCompartmentStereotypes 	TRUE
						location   	(209, 576)
						label      	(object ItemLabel
						    Parent_View 	@59
						    location   	(40, 492)
						    nlines     	1
						    max_width  	338
						    justify    	0
						    label      	"rdoErrors")
						stereotype 	(object ItemLabel
						    Parent_View 	@59
						    location   	(40, 442)
						    anchor     	10
						    nlines     	1
						    max_width  	338
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B5C0212"
						compartment 	(object Compartment
						    Parent_View 	@59
						    location   	(40, 552)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	3
						    max_width  	343
						    compartmentItems 	(list Compartment
							"<<Get>> + Item()"
							"<<Get>> + Count()"))
						width      	356
						height     	292
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$118" @60
						location   	(627, 573)
						stereotype 	TRUE
						quidu      	"32EE5B6A03D4"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @61
							Parent_View 	@60
							location   	(411, 513)
							label      	(object SegLabel @62
							    Parent_View 	@61
							    location   	(681, 613)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	0.224282
							    height     	40
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5B6A03D6"
							client     	@60
							supplier   	@58
							line_style 	0)
						    (object RoleView "$UNNAMED$119" @63
							Parent_View 	@60
							location   	(411, 513)
							stereotype 	TRUE
							quidu      	"32EE5B6A03D5"
							client     	@60
							supplier   	@59
							line_style 	0)))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEngine" @64
						ShowCompartmentStereotypes 	TRUE
						location   	(220, 168)
						label      	(object ItemLabel
						    Parent_View 	@64
						    location   	(22, 109)
						    nlines     	1
						    max_width  	396
						    justify    	0
						    label      	"rdoEngine")
						stereotype 	(object ItemLabel
						    Parent_View 	@64
						    location   	(22, 59)
						    anchor     	10
						    nlines     	1
						    max_width  	396
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A4100E6"
						compartment 	(object Compartment
						    Parent_View 	@64
						    location   	(22, 169)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	219
						    compartmentItems 	(list Compartment
							"<<Get>> + rdoErrors()"))
						width      	414
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$38" @65
						location   	(213, 359)
						stereotype 	TRUE
						quidu      	"32EE5A4F0078"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoErrors" @66
							Parent_View 	@65
							location   	(-3, 299)
							label      	(object SegLabel @67
							    Parent_View 	@66
							    location   	(170, 415)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> rdoErrors"
							    pctDist    	0.800000
							    height     	42
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5A4F007A"
							client     	@65
							supplier   	@59
							line_style 	0)
						    (object RoleView "$UNNAMED$39" @68
							Parent_View 	@65
							location   	(-3, 299)
							stereotype 	TRUE
							quidu      	"32EE5A4F0079"
							client     	@65
							supplier   	@64
							line_style 	0)))
					    (object Label @69
						location   	(659, 66)
						font       	(object Font
						    bold       	TRUE
						    italics    	TRUE
						    color      	8421376
						    default_color 	FALSE)
						nlines     	4
						max_width  	662
						label      	"This diagram shows how to use the rdoErrors collection to access an rdoError")
					    (object NoteView @70
						location   	(650, 393)
						font       	(object Font
						    size       	9
						    bold       	TRUE
						    italics    	TRUE
						    color      	8421376
						    default_color 	FALSE)
						label      	(object ItemLabel
						    Parent_View 	@70
						    location   	(512, 333)
						    nlines     	2
						    max_width  	240
						    label      	"Aggregation symbol")
						width      	300
						height     	132)
					    (object AttachView "" @71
						stereotype 	TRUE
						client     	@70
						supplier   	@60
						line_style 	0)))
				    (object ClassDiagram "rdoQuery"
					quid       	"32EFA32C0172"
					title      	"rdoQuery"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @72
						ShowCompartmentStereotypes 	TRUE
						location   	(223, 162)
						label      	(object ItemLabel
						    Parent_View 	@72
						    location   	(65, 78)
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@72
						    location   	(65, 28)
						    anchor     	10
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						compartment 	(object Compartment
						    Parent_View 	@72
						    location   	(65, 138)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	3
						    max_width  	236
						    compartmentItems 	(list Compartment
							"+ Execute()"
							"+ OpenResultset()"))
						width      	334
						height     	292
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoQueries" @73
						ShowCompartmentStereotypes 	TRUE
						location   	(201, 631)
						label      	(object ItemLabel
						    Parent_View 	@73
						    location   	(32, 547)
						    nlines     	1
						    max_width  	338
						    justify    	0
						    label      	"rdoQueries")
						stereotype 	(object ItemLabel
						    Parent_View 	@73
						    location   	(32, 497)
						    anchor     	10
						    nlines     	1
						    max_width  	338
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B510033"
						compartment 	(object Compartment
						    Parent_View 	@73
						    location   	(32, 607)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	3
						    max_width  	343
						    compartmentItems 	(list Compartment
							"<<Get>> + Count()"
							"<<Get>> + Item()"))
						width      	356
						height     	292
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$52" @74
						location   	(209, 396)
						stereotype 	TRUE
						quidu      	"32EE5A7100B4"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoQueries" @75
							Parent_View 	@74
							location   	(-11, 336)
							label      	(object SegLabel @76
							    Parent_View 	@75
							    location   	(168, 466)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> rdoQueries"
							    pctDist    	0.800000
							    height     	42
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5A7100B6"
							client     	@74
							supplier   	@73
							line_style 	3
							origin_attachment 	(209, 396)
							terminal_attachment 	(209, 485))
						    (object RoleView "$UNNAMED$53" @77
							Parent_View 	@74
							location   	(-11, 336)
							stereotype 	TRUE
							quidu      	"32EE5A7100B5"
							client     	@74
							supplier   	@72
							line_style 	3
							origin_attachment 	(209, 396)
							terminal_attachment 	(209, 308))))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::QueryTypeConstants" @78
						ShowCompartmentStereotypes 	TRUE
						IncludeOperation 	TRUE
						location   	(780, 1112)
						label      	(object ItemLabel
						    Parent_View 	@78
						    location   	(570, 1059)
						    nlines     	1
						    max_width  	420
						    justify    	0
						    label      	"QueryTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@78
						    location   	(570, 1009)
						    anchor     	10
						    nlines     	1
						    max_width  	420
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A380371"
						width      	438
						height     	230
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoColumns" @79
						ShowCompartmentStereotypes 	TRUE
						location   	(1546, 756)
						label      	(object ItemLabel
						    Parent_View 	@79
						    location   	(1408, 727)
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"rdoColumns")
						stereotype 	(object ItemLabel
						    Parent_View 	@79
						    location   	(1408, 677)
						    anchor     	10
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B0E03D4"
						width      	294
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::ResultsetTypeConstants" @80
						ShowCompartmentStereotypes 	TRUE
						location   	(1584, 962)
						label      	(object ItemLabel
						    Parent_View 	@80
						    location   	(1344, 909)
						    nlines     	1
						    max_width  	480
						    justify    	0
						    label      	"ResultsetTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@80
						    location   	(1344, 859)
						    anchor     	10
						    nlines     	1
						    max_width  	480
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A33014B"
						width      	498
						height     	230
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::LockTypeConstants" @81
						ShowCompartmentStereotypes 	TRUE
						location   	(805, 1373)
						label      	(object ItemLabel
						    Parent_View 	@81
						    location   	(608, 1320)
						    nlines     	1
						    max_width  	394
						    justify    	0
						    label      	"LockTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@81
						    location   	(608, 1270)
						    anchor     	10
						    nlines     	1
						    max_width  	394
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3102A9"
						width      	412
						height     	230
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoParameters" @82
						ShowCompartmentStereotypes 	TRUE
						location   	(1213, 1298)
						label      	(object ItemLabel
						    Parent_View 	@82
						    location   	(1061, 1269)
						    nlines     	1
						    max_width  	304
						    justify    	0
						    label      	"rdoParameters")
						stereotype 	(object ItemLabel
						    Parent_View 	@82
						    location   	(1061, 1219)
						    anchor     	10
						    nlines     	1
						    max_width  	304
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B240349"
						width      	322
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoQuery" @83
						ShowCompartmentStereotypes 	TRUE
						location   	(1036, 545)
						label      	(object ItemLabel
						    Parent_View 	@83
						    location   	(878, 461)
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"rdoQuery")
						stereotype 	(object ItemLabel
						    Parent_View 	@83
						    location   	(878, 411)
						    anchor     	10
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5ADE00C8"
						compartment 	(object Compartment
						    Parent_View 	@83
						    location   	(878, 521)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	3
						    max_width  	239
						    compartmentItems 	(list Compartment
							"+ Execute()"
							"+ OpenResultset()"))
						width      	334
						height     	292
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$116" @84
						location   	(624, 581)
						stereotype 	TRUE
						quidu      	"32EE5B5C0136"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @85
							Parent_View 	@84
							location   	(-21, -164)
							label      	(object SegLabel @86
							    Parent_View 	@85
							    location   	(663, 554)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	0.163793
							    height     	28
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5B5C0173"
							client     	@84
							supplier   	@83
							line_style 	3
							origin_attachment 	(624, 581)
							terminal_attachment 	(869, 581))
						    (object RoleView "$UNNAMED$117" @87
							Parent_View 	@84
							location   	(-21, -164)
							stereotype 	TRUE
							quidu      	"32EE5B5C0172"
							client     	@84
							supplier   	@73
							line_style 	3
							origin_attachment 	(624, 581)
							terminal_attachment 	(379, 581))))
					    (object AssociationViewNew "$UNNAMED$84" @88
						location   	(865, 844)
						stereotype 	TRUE
						quidu      	"32EE5AF500DC"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Type" @89
							Parent_View 	@88
							location   	(635, 709)
							label      	(object SegLabel @90
							    Parent_View 	@89
							    location   	(873, 844)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Type"
							    pctDist    	0.000000
							    height     	8
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5AF500DE"
							client     	@88
							supplier   	@78
							line_style 	3
							origin_attachment 	(865, 844)
							terminal_attachment 	(865, 997))
						    (object RoleView "$UNNAMED$85" @91
							Parent_View 	@88
							location   	(635, 709)
							stereotype 	TRUE
							quidu      	"32EE5AF500DD"
							client     	@88
							supplier   	@83
							line_style 	3
							origin_attachment 	(865, 844)
							terminal_attachment 	(865, 691))))
					    (object AssociationViewNew "$UNNAMED$90" @92
						location   	(1426, 562)
						stereotype 	TRUE
						quidu      	"32EE5AF50258"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoColumns" @93
							Parent_View 	@92
							location   	(1198, 424)
							label      	(object SegLabel @94
							    Parent_View 	@93
							    location   	(1588, 619)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> rdoColumns"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5AF5025A"
							client     	@92
							supplier   	@79
							vertices   	(list Points
							    (1426, 562)
							    (1546, 562)
							    (1546, 665))
							line_style 	3
							origin_attachment 	(1426, 562)
							terminal_attachment 	(1546, 665))
						    (object RoleView "$UNNAMED$91" @95
							Parent_View 	@92
							location   	(1198, 424)
							stereotype 	TRUE
							quidu      	"32EE5AF50259"
							client     	@92
							supplier   	@83
							line_style 	3
							origin_attachment 	(1426, 562)
							terminal_attachment 	(1203, 562))))
					    (object AssociationViewNew "$UNNAMED$92" @96
						location   	(1149, 902)
						stereotype 	TRUE
						quidu      	"32EE5AF50294"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> CursorType" @97
							Parent_View 	@96
							location   	(921, 764)
							label      	(object SegLabel @98
							    Parent_View 	@97
							    location   	(1286, 921)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> CursorType"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5AF50296"
							client     	@96
							supplier   	@80
							vertices   	(list Points
							    (1149, 902)
							    (1149, 962)
							    (1335, 962))
							line_style 	3
							origin_attachment 	(1149, 902)
							terminal_attachment 	(1335, 962))
						    (object RoleView "$UNNAMED$93" @99
							Parent_View 	@96
							location   	(921, 764)
							stereotype 	TRUE
							quidu      	"32EE5AF50295"
							client     	@96
							supplier   	@83
							line_style 	3
							origin_attachment 	(1149, 902)
							terminal_attachment 	(1149, 691))))
					    (object AssociationViewNew "$UNNAMED$88" @100
						location   	(490, 876)
						stereotype 	TRUE
						quidu      	"32EE5AF50226"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> LockType" @101
							Parent_View 	@100
							location   	(262, 738)
							label      	(object SegLabel @102
							    Parent_View 	@101
							    location   	(504, 1270)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> LockType"
							    pctDist    	0.654221
							    height     	14
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5AF50228"
							client     	@100
							supplier   	@81
							vertices   	(list Points
							    (490, 876)
							    (490, 1371)
							    (599, 1371))
							line_style 	3
							origin_attachment 	(490, 876)
							terminal_attachment 	(599, 1371))
						    (object RoleView "$UNNAMED$89" @103
							Parent_View 	@100
							location   	(262, 738)
							stereotype 	TRUE
							quidu      	"32EE5AF50227"
							client     	@100
							supplier   	@83
							vertices   	(list Points
							    (490, 876)
							    (490, 650)
							    (869, 650))
							line_style 	3
							origin_attachment 	(490, 876)
							terminal_attachment 	(869, 650))))
					    (object AssociationViewNew "$UNNAMED$86" @104
						location   	(1081, 949)
						stereotype 	TRUE
						quidu      	"32EE5AF501B8"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoParameters" @105
							Parent_View 	@104
							location   	(853, 811)
							label      	(object SegLabel @106
							    Parent_View 	@105
							    location   	(1192, 1113)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	444
							    justify    	0
							    label      	"+<<Get>> rdoParameters"
							    pctDist    	0.636364
							    height     	111
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5AF501EA"
							client     	@104
							supplier   	@82
							line_style 	3
							origin_attachment 	(1081, 949)
							terminal_attachment 	(1081, 1207))
						    (object RoleView "$UNNAMED$87" @107
							Parent_View 	@104
							location   	(853, 811)
							stereotype 	TRUE
							quidu      	"32EE5AF501B9"
							client     	@104
							supplier   	@83
							line_style 	3
							origin_attachment 	(1081, 949)
							terminal_attachment 	(1081, 691))))))
				    (object ClassDiagram "rdoTables"
					quid       	"32EFA5C900C8"
					title      	"rdoTables"
					documentation 	"This diagram shows how to access columns through a connection"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	315
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @108
						ShowCompartmentStereotypes 	TRUE
						location   	(249, 120)
						label      	(object ItemLabel
						    Parent_View 	@108
						    location   	(103, 91)
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@108
						    location   	(103, 41)
						    anchor     	10
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						width      	310
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoTables" @109
						ShowCompartmentStereotypes 	TRUE
						location   	(250, 495)
						label      	(object ItemLabel
						    Parent_View 	@109
						    location   	(112, 466)
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"rdoTables")
						stereotype 	(object ItemLabel
						    Parent_View 	@109
						    location   	(112, 416)
						    anchor     	10
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B17028D"
						width      	294
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$44" @110
						location   	(249, 307)
						stereotype 	TRUE
						quidu      	"32EE5A700352"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoTables" @111
							Parent_View 	@110
							location   	(33, 247)
							label      	(object SegLabel @112
							    Parent_View 	@111
							    location   	(276, 346)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> rdoTables"
							    pctDist    	0.408000
							    height     	27
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5A700354"
							client     	@110
							supplier   	@109
							line_style 	0)
						    (object RoleView "$UNNAMED$45" @113
							Parent_View 	@110
							location   	(33, 247)
							stereotype 	TRUE
							quidu      	"32EE5A700353"
							client     	@110
							supplier   	@108
							line_style 	0)))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoTable" @114
						ShowCompartmentStereotypes 	TRUE
						location   	(253, 813)
						label      	(object ItemLabel
						    Parent_View 	@114
						    location   	(32, 754)
						    nlines     	1
						    max_width  	442
						    justify    	0
						    label      	"rdoTable")
						stereotype 	(object ItemLabel
						    Parent_View 	@114
						    location   	(32, 704)
						    anchor     	10
						    nlines     	1
						    max_width  	442
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A8403B6"
						compartment 	(object Compartment
						    Parent_View 	@114
						    location   	(32, 814)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	263
						    compartmentItems 	(list Compartment
							"<<Get>> + rdoColumns()"))
						width      	460
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$106" @115
						location   	(250, 638)
						stereotype 	TRUE
						quidu      	"32EE5B1A0190"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @116
							Parent_View 	@115
							location   	(34, 578)
							label      	(object SegLabel @117
							    Parent_View 	@116
							    location   	(264, 660)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	0.432554
							    height     	14
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5B1A0192"
							client     	@115
							supplier   	@114
							line_style 	0)
						    (object RoleView "$UNNAMED$107" @118
							Parent_View 	@115
							location   	(34, 578)
							stereotype 	TRUE
							quidu      	"32EE5B1A0191"
							client     	@115
							supplier   	@109
							line_style 	0)))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoColumn" @119
						ShowCompartmentStereotypes 	TRUE
						location   	(1080, 1254)
						label      	(object ItemLabel
						    Parent_View 	@119
						    location   	(942, 1195)
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"rdoColumn")
						stereotype 	(object ItemLabel
						    Parent_View 	@119
						    location   	(942, 1145)
						    anchor     	10
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A7100E6"
						compartment 	(object Compartment
						    Parent_View 	@119
						    location   	(942, 1255)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	167
						    compartmentItems 	(list Compartment
							"+ GetChunk()"))
						width      	294
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoColumns" @120
						ShowCompartmentStereotypes 	TRUE
						location   	(1080, 816)
						label      	(object ItemLabel
						    Parent_View 	@120
						    location   	(911, 707)
						    nlines     	1
						    max_width  	338
						    justify    	0
						    label      	"rdoColumns")
						stereotype 	(object ItemLabel
						    Parent_View 	@120
						    location   	(911, 657)
						    anchor     	10
						    nlines     	1
						    max_width  	338
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B0E03D4"
						compartment 	(object Compartment
						    Parent_View 	@120
						    location   	(911, 767)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	4
						    max_width  	343
						    compartmentItems 	(list Compartment
							"<<Get>> + Item()"
							"<<Get>> + Count()"
							"+ Refresh()"))
						width      	356
						height     	342
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$60" @121
						location   	(692, 814)
						stereotype 	TRUE
						quidu      	"32EE5A8900B4"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoColumns" @122
							Parent_View 	@121
							location   	(-112, 406)
							label      	(object SegLabel @123
							    Parent_View 	@122
							    location   	(751, 778)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> rdoColumns"
							    pctDist    	0.281298
							    height     	37
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5A8900B6"
							client     	@121
							supplier   	@120
							line_style 	0)
						    (object RoleView "$UNNAMED$61" @124
							Parent_View 	@121
							location   	(-112, 406)
							stereotype 	TRUE
							quidu      	"32EE5A8900B5"
							client     	@121
							supplier   	@114
							line_style 	0)))
					    (object AssociationViewNew "$UNNAMED$120" @125
						location   	(1080, 1059)
						stereotype 	TRUE
						quidu      	"32FFCBBA0221"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @126
							Parent_View 	@125
							location   	(40, 267)
							label      	(object SegLabel @127
							    Parent_View 	@126
							    location   	(1085, 1057)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	-0.034597
							    height     	5
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32FFCBBB00BA"
							client     	@125
							supplier   	@119
							line_style 	0)
						    (object RoleView "$UNNAMED$121" @128
							Parent_View 	@125
							location   	(40, 267)
							stereotype 	TRUE
							quidu      	"32FFCBBB00A6"
							client     	@125
							supplier   	@120
							line_style 	0)))))
				    (object ClassDiagram "CreateRdoResultsetObject"
					quid       	"3300A39D0022"
					title      	"CreateRdoResultsetObject"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object NoteView @129
						location   	(381, 394)
						font       	(object Font
						    bold       	TRUE
						    italics    	TRUE
						    color      	8421376
						    default_color 	FALSE)
						label      	(object ItemLabel
						    Parent_View 	@129
						    location   	(71, 147)
						    nlines     	9
						    max_width  	584
						    label      	"Use the OpenResultset method against an rdoConnection object. This is used to submit a query that you do not expect to execute more than once in your application. The returned rows are placed in an rdoResultset object.")
						width      	644
						height     	506)
					    (object NoteView @130
						location   	(1971, 487)
						font       	(object Font
						    bold       	TRUE
						    italics    	TRUE
						    color      	8421376
						    default_color 	FALSE)
						label      	(object ItemLabel
						    Parent_View 	@130
						    location   	(1696, 47)
						    nlines     	17
						    max_width  	514
						    label      	"Use the OpenResultset method against an rdoQuery object. This technique is used to submit a query that you expect to execute more than once in your application or that requires one or more parameters. The returned rows are placed in an rdoResultset object and any parameters returned from the query are referenced via the rdoQuery object's rdoParameters collection.")
						width      	574
						height     	893)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoParameters" @131
						ShowCompartmentStereotypes 	TRUE
						location   	(1459, 1364)
						label      	(object ItemLabel
						    Parent_View 	@131
						    location   	(1307, 1335)
						    nlines     	1
						    max_width  	304
						    justify    	0
						    label      	"rdoParameters")
						stereotype 	(object ItemLabel
						    Parent_View 	@131
						    location   	(1307, 1285)
						    anchor     	10
						    nlines     	1
						    max_width  	304
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B240349"
						width      	322
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AttachView "" @132
						stereotype 	TRUE
						client     	@131
						supplier   	@130
						vertices   	(list Points
						    (1620, 1361)
						    (1808, 1359)
						    (1886, 933))
						line_style 	0)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoQuery" @133
						ShowCompartmentStereotypes 	TRUE
						location   	(1460, 892)
						label      	(object ItemLabel
						    Parent_View 	@133
						    location   	(1322, 863)
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"rdoQuery")
						stereotype 	(object ItemLabel
						    Parent_View 	@133
						    location   	(1322, 813)
						    anchor     	10
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5ADE00C8"
						width      	294
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$86" @134
						location   	(1459, 1127)
						stereotype 	TRUE
						quidu      	"32EE5AF501B8"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoParameters" @135
							Parent_View 	@134
							location   	(-7, 365)
							label      	(object SegLabel @136
							    Parent_View 	@135
							    location   	(1418, 1243)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	474
							    justify    	0
							    label      	"+<<Get>> rdoParameters"
							    pctDist    	0.800000
							    height     	42
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5AF501EA"
							client     	@134
							supplier   	@131
							line_style 	0)
						    (object RoleView "$UNNAMED$87" @137
							Parent_View 	@134
							location   	(-7, 365)
							stereotype 	TRUE
							quidu      	"32EE5AF501B9"
							client     	@134
							supplier   	@133
							line_style 	0)))
					    (object AttachView "" @138
						stereotype 	TRUE
						client     	@130
						supplier   	@133
						line_style 	0)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoResultset" @139
						ShowCompartmentStereotypes 	TRUE
						location   	(1174, 194)
						label      	(object ItemLabel
						    Parent_View 	@139
						    location   	(1036, 165)
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"rdoResultset")
						stereotype 	(object ItemLabel
						    Parent_View 	@139
						    location   	(1036, 115)
						    anchor     	10
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A8900E6"
						width      	294
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$126" @140
						location   	(1315, 542)
						stereotype 	TRUE
						quidu      	"3300A6DE025B"
						roleview_list 	(list RoleViews
						    (object RoleView "OpenResultset" @141
							Parent_View 	@140
							location   	(-294, -155)
							label      	(object SegLabel @142
							    Parent_View 	@141
							    location   	(1311, 381)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	300
							    justify    	0
							    label      	"+OpenResultset"
							    pctDist    	0.547840
							    height     	57
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"3300A6DF0234"
							client     	@140
							supplier   	@139
							line_style 	0)
						    (object RoleView "$UNNAMED$127" @143
							Parent_View 	@140
							location   	(-294, -155)
							stereotype 	TRUE
							quidu      	"3300A6DF023E"
							client     	@140
							supplier   	@133
							line_style 	0)))
					    (object AttachView "" @144
						stereotype 	TRUE
						client     	@130
						supplier   	@140
						line_style 	0)
					    (object AttachView "" @145
						stereotype 	TRUE
						client     	@129
						supplier   	@139
						line_style 	0)
					    (object AttachView "" @146
						stereotype 	TRUE
						client     	@130
						supplier   	@139
						line_style 	0)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @147
						ShowCompartmentStereotypes 	TRUE
						location   	(921, 807)
						label      	(object ItemLabel
						    Parent_View 	@147
						    location   	(775, 778)
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@147
						    location   	(775, 728)
						    anchor     	10
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						width      	310
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AttachView "" @148
						stereotype 	TRUE
						client     	@129
						supplier   	@147
						line_style 	0)
					    (object AssociationViewNew "$UNNAMED$48" @149
						location   	(1046, 500)
						stereotype 	TRUE
						quidu      	"32EE5A71000A"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> LastQueryResults" @150
							Parent_View 	@149
							location   	(193, -285)
							label      	(object SegLabel @151
							    Parent_View 	@150
							    location   	(1079, 313)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	534
							    justify    	0
							    label      	"+<<Get>> LastQueryResults"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5A710047"
							client     	@149
							supplier   	@139
							line_style 	0)
						    (object RoleView "$UNNAMED$49" @152
							Parent_View 	@149
							location   	(193, -285)
							stereotype 	TRUE
							quidu      	"32EE5A710046"
							client     	@149
							supplier   	@147
							line_style 	0)))))
				    (object ClassDiagram "Capturing Stored Procedure Output Parameters"
					quid       	"3300C1040256"
					title      	"Capturing Stored Procedure Output Parameters"
					documentation 	
|Using the same technique used with parameter queries in SELECT statements, you can also capture the output parameters from a procedure.
|
					
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoResultset" @153
						ShowCompartmentStereotypes 	TRUE
						location   	(665, 1106)
						label      	(object ItemLabel
						    Parent_View 	@153
						    location   	(527, 1077)
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"rdoResultset")
						stereotype 	(object ItemLabel
						    Parent_View 	@153
						    location   	(527, 1027)
						    anchor     	10
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A8900E6"
						width      	294
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoQuery" @154
						ShowCompartmentStereotypes 	TRUE
						location   	(664, 684)
						label      	(object ItemLabel
						    Parent_View 	@154
						    location   	(507, 625)
						    nlines     	1
						    max_width  	314
						    justify    	0
						    label      	"rdoQuery")
						stereotype 	(object ItemLabel
						    Parent_View 	@154
						    location   	(507, 575)
						    anchor     	10
						    nlines     	1
						    max_width  	314
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5ADE00C8"
						compartment 	(object Compartment
						    Parent_View 	@154
						    location   	(507, 685)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	217
						    compartmentItems 	(list Compartment
							"+ OpenResultset()"))
						width      	332
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$126" @155
						location   	(664, 909)
						stereotype 	TRUE
						quidu      	"3300A6DE025B"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$127" @156
							Parent_View 	@155
							location   	(-686, 62)
							stereotype 	TRUE
							quidu      	"3300A6DF023E"
							client     	@155
							supplier   	@154
							line_style 	0)
						    (object RoleView "OpenResultset" @157
							Parent_View 	@155
							location   	(-686, 62)
							label      	(object SegLabel @158
							    Parent_View 	@157
							    location   	(678, 968)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+OpenResultset"
							    pctDist    	0.558621
							    height     	14
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"3300A6DF0234"
							client     	@155
							supplier   	@153
							line_style 	0)))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @159
						ShowCompartmentStereotypes 	TRUE
						location   	(665, 259)
						label      	(object ItemLabel
						    Parent_View 	@159
						    location   	(453, 175)
						    nlines     	1
						    max_width  	424
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@159
						    location   	(453, 125)
						    anchor     	10
						    nlines     	1
						    max_width  	424
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						compartment 	(object Compartment
						    Parent_View 	@159
						    location   	(453, 235)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	3
						    max_width  	441
						    compartmentItems 	(list Compartment
							"<<Event>> + Connect()"
							"+ EstablishConnection()"))
						width      	442
						height     	292
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$128" @160
						location   	(664, 483)
						stereotype 	TRUE
						quidu      	"3300C360039F"
						roleview_list 	(list RoleViews
						    (object RoleView "CreateQuery" @161
							Parent_View 	@160
							location   	(-64, -911)
							label      	(object SegLabel @162
							    Parent_View 	@161
							    location   	(688, 521)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	264
							    justify    	0
							    label      	"+CreateQuery"
							    pctDist    	0.489505
							    height     	24
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"3300C36200A9"
							client     	@160
							supplier   	@154
							line_style 	0)
						    (object RoleView "$UNNAMED$129" @163
							Parent_View 	@160
							location   	(-64, -911)
							stereotype 	TRUE
							quidu      	"3300C36200B3"
							client     	@160
							supplier   	@159
							line_style 	0)))
					    (object Label @164
						location   	(1028, 306)
						nlines     	7
						max_width  	662
						label      	
|Order:
|
|1 - rdoConnection.Connect(...)
|2 - rdoConnection.EstablishConnection(...)
|3 - rdoConnection.CreateQuery(...)
|4 - rdoQuery.OpenResultset(...)
						)))
				    (object ClassDiagram "Processing Multiple RDO Result Sets"
					quid       	"3300D746026E"
					title      	"Processing Multiple RDO Result Sets"
					documentation 	
|Any SQL statement can include multiple SELECT statements or stored procedures that invoke one or more SELECT statements. Each SELECT statement generates a result set that must be processed by your code or discarded before the RDO resources are released and the next result set is made available.
|
					
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	439
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoQuery" @165
						ShowCompartmentStereotypes 	TRUE
						location   	(657, 300)
						label      	(object ItemLabel
						    Parent_View 	@165
						    location   	(422, 241)
						    nlines     	1
						    max_width  	470
						    justify    	0
						    label      	"rdoQuery")
						stereotype 	(object ItemLabel
						    Parent_View 	@165
						    location   	(422, 191)
						    anchor     	10
						    nlines     	1
						    max_width  	470
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5ADE00C8"
						compartment 	(object Compartment
						    Parent_View 	@165
						    location   	(422, 301)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	292
						    compartmentItems 	(list Compartment
							"<<Get>> + RowsAffected()"))
						width      	488
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoResultset" @166
						ShowCompartmentStereotypes 	TRUE
						location   	(659, 1262)
						label      	(object ItemLabel
						    Parent_View 	@166
						    location   	(502, 1153)
						    nlines     	1
						    max_width  	314
						    justify    	0
						    label      	"rdoResultset")
						stereotype 	(object ItemLabel
						    Parent_View 	@166
						    location   	(502, 1103)
						    anchor     	10
						    nlines     	1
						    max_width  	314
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A8900E6"
						compartment 	(object Compartment
						    Parent_View 	@166
						    location   	(502, 1213)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	4
						    max_width  	307
						    compartmentItems 	(list Compartment
							"<<Get>> + EOF()"
							"+ MoveNext()"
							"+ MoreResults()"))
						width      	332
						height     	342
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$126" @167
						location   	(316, 762)
						stereotype 	TRUE
						quidu      	"3300A6DE025B"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$127" @168
							Parent_View 	@167
							location   	(-343, -500)
							stereotype 	TRUE
							quidu      	"3300A6DF023E"
							client     	@167
							supplier   	@165
							line_style 	0)
						    (object RoleView "OpenResultset" @169
							Parent_View 	@167
							location   	(-343, -500)
							label      	(object SegLabel @170
							    Parent_View 	@169
							    location   	(428, 1052)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+OpenResultset"
							    pctDist    	0.800000
							    height     	42
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"3300A6DF0234"
							client     	@167
							supplier   	@166
							vertices   	(list Points
							    (316, 762)
							    (280, 812)
							    (513, 1090))
							line_style 	0)))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @171
						ShowCompartmentStereotypes 	TRUE
						location   	(656, 721)
						label      	(object ItemLabel
						    Parent_View 	@171
						    location   	(510, 692)
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@171
						    location   	(510, 642)
						    anchor     	10
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						width      	310
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$128" @172
						location   	(656, 525)
						stereotype 	TRUE
						quidu      	"3300C360039F"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$129" @173
							Parent_View 	@172
							location   	(-1, 225)
							stereotype 	TRUE
							quidu      	"3300C36200B3"
							client     	@172
							supplier   	@171
							line_style 	0)
						    (object RoleView "CreateQuery" @174
							Parent_View 	@172
							location   	(-1, 225)
							label      	(object SegLabel @175
							    Parent_View 	@174
							    location   	(645, 468)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+CreateQuery"
							    pctDist    	0.557823
							    height     	12
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"3300C36200A9"
							client     	@172
							supplier   	@165
							line_style 	0)))
					    (object AssociationViewNew "$UNNAMED$48" @176
						location   	(945, 973)
						stereotype 	TRUE
						quidu      	"32EE5A71000A"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> LastQueryResults" @177
							Parent_View 	@176
							location   	(289, 252)
							label      	(object SegLabel @178
							    Parent_View 	@177
							    location   	(906, 1068)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	534
							    justify    	0
							    label      	"+<<Get>> LastQueryResults"
							    pctDist    	0.610811
							    height     	7
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5A710047"
							client     	@176
							supplier   	@166
							vertices   	(list Points
							    (945, 973)
							    (990, 1012)
							    (825, 1136))
							line_style 	0)
						    (object RoleView "$UNNAMED$49" @179
							Parent_View 	@176
							location   	(289, 252)
							stereotype 	TRUE
							quidu      	"32EE5A710046"
							client     	@176
							supplier   	@171
							line_style 	0)))
					    (object NoteView @180
						location   	(1203, 1265)
						label      	(object ItemLabel
						    Parent_View 	@180
						    location   	(1065, 1205)
						    nlines     	2
						    max_width  	240
						    label      	"MyRs")
						width      	300
						height     	132)
					    (object AttachView "" @181
						stereotype 	TRUE
						client     	@180
						supplier   	@166
						line_style 	0)))
				    (object ClassDiagram "Using a Registered Data Source Name (DSN)"
					quid       	"3301006802FB"
					title      	"Using a Registered Data Source Name (DSN)"
					documentation 	
|The simplest way to establish a connection is to use a registered Data Source Name (DSN) to hold information about the server. Since a DSN contains no information about the user or application, you need to provide that information either in the connect string or by using one of the prompt options that gathers the information from the user. 
|
					
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEngine" @182
						ShowCompartmentStereotypes 	TRUE
						location   	(717, 193)
						label      	(object ItemLabel
						    Parent_View 	@182
						    location   	(481, 134)
						    nlines     	1
						    max_width  	472
						    justify    	0
						    label      	"rdoEngine")
						stereotype 	(object ItemLabel
						    Parent_View 	@182
						    location   	(481, 84)
						    anchor     	10
						    nlines     	1
						    max_width  	472
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A4100E6"
						compartment 	(object Compartment
						    Parent_View 	@182
						    location   	(481, 194)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	262
						    compartmentItems 	(list Compartment
							"+ rdoRegisterDataSource()"))
						width      	490
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @183
						ShowCompartmentStereotypes 	TRUE
						location   	(717, 937)
						label      	(object ItemLabel
						    Parent_View 	@183
						    location   	(571, 908)
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@183
						    location   	(571, 858)
						    anchor     	10
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						width      	310
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEnvironment" @184
						ShowCompartmentStereotypes 	TRUE
						location   	(715, 605)
						label      	(object ItemLabel
						    Parent_View 	@184
						    location   	(558, 576)
						    nlines     	1
						    max_width  	314
						    justify    	0
						    label      	"rdoEnvironment")
						stereotype 	(object ItemLabel
						    Parent_View 	@184
						    location   	(558, 526)
						    anchor     	10
						    nlines     	1
						    max_width  	314
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5AF50302"
						width      	332
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$130" @185
						location   	(715, 413)
						stereotype 	TRUE
						quidu      	"330100FD00F7"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>>rdoEnvironments" @186
							Parent_View 	@185
							location   	(-7, -1062)
							label      	(object SegLabel @187
							    Parent_View 	@186
							    location   	(737, 454)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	504
							    justify    	0
							    label      	"+<<Get>>rdoEnvironments"
							    pctDist    	0.417323
							    height     	22
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"330100FD03BE"
							client     	@185
							supplier   	@184
							line_style 	0)
						    (object RoleView "$UNNAMED$131" @188
							Parent_View 	@185
							location   	(-7, -1062)
							stereotype 	TRUE
							quidu      	"330100FD03C8"
							client     	@185
							supplier   	@182
							line_style 	0)))
					    (object AssociationViewNew "$UNNAMED$132" @189
						location   	(715, 770)
						stereotype 	TRUE
						quidu      	"3301014C0399"
						roleview_list 	(list RoleViews
						    (object RoleView "OpenConnection" @190
							Parent_View 	@189
							location   	(0, -111)
							label      	(object SegLabel @191
							    Parent_View 	@190
							    location   	(750, 791)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	336
							    justify    	0
							    label      	"+OpenConnection"
							    pctDist    	0.287650
							    height     	35
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"3301014D02D3"
							client     	@189
							supplier   	@183
							line_style 	0)
						    (object RoleView "$UNNAMED$133" @192
							Parent_View 	@189
							location   	(0, -111)
							stereotype 	TRUE
							quidu      	"3301014D034B"
							client     	@189
							supplier   	@184
							line_style 	0)))))
				    (object ClassDiagram "New rdoEnvironment"
					quid       	"33010206026A"
					title      	"New rdoEnvironment"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	0
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEnvironments" @193
						ShowCompartmentStereotypes 	TRUE
						location   	(365, 645)
						label      	(object ItemLabel
						    Parent_View 	@193
						    location   	(201, 586)
						    nlines     	1
						    max_width  	328
						    justify    	0
						    label      	"rdoEnvironments")
						stereotype 	(object ItemLabel
						    Parent_View 	@193
						    location   	(201, 536)
						    anchor     	10
						    nlines     	1
						    max_width  	328
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B380295"
						compartment 	(object Compartment
						    Parent_View 	@193
						    location   	(201, 646)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	120
						    compartmentItems 	(list Compartment
							"+ Add()"))
						width      	346
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnections" @194
						ShowCompartmentStereotypes 	TRUE
						location   	(1095, 1098)
						label      	(object ItemLabel
						    Parent_View 	@194
						    location   	(937, 1039)
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"rdoConnections")
						stereotype 	(object ItemLabel
						    Parent_View 	@194
						    location   	(937, 989)
						    anchor     	10
						    nlines     	1
						    max_width  	316
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B1A023A"
						compartment 	(object Compartment
						    Parent_View 	@194
						    location   	(937, 1099)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	112
						    compartmentItems 	(list Compartment
							"+ Add()"))
						width      	334
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @195
						ShowCompartmentStereotypes 	TRUE
						location   	(1863, 1143)
						label      	(object ItemLabel
						    Parent_View 	@195
						    location   	(1717, 1114)
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"rdoConnection")
						stereotype 	(object ItemLabel
						    Parent_View 	@195
						    location   	(1717, 1064)
						    anchor     	10
						    nlines     	1
						    max_width  	292
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A5300F0"
						width      	310
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$122" @196
						location   	(1485, 1140)
						stereotype 	TRUE
						quidu      	"32FFCC1E0062"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @197
							Parent_View 	@196
							location   	(1215, 660)
							label      	(object SegLabel @198
							    Parent_View 	@197
							    location   	(1593, 1149)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	0.490975
							    height     	9
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32FFCC21021F"
							client     	@196
							supplier   	@195
							line_style 	3
							origin_attachment 	(1485, 1140)
							terminal_attachment 	(1708, 1140))
						    (object RoleView "$UNNAMED$123" @199
							Parent_View 	@196
							location   	(1215, 660)
							stereotype 	TRUE
							quidu      	"32FFCC210215"
							client     	@196
							supplier   	@194
							line_style 	3
							origin_attachment 	(1485, 1140)
							terminal_attachment 	(1262, 1140))))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEngine" @200
						ShowCompartmentStereotypes 	TRUE
						location   	(370, 181)
						label      	(object ItemLabel
						    Parent_View 	@200
						    location   	(147, 122)
						    nlines     	1
						    max_width  	446
						    justify    	0
						    label      	"rdoEngine")
						stereotype 	(object ItemLabel
						    Parent_View 	@200
						    location   	(147, 72)
						    anchor     	10
						    nlines     	1
						    max_width  	446
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A4100E6"
						compartment 	(object Compartment
						    Parent_View 	@200
						    location   	(147, 182)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	2
						    max_width  	262
						    compartmentItems 	(list Compartment
							"+ rdoCreateEnvironment()"))
						width      	464
						height     	242
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$36" @201
						location   	(365, 413)
						stereotype 	TRUE
						quidu      	"32EE5A4E03C0"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoEnvironments" @202
							Parent_View 	@201
							location   	(95, -427)
							label      	(object SegLabel @203
							    Parent_View 	@202
							    location   	(407, 501)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	510
							    justify    	0
							    label      	"+<<Get>> rdoEnvironments"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5A4F000A"
							client     	@201
							supplier   	@193
							line_style 	3
							origin_attachment 	(365, 413)
							terminal_attachment 	(365, 524))
						    (object RoleView "$UNNAMED$37" @204
							Parent_View 	@201
							location   	(95, -427)
							stereotype 	TRUE
							quidu      	"32EE5A4E03C1"
							client     	@201
							supplier   	@200
							line_style 	3
							origin_attachment 	(365, 413)
							terminal_attachment 	(365, 302))))
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoEnvironment" @205
						ShowCompartmentStereotypes 	TRUE
						location   	(1207, 675)
						label      	(object ItemLabel
						    Parent_View 	@205
						    location   	(952, 591)
						    nlines     	1
						    max_width  	510
						    justify    	0
						    label      	"rdoEnvironment")
						stereotype 	(object ItemLabel
						    Parent_View 	@205
						    location   	(952, 541)
						    anchor     	10
						    nlines     	1
						    max_width  	510
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5AF50302"
						compartment 	(object Compartment
						    Parent_View 	@205
						    location   	(952, 651)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	3
						    max_width  	383
						    compartmentItems 	(list Compartment
							"<<Get>> + rdoConnections()"
							"+ OpenConnection()"))
						width      	528
						height     	292
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$124" @206
						location   	(740, 675)
						stereotype 	TRUE
						quidu      	"32FFCC380268"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Item" @207
							Parent_View 	@206
							location   	(470, 555)
							label      	(object SegLabel @208
							    Parent_View 	@207
							    location   	(829, 629)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	0.442708
							    height     	47
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32FFCC390061"
							client     	@206
							supplier   	@205
							line_style 	3
							origin_attachment 	(740, 675)
							terminal_attachment 	(943, 675))
						    (object RoleView "$UNNAMED$125" @209
							Parent_View 	@206
							location   	(470, 555)
							stereotype 	TRUE
							quidu      	"32FFCC390057"
							client     	@206
							supplier   	@193
							line_style 	3
							origin_attachment 	(740, 675)
							terminal_attachment 	(538, 675))))
					    (object AssociationViewNew "$UNNAMED$96" @210
						location   	(1109, 899)
						stereotype 	TRUE
						quidu      	"32EE5B0503CA"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> rdoConnections" @211
							Parent_View 	@210
							location   	(-333, -291)
							label      	(object SegLabel @212
							    Parent_View 	@211
							    location   	(1068, 961)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	486
							    justify    	0
							    label      	"+<<Get>> rdoConnections"
							    pctDist    	0.800000
							    height     	42
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5B0503CC"
							client     	@210
							supplier   	@194
							line_style 	3
							origin_attachment 	(1109, 899)
							terminal_attachment 	(1109, 977))
						    (object RoleView "$UNNAMED$97" @213
							Parent_View 	@210
							location   	(-333, -291)
							stereotype 	TRUE
							quidu      	"32EE5B0503CB"
							client     	@210
							supplier   	@205
							line_style 	3
							origin_attachment 	(1109, 899)
							terminal_attachment 	(1109, 821))))
					    (object AssociationViewNew "$UNNAMED$132" @214
						location   	(1862, 735)
						stereotype 	TRUE
						quidu      	"3301014C0399"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$133" @215
							Parent_View 	@214
							location   	(1142, -105)
							stereotype 	TRUE
							quidu      	"3301014D034B"
							client     	@214
							supplier   	@205
							vertices   	(list Points
							    (1862, 735)
							    (1862, 675)
							    (1471, 675))
							line_style 	3
							origin_attachment 	(1862, 735)
							terminal_attachment 	(1471, 675))
						    (object RoleView "OpenConnection" @216
							Parent_View 	@214
							location   	(1142, -105)
							label      	(object SegLabel @217
							    Parent_View 	@216
							    location   	(1843, 965)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+OpenConnection"
							    pctDist    	0.729825
							    height     	20
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"3301014D02D3"
							client     	@214
							supplier   	@195
							line_style 	3
							origin_attachment 	(1862, 735)
							terminal_attachment 	(1862, 1052))))
					    (object AssociationViewNew "$UNNAMED$130" @218
						location   	(1078, 181)
						stereotype 	TRUE
						quidu      	"330100FD00F7"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$131" @219
							Parent_View 	@218
							location   	(121, -484)
							stereotype 	TRUE
							quidu      	"330100FD03C8"
							client     	@218
							supplier   	@200
							line_style 	3
							origin_attachment 	(1078, 181)
							terminal_attachment 	(602, 181))
						    (object RoleView "<<Get>>rdoEnvironments" @220
							Parent_View 	@218
							location   	(121, -484)
							label      	(object SegLabel @221
							    Parent_View 	@220
							    location   	(1248, 434)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	498
							    justify    	0
							    label      	"+<<Get>>rdoEnvironments"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"330100FD03BE"
							client     	@218
							supplier   	@205
							vertices   	(list Points
							    (1078, 181)
							    (1206, 181)
							    (1206, 529))
							line_style 	3
							origin_attachment 	(1078, 181)
							terminal_attachment 	(1206, 529))))
					    (object Label @222
						location   	(50, 1025)
						font       	(object Font
						    bold       	TRUE
						    italics    	TRUE
						    color      	8421376
						    default_color 	FALSE)
						nlines     	4
						max_width  	606
						label      	"This diagram highlights the classes involved in creating an rdo Connection")))
				    (object ClassDiagram "rdoColumn View"
					quid       	"3303736E02C6"
					title      	"rdoColumn View"
					zoom       	100
					max_height 	28350
					max_width  	21600
					origin_x   	0
					origin_y   	315
					items      	(list diagram_item_list
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::DataTypeConstants" @223
						ShowCompartmentStereotypes 	TRUE
						location   	(1074, 1236)
						label      	(object ItemLabel
						    Parent_View 	@223
						    location   	(880, 1183)
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"DataTypeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@223
						    location   	(880, 1133)
						    anchor     	10
						    nlines     	1
						    max_width  	388
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A340399"
						width      	406
						height     	230
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::AttributeConstants" @224
						ShowCompartmentStereotypes 	TRUE
						location   	(454, 1230)
						label      	(object ItemLabel
						    Parent_View 	@224
						    location   	(266, 1177)
						    nlines     	1
						    max_width  	376
						    justify    	0
						    label      	"AttributeConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@224
						    location   	(266, 1127)
						    anchor     	10
						    nlines     	1
						    max_width  	376
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3400D2"
						width      	394
						height     	230
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoConstants::ColumnStatusConstants" @225
						ShowCompartmentStereotypes 	TRUE
						location   	(1316, 192)
						label      	(object ItemLabel
						    Parent_View 	@225
						    location   	(1080, 139)
						    nlines     	1
						    max_width  	472
						    justify    	0
						    label      	"ColumnStatusConstants")
						stereotype 	(object ItemLabel
						    Parent_View 	@225
						    location   	(1080, 89)
						    anchor     	10
						    nlines     	1
						    max_width  	472
						    justify    	0
						    label      	"<<Enum>>")
						icon_style 	"Icon"
						quidu      	"32EE5A3C0078"
						width      	490
						height     	230
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoColumns" @226
						ShowCompartmentStereotypes 	TRUE
						location   	(298, 137)
						label      	(object ItemLabel
						    Parent_View 	@226
						    location   	(160, 108)
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"rdoColumns")
						stereotype 	(object ItemLabel
						    Parent_View 	@226
						    location   	(160, 58)
						    anchor     	10
						    nlines     	1
						    max_width  	276
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5B0E03D4"
						width      	294
						height     	182
						annotation 	8
						autoResize 	TRUE)
					    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoColumn" @227
						ShowCompartmentStereotypes 	TRUE
						location   	(612, 611)
						label      	(object ItemLabel
						    Parent_View 	@227
						    location   	(348, 277)
						    nlines     	1
						    max_width  	528
						    justify    	0
						    label      	"rdoColumn")
						stereotype 	(object ItemLabel
						    Parent_View 	@227
						    location   	(348, 227)
						    anchor     	10
						    nlines     	1
						    max_width  	528
						    justify    	0
						    label      	"<<Interface>>")
						icon       	"Interface"
						icon_style 	"Label"
						quidu      	"32EE5A7100E6"
						compartment 	(object Compartment
						    Parent_View 	@227
						    location   	(348, 337)
						    icon_style 	"Icon"
						    anchor     	2
						    nlines     	13
						    max_width  	551
						    compartmentItems 	(list Compartment
							"<<Get>> + Value()"
							"<<Let>> + Value()"
							"<<Get>> + Type()"
							"<<Get>> + Name()"
							"<<Let>> + Name()"
							"<<Get>> + Size()"
							"<<Let>> + Size()"
							"<<Get>> + AllowZeroLength()"
							"<<Let>> + AllowZeroLength()"
							"+ AppendChunk()"
							"+ GetChunk()"
							"+ ColumnSize()"))
						width      	546
						height     	792
						annotation 	8
						autoResize 	TRUE)
					    (object AssociationViewNew "$UNNAMED$54" @228
						location   	(1034, 792)
						stereotype 	TRUE
						quidu      	"32EE5A840230"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Type" @229
							Parent_View 	@228
							location   	(236, -246)
							label      	(object SegLabel @230
							    Parent_View 	@229
							    location   	(1076, 1055)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Type"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5A840232"
							client     	@228
							supplier   	@223
							line_style 	3
							origin_attachment 	(1034, 792)
							terminal_attachment 	(1034, 1121))
						    (object RoleView "$UNNAMED$55" @231
							Parent_View 	@228
							location   	(236, -246)
							stereotype 	TRUE
							quidu      	"32EE5A840231"
							client     	@228
							supplier   	@227
							vertices   	(list Points
							    (1034, 792)
							    (1034, 612)
							    (885, 612))
							line_style 	3
							origin_attachment 	(1034, 792)
							terminal_attachment 	(885, 612))))
					    (object AssociationViewNew "$UNNAMED$56" @232
						location   	(559, 1061)
						stereotype 	TRUE
						quidu      	"32EE5A84029E"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Attributes" @233
							Parent_View 	@232
							location   	(-239, 23)
							label      	(object SegLabel @234
							    Parent_View 	@233
							    location   	(601, 1104)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Attributes"
							    pctDist    	0.800000
							    height     	42
							    orientation 	0)
							stereotype 	TRUE
							quidu      	"32EE5A8402A0"
							client     	@232
							supplier   	@224
							line_style 	3
							origin_attachment 	(559, 1061)
							terminal_attachment 	(559, 1115))
						    (object RoleView "$UNNAMED$57" @235
							Parent_View 	@232
							location   	(-239, 23)
							stereotype 	TRUE
							quidu      	"32EE5A84029F"
							client     	@232
							supplier   	@227
							line_style 	3
							origin_attachment 	(559, 1061)
							terminal_attachment 	(559, 1007))))
					    (object AssociationViewNew "$UNNAMED$58" @236
						location   	(1126, 362)
						stereotype 	TRUE
						quidu      	"32EE5A84037A"
						roleview_list 	(list RoleViews
						    (object RoleView "<<Get>> Status" @237
							Parent_View 	@236
							location   	(328, -676)
							label      	(object SegLabel @238
							    Parent_View 	@237
							    location   	(1349, 347)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	450
							    justify    	0
							    label      	"+<<Get>> Status"
							    pctDist    	0.839357
							    height     	37
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32EE5A84037C"
							client     	@236
							supplier   	@225
							vertices   	(list Points
							    (1126, 362)
							    (1312, 362)
							    (1312, 307))
							line_style 	3
							origin_attachment 	(1126, 362)
							terminal_attachment 	(1312, 307))
						    (object RoleView "$UNNAMED$59" @239
							Parent_View 	@236
							location   	(328, -676)
							stereotype 	TRUE
							quidu      	"32EE5A84037B"
							client     	@236
							supplier   	@227
							line_style 	3
							origin_attachment 	(1126, 362)
							terminal_attachment 	(885, 362))))
					    (object AssociationViewNew "$UNNAMED$120" @240
						location   	(552, 131)
						stereotype 	TRUE
						quidu      	"32FFCBBA0221"
						roleview_list 	(list RoleViews
						    (object RoleView "$UNNAMED$121" @241
							Parent_View 	@240
							location   	(-329, -427)
							stereotype 	TRUE
							quidu      	"32FFCBBB00A6"
							client     	@240
							supplier   	@226
							line_style 	3
							origin_attachment 	(552, 131)
							terminal_attachment 	(445, 131))
						    (object RoleView "<<Get>> Item" @242
							Parent_View 	@240
							location   	(-329, -427)
							label      	(object SegLabel @243
							    Parent_View 	@242
							    location   	(611, 168)
							    anchor     	1
							    anchor_loc 	1
							    nlines     	1
							    max_width  	288
							    justify    	0
							    label      	"+<<Get>> Item"
							    pctDist    	0.411885
							    height     	37
							    orientation 	1)
							stereotype 	TRUE
							quidu      	"32FFCBBB00BA"
							client     	@240
							supplier   	@227
							vertices   	(list Points
							    (552, 131)
							    (612, 131)
							    (612, 215))
							line_style 	3
							origin_attachment 	(552, 131)
							terminal_attachment 	(612, 215)))))))))
			logical_presentations 	(list unit_reference_list
			    (object ClassDiagram "Package Overview"
				quid       	"330372E10118"
				title      	"Package Overview"
				zoom       	100
				max_height 	28350
				max_width  	21600
				origin_x   	0
				origin_y   	0
				items      	(list diagram_item_list
				    (object CategoryView "Logical View::Business Services::RDO::rdoConstants" @244
					location   	(512, 474)
					label      	(object ItemLabel
					    Parent_View 	@244
					    location   	(368, 390)
					    nlines     	2
					    max_width  	288
					    justify    	0
					    label      	"rdoConstants")
					icon_style 	"Icon"
					quidu      	"32EFB05302B2"
					width      	300
					height     	180)
				    (object CategoryView "Logical View::Business Services::RDO::rdoObjects" @245
					location   	(1096, 471)
					label      	(object ItemLabel
					    Parent_View 	@245
					    location   	(952, 387)
					    nlines     	2
					    max_width  	288
					    justify    	0
					    label      	"rdoObjects")
					icon_style 	"Icon"
					quidu      	"32EFB0B0023A"
					width      	300
					height     	180)
				    (object ImportView "" @246
					stereotype 	TRUE
					quidu      	"330372080258"
					client     	@245
					supplier   	@244
					line_style 	0)
				    (object Label @247
					location   	(347, 728)
					font       	(object Font
					    size       	11
					    italics    	TRUE
					    color      	8421376
					    default_color 	FALSE)
					nlines     	5
					max_width  	900
					label      	"For ease of reading, the RDO object model has been seperated into two packages, one containing only constants, and the other containing the RDO objects"))))))
		logical_presentations 	(list unit_reference_list
		    (object ClassDiagram "Package Overview"
			quid       	"32FA94490012"
			title      	"Package Overview"
			zoom       	75
			max_height 	28350
			max_width  	21600
			origin_x   	0
			origin_y   	0
			items      	(list diagram_item_list
			    (object ClassView "ClassUtility" "Logical View::Business Services::Main" @248
				ShowCompartmentStereotypes 	TRUE
				location   	(643, 1948)
				label      	(object ItemLabel
				    Parent_View 	@248
				    location   	(540, 1918)
				    nlines     	1
				    max_width  	206
				    justify    	0
				    label      	"Main")
				stereotype 	(object ItemLabel
				    Parent_View 	@248
				    location   	(540, 1868)
				    anchor     	10
				    nlines     	1
				    max_width  	206
				    justify    	0
				    label      	"<<Module>>")
				icon_style 	"Icon"
				quidu      	"3303A89500B4"
				width      	224
				height     	184
				annotation 	8
				autoResize 	TRUE)
			    (object CategoryView "Logical View::Business Services::MTxAS" @249
				location   	(204, 1800)
				label      	(object ItemLabel
				    Parent_View 	@249
				    location   	(60, 1716)
				    nlines     	2
				    max_width  	288
				    justify    	0
				    label      	"MTxAS")
				icon_style 	"Icon"
				quidu      	"32EF92E903A9"
				width      	300
				height     	180)
			    (object ClassView "Class" "Logical View::Business Services::ShoppingBasket" @250
				ShowCompartmentStereotypes 	TRUE
				location   	(269, 103)
				label      	(object ItemLabel
				    Parent_View 	@250
				    location   	(105, 74)
				    nlines     	1
				    max_width  	328
				    justify    	0
				    label      	"ShoppingBasket")
				stereotype 	(object ItemLabel
				    Parent_View 	@250
				    location   	(105, 24)
				    anchor     	10
				    nlines     	1
				    max_width  	328
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94A50011"
				width      	346
				height     	182
				annotation 	8
				autoResize 	TRUE)
			    (object ClassView "Class" "Logical View::Business Services::ShoppingBasketItem" @251
				ShowCompartmentStereotypes 	TRUE
				location   	(273, 588)
				label      	(object ItemLabel
				    Parent_View 	@251
				    location   	(30, 429)
				    nlines     	1
				    max_width  	486
				    justify    	0
				    label      	"ShoppingBasketItem")
				stereotype 	(object ItemLabel
				    Parent_View 	@251
				    location   	(30, 379)
				    anchor     	10
				    nlines     	1
				    max_width  	486
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94A8001F"
				compartment 	(object Compartment
				    Parent_View 	@251
				    location   	(30, 489)
				    icon_style 	"Icon"
				    anchor     	2
				    nlines     	6
				    max_width  	1460
				    compartmentItems 	(list Compartment
					"- mItemNumber : Long"
					"- mQuantity : Long"
					"- mColor : Variant"
					"- mSize : Variant"
					"- mProductCode : Variant"))
				width      	504
				height     	442
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$1" @252
				location   	(296, 280)
				stereotype 	TRUE
				quidu      	"32FA95FB0031"
				roleview_list 	(list RoleViews
				    (object RoleView "colBasketItems2" @253
					Parent_View 	@252
					location   	(24, 152)
					label      	(object SegLabel @254
					    Parent_View 	@253
					    location   	(297, 305)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	462
					    justify    	0
					    label      	"-colBasketItems2"
					    pctDist    	0.293578
					    height     	1
					    orientation 	0)
					stereotype 	TRUE
					quidu      	"32FA95FB023A"
					client     	@252
					supplier   	@251
					line_style 	3
					origin_attachment 	(296, 280)
					terminal_attachment 	(296, 367)
					label      	(object SegLabel @255
					    Parent_View 	@253
					    location   	(243, 358)
					    anchor     	2
					    anchor_loc 	1
					    nlines     	1
					    max_width  	70
					    justify    	0
					    label      	"0..*"
					    pctDist    	0.900000
					    height     	54
					    orientation 	1))
				    (object RoleView "theShoppingBasket" @256
					Parent_View 	@252
					location   	(24, 152)
					label      	(object SegLabel @257
					    Parent_View 	@256
					    location   	(338, 211)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"+theShoppingBasket"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA95FB0239"
					client     	@252
					supplier   	@250
					line_style 	3
					origin_attachment 	(296, 280)
					terminal_attachment 	(296, 194))))
			    (object ClassView "Class" "Logical View::Business Services::TakeANumber" @258
				ShowCompartmentStereotypes 	TRUE
				location   	(1912, 165)
				label      	(object ItemLabel
				    Parent_View 	@258
				    location   	(1752, 136)
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"TakeANumber")
				stereotype 	(object ItemLabel
				    Parent_View 	@258
				    location   	(1752, 86)
				    anchor     	10
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94CC0021"
				width      	338
				height     	182
				annotation 	8
				autoResize 	TRUE)
			    (object ClassView "Class" "Logical View::Business Services::MTxAS::ObjectContext" @259
				ShowCompartmentStereotypes 	TRUE
				IncludeOperation 	TRUE
				location   	(1014, 325)
				label      	(object ItemLabel
				    Parent_View 	@259
				    location   	(808, 67)
				    nlines     	1
				    max_width  	412
				    justify    	0
				    label      	"ObjectContext")
				stereotype 	(object ItemLabel
				    Parent_View 	@259
				    location   	(808, 17)
				    anchor     	10
				    nlines     	1
				    max_width  	412
				    justify    	0
				    label      	"<<Interface>>")
				icon       	"Interface"
				icon_style 	"Label"
				quidu      	"32EF92EA0157"
				compartment 	(object Compartment
				    Parent_View 	@259
				    location   	(808, 176)
				    icon_style 	"Icon"
				    anchor     	2
				    nlines     	9
				    max_width  	409)
				width      	430
				height     	640
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$3" @260
				location   	(662, 437)
				stereotype 	TRUE
				quidu      	"32FA94A800F1"
				roleview_list 	(list RoleViews
				    (object RoleView "ctxObject" @261
					Parent_View 	@260
					location   	(374, 261)
					label      	(object SegLabel @262
					    Parent_View 	@261
					    location   	(714, 437)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-ctxObject"
					    pctDist    	0.378715
					    height     	0
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94A800FC"
					client     	@260
					supplier   	@259
					line_style 	3
					origin_attachment 	(662, 437)
					terminal_attachment 	(799, 437))
				    (object RoleView "$UNNAMED$4" @263
					Parent_View 	@260
					location   	(374, 261)
					stereotype 	TRUE
					quidu      	"32FA94A800FB"
					client     	@260
					supplier   	@251
					line_style 	3
					origin_attachment 	(662, 437)
					terminal_attachment 	(525, 437))))
			    (object AssociationViewNew "$UNNAMED$21" @264
				location   	(1486, 212)
				stereotype 	TRUE
				quidu      	"32FA94CC00E9"
				roleview_list 	(list RoleViews
				    (object RoleView "ctxObject" @265
					Parent_View 	@264
					location   	(-226, 84)
					stereotype 	TRUE
					quidu      	"32FA94CC00EB"
					client     	@264
					supplier   	@259
					line_style 	3
					origin_attachment 	(1486, 212)
					terminal_attachment 	(1229, 212))
				    (object RoleView "$UNNAMED$22" @266
					Parent_View 	@264
					location   	(-226, 84)
					stereotype 	TRUE
					quidu      	"32FA94CC00EA"
					client     	@264
					supplier   	@258
					line_style 	3
					origin_attachment 	(1486, 212)
					terminal_attachment 	(1743, 212))))
			    (object ClassView "Class" "Logical View::Business Services::AuthorizePayment" @267
				ShowCompartmentStereotypes 	TRUE
				location   	(1239, 1128)
				label      	(object ItemLabel
				    Parent_View 	@267
				    location   	(1054, 1099)
				    nlines     	1
				    max_width  	370
				    justify    	0
				    label      	"AuthorizePayment")
				stereotype 	(object ItemLabel
				    Parent_View 	@267
				    location   	(1054, 1049)
				    anchor     	10
				    nlines     	1
				    max_width  	370
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94C70287"
				width      	388
				height     	182
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$11" @268
				location   	(1175, 841)
				stereotype 	TRUE
				quidu      	"32FA94C7036D"
				roleview_list 	(list RoleViews
				    (object RoleView "ctxObject" @269
					Parent_View 	@268
					location   	(87, 361)
					label      	(object SegLabel @270
					    Parent_View 	@269
					    location   	(1188, 780)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-ctxObject"
					    pctDist    	0.315835
					    height     	13
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94C7036F"
					client     	@268
					supplier   	@259
					line_style 	3
					origin_attachment 	(1175, 841)
					terminal_attachment 	(1175, 645))
				    (object RoleView "$UNNAMED$12" @271
					Parent_View 	@268
					location   	(87, 361)
					stereotype 	TRUE
					quidu      	"32FA94C7036E"
					client     	@268
					supplier   	@267
					line_style 	3
					origin_attachment 	(1175, 841)
					terminal_attachment 	(1175, 1037))))
			    (object ClassView "Class" "Logical View::Business Services::Payment" @272
				ShowCompartmentStereotypes 	TRUE
				location   	(1799, 879)
				label      	(object ItemLabel
				    Parent_View 	@272
				    location   	(1621, 795)
				    nlines     	1
				    max_width  	356
				    justify    	0
				    label      	"Payment")
				stereotype 	(object ItemLabel
				    Parent_View 	@272
				    location   	(1621, 745)
				    anchor     	10
				    nlines     	1
				    max_width  	356
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94C90171"
				compartment 	(object Compartment
				    Parent_View 	@272
				    location   	(1621, 855)
				    icon_style 	"Icon"
				    anchor     	2
				    nlines     	3
				    max_width  	1099
				    compartmentItems 	(list Compartment
					"+ PostPayment()"
					"- GetPaymentID()"))
				width      	374
				height     	292
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$15" @273
				location   	(1535, 508)
				stereotype 	TRUE
				quidu      	"32FA94C9021B"
				roleview_list 	(list RoleViews
				    (object RoleView "ctxObject" @274
					Parent_View 	@273
					location   	(271, 380)
					label      	(object SegLabel @275
					    Parent_View 	@274
					    location   	(1291, 467)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-ctxObject"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94C9021D"
					client     	@273
					supplier   	@259
					line_style 	3
					origin_attachment 	(1535, 508)
					terminal_attachment 	(1229, 508))
				    (object RoleView "$UNNAMED$16" @276
					Parent_View 	@273
					location   	(271, 380)
					stereotype 	TRUE
					quidu      	"32FA94C9021C"
					client     	@273
					supplier   	@272
					vertices   	(list Points
					    (1535, 508)
					    (1616, 508)
					    (1616, 733))
					line_style 	3
					origin_attachment 	(1535, 508)
					terminal_attachment 	(1616, 733))))
			    (object ClassView "Class" "Logical View::Business Services::SalesTax" @277
				ShowCompartmentStereotypes 	TRUE
				location   	(1943, 1191)
				label      	(object ItemLabel
				    Parent_View 	@277
				    location   	(1783, 1162)
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"SalesTax")
				stereotype 	(object ItemLabel
				    Parent_View 	@277
				    location   	(1783, 1112)
				    anchor     	10
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94CA03A3"
				width      	338
				height     	182
				annotation 	8
				autoResize 	TRUE)
			    (object ClassView "Class" "Logical View::Business Services::TakeANumberUpdate" @278
				ShowCompartmentStereotypes 	TRUE
				location   	(2067, 399)
				label      	(object ItemLabel
				    Parent_View 	@278
				    location   	(1857, 370)
				    nlines     	1
				    max_width  	420
				    justify    	0
				    label      	"TakeANumberUpdate")
				stereotype 	(object ItemLabel
				    Parent_View 	@278
				    location   	(1857, 320)
				    anchor     	10
				    nlines     	1
				    max_width  	420
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94CD02A3"
				width      	438
				height     	182
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$31" @279
				location   	(1538, 362)
				stereotype 	TRUE
				quidu      	"32FA94CD0394"
				roleview_list 	(list RoleViews
				    (object RoleView "ctxObject" @280
					Parent_View 	@279
					location   	(-526, -118)
					label      	(object SegLabel @281
					    Parent_View 	@280
					    location   	(1291, 321)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-ctxObject"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94CD0396"
					client     	@279
					supplier   	@259
					line_style 	3
					origin_attachment 	(1538, 362)
					terminal_attachment 	(1229, 362))
				    (object RoleView "$UNNAMED$32" @282
					Parent_View 	@279
					location   	(-526, -118)
					stereotype 	TRUE
					quidu      	"32FA94CD0395"
					client     	@279
					supplier   	@278
					line_style 	3
					origin_attachment 	(1538, 362)
					terminal_attachment 	(1848, 362))))
			    (object ClassView "Class" "Logical View::Business Services::Customers" @283
				ShowCompartmentStereotypes 	TRUE
				location   	(1012, 1924)
				label      	(object ItemLabel
				    Parent_View 	@283
				    location   	(852, 1895)
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"Customers")
				stereotype 	(object ItemLabel
				    Parent_View 	@283
				    location   	(852, 1845)
				    anchor     	10
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94B6003D"
				width      	338
				height     	182
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$5" @284
				location   	(1012, 1238)
				stereotype 	TRUE
				quidu      	"32FA94B600E8"
				roleview_list 	(list RoleViews
				    (object RoleView "ctxObject" @285
					Parent_View 	@284
					location   	(202, -322)
					label      	(object SegLabel @286
					    Parent_View 	@285
					    location   	(972, 764)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-ctxObject"
					    pctDist    	0.800000
					    height     	42
					    orientation 	0)
					stereotype 	TRUE
					quidu      	"32FA94B600EA"
					client     	@284
					supplier   	@259
					line_style 	0)
				    (object RoleView "$UNNAMED$6" @287
					Parent_View 	@284
					location   	(202, -322)
					stereotype 	TRUE
					quidu      	"32FA94B600E9"
					client     	@284
					supplier   	@283
					line_style 	0)))
			    (object AssociationViewNew "$UNNAMED$35" @288
				location   	(1277, 2296)
				stereotype 	TRUE
				quidu      	"3304E3050316"
				roleview_list 	(list RoleViews
				    (object RoleView "colCustomers2" @289
					Parent_View 	@288
					location   	(467, 736)
					label      	(object SegLabel @290
					    Parent_View 	@289
					    location   	(1084, 2095)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"+colCustomers2"
					    pctDist    	0.803618
					    height     	42
					    orientation 	0)
					stereotype 	TRUE
					quidu      	"3304E3050317"
					client     	@288
					supplier   	@283
					line_style 	0
					label      	(object SegLabel @291
					    Parent_View 	@289
					    location   	(1141, 2013)
					    anchor     	2
					    anchor_loc 	1
					    nlines     	1
					    max_width  	70
					    justify    	0
					    label      	"0..*"
					    pctDist    	0.900000
					    height     	54
					    orientation 	1))
				    (object RoleView "theCustomers" @292
					Parent_View 	@288
					location   	(467, 736)
					label      	(object SegLabel @293
					    Parent_View 	@292
					    location   	(1287, 1970)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"+theCustomers"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"3304E3050318"
					client     	@288
					supplier   	@283
					vertices   	(list Points
					    (1277, 2296)
					    (1312, 2345)
					    (1237, 1924)
					    (1181, 1924))
					line_style 	0)))
			    (object ClassView "Class" "Logical View::Business Services::RDO::rdoObjects::rdoConnection" @294
				ShowCompartmentStereotypes 	TRUE
				location   	(2248, 1762)
				label      	(object ItemLabel
				    Parent_View 	@294
				    location   	(1729, 1604)
				    nlines     	1
				    max_width  	1038
				    justify    	0
				    label      	"rdoConnection")
				stereotype 	(object ItemLabel
				    Parent_View 	@294
				    location   	(1729, 1554)
				    anchor     	10
				    nlines     	1
				    max_width  	1038
				    justify    	0
				    label      	"<<Interface>>")
				icon       	"Interface"
				icon_style 	"Label"
				quidu      	"32EE5A5300F0"
				compartment 	(object Compartment
				    Parent_View 	@294
				    location   	(1729, 1713)
				    icon_style 	"Icon"
				    anchor     	2
				    nlines     	5
				    max_width  	1106
				    compartmentItems 	(list Compartment
					"+ CommitTrans()"
					"+ BeginTrans()"
					"+ RollbackTrans()"
					"+ Execute()"))
				width      	1056
				height     	440
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$13" @295
				location   	(1311, 1558)
				stereotype 	TRUE
				quidu      	"32FA94C70381"
				roleview_list 	(list RoleViews
				    (object RoleView "rdoConn" @296
					Parent_View 	@295
					location   	(108, 618)
					label      	(object SegLabel @297
					    Parent_View 	@296
					    location   	(1638, 1600)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-rdoConn"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94C70383"
					client     	@295
					supplier   	@294
					line_style 	3
					origin_attachment 	(1311, 1558)
					terminal_attachment 	(1720, 1558))
				    (object RoleView "$UNNAMED$14" @298
					Parent_View 	@295
					location   	(108, 618)
					stereotype 	TRUE
					quidu      	"32FA94C70382"
					client     	@295
					supplier   	@267
					vertices   	(list Points
					    (1311, 1558)
					    (1241, 1558)
					    (1241, 1219))
					line_style 	3
					origin_attachment 	(1311, 1558)
					terminal_attachment 	(1241, 1219))))
			    (object AssociationViewNew "$UNNAMED$17" @299
				location   	(2595, 931)
				stereotype 	TRUE
				quidu      	"32FA94C90239"
				roleview_list 	(list RoleViews
				    (object RoleView "rdoConn" @300
					Parent_View 	@299
					location   	(742, 126)
					label      	(object SegLabel @301
					    Parent_View 	@300
					    location   	(2554, 1420)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-rdoConn"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94C9023B"
					client     	@299
					supplier   	@294
					line_style 	3
					origin_attachment 	(2595, 931)
					terminal_attachment 	(2595, 1542))
				    (object RoleView "$UNNAMED$18" @302
					Parent_View 	@299
					location   	(742, 126)
					stereotype 	TRUE
					quidu      	"32FA94C9023A"
					client     	@299
					supplier   	@272
					vertices   	(list Points
					    (2595, 931)
					    (2595, 871)
					    (1986, 871))
					line_style 	3
					origin_attachment 	(2595, 931)
					terminal_attachment 	(1986, 871))))
			    (object AssociationViewNew "$UNNAMED$19" @303
				location   	(1941, 1412)
				stereotype 	TRUE
				quidu      	"32FA94CB0066"
				roleview_list 	(list RoleViews
				    (object RoleView "rdoConn" @304
					Parent_View 	@303
					location   	(983, 266)
					label      	(object SegLabel @305
					    Parent_View 	@304
					    location   	(1900, 1516)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-rdoConn"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94CB0068"
					client     	@303
					supplier   	@294
					line_style 	3
					origin_attachment 	(1941, 1412)
					terminal_attachment 	(1941, 1542))
				    (object RoleView "$UNNAMED$20" @306
					Parent_View 	@303
					location   	(983, 266)
					stereotype 	TRUE
					quidu      	"32FA94CB0067"
					client     	@303
					supplier   	@277
					line_style 	3
					origin_attachment 	(1941, 1412)
					terminal_attachment 	(1941, 1282))))
			    (object AssociationViewNew "$UNNAMED$33" @307
				location   	(2775, 772)
				stereotype 	TRUE
				quidu      	"32FA94CD03C6"
				roleview_list 	(list RoleViews
				    (object RoleView "rdoConn" @308
					Parent_View 	@307
					location   	(711, 292)
					label      	(object SegLabel @309
					    Parent_View 	@308
					    location   	(2734, 1388)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-rdoConn"
					    pctDist    	0.800000
					    height     	42
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94CD03C8"
					client     	@307
					supplier   	@294
					line_style 	3
					origin_attachment 	(2775, 772)
					terminal_attachment 	(2775, 1542))
				    (object RoleView "$UNNAMED$34" @310
					Parent_View 	@307
					location   	(711, 292)
					stereotype 	TRUE
					quidu      	"32FA94CD03C7"
					client     	@307
					supplier   	@278
					vertices   	(list Points
					    (2775, 772)
					    (2775, 492)
					    (2286, 492))
					line_style 	3
					origin_attachment 	(2775, 772)
					terminal_attachment 	(2286, 492))))
			    (object AssociationViewNew "$UNNAMED$7" @311
				location   	(1450, 1864)
				stereotype 	TRUE
				quidu      	"32FA94B600FC"
				roleview_list 	(list RoleViews
				    (object RoleView "rdoConn" @312
					Parent_View 	@311
					location   	(640, 304)
					label      	(object SegLabel @313
					    Parent_View 	@312
					    location   	(1615, 1792)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	168
					    justify    	0
					    label      	"-rdoConn"
					    pctDist    	0.634180
					    height     	51
					    orientation 	0)
					stereotype 	TRUE
					quidu      	"32FA94B600FE"
					client     	@311
					supplier   	@294
					line_style 	0)
				    (object RoleView "$UNNAMED$8" @314
					Parent_View 	@311
					location   	(640, 304)
					stereotype 	TRUE
					quidu      	"32FA94B600FD"
					client     	@311
					supplier   	@283
					line_style 	0)))
			    (object ClassView "Class" "Logical View::Business Services::Customer" @315
				ShowCompartmentStereotypes 	TRUE
				location   	(789, 1433)
				label      	(object ItemLabel
				    Parent_View 	@315
				    location   	(629, 1404)
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"Customer")
				stereotype 	(object ItemLabel
				    Parent_View 	@315
				    location   	(629, 1354)
				    anchor     	10
				    nlines     	1
				    max_width  	320
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94BA00BB"
				width      	338
				height     	182
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "" @316
				location   	(1299, 1604)
				stereotype 	TRUE
				quidu      	"32FA94BA02C4"
				roleview_list 	(list RoleViews
				    (object RoleView "rdoConn" @317
					Parent_View 	@316
					location   	(1029, 494)
					label      	(object SegLabel @318
					    Parent_View 	@317
					    location   	(1461, 1207)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-rdoConn"
					    pctDist    	0.387228
					    height     	398
					    orientation 	0)
					stereotype 	TRUE
					quidu      	"32FA94BA02C6"
					client     	@316
					supplier   	@294
					line_style 	3
					origin_attachment 	(1299, 1604)
					terminal_attachment 	(1720, 1604))
				    (object RoleView "" @319
					Parent_View 	@316
					location   	(1029, 494)
					stereotype 	TRUE
					quidu      	"32FA94BA02C5"
					client     	@316
					supplier   	@315
					vertices   	(list Points
					    (1299, 1604)
					    (958, 1604)
					    (958, 1524))
					line_style 	3
					origin_attachment 	(1299, 1604)
					terminal_attachment 	(958, 1524))))
			    (object ClassView "Class" "Logical View::Business Services::Order" @320
				ShowCompartmentStereotypes 	TRUE
				location   	(270, 1117)
				label      	(object ItemLabel
				    Parent_View 	@320
				    location   	(58, 958)
				    nlines     	1
				    max_width  	424
				    justify    	0
				    label      	"Order")
				stereotype 	(object ItemLabel
				    Parent_View 	@320
				    location   	(58, 908)
				    anchor     	10
				    nlines     	1
				    max_width  	424
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94C200D1"
				compartment 	(object Compartment
				    Parent_View 	@320
				    location   	(58, 1018)
				    icon_style 	"Icon"
				    anchor     	2
				    nlines     	6
				    max_width  	1297
				    compartmentItems 	(list Compartment
					"+ Submit()"
					"- GetOrderID()"
					"+ AddPayment()"
					"+ AddHeaderToOrder()"
					"+ UpdateInventory()"))
				width      	442
				height     	442
				annotation 	8
				autoResize 	TRUE)
			    (object AssociationViewNew "$UNNAMED$9" @321
				location   	(943, 1658)
				stereotype 	TRUE
				quidu      	"32FA94C20167"
				roleview_list 	(list RoleViews
				    (object RoleView "rdoConn" @322
					Parent_View 	@321
					location   	(476, 506)
					label      	(object SegLabel @323
					    Parent_View 	@322
					    location   	(1564, 1675)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"-rdoConn"
					    pctDist    	0.799228
					    height     	17
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"32FA94C20169"
					client     	@321
					supplier   	@294
					line_style 	3
					origin_attachment 	(943, 1658)
					terminal_attachment 	(1720, 1658))
				    (object RoleView "$UNNAMED$10" @324
					Parent_View 	@321
					location   	(476, 506)
					stereotype 	TRUE
					quidu      	"32FA94C20168"
					client     	@321
					supplier   	@320
					vertices   	(list Points
					    (943, 1658)
					    (487, 1658)
					    (487, 1338))
					line_style 	3
					origin_attachment 	(943, 1658)
					terminal_attachment 	(487, 1338))))
			    (object AssociationViewNew "$UNNAMED$2" @325
				location   	(565, 1296)
				stereotype 	TRUE
				quidu      	"3303C3710163"
				roleview_list 	(list RoleViews
				    (object RoleView "theCustomer" @326
					Parent_View 	@325
					location   	(295, 179)
					label      	(object SegLabel @327
					    Parent_View 	@326
					    location   	(646, 1297)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"+theCustomer"
					    pctDist    	0.800000
					    height     	42
					    orientation 	0)
					stereotype 	TRUE
					quidu      	"3303C37203B3"
					client     	@325
					supplier   	@315
					line_style 	0)
				    (object RoleView "theOrder" @328
					Parent_View 	@325
					location   	(295, 179)
					label      	(object SegLabel @329
					    Parent_View 	@328
					    location   	(544, 1193)
					    anchor     	1
					    anchor_loc 	1
					    nlines     	1
					    max_width  	450
					    justify    	0
					    label      	"+theOrder"
					    pctDist    	0.833513
					    height     	78
					    orientation 	1)
					stereotype 	TRUE
					quidu      	"3303C3720331"
					client     	@325
					supplier   	@320
					line_style 	0)))
			    (object CategoryView "Logical View::Business Services::RDO" @330
				location   	(246, 2104)
				label      	(object ItemLabel
				    Parent_View 	@330
				    location   	(102, 2020)
				    nlines     	2
				    max_width  	288
				    justify    	0
				    label      	"RDO")
				icon_style 	"Icon"
				quidu      	"32EE5A2A0064"
				width      	300
				height     	180)))))
	    (object Class_Category "Data Services"
		attributes 	(list Attribute_Set
		    (object Attribute
			tool       	"VisualBasic"
			name       	"TierPackage"
			value      	"Data Services"))
		quid       	"32FA94490019"
		documentation 	"Data services maintain, access, and update data. They also manage and satisfy requests to manipulate data that are initiated by business services. Separating data services allows the data structure and access mechanisms to be maintained, modified, or, if necessary, even re-architected without affecting business or user services."
		visible_categories 	(list visibility_relationship_list
		    (object Visibility_Relationship
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"VisualBasic"
				name       	"TierPackage"
				value      	"User Services"))
			quid       	"32FA9449001F"
			supplier   	"Logical View::User Services"
			quidu      	"32FA9449000F")
		    (object Visibility_Relationship
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"VisualBasic"
				name       	"TierPackage"
				value      	"Data Services"))
			quid       	"32FA94490020"
			supplier   	"Logical View::Business Services"
			quidu      	"32FA94490011"))
		exportControl 	"Public"
		subsystem  	"Component View"
		quidu      	"32FA94490008"
		logical_models 	(list unit_reference_list
		    (object Class "Catalog"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	TRUE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94AD02D9"
			stereotype 	"Class Module"
			used_nodes 	(list uses_relationship_list
			    (object Uses_Relationship
				quid       	"32FAA1DB03AD"
				supplier   	"Logical View::Data Services::CatalogItem"
				quidu      	"32FA94B0037E"))
			operations 	(list Operations
			    (object Operation "Class_Terminate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AD03D4"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "GetCatalogItemByCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AE0050"
				documentation 	
| GetCatalogItemByCode creates a result set containing 1 product based
| on the value passed, returns the CatalogItem to the caller
| returns an error if there were zero CatalogItems in the result set,
| or if RDO or our wrapped collection object returns an error to us
				
				parameters 	(list Parameters
				    (object Parameter "vProductCode"
					type       	"Variant"))
				result     	"CatalogItem"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "GetCatalogItemsByProductType"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AE00FA"
				documentation 	
| GetCatalogItemsByProductType creates a result set containing
| all products of the passed type
| returns the number of CatalogItems in the result set
| returns Null upon failure, or if there are zero CatalogItems in the result set
|
				
				parameters 	(list Parameters
				    (object Parameter "ByVal vProductType"
					type       	"Variant"))
				result     	"Integer"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "GetCatalogItem"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AE01AE"
				documentation 	
| GetCatalogItem is called repeatedly to return all items in the Catalog.
| Each time its called it returns an item and bumps a counter
| returns Null if the collection is empty
				
				result     	"Object"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "AddItem"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 205))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AE01F4"
				parameters 	(list Parameters
				    (object Parameter "ByVal vProductCode"
					type       	"Variant")
				    (object Parameter "ByVal vProductType"
					type       	"Variant")
				    (object Parameter "ByVal vProductIntroductionDate"
					type       	"Variant")
				    (object Parameter "ByVal vProductName"
					type       	"Variant")
				    (object Parameter "ByVal vProductDescription"
					type       	"Variant")
				    (object Parameter "ByVal vProductSize"
					type       	"Variant")
				    (object Parameter "ByVal vProductImageURL"
					type       	"Variant")
				    (object Parameter "ByVal vUnitPrice"
					type       	"Variant")
				    (object Parameter "ByVal vOnSale"
					type       	"Variant")
				    (object Parameter "ByVal vDiscount"
					type       	"Variant"))
				result     	"Object"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ItemCount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AF028C"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ItemCount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94AF02E6"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "ByVal vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6B301BC"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6B303C4"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "bEnvOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94AD038E"
				type       	"Integer")
			    (object ClassAttribute "bConnOpen"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94AD0398"
				type       	"Integer")
			    (object ClassAttribute "mItemCount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94AD03AC"
				type       	"Long")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6B3017F"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Class "CatalogItem"
			attributes 	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"ImplementationType"
				value      	("ImplementationTypeSet" 199))
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionExplicit"
				value      	FALSE)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionBase"
				value      	"0")
			    (object Attribute
				tool       	"Visual Basic"
				name       	"OptionCompare"
				value      	("CompareSet" 202)))
			quid       	"32FA94B0037E"
			stereotype 	"Class Module"
			operations 	(list Operations
			    (object Operation "ProductCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B100FE"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B10177"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductType"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B10271"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductType"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B102DF"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductIntroductionDate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B103D9"
				stereotype 	"Get"
				result     	"Date"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductIntroductionDate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B20060"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Date"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B2015A"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B201D2"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductDescription"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B202CD"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductDescription"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B2033B"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductSize"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B3004D"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductSize"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B300BB"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductImageURL"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B301B6"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ProductImageURL"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B30224"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "UnitPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B3031E"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "UnitPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B30396"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OnSale"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B4009F"
				stereotype 	"Get"
				result     	"Boolean"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "OnSale"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B40117"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Boolean"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Discount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B40207"
				stereotype 	"Get"
				result     	"Variant"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Discount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 210))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsStatic"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"EntryCode"
					value      	(value Text ""))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"ExitCode"
					value      	(value Text "")))
				quid       	"32FA94B4027F"
				stereotype 	"Let"
				parameters 	(list Parameters
				    (object Parameter "vNewValue"
					type       	"Variant"))
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "ClassDebugID"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"OperationKind"
					value      	("OperationKindSet" 207))
				    (object Attribute
					tool       	"Visual Basic"
					name       	"PropertyKind"
					value      	("PropertyKindSet" 206)))
				quid       	"32FAA6B4033A"
				stereotype 	"Get"
				result     	"Long"
				concurrency 	"Sequential"
				opExportControl 	"Public"
				uid        	0)
			    (object Operation "Class_Initialize"
				quid       	"32FAA6B50345"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0)
			    (object Operation "Class_Terminate"
				quid       	"32FAA6B60007"
				concurrency 	"Sequential"
				opExportControl 	"Private"
				uid        	0))
			class_attributes 	(list class_attribute_list
			    (object ClassAttribute "mProductCode"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B10036"
				documentation 	" Object Properties"
				type       	"Variant")
			    (object ClassAttribute "mProductType"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B1004A"
				type       	"Variant")
			    (object ClassAttribute "mProductIntroductionDate"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B1005E"
				type       	"Date")
			    (object ClassAttribute "mProductName"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B10072"
				type       	"Variant")
			    (object ClassAttribute "mProductDescription"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B10086"
				type       	"Variant")
			    (object ClassAttribute "mProductSize"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B1009A"
				type       	"Variant")
			    (object ClassAttribute "mProductImageURL"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B100AE"
				type       	"Variant")
			    (object ClassAttribute "mUnitPrice"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B100C2"
				type       	"Variant")
			    (object ClassAttribute "mOnSale"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B100D6"
				type       	"Boolean")
			    (object ClassAttribute "mDiscount"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"IsConst"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94B100F4"
				type       	"Variant")
			    (object ClassAttribute "mlClassDebugID"
				quid       	"32FAA6B402FD"
				type       	"Long"))
			language   	"Visual Basic")
		    (object Association "$UNNAMED$134"
			quid       	"32FA94AD0366"
			roles      	(list role_list
			    (object Role "$UNNAMED$135"
				quid       	"32FA94AD0367"
				supplier   	"Logical View::Data Services::Catalog"
				quidu      	"32FA94AD02D9")
			    (object Role "rdoEnv"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94AD0368"
				label      	"rdoEnv"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironment"
				quidu      	"32EE5AF50302"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$136"
			quid       	"32FA94AD037A"
			roles      	(list role_list
			    (object Role "$UNNAMED$137"
				quid       	"32FA94AD037B"
				supplier   	"Logical View::Data Services::Catalog"
				quidu      	"32FA94AD02D9")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94AD037C"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$138"
			quid       	"32FA94AD03C0"
			roles      	(list role_list
			    (object Role "$UNNAMED$139"
				quid       	"32FA94AD03C1"
				supplier   	"Logical View::Data Services::Catalog"
				quidu      	"32FA94AD02D9")
			    (object Role "rsCatalogItems"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94AD03C2"
				label      	"rsCatalogItems"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoResultset"
				quidu      	"32EE5A8900E6"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$140"
			quid       	"32FA94BA02B0"
			roles      	(list role_list
			    (object Role "$UNNAMED$141"
				quid       	"32FA94BA02B1"
				supplier   	"Logical View::Business Services::Customer"
				quidu      	"32FA94BA00BB")
			    (object Role "rdoEnv"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA02B2"
				label      	"rdoEnv"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoEnvironment"
				quidu      	"32EE5AF50302"
				exportControl 	"Private"
				is_navigable 	TRUE)))
		    (object Association "$UNNAMED$142"
			quid       	"32FA94BA02C4"
			roles      	(list role_list
			    (object Role "$UNNAMED$143"
				quid       	"32FA94BA02C5"
				supplier   	"Logical View::Business Services::Customer"
				quidu      	"32FA94BA00BB")
			    (object Role "rdoConn"
				attributes 	(list Attribute_Set
				    (object Attribute
					tool       	"Visual Basic"
					name       	"Subscript"
					value      	"")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateDataMember"
					value      	TRUE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"New"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"WithEvents"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"DataMemberName"
					value      	"$relationship")
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateGetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateSetOperation"
					value      	FALSE)
				    (object Attribute
					tool       	"Visual Basic"
					name       	"GenerateLetOperation"
					value      	FALSE))
				quid       	"32FA94BA02C6"
				label      	"rdoConn"
				supplier   	"Logical View::Business Services::RDO::rdoObjects::rdoConnection"
				quidu      	"32EE5A5300F0"
				exportControl 	"Private"
				is_navigable 	TRUE))))
		logical_presentations 	(list unit_reference_list
		    (object ClassDiagram "Package Overview"
			quid       	"32FA9449001A"
			title      	"Package Overview"
			zoom       	100
			max_height 	28350
			max_width  	21600
			origin_x   	0
			origin_y   	0
			items      	(list diagram_item_list
			    (object ClassView "Class" "Logical View::Data Services::Catalog" @331
				ShowCompartmentStereotypes 	TRUE
				location   	(237, 184)
				label      	(object ItemLabel
				    Parent_View 	@331
				    location   	(150, 183)
				    nlines     	1
				    max_width  	174
				    justify    	0
				    label      	"Catalog")
				stereotype 	(object ItemLabel
				    Parent_View 	@331
				    location   	(150, 133)
				    anchor     	10
				    nlines     	1
				    max_width  	174
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94AD02D9"
				width      	192
				height     	126
				annotation 	8
				autoResize 	TRUE)
			    (object ClassView "Class" "Logical View::Data Services::CatalogItem" @332
				ShowCompartmentStereotypes 	TRUE
				location   	(843, 184)
				label      	(object ItemLabel
				    Parent_View 	@332
				    location   	(718, 183)
				    nlines     	1
				    max_width  	250
				    justify    	0
				    label      	"CatalogItem")
				stereotype 	(object ItemLabel
				    Parent_View 	@332
				    location   	(718, 133)
				    anchor     	10
				    nlines     	1
				    max_width  	250
				    justify    	0
				    label      	"<<Class Module>>")
				icon_style 	"Icon"
				quidu      	"32FA94B0037E"
				width      	268
				height     	126
				annotation 	8
				autoResize 	TRUE)
			    (object UsesView "" @333
				stereotype 	TRUE
				quidu      	"32FAA1DB03AD"
				client     	@331
				supplier   	@332
				line_style 	0))))))
	logical_presentations 	(list unit_reference_list
	    (object ClassDiagram "Main"
		quid       	"34980CFD0060"
		title      	"Main"
		zoom       	100
		max_height 	28350
		max_width  	21600
		origin_x   	0
		origin_y   	0
		items      	(list diagram_item_list))
	    (object Tier_Diagram "Three-Tiered Service Model"
		quid       	"32FA94490021"
		title      	"Three-Tiered Service Model"
		documentation 	
|Microsoft Transaction Server, formerly known by its code name, "Viper" is a new product that combines the features of a TP monitor and an object request broker in an easy-to-use package. Developers use Microsoft Transaction Server to deploy scalable server applications built from ActiveX components, focusing on solving  business problems instead of programming application infrastructure. Microsoft Transaction Server delivers the "plumbing" including transactions, scalability services, connection management, and point-and-click administration  providing developers with the easiest way to build and deploy scalable server applications for business and the   Internet. 
|
		
		zoom       	79
		max_height 	28350
		max_width  	21600
		origin_x   	545
		origin_y   	0
		items      	(list diagram_item_list
		    (object TierView "User Services" @334
			label      	(object ItemLabel
			    Parent_View 	@334
			    location   	(6, 6)
			    nlines     	2
			    max_width  	-12
			    justify    	0
			    label      	"User Services")
			icon_style 	"Icon"
			hidden     	TRUE
			quidu      	"32FA9449000F"
			width      	300
			height     	180)
		    (object TierView "Business Services" @335
			location   	(934, 0)
			label      	(object ItemLabel
			    Parent_View 	@335
			    location   	(940, 6)
			    nlines     	2
			    max_width  	-12
			    justify    	0
			    label      	"Business Services")
			icon_style 	"Icon"
			hidden     	TRUE
			quidu      	"32FA94490011"
			width      	300
			height     	180)
		    (object TierView "Data Services" @336
			location   	(2263, 0)
			label      	(object ItemLabel
			    Parent_View 	@336
			    location   	(2269, 6)
			    nlines     	2
			    max_width  	-12
			    justify    	0
			    label      	"Data Services")
			icon_style 	"Icon"
			hidden     	TRUE
			quidu      	"32FA94490019"
			width      	300
			height     	180)
		    (object ClassView "Class" "Logical View::User Services::Browser" @337
			ShowCompartmentStereotypes 	TRUE
			location   	(329, 1056)
			label      	(object ItemLabel
			    Parent_View 	@337
			    location   	(238, 1028)
			    nlines     	1
			    max_width  	182
			    justify    	0
			    label      	"Browser")
			stereotype 	(object ItemLabel
			    Parent_View 	@337
			    location   	(238, 981)
			    anchor     	10
			    nlines     	1
			    max_width  	182
			    justify    	0
			    label      	"<<Form>>")
			icon_style 	"Icon"
			quidu      	"32FA94A401DC"
			width      	200
			height     	172
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Data Services::Catalog" @338
			ShowCompartmentStereotypes 	TRUE
			location   	(2649, 999)
			label      	(object ItemLabel
			    Parent_View 	@338
			    location   	(2335, 732)
			    nlines     	1
			    max_width  	628
			    justify    	0
			    label      	"Catalog")
			stereotype 	(object ItemLabel
			    Parent_View 	@338
			    location   	(2335, 685)
			    anchor     	10
			    nlines     	1
			    max_width  	628
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94AD02D9"
			compartment 	(object Compartment
			    Parent_View 	@338
			    location   	(2335, 789)
			    icon_style 	"Icon"
			    anchor     	2
			    nlines     	11
			    max_width  	1642
			    compartmentItems 	(list Compartment
				"- Class_Terminate()"
				"+ GetCatalogItemByCode()"
				"+ GetCatalogItemsByProductType()"
				"+ GetCatalogItem()"
				"+ AddItem()"
				"<<Get>> + ItemCount()"
				"<<Let>> + ItemCount()"
				"- bEnvOpen : Integer"
				"- bConnOpen : Integer"
				"- mItemCount : Long"))
			width      	646
			height     	650
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Data Services::CatalogItem" @339
			ShowCompartmentStereotypes 	TRUE
			location   	(2654, 1815)
			label      	(object ItemLabel
			    Parent_View 	@339
			    location   	(2348, 1548)
			    nlines     	1
			    max_width  	612
			    justify    	0
			    label      	"CatalogItem")
			stereotype 	(object ItemLabel
			    Parent_View 	@339
			    location   	(2348, 1501)
			    anchor     	10
			    nlines     	1
			    max_width  	612
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94B0037E"
			compartment 	(object Compartment
			    Parent_View 	@339
			    location   	(2348, 1605)
			    icon_style 	"Icon"
			    anchor     	2
			    nlines     	11
			    max_width  	1899
			    compartmentItems 	(list Compartment
				"- mProductCode : Variant"
				"- mProductType : Variant"
				"- mProductIntroductionDate : Date"
				"- mProductName : Variant"
				"- mProductDescription : Variant"
				"- mProductSize : Variant"
				"- mProductImageURL : Variant"
				"- mUnitPrice : Variant"
				"- mOnSale : Boolean"
				"- mDiscount : Variant"))
			width      	630
			height     	650
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Business Services::AuthorizePayment" @340
			ShowCompartmentStereotypes 	TRUE
			location   	(1203, 1186)
			label      	(object ItemLabel
			    Parent_View 	@340
			    location   	(1021, 1158)
			    nlines     	1
			    max_width  	364
			    justify    	0
			    label      	"AuthorizePayment")
			stereotype 	(object ItemLabel
			    Parent_View 	@340
			    location   	(1021, 1111)
			    anchor     	10
			    nlines     	1
			    max_width  	364
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94C70287"
			width      	382
			height     	172
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Business Services::Payment" @341
			ShowCompartmentStereotypes 	TRUE
			location   	(2008, 1593)
			label      	(object ItemLabel
			    Parent_View 	@341
			    location   	(1857, 1565)
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"Payment")
			stereotype 	(object ItemLabel
			    Parent_View 	@341
			    location   	(1857, 1518)
			    anchor     	10
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94C90171"
			width      	320
			height     	172
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Business Services::SalesTax" @342
			ShowCompartmentStereotypes 	TRUE
			location   	(2028, 1783)
			label      	(object ItemLabel
			    Parent_View 	@342
			    location   	(1877, 1755)
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"SalesTax")
			stereotype 	(object ItemLabel
			    Parent_View 	@342
			    location   	(1877, 1708)
			    anchor     	10
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94CA03A3"
			width      	320
			height     	172
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Business Services::TakeANumber" @343
			ShowCompartmentStereotypes 	TRUE
			location   	(1675, 1768)
			label      	(object ItemLabel
			    Parent_View 	@343
			    location   	(1524, 1740)
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"TakeANumber")
			stereotype 	(object ItemLabel
			    Parent_View 	@343
			    location   	(1524, 1693)
			    anchor     	10
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94CC0021"
			width      	320
			height     	172
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Business Services::TakeANumberUpdate" @344
			ShowCompartmentStereotypes 	TRUE
			location   	(1207, 1384)
			label      	(object ItemLabel
			    Parent_View 	@344
			    location   	(998, 1356)
			    nlines     	1
			    max_width  	418
			    justify    	0
			    label      	"TakeANumberUpdate")
			stereotype 	(object ItemLabel
			    Parent_View 	@344
			    location   	(998, 1309)
			    anchor     	10
			    nlines     	1
			    max_width  	418
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94CD02A3"
			width      	436
			height     	172
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Business Services::ShoppingBasketItem" @345
			ShowCompartmentStereotypes 	TRUE
			location   	(1234, 872)
			label      	(object ItemLabel
			    Parent_View 	@345
			    location   	(1028, 816)
			    nlines     	1
			    max_width  	412
			    justify    	0
			    label      	"ShoppingBasketItem")
			stereotype 	(object ItemLabel
			    Parent_View 	@345
			    location   	(1028, 769)
			    anchor     	10
			    nlines     	1
			    max_width  	412
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94A8001F"
			compartment 	(object Compartment
			    Parent_View 	@345
			    location   	(1028, 873)
			    icon_style 	"Icon"
			    anchor     	2
			    nlines     	2
			    max_width  	499
			    compartmentItems 	(list Compartment
				"+ UpdateItem()"))
			width      	430
			height     	228
			annotation 	8
			autoResize 	TRUE)
		    (object ClassView "Class" "Logical View::Business Services::ShoppingBasket" @346
			ShowCompartmentStereotypes 	TRUE
			location   	(1241, 370)
			label      	(object ItemLabel
			    Parent_View 	@346
			    location   	(1058, 244)
			    nlines     	1
			    max_width  	366
			    justify    	0
			    label      	"ShoppingBasket")
			stereotype 	(object ItemLabel
			    Parent_View 	@346
			    location   	(1058, 197)
			    anchor     	10
			    nlines     	1
			    max_width  	366
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94A50011"
			compartment 	(object Compartment
			    Parent_View 	@346
			    location   	(1058, 301)
			    icon_style 	"Icon"
			    anchor     	2
			    nlines     	5
			    max_width  	364
			    compartmentItems 	(list Compartment
				"+ AddItem()"
				"+ RemoveItem()"
				"+ RemoveAllItems()"
				"+ GetItem()"))
			width      	384
			height     	368
			annotation 	8
			autoResize 	TRUE)
		    (object AssociationViewNew "$UNNAMED$1" @347
			location   	(1236, 655)
			stereotype 	TRUE
			quidu      	"32FA95FB0031"
			roleview_list 	(list RoleViews
			    (object RoleView "colBasketItems2" @348
				Parent_View 	@347
				location   	(356, 431)
				label      	(object SegLabel @349
				    Parent_View 	@348
				    location   	(1212, 709)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	450
				    justify    	0
				    label      	"-colBasketItems2"
				    pctDist    	0.527178
				    height     	24
				    orientation 	1)
				stereotype 	TRUE
				quidu      	"32FA95FB023A"
				client     	@347
				supplier   	@345
				line_style 	0
				label      	(object SegLabel @350
				    Parent_View 	@348
				    location   	(1288, 748)
				    anchor     	2
				    anchor_loc 	1
				    nlines     	1
				    max_width  	70
				    justify    	0
				    label      	"0..*"
				    pctDist    	0.900000
				    height     	54
				    orientation 	0))
			    (object RoleView "theShoppingBasket" @351
				Parent_View 	@347
				location   	(356, 431)
				label      	(object SegLabel @352
				    Parent_View 	@351
				    location   	(1242, 605)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	450
				    justify    	0
				    label      	"+theShoppingBasket"
				    pctDist    	0.491459
				    height     	5
				    orientation 	1)
				stereotype 	TRUE
				quidu      	"32FA95FB0239"
				client     	@347
				supplier   	@346
				line_style 	0)))
		    (object Label @353
			location   	(2358, 44)
			font       	(object Font
			    italics    	TRUE
			    color      	8388608
			    default_color 	FALSE)
			nlines     	3
			max_width  	625
			label      	
|The Data Services Maintain our
|Customer and Catalog Data
			)
		    (object UsesView "" @354
			stereotype 	TRUE
			quidu      	"32FAA1DB03AD"
			client     	@338
			supplier   	@339
			line_style 	0)
		    (object Label @355
			location   	(1111, 32)
			font       	(object Font
			    italics    	TRUE
			    color      	8388608
			    default_color 	FALSE)
			nlines     	2
			max_width  	720
			label      	"The Business Services implement our business rules")
		    (object Label @356
			location   	(62, 19)
			font       	(object Font
			    italics    	TRUE
			    color      	8388608
			    default_color 	FALSE)
			nlines     	8
			max_width  	644
			label      	"User Services format the information, and present it to the user. By separating these services, we can change the presentation  without impacting the rest of the application ")
		    (object Label @357
			location   	(60, 388)
			font       	(object Font
			    color      	255
			    default_color 	FALSE)
			nlines     	7
			max_width  	744
			label      	
|Note: When Compiling any application built with an ActiveX component, verify that you have selected that component in the Project:References dialog of Visual Basic.
|This model uses MTxAS from MTS and Remote Data Object 2.0
			)
		    (object Label @358
			location   	(151, 1317)
			font       	(object Font
			    size       	14
			    bold       	TRUE
			    italics    	TRUE
			    color      	8421376
			    default_color 	FALSE)
			nlines     	4
			max_width  	720
			label      	"Sample Model using MTS and RDO")
		    (object CategoryView "Logical View::Business Services::MTxAS" @359
			location   	(1279, 2126)
			font       	(object Font
			    size       	12
			    bold       	TRUE
			    italics    	TRUE
			    color      	8421376
			    default_color 	FALSE)
			label      	(object ItemLabel
			    Parent_View 	@359
			    location   	(1135, 2042)
			    nlines     	2
			    max_width  	288
			    justify    	0
			    label      	"MTxAS")
			icon_style 	"Icon"
			quidu      	"32EF92E903A9"
			width      	300
			height     	180)
		    (object CategoryView "Logical View::Business Services::RDO" @360
			location   	(1774, 2122)
			font       	(object Font
			    size       	12
			    bold       	TRUE
			    italics    	TRUE
			    color      	8421376
			    default_color 	FALSE)
			label      	(object ItemLabel
			    Parent_View 	@360
			    location   	(1630, 2038)
			    nlines     	2
			    max_width  	288
			    justify    	0
			    label      	"RDO")
			icon_style 	"Icon"
			quidu      	"32EE5A2A0064"
			width      	300
			height     	180)
		    (object Label @361
			location   	(1217, 2267)
			font       	(object Font
			    color      	8388608
			    default_color 	FALSE)
			nlines     	5
			max_width  	657
			label      	"The above packages contain the Extensibiltiy Interfaces for MTS and RDO")
		    (object UsesView "" @362
			stereotype 	TRUE
			quidu      	"32FAA328024E"
			client     	@337
			supplier   	@346
			line_style 	0)
		    (object UsesView "" @363
			stereotype 	TRUE
			quidu      	"32FAA3430379"
			client     	@337
			supplier   	@345
			line_style 	0)
		    (object UsesView "" @364
			stereotype 	TRUE
			quidu      	"3303C2FC02F5"
			client     	@346
			supplier   	@338
			vertices   	(list Points
			    (1433, 363)
			    (2076, 344)
			    (2364, 673))
			line_style 	0)
		    (object ClassView "Class" "Logical View::Business Services::Order" @365
			ShowCompartmentStereotypes 	TRUE
			location   	(1243, 1733)
			label      	(object ItemLabel
			    Parent_View 	@365
			    location   	(1042, 1583)
			    nlines     	1
			    max_width  	402
			    justify    	0
			    label      	"Order")
			stereotype 	(object ItemLabel
			    Parent_View 	@365
			    location   	(1042, 1536)
			    anchor     	10
			    nlines     	1
			    max_width  	402
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94C200D1"
			compartment 	(object Compartment
			    Parent_View 	@365
			    location   	(1042, 1640)
			    icon_style 	"Icon"
			    anchor     	2
			    nlines     	6
			    max_width  	1213
			    compartmentItems 	(list Compartment
				"+ Prepare()"
				"- GetOrderID()"
				"+ AddPayment()"
				"+ UpdateInventory()"
				"+ AddHeaderToOrder()"))
			width      	420
			height     	416
			annotation 	8
			autoResize 	TRUE)
		    (object UsesView "" @366
			stereotype 	TRUE
			quidu      	"32FAA35402FB"
			client     	@337
			supplier   	@365
			line_style 	0)
		    (object ClassView "Class" "Logical View::Business Services::Customer" @367
			ShowCompartmentStereotypes 	TRUE
			location   	(1876, 1097)
			label      	(object ItemLabel
			    Parent_View 	@367
			    location   	(1584, 783)
			    nlines     	1
			    max_width  	584
			    justify    	0
			    label      	"Customer")
			stereotype 	(object ItemLabel
			    Parent_View 	@367
			    location   	(1584, 736)
			    anchor     	10
			    nlines     	1
			    max_width  	584
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94BA00BB"
			compartment 	(object Compartment
			    Parent_View 	@367
			    location   	(1584, 840)
			    icon_style 	"Icon"
			    anchor     	2
			    nlines     	13
			    max_width  	1959
			    compartmentItems 	(list Compartment
				"- mCustomerFirstName : Variant"
				"- mCustomerLastName : Variant"
				"- mBillingAddress : Variant"
				"- mCity : Variant"
				"- mStateOrProvince : Variant"
				"- mCountry : Variant"
				"- mEmailAddress : Variant"
				"- mCreditCard : Variant"
				"- mCardNumber : Variant"
				"- mCardExpire : Variant"
				"- mCardName : Variant"
				"+ Save()"))
			width      	602
			height     	744
			annotation 	8
			autoResize 	TRUE)
		    (object UsesView "" @368
			stereotype 	TRUE
			quidu      	"3303C3180093"
			client     	@337
			supplier   	@367
			line_style 	0)
		    (object AssociationViewNew "$UNNAMED$2" @369
			location   	(1484, 1461)
			stereotype 	TRUE
			quidu      	"3303C3710163"
			roleview_list 	(list RoleViews
			    (object RoleView "theOrder" @370
				Parent_View 	@369
				location   	(-346, 364)
				label      	(object SegLabel @371
				    Parent_View 	@370
				    location   	(1406, 1483)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	192
				    justify    	0
				    label      	"+theOrder"
				    pctDist    	0.800000
				    height     	42
				    orientation 	1)
				stereotype 	TRUE
				quidu      	"3303C3720331"
				client     	@369
				supplier   	@365
				line_style 	0)
			    (object RoleView "theCustomer" @372
				Parent_View 	@369
				location   	(-346, 364)
				label      	(object SegLabel @373
				    Parent_View 	@372
				    location   	(1509, 1414)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	264
				    justify    	0
				    label      	"+theCustomer"
				    pctDist    	0.582418
				    height     	17
				    orientation 	0)
				stereotype 	TRUE
				quidu      	"3303C37203B3"
				client     	@369
				supplier   	@367
				line_style 	0)))
		    (object ClassView "Class" "Logical View::Business Services::Customers" @374
			ShowCompartmentStereotypes 	TRUE
			location   	(1859, 458)
			label      	(object ItemLabel
			    Parent_View 	@374
			    location   	(1708, 430)
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"Customers")
			stereotype 	(object ItemLabel
			    Parent_View 	@374
			    location   	(1708, 383)
			    anchor     	10
			    nlines     	1
			    max_width  	302
			    justify    	0
			    label      	"<<Class Module>>")
			icon_style 	"Icon"
			quidu      	"32FA94B6003D"
			width      	320
			height     	172
			annotation 	8
			autoResize 	TRUE)
		    (object AssociationViewNew "$UNNAMED$0" @375
			location   	(1836, 634)
			stereotype 	TRUE
			quidu      	"32FA954D0243"
			roleview_list 	(list RoleViews
			    (object RoleView "colCustomers2" @376
				Parent_View 	@375
				location   	(1004, -310)
				label      	(object SegLabel @377
				    Parent_View 	@376
				    location   	(1887, 671)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	450
				    justify    	0
				    label      	"+colCustomers2"
				    pctDist    	0.415360
				    height     	50
				    orientation 	0)
				stereotype 	TRUE
				quidu      	"32FA954E014B"
				client     	@375
				supplier   	@367
				line_style 	0
				label      	(object SegLabel @378
				    Parent_View 	@376
				    location   	(1785, 715)
				    anchor     	2
				    anchor_loc 	1
				    nlines     	1
				    max_width  	70
				    justify    	0
				    label      	"0..*"
				    pctDist    	0.900000
				    height     	54
				    orientation 	1))
			    (object RoleView "theCustomers" @379
				Parent_View 	@375
				location   	(1004, -310)
				label      	(object SegLabel @380
				    Parent_View 	@379
				    location   	(1837, 562)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	450
				    justify    	0
				    label      	"+theCustomers"
				    pctDist    	0.797122
				    height     	3
				    orientation 	1)
				stereotype 	TRUE
				quidu      	"32FA954E014A"
				client     	@375
				supplier   	@374
				line_style 	0)))
		    (object AssociationViewNew "$UNNAMED$35" @381
			location   	(1997, 683)
			stereotype 	TRUE
			quidu      	"3304E3050316"
			roleview_list 	(list RoleViews
			    (object RoleView "colCustomers2" @382
				Parent_View 	@381
				location   	(184, 225)
				label      	(object SegLabel @383
				    Parent_View 	@382
				    location   	(1791, 605)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	450
				    justify    	0
				    label      	"+colCustomers2"
				    pctDist    	0.800000
				    height     	42
				    orientation 	0)
				stereotype 	TRUE
				quidu      	"3304E3050317"
				client     	@381
				supplier   	@374
				vertices   	(list Points
				    (2024, 683)
				    (1859, 683)
				    (1859, 544))
				line_style 	0
				label      	(object SegLabel @384
				    Parent_View 	@382
				    location   	(1886, 575)
				    anchor     	2
				    anchor_loc 	1
				    nlines     	1
				    max_width  	70
				    justify    	0
				    label      	"0..*"
				    pctDist    	0.900000
				    height     	54
				    orientation 	1))
			    (object RoleView "theCustomers" @385
				Parent_View 	@381
				location   	(184, 225)
				label      	(object SegLabel @386
				    Parent_View 	@385
				    location   	(2099, 463)
				    anchor     	1
				    anchor_loc 	1
				    nlines     	1
				    max_width  	450
				    justify    	0
				    label      	"+theCustomers"
				    pctDist    	0.800000
				    height     	42
				    orientation 	1)
				stereotype 	TRUE
				quidu      	"3304E3050318"
				client     	@381
				supplier   	@374
				vertices   	(list Points
				    (2024, 683)
				    (2084, 683)
				    (2084, 458)
				    (2019, 458))
				line_style 	0)))
		    (object CategoryView "Logical View::Business Services::RDO" @387
			location   	(2051, 180)
			label      	(object ItemLabel
			    Parent_View 	@387
			    location   	(1907, 96)
			    nlines     	2
			    max_width  	288
			    justify    	0
			    label      	"RDO")
			icon_style 	"Icon"
			quidu      	"32EE5A2A0064"
			width      	300
			height     	180)))))
    root_subsystem 	(object SubSystem "Component View"
	quid       	"32FA94490008"
	physical_models 	(list unit_reference_list)
	physical_presentations 	(list unit_reference_list
	    (object Module_Diagram "Main"
		quid       	"32FA9449007D"
		title      	"Main"
		zoom       	100
		max_height 	28350
		max_width  	21600
		origin_x   	0
		origin_y   	0
		items      	(list diagram_item_list))))
    process_structure 	(object Processes
	quid       	"32FA94490009"
	ProcsNDevs 	(list
	    (object Process_Diagram "Deployment View"
		quid       	"32FA9449007F"
		title      	"Deployment View"
		zoom       	100
		max_height 	28350
		max_width  	21600
		origin_x   	0
		origin_y   	0
		items      	(list diagram_item_list))))
    properties 	(object Properties
	attributes 	(list Attribute_Set
	    (object Attribute
		tool       	"Visual Basic"
		name       	"propertyId"
		value      	"783606378")
	    (object Attribute
		tool       	"Visual Basic"
		name       	"default__Class"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Visual Basic"
			name       	"CreatableSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"Private"
				value      	221)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"PublicNotCreatable"
				value      	213)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"SingleUse"
				value      	214)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"GlobalSingleUse"
				value      	215)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"MultiUse"
				value      	219)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"GlobalMultiUse"
				value      	220)))
		    (object Attribute
			tool       	"Visual Basic"
			name       	"OptionBase"
			value      	"0")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"OptionExplicit"
			value      	TRUE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"OptionCompare"
			value      	("CompareSet" 202))
		    (object Attribute
			tool       	"Visual Basic"
			name       	"Creatable"
			value      	("CreatableSet" 221))
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateInitialization"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateTermination"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"CollectionClass"
			value      	"Collection")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"CompareSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Visual Basic"
				name       	"None"
				value      	202)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"Binary"
				value      	203)
			    (object Attribute
				tool       	"Visual Basic"
				name       	"Text"
				value      	204)))))
	    (object Attribute
		tool       	"Visual Basic"
		name       	"default__Operation"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Visual Basic"
			name       	"OperationName"
			value      	"$operation")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"LibraryName"
			value      	"")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"AliasName"
			value      	"")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"IsStatic"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"EntryCode"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Visual Basic"
			name       	"ExitCode"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"Visual Basic"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Visual Basic"
			name       	"IsConst"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"New"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"WithEvents"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"Subscript"
			value      	"")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"NameIfUnlabeled"
			value      	"the$supplier")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"DataMemberName"
			value      	"$relationship")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateGetOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateSetOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateLetOperation"
			value      	FALSE)))
	    (object Attribute
		tool       	"Visual Basic"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Visual Basic"
			name       	"New"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"WithEvents"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"Subscript"
			value      	"")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"NameIfUnlabeled"
			value      	"the$supplier")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"DataMemberName"
			value      	"$relationship")
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateGetOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateSetOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"Visual Basic"
			name       	"GenerateLetOperation"
			value      	FALSE)))
	    (object Attribute
		tool       	"Visual Basic"
		name       	"default__Inherit"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Visual Basic"
			name       	"ImplementsDelegation"
			value      	TRUE)))
	    (object Attribute
		tool       	"Visual Basic"
		name       	"default__Module-Spec"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Visual Basic"
			name       	"ProjectFile"
			value      	"")))
	    (object Attribute
		tool       	"DDL"
		name       	"propertyId"
		value      	"809135966")
	    (object Attribute
		tool       	"DDL"
		name       	"default__Project"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"DDL"
			name       	"DataBase"
			value      	("DataBaseSet" 800))
		    (object Attribute
			tool       	"DDL"
			name       	"DataBaseSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"DDL"
				name       	"ANSI"
				value      	800)
			    (object Attribute
				tool       	"DDL"
				name       	"Oracle"
				value      	801)
			    (object Attribute
				tool       	"DDL"
				name       	"SQLServer"
				value      	802)
			    (object Attribute
				tool       	"DDL"
				name       	"Sybase"
				value      	803)
			    (object Attribute
				tool       	"DDL"
				name       	"Watcom"
				value      	804)))
		    (object Attribute
			tool       	"DDL"
			name       	"PrimaryKeyColumnName"
			value      	"Id")
		    (object Attribute
			tool       	"DDL"
			name       	"PrimaryKeyColumnType"
			value      	"NUMBER(5)")
		    (object Attribute
			tool       	"DDL"
			name       	"ViewName"
			value      	"V_")
		    (object Attribute
			tool       	"DDL"
			name       	"TableName"
			value      	"T_")
		    (object Attribute
			tool       	"DDL"
			name       	"InheritSuffix"
			value      	"_V")
		    (object Attribute
			tool       	"DDL"
			name       	"DropClause"
			value      	FALSE)
		    (object Attribute
			tool       	"DDL"
			name       	"BaseViews"
			value      	FALSE)
		    (object Attribute
			tool       	"DDL"
			name       	"DDLScriptFilename"
			value      	"DDL1.SQL")))
	    (object Attribute
		tool       	"DDL"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"DDL"
			name       	"ColumnType"
			value      	"VARCHAR")
		    (object Attribute
			tool       	"DDL"
			name       	"Length"
			value      	"")
		    (object Attribute
			tool       	"DDL"
			name       	"NullsOK"
			value      	TRUE)
		    (object Attribute
			tool       	"DDL"
			name       	"PrimaryKey"
			value      	FALSE)
		    (object Attribute
			tool       	"DDL"
			name       	"Unique"
			value      	FALSE)
		    (object Attribute
			tool       	"DDL"
			name       	"CompositeUnique"
			value      	FALSE)
		    (object Attribute
			tool       	"DDL"
			name       	"CheckConstraint"
			value      	"")))
	    (object Attribute
		tool       	"DDL"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"framework"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"IDL"
		name       	"propertyId"
		value      	"809135966")
	    (object Attribute
		tool       	"IDL"
		name       	"default__Project"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"CreateMissingDirectories"
			value      	TRUE)
		    (object Attribute
			tool       	"IDL"
			name       	"StopOnError"
			value      	TRUE)
		    (object Attribute
			tool       	"IDL"
			name       	"Directory"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"IDL"
			name       	"GeneratePreserveRegions"
			value      	TRUE)))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Class"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"ImplementationType"
			value      	"")
		    (object Attribute
			tool       	"IDL"
			name       	"ConstValue"
			value      	"")
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateDefaultSpecifier"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"DefaultSpecifier"
			value      	"")
		    (object Attribute
			tool       	"IDL"
			name       	"IDLElement"
			value      	TRUE)
		    (object Attribute
			tool       	"IDL"
			name       	"IDLSpecificationType"
			value      	("IDLSpecSet" 22))
		    (object Attribute
			tool       	"IDL"
			name       	"IDLSpecSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"IDL"
				name       	"Interface"
				value      	22)
			    (object Attribute
				tool       	"IDL"
				name       	"Typedef"
				value      	54)
			    (object Attribute
				tool       	"IDL"
				name       	"Enumeration"
				value      	8)
			    (object Attribute
				tool       	"IDL"
				name       	"Const"
				value      	71)
			    (object Attribute
				tool       	"IDL"
				name       	"Exception"
				value      	61)
			    (object Attribute
				tool       	"IDL"
				name       	"Struct"
				value      	51)
			    (object Attribute
				tool       	"IDL"
				name       	"Union"
				value      	81)))))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Module-Spec"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"Generate"
			value      	TRUE)
		    (object Attribute
			tool       	"IDL"
			name       	"CmIdentification"
			value      	(value Text "  %X% %Q% %Z% %W%"))
		    (object Attribute
			tool       	"IDL"
			name       	"CopyrightNotice"
			value      	(value Text ""))
		    (object Attribute
			tool       	"IDL"
			name       	"FileName"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateIDLModule"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"InclusionProtectionSymbol"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"IDL"
			name       	"AdditionalIncludes"
			value      	(value Text ""))
		    (object Attribute
			tool       	"IDL"
			name       	"IncludeBySimpleName"
			value      	FALSE)))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Module-Body"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"CmIdentification"
			value      	(value Text "  %X% %Q% %Z% %W%"))
		    (object Attribute
			tool       	"IDL"
			name       	"CopyrightNotice"
			value      	(value Text ""))
		    (object Attribute
			tool       	"IDL"
			name       	"FileName"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"IDL"
			name       	"AdditionalIncludes"
			value      	(value Text ""))
		    (object Attribute
			tool       	"IDL"
			name       	"IncludeBySimpleName"
			value      	FALSE)))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Operation"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"OperationIsOneWay"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"Context"
			value      	"")
		    (object Attribute
			tool       	"IDL"
			name       	"Raises"
			value      	"")))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"CaseSpecifier"
			value      	"")
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"IDL"
			name       	"DataMemberName"
			value      	"$relationship")
		    (object Attribute
			tool       	"IDL"
			name       	"IsReadOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"IsConst"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"ConstValue"
			value      	"")))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Has"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"NameIfUnlabeled"
			value      	"the_$supplier")
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"IDL"
			name       	"DataMemberName"
			value      	"$relationship")
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateForwardReference"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"IsReadOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"BoundedHasRelType"
			value      	("HasRelTypeSet" 47))
		    (object Attribute
			tool       	"IDL"
			name       	"HasRelTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"IDL"
				name       	"Array"
				value      	24)
			    (object Attribute
				tool       	"IDL"
				name       	"Sequence"
				value      	47)))))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"NameIfUnlabeled"
			value      	"the_$supplier")
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"IDL"
			name       	"DataMemberName"
			value      	"$relationship")
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateForwardReference"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"IsReadOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"IDL"
			name       	"BoundedRoleType"
			value      	("AssocTypeSet" 47))
		    (object Attribute
			tool       	"IDL"
			name       	"AssocTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"IDL"
				name       	"Array"
				value      	24)
			    (object Attribute
				tool       	"IDL"
				name       	"Sequence"
				value      	47)))))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Uses"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"GenerateForwardReference"
			value      	FALSE)))
	    (object Attribute
		tool       	"IDL"
		name       	"default__Subsystem"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"IDL"
			name       	"Directory"
			value      	"AUTO GENERATE")))
	    (object Attribute
		tool       	"IDL"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"Java"
		name       	"propertyId"
		value      	"809135966")
	    (object Attribute
		tool       	"Java"
		name       	"default__Project"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Java"
			name       	"CreateMissingDirectories"
			value      	TRUE)
		    (object Attribute
			tool       	"Java"
			name       	"StopOnError"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Directory"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"Java"
			name       	"UsePrefixes"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"InstanceVariablePrefix"
			value      	"m_")
		    (object Attribute
			tool       	"Java"
			name       	"ClassVariablePrefix"
			value      	"s_")
		    (object Attribute
			tool       	"Java"
			name       	"DefaultAttributeDataType"
			value      	"int")
		    (object Attribute
			tool       	"Java"
			name       	"DefaultOperationReturnType"
			value      	"void")))
	    (object Attribute
		tool       	"Java"
		name       	"default__Class"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Java"
			name       	"Final"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"GenerateDefaultConstructor"
			value      	TRUE)
		    (object Attribute
			tool       	"Java"
			name       	"ConstructorIs"
			value      	("Ctor_Set" 62))
		    (object Attribute
			tool       	"Java"
			name       	"Ctor_Set"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Java"
				name       	"Public"
				value      	62)
			    (object Attribute
				tool       	"Java"
				name       	"Protected"
				value      	63)
			    (object Attribute
				tool       	"Java"
				name       	"Private"
				value      	64)))
		    (object Attribute
			tool       	"Java"
			name       	"GenerateFinalizer"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"GenerateStaticInitializer"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"GenerateInstanceInitializer"
			value      	FALSE)))
	    (object Attribute
		tool       	"Java"
		name       	"default__Module-Spec"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Java"
			name       	"Generate"
			value      	TRUE)
		    (object Attribute
			tool       	"Java"
			name       	"CmIdentification"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Java"
			name       	"CopyrightNotice"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Java"
			name       	"AdditionalImports"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"Java"
		name       	"default__Module-Body"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Java"
			name       	"Generate"
			value      	TRUE)
		    (object Attribute
			tool       	"Java"
			name       	"CmIdentification"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Java"
			name       	"CopyrightNotice"
			value      	(value Text ""))
		    (object Attribute
			tool       	"Java"
			name       	"AdditionalImports"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"Java"
		name       	"default__Operation"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Java"
			name       	"Abstract"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Static"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Final"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Native"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Synchronized"
			value      	FALSE)))
	    (object Attribute
		tool       	"Java"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Java"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"Java"
			name       	"Final"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Transient"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Volatile"
			value      	FALSE)))
	    (object Attribute
		tool       	"Java"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Java"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"Java"
			name       	"ContainerClass"
			value      	"")
		    (object Attribute
			tool       	"Java"
			name       	"InitialValue"
			value      	"")
		    (object Attribute
			tool       	"Java"
			name       	"Final"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Transient"
			value      	FALSE)
		    (object Attribute
			tool       	"Java"
			name       	"Volatile"
			value      	FALSE)))
	    (object Attribute
		tool       	"Java"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"Oracle8"
		name       	"propertyId"
		value      	"360000002")
	    (object Attribute
		tool       	"Oracle8"
		name       	"default__Project"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Oracle8"
			name       	"DDLScriptFilename"
			value      	"DDL1.SQL")
		    (object Attribute
			tool       	"Oracle8"
			name       	"DropClause"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"PrimaryKeyColumnName"
			value      	"_ID")
		    (object Attribute
			tool       	"Oracle8"
			name       	"PrimaryKeyColumnType"
			value      	"NUMBER(5,0)")
		    (object Attribute
			tool       	"Oracle8"
			name       	"SchemaNamePrefix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"SchemaNameSuffix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"TableNamePrefix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"TableNameSuffix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"TypeNamePrefix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"TypeNameSuffix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"ViewNamePrefix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"ViewNameSuffix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"VarrayNamePrefix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"VarrayNameSuffix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"NestedTableNamePrefix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"NestedTableNameSuffix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"ObjectTableNamePrefix"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"ObjectTableNameSuffix"
			value      	"")))
	    (object Attribute
		tool       	"Oracle8"
		name       	"default__Module-Spec"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsSchema"
			value      	FALSE)))
	    (object Attribute
		tool       	"Oracle8"
		name       	"default__Class"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Oracle8"
			name       	"OID"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"WhereClause"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"CheckConstraint"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"CollectionTypeLength"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"CollectionTypePrecision"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"CollectionTypeScale"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"CollectionOfREFS"
			value      	FALSE)))
	    (object Attribute
		tool       	"Oracle8"
		name       	"default__Operation"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Oracle8"
			name       	"MethodKind"
			value      	("MethodKindSet" 1903))
		    (object Attribute
			tool       	"Oracle8"
			name       	"OverloadID"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"OrderNumber"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsReadNoDataState"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsReadNoProcessState"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsWriteNoDataState"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsWriteNoProcessState"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsSelfish"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerType"
			value      	("TriggerTypeSet" 1801))
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerEvent"
			value      	("TriggerEventSet" 1601))
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerText"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerReferencingNames"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerForEach"
			value      	("TriggerForEachSet" 1701))
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerWhenClause"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"MethodKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Oracle8"
				name       	"MapMethod"
				value      	1901)
			    (object Attribute
				tool       	"Oracle8"
				name       	"OrderMethod"
				value      	1902)
			    (object Attribute
				tool       	"Oracle8"
				name       	"Function"
				value      	1903)
			    (object Attribute
				tool       	"Oracle8"
				name       	"Procedure"
				value      	1904)
			    (object Attribute
				tool       	"Oracle8"
				name       	"Operator"
				value      	1905)
			    (object Attribute
				tool       	"Oracle8"
				name       	"Constructor"
				value      	1906)
			    (object Attribute
				tool       	"Oracle8"
				name       	"Destructor"
				value      	1907)
			    (object Attribute
				tool       	"Oracle8"
				name       	"Trigger"
				value      	1908)
			    (object Attribute
				tool       	"Oracle8"
				name       	"Calculated"
				value      	1909)))
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Oracle8"
				name       	"AFTER"
				value      	1801)
			    (object Attribute
				tool       	"Oracle8"
				name       	"BEFORE"
				value      	1802)
			    (object Attribute
				tool       	"Oracle8"
				name       	"INSTEAD OF"
				value      	1803)))
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerForEachSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Oracle8"
				name       	"ROW"
				value      	1701)
			    (object Attribute
				tool       	"Oracle8"
				name       	"STATEMENT"
				value      	1702)))
		    (object Attribute
			tool       	"Oracle8"
			name       	"TriggerEventSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"Oracle8"
				name       	"INSERT"
				value      	1601)
			    (object Attribute
				tool       	"Oracle8"
				name       	"UPDATE"
				value      	1602)
			    (object Attribute
				tool       	"Oracle8"
				name       	"DELETE"
				value      	1603)
			    (object Attribute
				tool       	"Oracle8"
				name       	"INSERT OR UPDATE"
				value      	1604)
			    (object Attribute
				tool       	"Oracle8"
				name       	"INSERT OR DELETE"
				value      	1605)
			    (object Attribute
				tool       	"Oracle8"
				name       	"UPDATE OR DELETE"
				value      	1606)
			    (object Attribute
				tool       	"Oracle8"
				name       	"INSERT OR UPDATE OR DELETE"
				value      	1607)))))
	    (object Attribute
		tool       	"Oracle8"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Oracle8"
			name       	"OrderNumber"
			value      	"")))
	    (object Attribute
		tool       	"Oracle8"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"Oracle8"
			name       	"OrderNumber"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsUnique"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"NullsAllowed"
			value      	TRUE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"Length"
			value      	"")
		    (object Attribute
			tool       	"Oracle8"
			name       	"Precision"
			value      	"2")
		    (object Attribute
			tool       	"Oracle8"
			name       	"Scale"
			value      	"6")
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsIndex"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"IsPrimaryKey"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"CompositeUnique"
			value      	FALSE)
		    (object Attribute
			tool       	"Oracle8"
			name       	"CheckConstraint"
			value      	"")))
	    (object Attribute
		tool       	"Oracle8"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"Repository"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"cg"
		name       	"propertyId"
		value      	"809135966")
	    (object Attribute
		tool       	"cg"
		name       	"default__Project"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"UseMSVC"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"HeaderFileExtension"
			value      	"h")
		    (object Attribute
			tool       	"cg"
			name       	"HeaderFileBackupExtension"
			value      	"h~")
		    (object Attribute
			tool       	"cg"
			name       	"HeaderFileTemporaryExtension"
			value      	"h#")
		    (object Attribute
			tool       	"cg"
			name       	"CodeFileExtension"
			value      	"cpp")
		    (object Attribute
			tool       	"cg"
			name       	"CodeFileBackupExtension"
			value      	"cp~")
		    (object Attribute
			tool       	"cg"
			name       	"CodeFileTemporaryExtension"
			value      	"cp#")
		    (object Attribute
			tool       	"cg"
			name       	"CreateMissingDirectories"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"StopOnError"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"ErrorLimit"
			value      	30)
		    (object Attribute
			tool       	"cg"
			name       	"Directory"
			value      	"$ROSECPP_SOURCE")
		    (object Attribute
			tool       	"cg"
			name       	"PathSeparator"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"FileNameFormat"
			value      	"128vx_b")
		    (object Attribute
			tool       	"cg"
			name       	"BooleanType"
			value      	"int")
		    (object Attribute
			tool       	"cg"
			name       	"AllowTemplates"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"AllowProtectedInheritance"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"CommentWidth"
			value      	60)
		    (object Attribute
			tool       	"cg"
			name       	"OneByValueContainer"
			value      	"$targetClass")
		    (object Attribute
			tool       	"cg"
			name       	"OneByReferenceContainer"
			value      	"$targetClass *")
		    (object Attribute
			tool       	"cg"
			name       	"OptionalByValueContainer"
			value      	"OptionalByValue<$targetClass>")
		    (object Attribute
			tool       	"cg"
			name       	"OptionalByReferenceContainer"
			value      	"$targetClass *")
		    (object Attribute
			tool       	"cg"
			name       	"FixedByValueContainer"
			value      	"$targetClass[$limit]")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedFixedByValueContainer"
			value      	"$targetClass[$limit]")
		    (object Attribute
			tool       	"cg"
			name       	"FixedByReferenceContainer"
			value      	"$targetClass *[$limit]")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedFixedByReferenceContainer"
			value      	"$targetClass *[$limit]")
		    (object Attribute
			tool       	"cg"
			name       	"BoundedByValueContainer"
			value      	"BoundedListByValue<$targetClass,$limit>")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedBoundedByValueContainer"
			value      	"BoundedSetByValue<$targetClass,$limit>")
		    (object Attribute
			tool       	"cg"
			name       	"BoundedByReferenceContainer"
			value      	"BoundedListByReference<$targetClass,$limit>")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedBoundedByReferenceContainer"
			value      	"BoundedSetByReference<$targetClass,$limit>")
		    (object Attribute
			tool       	"cg"
			name       	"UnboundedByValueContainer"
			value      	"UnboundedListByValue<$targetClass>")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedUnboundedByValueContainer"
			value      	"UnboundedSetByValue<$targetClass>")
		    (object Attribute
			tool       	"cg"
			name       	"UnboundedByReferenceContainer"
			value      	"UnboundedListByReference<$targetClass>")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedUnboundedByReferenceContainer"
			value      	"UnboundedSetByReference<$targetClass>")
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedByValueContainer"
			value      	"AssociationByValue<$qualtype, $qualcont>")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedQualifiedByValueContainer"
			value      	"DictionaryByValue<$qualtype, $qualcont>")
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedByReferenceContainer"
			value      	"AssociationByReference<$qualtype, $qualcont>")
		    (object Attribute
			tool       	"cg"
			name       	"UnorderedQualifiedByReferenceContainer"
			value      	"DictionaryByReference<$qualtype, $qualcont>")
		    (object Attribute
			tool       	"cg"
			name       	"GeneratePreserveRegions"
			value      	TRUE)))
	    (object Attribute
		tool       	"cg"
		name       	"default__Class"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"ImplementationType"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"ClassKey"
			value      	"class")
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegions"
			value      	("GenerateEmptyRegionSet" 3))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegionSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"None"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Preserved"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Unpreserved"
				value      	2)
			    (object Attribute
				tool       	"cg"
				name       	"All"
				value      	3)))
		    (object Attribute
			tool       	"cg"
			name       	"PutBodiesInSpec"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateDefaultConstructor"
			value      	("GenerateSet" 199))
		    (object Attribute
			tool       	"cg"
			name       	"DefaultConstructorVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"InlineDefaultConstructor"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"ExplicitDefaultConstructor"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateCopyConstructor"
			value      	("GenerateSet" 199))
		    (object Attribute
			tool       	"cg"
			name       	"CopyConstructorVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"InlineCopyConstructor"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"ExplicitCopyConstructor"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateDestructor"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"DestructorVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"DestructorKind"
			value      	("ThreeKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"InlineDestructor"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateAssignmentOperation"
			value      	("GenerateSet" 199))
		    (object Attribute
			tool       	"cg"
			name       	"AssignmentVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"AssignmentKind"
			value      	("ThreeKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"InlineAssignmentOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEqualityOperations"
			value      	("GenerateSet" 199))
		    (object Attribute
			tool       	"cg"
			name       	"EqualityVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"EqualityKind"
			value      	("FriendKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"InlineEqualityOperations"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateRelationalOperations"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"RelationalVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"RelationalKind"
			value      	("FriendKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"InlineRelationalOperations"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateStorageMgmtOperations"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"StorageMgmtVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"InlineStorageMgmtOperations"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateSubscriptOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"SubscriptVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"SubscriptKind"
			value      	("ThreeKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"SubscriptResultType"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"InlineSubscriptOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateDereferenceOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"DereferenceVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"DereferenceKind"
			value      	("ThreeKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"DereferenceResultType"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"InlineDereferenceOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateIndirectionOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"IndirectionVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"IndirectionKind"
			value      	("ThreeKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"IndirectionResultType"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"InlineIndirectionOperation"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateStreamOperations"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"StreamVisibility"
			value      	("VisibilitySet" 45))
		    (object Attribute
			tool       	"cg"
			name       	"InlineStreamOperations"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"ThreeKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Common"
				value      	200)
			    (object Attribute
				tool       	"cg"
				name       	"Virtual"
				value      	201)
			    (object Attribute
				tool       	"cg"
				name       	"Abstract"
				value      	202)))
		    (object Attribute
			tool       	"cg"
			name       	"KindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Common"
				value      	200)
			    (object Attribute
				tool       	"cg"
				name       	"Virtual"
				value      	201)
			    (object Attribute
				tool       	"cg"
				name       	"Abstract"
				value      	202)
			    (object Attribute
				tool       	"cg"
				name       	"Static"
				value      	203)))
		    (object Attribute
			tool       	"cg"
			name       	"FriendKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Common"
				value      	200)
			    (object Attribute
				tool       	"cg"
				name       	"Virtual"
				value      	201)
			    (object Attribute
				tool       	"cg"
				name       	"Abstract"
				value      	202)
			    (object Attribute
				tool       	"cg"
				name       	"Friend"
				value      	204)))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"DeclareAndDefine"
				value      	199)
			    (object Attribute
				tool       	"cg"
				name       	"DeclareOnly"
				value      	205)
			    (object Attribute
				tool       	"cg"
				name       	"DoNotDeclare"
				value      	206)))
		    (object Attribute
			tool       	"cg"
			name       	"VisibilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Public"
				value      	45)
			    (object Attribute
				tool       	"cg"
				name       	"Protected"
				value      	44)
			    (object Attribute
				tool       	"cg"
				name       	"Private"
				value      	43)
			    (object Attribute
				tool       	"cg"
				name       	"Implementation"
				value      	14)))
		    (object Attribute
			tool       	"cg"
			name       	"ConstValue"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"GenerateDefaultSpecifier"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"DefaultSpecifier"
			value      	"")))
	    (object Attribute
		tool       	"cg"
		name       	"default__Module-Spec"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"Generate"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegions"
			value      	("GenerateEmptyRegionSet" 3))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegionSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"None"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Preserved"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Unpreserved"
				value      	2)
			    (object Attribute
				tool       	"cg"
				name       	"All"
				value      	3)))
		    (object Attribute
			tool       	"cg"
			name       	"CmIdentification"
			value      	(value Text "  %X% %Q% %Z% %W%"))
		    (object Attribute
			tool       	"cg"
			name       	"CopyrightNotice"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"FileName"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"cg"
			name       	"AllowExtensionlessFileName"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InclusionProtectionSymbol"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"cg"
			name       	"IncludeFormat"
			value      	(value Text 
|// $package
|#include "$file"
|
			))
		    (object Attribute
			tool       	"cg"
			name       	"IncludeBySimpleName"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"IncludePrecompiledHeader"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"IncludeOrder"
			value      	"AMIR")
		    (object Attribute
			tool       	"cg"
			name       	"AdditionalIncludes"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"InliningStyle"
			value      	("InliningStyleSet" 207))
		    (object Attribute
			tool       	"cg"
			name       	"InliningStyleSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"InClassDeclaration"
				value      	208)
			    (object Attribute
				tool       	"cg"
				name       	"FollowingClassDeclaration"
				value      	207)))
		    (object Attribute
			tool       	"cg"
			name       	"TypesDefined"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"IncludeClosure"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"cg"
		name       	"default__Module-Body"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"Generate"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegions"
			value      	("GenerateEmptyRegionSet" 3))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegionSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"None"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Preserved"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Unpreserved"
				value      	2)
			    (object Attribute
				tool       	"cg"
				name       	"All"
				value      	3)))
		    (object Attribute
			tool       	"cg"
			name       	"CmIdentification"
			value      	(value Text "  %X% %Q% %Z% %W%"))
		    (object Attribute
			tool       	"cg"
			name       	"CopyrightNotice"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"FileName"
			value      	"AUTO GENERATE")
		    (object Attribute
			tool       	"cg"
			name       	"AllowExtensionlessFileName"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"IncludeFormat"
			value      	(value Text 
|// $package
|#include "$file"
|
			))
		    (object Attribute
			tool       	"cg"
			name       	"IncludeBySimpleName"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"IncludePrecompiledHeader"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"IncludeOrder"
			value      	"AMIR")
		    (object Attribute
			tool       	"cg"
			name       	"AdditionalIncludes"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"InliningStyle"
			value      	("InliningStyleSet" 207))
		    (object Attribute
			tool       	"cg"
			name       	"InliningStyleSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"InClassDeclaration"
				value      	208)
			    (object Attribute
				tool       	"cg"
				name       	"FollowingClassDeclaration"
				value      	207)))
		    (object Attribute
			tool       	"cg"
			name       	"TypesDefined"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"IncludeClosure"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"cg"
		name       	"default__Operation"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"OperationKind"
			value      	("OperationKindSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"OperationKindSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Common"
				value      	200)
			    (object Attribute
				tool       	"cg"
				name       	"Virtual"
				value      	201)
			    (object Attribute
				tool       	"cg"
				name       	"Abstract"
				value      	202)
			    (object Attribute
				tool       	"cg"
				name       	"Static"
				value      	203)
			    (object Attribute
				tool       	"cg"
				name       	"Friend"
				value      	204)))
		    (object Attribute
			tool       	"cg"
			name       	"OperationIsConst"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"OperationIsExplicit"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"Inline"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"EntryCode"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"ExitCode"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegions"
			value      	("GenerateEmptyRegionSet" 3))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegionSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"None"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Preserved"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Unpreserved"
				value      	2)
			    (object Attribute
				tool       	"cg"
				name       	"All"
				value      	3)))
		    (object Attribute
			tool       	"cg"
			name       	"BodyAnnotations"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"OperationIsOneWay"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"Context"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"Raises"
			value      	"")))
	    (object Attribute
		tool       	"cg"
		name       	"default__Has"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"Ordered"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"NameIfUnlabeled"
			value      	"the_$supplier")
		    (object Attribute
			tool       	"cg"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberName"
			value      	"$relationship")
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberVisibility"
			value      	("DataMemberVisibilitySet" 14))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberVisibilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Public"
				value      	45)
			    (object Attribute
				tool       	"cg"
				name       	"Protected"
				value      	44)
			    (object Attribute
				tool       	"cg"
				name       	"Private"
				value      	43)
			    (object Attribute
				tool       	"cg"
				name       	"Implementation"
				value      	14)
			    (object Attribute
				tool       	"cg"
				name       	"AtRelationshipVisibility"
				value      	210)))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberMutability"
			value      	("DataMemberMutabilitySet" 0))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberMutabilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Unrestricted"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Mutable"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Const"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberIsVolatile"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberFieldSize"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"InitialValue"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateGetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateSetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GetName"
			value      	"get_$relationship")
		    (object Attribute
			tool       	"cg"
			name       	"SetName"
			value      	"set_$relationship")
		    (object Attribute
			tool       	"cg"
			name       	"GetSetKinds"
			value      	("GetSetKindsSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"GetSetKindsSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Common"
				value      	200)
			    (object Attribute
				tool       	"cg"
				name       	"Virtual"
				value      	201)
			    (object Attribute
				tool       	"cg"
				name       	"Abstract"
				value      	202)
			    (object Attribute
				tool       	"cg"
				name       	"Static"
				value      	203)
			    (object Attribute
				tool       	"cg"
				name       	"Friend"
				value      	204)))
		    (object Attribute
			tool       	"cg"
			name       	"ContainerClass"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"SelectorName"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"SelectorType"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"GetIsConst"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GetResultIsConst"
			value      	("GetResultIsConstSet" 2))
		    (object Attribute
			tool       	"cg"
			name       	"GetResultIsConstSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"False"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"True"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Same_As_Function"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"GetSetByReference"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"SetReturnsValue"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"ForwardReferenceOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateForwardReference"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"IsReadOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"BoundedHasRelType"
			value      	("HasRelTypeSet" 47))
		    (object Attribute
			tool       	"cg"
			name       	"HasRelTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Array"
				value      	24)
			    (object Attribute
				tool       	"cg"
				name       	"Sequence"
				value      	47)))))
	    (object Attribute
		tool       	"cg"
		name       	"default__Association"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"NameIfUnlabeled"
			value      	"the_$targetClass")))
	    (object Attribute
		tool       	"cg"
		name       	"default__Inherit"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"InstanceArguments"
			value      	"")))
	    (object Attribute
		tool       	"cg"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"ForwardReferenceOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"NameIfUnlabeled"
			value      	"the_$targetClass")
		    (object Attribute
			tool       	"cg"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberName"
			value      	"$target")
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberVisibility"
			value      	("DataMemberVisibilitySet" 14))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberVisibilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Public"
				value      	45)
			    (object Attribute
				tool       	"cg"
				name       	"Protected"
				value      	44)
			    (object Attribute
				tool       	"cg"
				name       	"Private"
				value      	43)
			    (object Attribute
				tool       	"cg"
				name       	"Implementation"
				value      	14)
			    (object Attribute
				tool       	"cg"
				name       	"AtRelationshipVisibility"
				value      	210)))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberMutability"
			value      	("DataMemberMutabilitySet" 0))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberMutabilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Unrestricted"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Mutable"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Const"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberIsVolatile"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberFieldSize"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"InitialValue"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"ContainerClass"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"ContainerGet"
			value      	"$data.get($keys)")
		    (object Attribute
			tool       	"cg"
			name       	"ContainerSet"
			value      	"$data.set($keys,$value)")
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedContainer"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassContainer"
			value      	"$supplier *")
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassInitialValue"
			value      	(value Text ""))
		    (object Attribute
			tool       	"cg"
			name       	"GetSetKinds"
			value      	("GetSetKindsSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"GetSetKindsSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Common"
				value      	200)
			    (object Attribute
				tool       	"cg"
				name       	"Virtual"
				value      	201)
			    (object Attribute
				tool       	"cg"
				name       	"Abstract"
				value      	202)
			    (object Attribute
				tool       	"cg"
				name       	"Static"
				value      	203)
			    (object Attribute
				tool       	"cg"
				name       	"Friend"
				value      	204)))
		    (object Attribute
			tool       	"cg"
			name       	"GetSetByReference"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateGetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GetName"
			value      	"get_$target")
		    (object Attribute
			tool       	"cg"
			name       	"GetIsConst"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GetResultIsConst"
			value      	("GetResultIsConstSet" 2))
		    (object Attribute
			tool       	"cg"
			name       	"GetResultIsConstSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"False"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"True"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Same_As_Function"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateSetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"SetName"
			value      	"set_$target")
		    (object Attribute
			tool       	"cg"
			name       	"SetReturnsValue"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedGetSetByReference"
			value      	("QualifiedGetSetByReferenceSet" 2))
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedGetSetByReferenceSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"False"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"True"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Same_As_GetSetByReference"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateQualifiedGetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedGetName"
			value      	"get_$target")
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedGetIsConst"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedGetResultIsConst"
			value      	("GetResultIsConstSet" 2))
		    (object Attribute
			tool       	"cg"
			name       	"InlineQualifiedGet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateQualifiedSetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedSetName"
			value      	"set_$target")
		    (object Attribute
			tool       	"cg"
			name       	"QualifiedSetReturnsValue"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InlineQualifiedSet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateAssocClassDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassDataMemberName"
			value      	"$target")
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassDataMemberVisibility"
			value      	("DataMemberVisibilitySet" 14))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberVisibilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Public"
				value      	45)
			    (object Attribute
				tool       	"cg"
				name       	"Protected"
				value      	44)
			    (object Attribute
				tool       	"cg"
				name       	"Private"
				value      	43)
			    (object Attribute
				tool       	"cg"
				name       	"Implementation"
				value      	14)
			    (object Attribute
				tool       	"cg"
				name       	"AtRelationshipVisibility"
				value      	210)))
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassDataMemberMutability"
			value      	("DataMemberMutabilitySet" 0))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberMutabilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Unrestricted"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Mutable"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Const"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassDataMemberIsVolatile"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassGetSetKinds"
			value      	("GetSetKindsSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateAssocClassGetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassGetName"
			value      	"get_$target")
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassGetIsConst"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassGetResultIsConst"
			value      	("GetResultIsConstSet" 2))
		    (object Attribute
			tool       	"cg"
			name       	"InlineAssocClassGet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateAssocClassSetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassSetName"
			value      	"set_$target")
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassSetReturnsValue"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InlineAssocClassSet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"AssocClassForwardReferenceOnly"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateForwardReference"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"IsReadOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"BoundedRoleType"
			value      	("AssocTypeSet" 47))
		    (object Attribute
			tool       	"cg"
			name       	"AssocTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Array"
				value      	24)
			    (object Attribute
				tool       	"cg"
				name       	"Sequence"
				value      	47)))))
	    (object Attribute
		tool       	"cg"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"GenerateDataMember"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberName"
			value      	"$attribute")
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberVisibility"
			value      	("DataMemberVisibilitySet" 14))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberVisibilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Public"
				value      	45)
			    (object Attribute
				tool       	"cg"
				name       	"Protected"
				value      	44)
			    (object Attribute
				tool       	"cg"
				name       	"Private"
				value      	43)
			    (object Attribute
				tool       	"cg"
				name       	"Implementation"
				value      	14)
			    (object Attribute
				tool       	"cg"
				name       	"AtAttributeVisibility"
				value      	211)))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberMutability"
			value      	("DataMemberMutabilitySet" 0))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberMutabilitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Unrestricted"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Mutable"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Const"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberIsVolatile"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"DataMemberFieldSize"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"GenerateGetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateSetOperation"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GetName"
			value      	"get_$attribute")
		    (object Attribute
			tool       	"cg"
			name       	"SetName"
			value      	"set_$attribute")
		    (object Attribute
			tool       	"cg"
			name       	"GetSetKinds"
			value      	("GetSetKindsSet" 200))
		    (object Attribute
			tool       	"cg"
			name       	"GetSetKindsSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"Common"
				value      	200)
			    (object Attribute
				tool       	"cg"
				name       	"Virtual"
				value      	201)
			    (object Attribute
				tool       	"cg"
				name       	"Abstract"
				value      	202)
			    (object Attribute
				tool       	"cg"
				name       	"Static"
				value      	203)
			    (object Attribute
				tool       	"cg"
				name       	"Friend"
				value      	204)))
		    (object Attribute
			tool       	"cg"
			name       	"GetIsConst"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"GetResultIsConst"
			value      	("GetResultIsConstSet" 2))
		    (object Attribute
			tool       	"cg"
			name       	"GetResultIsConstSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"False"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"True"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Same_As_Function"
				value      	2)))
		    (object Attribute
			tool       	"cg"
			name       	"GetSetByReference"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InlineGet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"SetReturnsValue"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"InlineSet"
			value      	TRUE)
		    (object Attribute
			tool       	"cg"
			name       	"CaseSpecifier"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"IsReadOnly"
			value      	FALSE)))
	    (object Attribute
		tool       	"cg"
		name       	"default__Uses"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"ForwardReferenceOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"BodyReferenceOnly"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"GenerateForwardReference"
			value      	FALSE)))
	    (object Attribute
		tool       	"cg"
		name       	"default__Subsystem"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"Directory"
			value      	"$ROSECPP_SOURCE")
		    (object Attribute
			tool       	"cg"
			name       	"DirectoryIsOnSearchList"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"PrecompiledHeader"
			value      	"")))
	    (object Attribute
		tool       	"cg"
		name       	"default__Category"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"cg"
			name       	"IsNamespace"
			value      	FALSE)
		    (object Attribute
			tool       	"cg"
			name       	"Indent"
			value      	2)
		    (object Attribute
			tool       	"cg"
			name       	"CodeName"
			value      	"")
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegions"
			value      	("GenerateEmptyRegionSet" 3))
		    (object Attribute
			tool       	"cg"
			name       	"GenerateEmptyRegionSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"cg"
				name       	"None"
				value      	0)
			    (object Attribute
				tool       	"cg"
				name       	"Preserved"
				value      	1)
			    (object Attribute
				tool       	"cg"
				name       	"Unpreserved"
				value      	2)
			    (object Attribute
				tool       	"cg"
				name       	"All"
				value      	3)))))
	    (object Attribute
		tool       	"MSVC"
		name       	"propertyId"
		value      	"809135966")
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Project"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"Version"
			value      	"5.0")))
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Class"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"Type"
			value      	("MSVCClassTypeSet" 0))
		    (object Attribute
			tool       	"MSVC"
			name       	"MSVCClassTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"MSVC"
				name       	"Normal"
				value      	0)
			    (object Attribute
				tool       	"MSVC"
				name       	"Interface_Part"
				value      	1)
			    (object Attribute
				tool       	"MSVC"
				name       	"Connection_Part"
				value      	2)
			    (object Attribute
				tool       	"MSVC"
				name       	"Class_Factory"
				value      	3)))
		    (object Attribute
			tool       	"MSVC"
			name       	"CObjectFunctionality"
			value      	("CObjectFunctionalitySet" 0))
		    (object Attribute
			tool       	"MSVC"
			name       	"CObjectFunctionalitySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"MSVC"
				name       	"None"
				value      	0)
			    (object Attribute
				tool       	"MSVC"
				name       	"Dynamic"
				value      	1)
			    (object Attribute
				tool       	"MSVC"
				name       	"Dyncreate"
				value      	2)
			    (object Attribute
				tool       	"MSVC"
				name       	"Serial"
				value      	3)))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateOverrideGroup"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateDataGroup"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DATA_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateFieldGroup"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_FIELD_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateMessageGroup"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateMessageMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_MSG_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"MESSAGE_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"OLEFactory"
			value      	("OLEFactorySet" 0))
		    (object Attribute
			tool       	"MSVC"
			name       	"OLEFactorySet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"MSVC"
				name       	"None"
				value      	0)
			    (object Attribute
				tool       	"MSVC"
				name       	"Built_in"
				value      	1)
			    (object Attribute
				tool       	"MSVC"
				name       	"Simple"
				value      	2)
			    (object Attribute
				tool       	"MSVC"
				name       	"Licensed"
				value      	3)))
		    (object Attribute
			tool       	"MSVC"
			name       	"OLEName"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"OLEClassID"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateOLECtlType"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"OLECtlType"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateOLETypeLib"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"OLETypeLibID"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"OLETypeLibMajor"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"OLETypeLibMinor"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"GeneratePropPageIDs"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"OLEPropPageIDs"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateDispatchMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DISPATCH_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"StockProperties"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"StockFunctions"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DispatchDefValue"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateDispIdEnum"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DISP_ID_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateInterfaceMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"INTERFACE_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"InitInterface"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateEventMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_EVENT_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_EVENT_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"EVENT_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"StockEvents"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateEventSinkMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_EVENTSINK_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_EVENTSINK_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"EVENTSINK_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"PropNotifySinks"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateConnectionMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"CONNECTION_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"ConnectionPointIID"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"InheritanceType"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"DeclSpec"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"OLECommands"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"MFCDeclares"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"MFCImplements"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"ATL_Declares"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateCOMMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"COM_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateConnectionPointMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"CONNECTION_POINT_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateMsgMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"MSG_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GeneratePropertyMap"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"PROPERTY_MAP_Entries"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Operation"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"Type"
			value      	("MSVCOperationTypeSet" 0))
		    (object Attribute
			tool       	"MSVC"
			name       	"MSVCOperationTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"MSVC"
				name       	"Normal"
				value      	0)
			    (object Attribute
				tool       	"MSVC"
				name       	"Virtual_Override"
				value      	1)
			    (object Attribute
				tool       	"MSVC"
				name       	"Message_Handler"
				value      	2)
			    (object Attribute
				tool       	"MSVC"
				name       	"Dispatch_Handler"
				value      	3)
			    (object Attribute
				tool       	"MSVC"
				name       	"Event_Firing_Function"
				value      	4)
			    (object Attribute
				tool       	"MSVC"
				name       	"Event_Sink_Handler"
				value      	5)
			    (object Attribute
				tool       	"MSVC"
				name       	"Std_OLE_Method"
				value      	6)
			    (object Attribute
				tool       	"MSVC"
				name       	"Command_Parser"
				value      	7)
			    (object Attribute
				tool       	"MSVC"
				name       	"Property_Get_Function"
				value      	8)
			    (object Attribute
				tool       	"MSVC"
				name       	"Property_Set_Function"
				value      	9)
			    (object Attribute
				tool       	"MSVC"
				name       	"Property_Notify_Function"
				value      	10)
			    (object Attribute
				tool       	"MSVC"
				name       	"Macro_Generated_Function"
				value      	11)))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_MSG_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"MESSAGE_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_EVENT_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"EVENT_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_EVENTSINK_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"EVENTSINK_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"CallType"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"DeclSpec"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"BodyImage"
			value      	(value Text ""))))
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Role"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"Type"
			value      	("MSVCAttributeTypeSet" 0))
		    (object Attribute
			tool       	"MSVC"
			name       	"MSVCAttributeTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"MSVC"
				name       	"Normal"
				value      	0)
			    (object Attribute
				tool       	"MSVC"
				name       	"Member_Property"
				value      	1)
			    (object Attribute
				tool       	"MSVC"
				name       	"Get_Set_Property"
				value      	2)
			    (object Attribute
				tool       	"MSVC"
				name       	"Dialog_Data"
				value      	3)
			    (object Attribute
				tool       	"MSVC"
				name       	"Field_Data"
				value      	4)
			    (object Attribute
				tool       	"MSVC"
				name       	"Stock_Property"
				value      	5)))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DeclSpec"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"PointerBase"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"CallType"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"StockPropertyImplementation"
			value      	"")))
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Has"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"Type"
			value      	("MSVCAttributeTypeSet" 0))
		    (object Attribute
			tool       	"MSVC"
			name       	"MSVCAttributeTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"MSVC"
				name       	"Normal"
				value      	0)
			    (object Attribute
				tool       	"MSVC"
				name       	"Member_Property"
				value      	1)
			    (object Attribute
				tool       	"MSVC"
				name       	"Get_Set_Property"
				value      	2)
			    (object Attribute
				tool       	"MSVC"
				name       	"Dialog_Data"
				value      	3)
			    (object Attribute
				tool       	"MSVC"
				name       	"Field_Data"
				value      	4)
			    (object Attribute
				tool       	"MSVC"
				name       	"Stock_Property"
				value      	5)))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DeclSpec"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"PointerBase"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"CallType"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"StockPropertyImplementation"
			value      	"")))
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Attribute"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"Type"
			value      	("MSVCAttributeTypeSet" 0))
		    (object Attribute
			tool       	"MSVC"
			name       	"MSVCAttributeTypeSet"
			value      	(list Attribute_Set
			    (object Attribute
				tool       	"MSVC"
				name       	"Normal"
				value      	0)
			    (object Attribute
				tool       	"MSVC"
				name       	"Member_Property"
				value      	1)
			    (object Attribute
				tool       	"MSVC"
				name       	"Get_Set_Property"
				value      	2)
			    (object Attribute
				tool       	"MSVC"
				name       	"Dialog_Data"
				value      	3)
			    (object Attribute
				tool       	"MSVC"
				name       	"Field_Data"
				value      	4)
			    (object Attribute
				tool       	"MSVC"
				name       	"Stock_Property"
				value      	5)))
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DISPATCH_MAP_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"DeclSpec"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"PointerBase"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"CallType"
			value      	"")
		    (object Attribute
			tool       	"MSVC"
			name       	"StockPropertyImplementation"
			value      	"")))
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Module-Spec"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateIncludesGroup"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_INCLUDES_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateInsertLocation"
			value      	FALSE)))
	    (object Attribute
		tool       	"MSVC"
		name       	"default__Module-Body"
		value      	(list Attribute_Set
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateIncludesGroup"
			value      	FALSE)
		    (object Attribute
			tool       	"MSVC"
			name       	"AFX_INCLUDES_Entries"
			value      	(value Text ""))
		    (object Attribute
			tool       	"MSVC"
			name       	"GenerateInsertLocation"
			value      	FALSE)))
	    (object Attribute
		tool       	"cg"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"SCC"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"SourceSafe"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"TypeLibImporter"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"Visual Basic"
		name       	"HiddenTool"
		value      	FALSE)
	    (object Attribute
		tool       	"VisualStudio"
		name       	"HiddenTool"
		value      	FALSE))
	quid       	"32FA9449000A"))