; Set up parameter for hot key and List Processor
; construct the structure defining the requeue operations, etc
REQ
;Requeue an Entry for processing
; MODULE NAME: REQ ( Requeue INH message/s )
; DESCRIPTION: Prompts the user for a message to requeue. The user may
; enter any valid indexed message component for a single
; message requeue or '/' to search and requeue multiple
; messages. In either case a List will be displayed which
; allows requeueing THREE different ways. 1)use existing
; information, 2)use one set of info. for all message to
; be requeued, or 3) use unique info. for each message.
; RETURN = none
; PARAMETERS = none
;
REQ1
; Requeue an entry for processing
; Description: REQ1 performs similar functions as REQ in which it
; allows requeing message in three different ways.
; However, REQ1 does not prompt user for a message to
; requeue. Upon enter REQ1, variable Y contains IEN of
; message to requeue.
;
; RETURN = none
; PARAMETERS = none
;
FINDQUE(INREQIEN,INMSG)
;determines if entry is already on queue
; If entry is already on queue, prompts user if they want
; to requeue.
; INPUT:
; INREQIEN = IEN of entry being requeued
; INMSG = (PBR) message that will be displayed back to user at end
; RETURN = 0 if INREQUIEN is to be requeued
; 1 if user says "no"
; 2 if user enters "^"
1
;
0
;
EN2
;This is the actual working loop of the routine
EN3
;This is the actual requeue operation
DOREQ(INREQIEN,INPRIO,INTTPROC)
; requeue the transaction
; MODULE NAME: DOREQ ( Requeue the transaction )
; DESCRIPTION: Requeues the transaction INREQIEN with the priority and
; time-to-process passed in INPRIO and INTTPROC
; RETURN None
; PARAMETERS:
; INREQIEN = The message IEN
; INPRIO = The priority of the message
; INTTPROC = The time to process the message
; CODE BEGINS