Description
Return the event data of a specific event waiting in the daemon queue to be published.
Parameters
| iiDaemonQueueId | input | integer | The id of the event. |
| omDocument | output | memptr | Memptr to the event XML document |
| oiDestinationId | output | integer | ID of the destination |
| ocBusComponentName | output | character | Name of the component. |
| ocObjectId | output | character | Id of the object that is getting dumped or send. |
| oiReturnStatus | output | integer | Return status of the method. |
Internal usage
BLF
program code (program1/beventdaemonqueue.p)
<M-4 run DataLoad
(input '' (icRowids),
input iiDaemonQueueId (icPkeys),
input '' (icObjectIds),
input '' (icFreeform),
input no (ilKeepPrevious),
output viFcReturnSuper (oiReturnStatus)) in BEventDaemonQueue>
if viFcReturnSuper <> 0
then oiReturnStatus = viFcReturnSuper.
if viFcReturnSuper < 0
then return.
find first tEventDaemonQueue where tEventDaemonQueue.DaemonQueueId = iiDaemonQueueId no-error.
if not available tEventDaemonQueue
then do:
assign oiReturnStatus = -1.
return.
end.
find first tfcDaemonQueue no-error.
if not available tfcDaemonQueue
then do:
assign oiReturnStatus = -1.
return.
end.
copy-lob from tEventDaemonQueue.EventDaemonQueueLOB to omDocument no-convert. /* do not convert to cpinternal */
Assign
oiDestinationId = tEventDaemonQueue.EventDestination_ID
ocBusComponentName = tEventDaemonQueue.tcBusComponentCode
ocObjectId = tfcDaemonQueue.DaemonQueueRef.