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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: HLERCHK

Package: Health Level Seven

Routine: HLERCHK


Information

HLERCHK ;SFCIOFO/JC - Interface Debugger ;02/25/2004 14:25

Source Information

Source file <HLERCHK.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 2 (,HOME)^%ZIS  ^%ZTLOAD  
VA Fileman 2 ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Health Level Seven 1 HL VALIDATE  

Entry Points

Name Comments DBIA/ICR reference
OUT1
OUT2 ;Print Subscriber Errors
EN ;
SUB ;Check Subscribers
MT ;Message Type
APP ;Sending App
CHKED(PP) ;Check Event Driver Protocols
CHKAPP(APP)
DICQ ;
EXIT
ASKDEV ;
ET ;Event Type
VSN ;Version
CHKSUB(PP) ;Scan Subscribers

External References

Name Field # of Occurrence
^%ZIS ASKDEV+2
HOME^%ZIS ASKDEV+7
^%ZTLOAD ASKDEV+6
^DIC HLERCHK+15, DICQ+5
^DIR HLERCHK+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This routine searches for HL7 protocols with possible errors."
  • Line Location: HLERCHK+6
Function Call: WRITE
  • Prompt: !," ** HL7 INTERFACE DEBUGGER **"
  • Line Location: EN+3
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: OUT1+1
Function Call: WRITE
  • Prompt: !,"Event Driver: ",HLPN
  • Line Location: OUT1+2
Function Call: WRITE
  • Prompt: !!,"Sending Application: ",HLSAPN
  • Line Location: OUT1+3
Function Call: WRITE
  • Prompt: !,"Version: ",$G(HLVSN)," ","Message Type(770.3): ",$G(HLMTPN)," ","Event Type: ",$G(HLETPN)
  • Line Location: OUT1+4
Function Call: WRITE
  • Prompt: !!,"Event Driver Error Summary:",!
  • Line Location: OUT1+5
Function Call: WRITE
  • Prompt: !,"No Event Driver Errors Found."
  • Line Location: OUT1+6
Function Call: WRITE
  • Prompt: !,N,". ",ERR(N)
  • Line Location: OUT1+7
Function Call: WRITE
  • Prompt: !,"No Subscribers Found."
  • Line Location: SUB+5
Function Call: WRITE
  • Prompt: !,?10,STAR
  • Line Location: OUT2+2
Function Call: WRITE
  • Prompt: !,?10,"For Subscriber: ",$G(HLPN)
  • Line Location: OUT2+3
Function Call: WRITE
  • Prompt: !!,?10,"Receiving Application: ",$G(HLRAPN)
  • Line Location: OUT2+4
Function Call: WRITE
  • Prompt: !,?10,"Message Type (770.11): ",$G(HLMTPN)," ","Event Type: ",$G(HLETPN),!
  • Line Location: OUT2+5
Function Call: WRITE
  • Prompt: !,?10,"No Subscriber Errors Found."
  • Line Location: OUT2+6
Function Call: WRITE
  • Prompt: !,?10,ERR,". ",ERR(ERR)
  • Line Location: OUT2+7
Routine Call
  • %ZIS
  • Line Location:
    • ASKDEV+7
Routine Call
  • DIC
  • Line Location:
    • HLERCHK+15
    • DICQ+5
Routine Call
  • DIR
  • Line Location:
    • HLERCHK+11
