Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: HLOUSR7

Package: Health Level Seven

Routine: HLOUSR7


Information

HLOUSR7 ;OIFO-ALB/CJM - Deleting HLO queues ;03/26/2012

Source Information

Source file <HLOUSR7.m>

Entry Points

Name Comments DBIA/ICR reference
SPURGE ; Entry point from ListManager for deleting sequential queues.
OPURGE ; Entry point from ListManager for deleting outgoing queues.
ASKTASK() ;
ASKWHEN(DEFAULT,PROMPT)
OUTPURGE ;Purge outgoing queue
SEQPURGE ;Purge sequence queue
SETPURGE(MSGIEN,TIME) ; Set message up for purging.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"**** You are not authorized to use this option ****"
  • Line Location: SPURGE+5
Function Call: WRITE
  • Prompt: !,"There are no messages on that queue!"
  • Line Location: SPURGE+8
Function Call: WRITE
  • Prompt: !!,"Deleting a queue in error will result in lost messages!"
  • Line Location: SPURGE+9
Function Call: WRITE
  • Prompt: !!,"After removing the messages from the sequence queue they will deleted"
  • Line Location: SPURGE+11
Function Call: WRITE
  • Prompt: !,"When do you want to schedule the messages to be purged?"
  • Line Location: SPURGE+12
Function Call: WRITE
  • Prompt: !!,?5,"UNABLE TO SCHEDULE PURGE JOB",!
  • Line Location: SPURGE+24
Function Call: WRITE
  • Prompt: !!,?5,"Purge job is scheduled, task #"_ZTSK
  • Line Location: SPURGE+25
Function Call: WRITE
  • Prompt: !,"**** You are not authorized to use this option ****"
  • Line Location: OPURGE+5
Function Call: WRITE
  • Prompt: !
  • Line Location: OPURGE+8
Function Call: WRITE
  • Prompt: !,"There are no outgoing messages for that destination!"
  • Line Location: OPURGE+10
Function Call: WRITE
  • Prompt: !
  • Line Location: OPURGE+12
Function Call: WRITE
  • Prompt: !,"There are no outgoing messages for that destination!"
  • Line Location: OPURGE+14
Function Call: WRITE
  • Prompt: !!,"Deleting a queue in error will result in lost messages!"
  • Line Location: OPURGE+15
Function Call: WRITE
  • Prompt: !!,"After removing the messages from the outgoing queue they will deleted"
  • Line Location: OPURGE+17
Function Call: WRITE
  • Prompt: !,"When do you want to schedule the messages to be purged?"
  • Line Location: OPURGE+18
Function Call: WRITE
  • Prompt: !!,?5,"UNABLE TO SCHEDULE PURGE JOB",!
  • Line Location: OPURGE+30
Function Call: WRITE
  • Prompt: !!,?5,"Purge job is scheduled, task #"_ZTSK
  • Line Location: OPURGE+31
Function Call: WRITE
  • Prompt: !!,"There are a lot of messages pending on that queue!"
  • Line Location: ASKTASK+1
Function Call: WRITE
  • Prompt: !,"Removing messages....",!
  • Line Location: OUTPURGE+4
Function Call: WRITE
  • Prompt: "."
  • Line Location: OUTPURGE+7
Function Call: WRITE
  • Prompt: "!"
  • Line Location: OUTPURGE+8
Function Call: WRITE
  • Prompt: !,"Removing messages....",!
  • Line Location: SEQPURGE+3
Function Call: WRITE
  • Prompt: "."
  • Line Location: SEQPURGE+6
Function Call: WRITE
  • Prompt: "!"
  • Line Location: SEQPURGE+7
Info |  Source |  Entry Points |  Interaction Calls