#163 Add named queue support to linein/out

Classes (154)

How feasible would it be to make these functions (LINEIN/LINEOUT) support named queues directly? I would think it might be something like:

Ln = linein('QUEUE:QUEUENAME')
Ln = lineout('QUEUE:QUEUENAME', 'my line')


  • Rick McGuire

    Rick McGuire - 2007-05-01

    Logged In: YES
    Originator: NO

    Not specifically what you were asking for, but it will accomplish the same goal. The internal support for Rexx queues is actually implemented by a hidden class that will now be publically available.

  • Rick McGuire

    Rick McGuire - 2007-06-20

    Logged In: YES
    Originator: NO

    This adds a new class, .RexxQueue to the hierarchy. A RexxQueue object gives object access to a Rexx queue instance (the same queues used by PUSH/PULL/QUEUE). Here are the methods of RexxQueue:

    INIT(<name>) -- initializes the queue to access the given named queue. If the queue does not exist, a new one will be created. The default queue is "SESSION".

    GET -- retrieves the name of the current queue

    SET -- switches the name of the queue used by this queue object instance. The return value is the name of the currently accessed queue.

    DELETE -- delete the named queue that backs this object.

    LINEOUT -- QUEUE a line to the rexx queue.

    SAY -- QUEUE a line to the Rexx queue

    PUSH, PULL, QUEUE -- yada, yada,

    LINEIN -- pull a line from the queue and wait until an item is available if the queue is empty.

    QUEUED -- return the number of lines currently in the queue.



Cancel  Add attachments