Routine Call
  • %ZIS
  • Line Location:
    • ASKDEV+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^HL(771 - [#771] APP+3, CHKSUB+9, CHKAPP+1, CHKAPP+2
^HL(771.2 - [#771.2] MT+3, CHKSUB+13
^HL(771.5 - [#771.5] VSN+3
^HL(779.001 - [#779.001] ET+2, CHKSUB+17
^ORD(101 - [#101] EN+4, EN+13, EN+14, CHKED+2, CHKED+4, CHKED+5, SUB+1, CHKSUB+2, CHKSUB+4, CHKSUB+5
, CHKSUB+19, CHKSUB+20

Label References

Name Line Occurrences
ASKDEV HLERCHK+12
CHKAPP APP+5, CHKSUB+11
CHKED EN+15, EN+16
CHKSUB SUB+6
EXIT ASKDEV+3, ASKDEV+4, EN+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %ZIS ASKDEV+1*
APP CHKAPP~, CHKAPP+1, CHKAPP+2
DA HLERCHK+12!
DIC HLERCHK+12!, HLERCHK+13*, DICQ+1~, DICQ+3*
DIC("S" HLERCHK+14*, DICQ+4*
DIC(0 HLERCHK+13*, DICQ+3*
>> DIR("?" HLERCHK+10*
>> DIR("A" HLERCHK+8*
>> DIR("B" HLERCHK+9*
>> DIR(0 HLERCHK+7*
DR HLERCHK+12!
>> DTOUT HLERCHK+16
>> DUOUT HLERCHK+16
ERR CHKED+1!*, CHKED+3*, CHKED+4*, CHKED+6*, VSN+2*, APP+2*, APP+4*, MT+2*, MT+4*, MT+5*
, ET+3*, ET+4*, OUT1+6, OUT1+7, SUB+2*, CHKSUB+1!*, CHKSUB+3*, CHKSUB+4*, CHKSUB+6*, CHKSUB+8*
, CHKSUB+10*, CHKSUB+14*, CHKSUB+15*, CHKSUB+18*, CHKSUB+19*, CHKSUB+20*, OUT2+6, OUT2+7*, CHKAPP+2*, EXIT+1!
ERR( CHKED+3*, CHKED+4*, CHKED+6*, VSN+2*, APP+2*, APP+4*, MT+2*, MT+4*, MT+5*, ET+3*
, ET+4*, OUT1+7, SUB+2*, CHKSUB+3*, CHKSUB+4*, CHKSUB+6*, CHKSUB+8*, CHKSUB+10*, CHKSUB+14*, CHKSUB+15*
, CHKSUB+18*, CHKSUB+19*, CHKSUB+20*, OUT2+7, CHKAPP+2*
HL57 EN+4*, SUB+4, EXIT+1!
HL770 CHKED+1!, CHKED+5*, CHKED+6, VSN+1, APP+1, MT+1, ET+1, SUB+1*, SUB+2, CHKSUB+1!
, CHKSUB+5*, CHKSUB+6, CHKSUB+7, CHKSUB+12, CHKSUB+16, CHKSUB+20, EXIT+1!
HLACK EN+6*, EN+7*, EN+8*, EN+11*, MT+5, CHKSUB+15, EXIT+1!
>> HLANS HLERCHK+12*, HLERCHK+18*, EN+13, EN+16
HLETPN CHKED+1!, ET+1*, ET+2*, ET+3, OUT1+4, CHKSUB+1!, CHKSUB+16*, CHKSUB+17*, CHKSUB+18, OUT2+5
, EXIT+1!
HLETPP CHKED+1!, ET+1*, ET+2, ET+4, CHKSUB+1!, CHKSUB+16*, CHKSUB+17, CHKSUB+18, EXIT+1!
HLMTPN CHKED+1!, MT+1*, MT+3*, MT+4, MT+5, OUT1+4, CHKSUB+1!, CHKSUB+12*, CHKSUB+13*, CHKSUB+14
, CHKSUB+15, OUT2+5, EXIT+1!
HLMTPP CHKED+1!, MT+1*, MT+2, MT+3, MT+4, CHKSUB+1!, CHKSUB+12*, CHKSUB+13, CHKSUB+14, EXIT+1!
HLNODE SUB+3*, SUB+4*, SUB+5, SUB+6, EXIT+1!
HLPIEN EN+13*, EN+14, EN+15, EXIT+1!
HLPN CHKED+1!, CHKED+2*, CHKED+3, OUT1+2, CHKSUB+1!, CHKSUB+2*, CHKSUB+3, OUT2+3, EXIT+1!
HLRAPN CHKSUB+1!, CHKSUB+7*, CHKSUB+9*, CHKSUB+10, OUT2+4
HLRAPP CHKSUB+1!, CHKSUB+7*, CHKSUB+8, CHKSUB+9, CHKSUB+10, CHKSUB+11, EXIT+1!
HLSAPN CHKED+1!, APP+1*, APP+3*, APP+4, OUT1+3, EXIT+1!
HLSAPP CHKED+1!, APP+1*, APP+2, APP+3, APP+4, APP+5, EXIT+1!
HLSUBP SUB+6*, EXIT+1!
HLVSN CHKED+1!, VSN+3*, ET+4, OUT1+4, CHKSUB+1!, EXIT+1!
HLVSP CHKED+1!, VSN+1*, VSN+2, VSN+3, CHKSUB+1!, EXIT+1!
HLX SUB+6*, EXIT+1!
IO EN+1
IO("Q" ASKDEV+4
LINE OUT1*, OUT1+1, EXIT+1!
>> N OUT1+7*
>> POP ASKDEV+3
PP CHKED~, CHKED+2, CHKED+4, CHKED+5, SUB+1, CHKSUB~, CHKSUB+2, CHKSUB+4, CHKSUB+5, CHKSUB+19
, CHKSUB+20
SAPP EXIT+1!
STAR OUT2+1*, OUT2+2, EXIT+1!
U EN+14, CHKED+2, CHKED+4, VSN+1, VSN+3, APP+1, APP+3, MT+1, MT+3, ET+1
, ET+2, SUB+6, CHKSUB+2, CHKSUB+4, CHKSUB+7, CHKSUB+9, CHKSUB+12, CHKSUB+13, CHKSUB+16, CHKSUB+17
, CHKSUB+20, CHKAPP+2
X HLERCHK+13*, DICQ+1~, DICQ+2*
Y HLERCHK+12, HLERCHK+13, HLERCHK+17, HLERCHK+18, DICQ+1~
>> ZTDESC ASKDEV+5*
>> ZTDTH ASKDEV+6*
>> ZTQUEUED EN+2
>> ZTREQ EN+2*
>> ZTRTN ASKDEV+5*
>> ZTSAVE("*" ASKDEV+5*
ZTSK ASKDEV+8, EXIT+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All