Publications (Object)

The collection of the Product publications.
A Product object can aggregate one or zero Publications collection.

Methods


Func Add( iPublicName) As
Adds a publication object to the product and returns a pointer to the publication object.
Parameters:
iPublicName
The name of the publication
oPub
The publication object
Example: The following example adds a new publication object with the name "PubName" to the product and returns the publication object Pub1.
 Dim Prod1 As Product
 Set Pub1 = Prod1.Add(PubName)
 
Func Item( iIdentifier) As
Returns the publication object corresponding to the given publication name.
Parameters:
iIdentifier
The name of the publication
oPub
The publication object
Example: The following example returns Pub1 publication object from the product referencing the published name PubId.
 Dim Prod1 As Product
 Set Pub1 = Prod1.Item(PubId)
 
Sub Remove( iIdentifier)
Removes a publication from the product.
Parameters:
iIdentifier
The name of the publication
Example: The following example removes the publication object corresponding to the name PubId.
 Dim Prod1 As Product
 Prod1.Remove(PubId)
 
Sub SetDirect( iIdentifier, iPointed)
Valuates a publication object directly with the object it publishes.
Parameters:
iIdentifier
The name of the publication
iPointed
The published object
The following objects is supported:
Example: The following example valuates the publication object of product Prod1 having the name PubId with the reference object RefObject.
 Dim Prod1 As Product
 Prod1.SetDirect(PubId,RefObject)
 
Sub SetRelay( iIdentifier, iRelayer, iNameInRelay)
Valuates a publication object with another publication object.
Parameters:
iIdentifier
The name of the publication to be valuated
iRelayer
The product aggregating the valuating intermediate publication object
iNameInRelay
The name of the valuating publication object
Example: The following example valuates the publication object of product Prod1 having the name PubId1 with the publication object of product Prod2 having the name PubId2.
 Dim Prod1 As Product
 Prod1.SetRelay(PubId1,Prod2,PubId2)