a5queueing::queueDequeue Method

Syntax

Arguments

BYREF itemPointer

Item to return.

blockingLogical

Optional blocking flag - if set, dequeue will wait until there is an item available.

Returns

resultA5Storage::CallResult

Call result, if no item was returned, a code of 39002 'No Queue Items Found' is returned.

Description

Dequeue a item from the queue.

Example

dim qm as A5Queueing::Queue = null_value()
dim item as A5Queueing::QueueItem = null_value()
if A5Queueing::Queue::Open(qm,"Provider='RabbitMQ';Host='localhost';Queue='TestQ';").success then
   dim message as c
   dim callresult as p  = qm.dequeue(item)
   if callresult.success then
	   message = item.Body 
       item.WorkCompleted()
       ui_msg_box("New Message",message)
   else
      ui_msg_box("No item dequeued",callresult.text)
   end if
end if