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: HLOPING

Package: Health Level Seven

Routine: HLOPING


Information

HLOPING ;ALB/CJM - HLO PING UTILITY 10/4/94 1pm ; 07/12/2012

Source Information

Source file <HLOPING.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Health Level Seven 8 ($$ADDSEG,$$NEWMSG,SET)^HLOAPI  $$SENDONE^HLOAPI1  ADD^HLOASUB1  DOWORK^HLOCLNT  (DEQUE,STARTQUE,STOPQUE)^HLOQUE  CLOSE^HLOT  $$ASKLINK^HLOUSR  SETPURGE^HLOUSR7  
Kernel 2 $$VERSION^%ZOSV  ^%ZTER  
List Manager 1 PAUSE^VALM1  
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Health Level Seven 1 HLO PING  
Kernel 1 ^DIC(19  

Entry Points

Name Comments DBIA/ICR reference
PING ;
NOPING(LINK) ;
ASKPORT(LINK) ;
ADDMSG(LINK) ;
PURGE(LINK) ;
BREAKS ;
CHECKAPP ;
WRITE(MSG) ;
ZB2 ;
ZB3 ;
ZB9 ;
ZB24 ;
ZB25 ;
ZB27 ;

External References

Name Field # of Occurrence
$$VERSION^%ZOSV PING+4
^%ZTER ZB3+7
^DIR ASKPORT+12
$$ADDSEG^HLOAPI ADDMSG+7
$$NEWMSG^HLOAPI ADDMSG+4
SET^HLOAPI ADDMSG+5, ADDMSG+6
$$SENDONE^HLOAPI1 ADDMSG+12
ADD^HLOASUB1 CHECKAPP+4
DOWORK^HLOCLNT PING+19
DEQUE^HLOQUE PURGE+3
STARTQUE^HLOQUE PING+26
STOPQUE^HLOQUE PING+13
CLOSE^HLOT PING+20
$$ASKLINK^HLOUSR PING+7
SETPURGE^HLOUSR7 PURGE+3
PAUSE^VALM1 PING+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Your DUZ must be set!"
  • Line Location: PING+1
Function Call: WRITE
  • Prompt: !,"What HL Logical Link do you want to test?"
  • Line Location: PING+6
Function Call: WRITE
  • Prompt: !,"That link does not allowing PINGING!"
  • Line Location: PING+9
Function Call: WRITE
  • Prompt: !,"Do you want to PING the port used by HLO or the one used by HL7 1.6?"
  • Line Location: ASKPORT+9
Function Call: WRITE
  • Prompt: !,"ERROR",ERROR
  • Line Location: ADDMSG+4
Function Call: WRITE
  • Prompt: !,"ERROR",ERROR
  • Line Location: ADDMSG+7
Function Call: WRITE
  • Prompt: !,"There is a problem in the setup!",!,ERROR
  • Line Location: ADDMSG+12
Function Call: WRITE
  • Prompt: !,MSG
  • Line Location: WRITE+4
Routine Call
  • DIR
  • Line Location:
    • ASKPORT+12

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HLB("QUEUE" PING+12, PING+25, PURGE+3
^HLCS(870 - [#870] NOPING+3, NOPING+4, ASKPORT+2, ASKPORT+4
^HLD(779.1 - [#779.1] ASKPORT+6, ASKPORT+8
^HLD(779.2 - [#779.2] CHECKAPP+1

Label References

Name Line Occurrences
$$ADDMSG PING+16
$$ASKPORT PING+10
$$NOPING PING+9
BREAKS PING+14
CHECKAPP PING+15
PURGE PING+23
WRITE ZB2+1, ZB3+4, ZB3+6, ZB9+2, ZB9+4, ZB27+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CON ZB3+1~, ZB3+2*, ZB3+5
CONF PING+2~
DATA CHECKAPP+2~, CHECKAPP+4
DATA( CHECKAPP+3*
DIR ASKPORT+1~
DIR("B" ASKPORT+11*
DIR(0 ASKPORT+10*
>> DUOUT ASKPORT+14
DUZ PING+1, ADDMSG+6
ERROR ADDMSG+1~, ADDMSG+4, ADDMSG+7, ADDMSG+12, CHECKAPP+2~
HL7PORT ASKPORT+1~, ASKPORT+7*, ASKPORT+8*, ASKPORT+10, ASKPORT+16
HLCSTATE PING+2~, PING+20
HLCSTATE("CONNECTED" PING+20, ZB2+1
HLCSTATE("LINK" ZB24+1*
HLCSTATE("LOC K FAILED" , ZB27+1
HLODONE PING+2~, PING+3*
HLOPORT ASKPORT+1~, ASKPORT+5*, ASKPORT+6*, ASKPORT+10, ASKPORT+15
IEN NOPING+1~, NOPING+3*, NOPING+4, ASKPORT+1~, ASKPORT+2*, ASKPORT+3, ASKPORT+4, PURGE+1~, PURGE+2*, PURGE+3*
LINK PING+2~, PING+7*, PING+8, PING+9, PING+10, PING+12, PING+16, PING+18, PING+23, PING+25
, NOPING~, NOPING+3, ASKPORT~, ASKPORT+2, ADDMSG~, ADDMSG+8, PURGE~, PURGE+3
MSG ADDMSG+1~, ADDMSG+4, ADDMSG+7, ADDMSG+12, WRITE~, WRITE+4, ZB3+1~, ZB3+3*, ZB3+4, ZB3+5*
, ZB3+6
NODE ASKPORT+1~, ASKPORT+4*, ASKPORT+5, ASKPORT+7
OLD WRITE+1~, WRITE+2*, WRITE+5
PARMS ADDMSG+1~, ADDMSG+4, ADDMSG+12
PARMS("ACCEPT ACK TYPE" , ADDMSG+9*
PARMS("APP AC K TYPE" , ADDMSG+10*
PARMS("EVENT" ADDMSG+3*
PARMS("MESSAG E TYPE" , ADDMSG+2*
PARMS("QUEUE" ADDMSG+11*
PARMS("RECEIV ING FACILITY" , ZB25+1*
PARMS("SENDIN G APPLICATION" , ADDMSG+8*
PORT PING+2~, PING+10*, PING+11, PING+12, PING+18, PING+23, PING+25
RETURN NOPING+1~, NOPING+2*, NOPING+4*, NOPING+5
SEG ADDMSG+1~, ADDMSG+5, ADDMSG+6, ADDMSG+7
>> SUCCESS ZB9+1
>> WHOTO ADDMSG+12
>> WHOTO("FACILI TY LINK NAME" , ADDMSG+8*
>> WHOTO("RECEIV ING APPLICATION" , ADDMSG+8*
>> WORK PING+19
>> WORK("LINK" PING+18*
>> WORK("QUEUE" PING+18*
X ASKPORT+1~, ASKPORT+13, ASKPORT+15, ASKPORT+16
Y ASKPORT+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All