NAME
Tibco::Rv::Cm::Msg - Tibco certified message object
SYNOPSIS
$rv
->createCmListener( ...,
callback
=>
sub
{
my
(
$msg
) =
@_
;
"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 toundef
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 of0
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
AUTHOR
Paul Sturm <sturm@branewave.com>