Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: HLOUSR6

Package: Health Level Seven

Routine: HLOUSR6


Information

HLOUSR6 ;OAK/RBN -ListManager screen for reporting outbound queues;12 JUN 1997 10:00 am ;07/02/2010

Source Information

Source file <HLOUSR6.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Health Level Seven 5 $$MSGID^HLOPRS  ($$GETPRTY,$$STOPPED,DEQUE)^HLOQUE  $$ASKLINK^HLOUSR  $$ASKYESNO^HLOUSR2  $$ASKPORT^HLOUSRA  
List Manager 3 (CHGCAP,EN,SHOW)^VALM  PAUSE^VALM1  (CNTRL,SET)^VALM10  
Kernel 2 ($$CJ,$$LJ,$$RJ)^XLFSTR  OWNSKEY^XUSRB  
VA FileMan 2 WAIT^DICD  ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Health Level Seven 3 HLO DELETE TOP MESSAGE  HLO DISPLAY OUT-GOING QUEUES  HLOUSR7  
Kernel 1 ^ORD(101  

Entry Points

Name Comments DBIA/ICR reference
CJ(STRING,LEN) ;
EN ; Created list of outbound queues.
HDR ; Header info. for the outbound queue display.
DELTOP ; Deletes the top message on a queue
OUTQUE ;
LJ(STRING,LEN) ;
INIT ; -- init variables and list array
GETTOP() ; Get top message in queue
CLEAN ; Clean up before leaving
ASKQUE(LINK) ;
RJ(STRING,LEN) ;

External References

Name Field # of Occurrence
WAIT^DICD EN+3
^DIR ASKQUE+11
$$MSGID^HLOPRS DELTOP+33
$$GETPRTY^HLOQUE OUTQUE+30, OUTQUE+32
$$STOPPED^HLOQUE OUTQUE+30, OUTQUE+32
DEQUE^HLOQUE DELTOP+35
$$ASKLINK^HLOUSR DELTOP+10
$$ASKYESNO^HLOUSR2 DELTOP+33
$$ASKPORT^HLOUSRA DELTOP+19
CHGCAP^VALM OUTQUE+17
EN^VALM EN+4
SHOW^VALM INIT+3
PAUSE^VALM1 DELTOP+5, DELTOP+11, DELTOP+29, DELTOP+32
CNTRL^VALM10 OUTQUE+31
SET^VALM10 OUTQUE+2
$$CJ^XLFSTR CJ+1
$$LJ^XLFSTR LJ+1
$$RJ^XLFSTR RJ+1
OWNSKEY^XUSRB DELTOP+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"**** You are not authorized to use this option ****"
  • Line Location: DELTOP+5
Function Call: WRITE
  • Prompt: !,"Sorry, that was an invalid link"
  • Line Location: DELTOP+9
Function Call: WRITE
  • Prompt: !,"Sorry, that is are no messages pending on that link."
  • Line Location: DELTOP+11
Function Call: WRITE
  • Prompt: !,"Sorry, that was an invalid queue"
  • Line Location: DELTOP+25
Function Call: WRITE
  • Prompt: !,"That queue is currently locked, please try again later."
  • Line Location: DELTOP+29
Function Call: WRITE
  • Prompt: !,"There are no messages pending on that queue!"
  • Line Location: DELTOP+32
Routine Call
  • VALM
  • Line Location:
    • EN+4
Routine Call
  • VALM
  • Line Location:
    • OUTQUE+17
Routine Call
  • VALM
  • Line Location:
    • INIT+3
Routine Call
  • DIR
  • Line Location:
    • ASKQUE+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLB - [#778] GETTOP+5
^HLB("QUEUE" GETTOP+3, GETTOP+6!, DELTOP+15, DELTOP+17, DELTOP+28, DELTOP+31, DELTOP+38, ASKQUE+6
^HLC("QUEUECOUNT" OUTQUE+19, OUTQUE+24, OUTQUE+25
^HLTMP("FAILING LINKS" OUTQUE+22
^TMP("HLO OUTBOUND QUEUES" CLEAN+1!

Label References

Name Line Occurrences
$$ASKQUE DELTOP+26
$$CJ OUTQUE+30, OUTQUE+32
$$GETTOP OUTQUE+28
$$LJ OUTQUE+30, OUTQUE+32
$$RJ OUTQUE+30, OUTQUE+32
@( EN+6
HDR INIT+2
OUTQUE INIT+1, DELTOP+36

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CONF DELTOP+1~, DELTOP+3
CONF(0 DELTOP+4
COUNT HDR+1~, OUTQUE+1~, OUTQUE+20~, OUTQUE+25*, OUTQUE+26, OUTQUE+30, OUTQUE+32
DEFAULT ASKQUE+3~, ASKQUE+6*, ASKQUE+7*, ASKQUE+8
DIR HDR+1~, ASKQUE+12!
DIR("?" ASKQUE+9*, ASKQUE+10*
DIR("A" ASKQUE+5*
DIR("B" ASKQUE+8*
DIR(0 ASKQUE+4*
DUOUT ASKQUE+3~, ASKQUE+13
DUZ DELTOP+3
ERROR DELTOP+1~, DELTOP+14*, DELTOP+20*, DELTOP+21
FROM HDR+1~
HLOLNAM DELTOP+1~, DELTOP+22*, DELTOP+26, DELTOP+28, DELTOP+31, DELTOP+35, DELTOP+38
HLOQNAM DELTOP+1~, DELTOP+26*, DELTOP+27, DELTOP+28, DELTOP+31, DELTOP+35, DELTOP+38
HLRFRSH EN+1~, EN+2, EN+5*, EN+6, HDR+2*, OUTQUE+4*
HLSCREEN HDR+1~, HDR+3*
>> IOBOFF OUTQUE+31
>> IOBON OUTQUE+31
LEN CJ~, CJ+1, LJ~, LJ+1, RJ~, RJ+1
LINE OUTQUE+1~, OUTQUE+2*
LINK HDR+1~, OUTQUE+1~, OUTQUE+18*, OUTQUE+19*, OUTQUE+21, OUTQUE+24, OUTQUE+25, OUTQUE+30, OUTQUE+32, GETTOP+3
, GETTOP+6, ASKQUE~, ASKQUE+6
LINKNAME DELTOP+1~, DELTOP+10*, DELTOP+11, DELTOP+15, DELTOP+16, DELTOP+17, DELTOP+18, DELTOP+19, DELTOP+22
LIST HDR+1~
LOCERR DELTOP+1~
NODE GETTOP+4~, GETTOP+5*, GETTOP+6, GETTOP+7
OLDRFRSH EN+1~, EN+2*, EN+5
PORT DELTOP+1~, DELTOP+15*, DELTOP+16*, DELTOP+17, DELTOP+18*, DELTOP+19*, DELTOP+20, DELTOP+22
PORT2 DELTOP+13~, DELTOP+17*, DELTOP+18
QUE HDR+1~, OUTQUE+20~, OUTQUE+23*, OUTQUE+24*, OUTQUE+25, OUTQUE+30, OUTQUE+32, GETTOP+3, GETTOP+6, ASKQUE+3~
QUIT GETTOP+1~, GETTOP+2*, GETTOP+3, GETTOP+7*
SHOW OUTQUE+20~, OUTQUE+21*, OUTQUE+22*, OUTQUE+29, OUTQUE+30*, OUTQUE+32*
STATUS HDR+1~
STRING CJ~, CJ+1, LJ~, LJ+1, RJ~, RJ+1
TEMP HDR+1~
TIME HDR+1~
TODAY HDR+1~
TOP OUTQUE+1~, OUTQUE+23*, OUTQUE+28*, OUTQUE+30, OUTQUE+32, GETTOP+1~, GETTOP+2*, GETTOP+3*, GETTOP+5, GETTOP+6
, GETTOP+7*, GETTOP+8, DELTOP+1~, DELTOP+31*, DELTOP+32, DELTOP+33, DELTOP+35
>> VALM("TITLE" HDR+4*
>> VALMAR OUTQUE+5*, OUTQUE+30, OUTQUE+32
>> VALMBCK EN+7*, INIT+4*, OUTQUE+6*, OUTQUE+33*, DELTOP+2*
>> VALMBG HDR+9*
>> VALMCNT OUTQUE+3*, OUTQUE+27*, OUTQUE+30, OUTQUE+31, OUTQUE+32
>> VALMDDF("COL 1" , HDR+10*, OUTQUE+7*, 2" , HDR+11!, OUTQUE+11*, 3" , HDR+11!, OUTQUE+14*, 4"
, HDR+11!, OUTQUE+15*, 5" , HDR+11!, OUTQUE+16!
>> VALMSG HDR+5*
X ASKQUE+3~
Y ASKQUE+3~, ASKQUE+13, ASKQUE+14
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All