NAME

Tibco::Rv::Cm::Msg - Tibco certified message object

SYNOPSIS

$rv->createCmListener( ..., callback => sub
{
   my ( $msg ) = @_;
   print "Listener got a message: $msg, from sender: ", $msg->CMSender,
   ', sequence: ', $msg->CMSequence, "\n";
} );

DESCRIPTION

Tibco certified message-manipulating class. It is a subclass of Tibco::Rv::Msg, so Msg methods are available to certified messages. Additionally, methods specific to certified messaging (CMSender, CMSequence, and CMTimeLimit) are available.

CONSTRUCTOR

$msg = new Tibco::Rv::Cm::Msg( %args )
%args:
   sendSubject => $sendSubject,
   replySubject => $replySubject,
   CMTimeLimit => $CMTimeLimit,
   $fieldName1 => $stringValue1,
   $fieldName2 => $stringValue2, ...

Creates a Tibco::Rv::Cm::Msg, with sendSubject, replySubject, and CMTimeLimit as given in %args (these three values default to undef if not specified). Any other name => value pairs are added as string fields.

METHODS

$CMSender = $msg->CMSender

Returns the CMSender that sent $msg. If $msg was not sent from a certified messaging sender, undef is returned.

$CMSequence = $msg->CMSequence

Returns the sequence number if $msg was sent from a certified messaging sender, and if the listener is registered for certified delivery. Otherwise, undef is returned.

See your TIB/Rendezvous documentation for more information on CMSender and CMSequence.

$CMTimeLimit = $msg->CMTimeLimit

Returns the certified messaging time limit for $msg, after which the sender no longer certifies delivery. A return value of 0 represents no time limit.

$msg->CMTimeLimit( $CMTimeLimit )

Sets the certified messaging time limit for $msg, after which the sender no longer certifies delivery. If no time limit is set, the value set by Tibco::Rv::Cm::Transport::setDefaultCMTimeLimit is used. If setDefaultCMTimeLimit was not called, 0 is used (no time limit).

SEE ALSO

Tibco::Rv::Msg

AUTHOR

Paul Sturm <sturm@branewave.com>