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

Package: IHS Support HL7 Interfaces

Routine: BHLRXPST


Information

BHLRXPST ; IHS/TUCSON/DCP - HL7 - POST-INIT FOR COTS PHARMACY INSTALLATION ;

Source Information

Source file <BHLRXPST.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 ^DIC  FILE^DICN  ^DIE  
IHS Support HL7 Interfaces 2 START^BHLRXPS1  START^BHLRXPS2  
IHS VA Utilities 1 ^XBKVAR  

Entry Points

Name Comments DBIA/ICR reference
LOC ;
ADDEN ; ENTRY POINT - Add entries to the HL7 APPLICATION PARAMETER and PROTOCOL files
; This entry point is only used if it is necessary to restart the post-
; init process after installing the DHCP HL7 package.
START ; ENTRY POINT from MUMPS prompt ">"
XIT ;
HLLOG1 ; add entry to HL LOGICAL LINK
HLLOG ; add entry to HL7 LOWER LEVEL PROTOCOL file

External References

Name Field # of Occurrence
START^BHLRXPS1 ADDEN+16
START^BHLRXPS2 ADDEN+19
^DIC LOC+2
FILE^DICN LOC+13, LOC+32, HLLOG+3, HLLOG1+3
^DIE HLLOG1+8
^XBKVAR START+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PHARM MGR Mail Group already exists. Nothing added.",!!
  • Line Location: LOC+8
Function Call: WRITE
  • Prompt: !,"Entry was unsuccessful: ",X
  • Line Location: LOC+14
Function Call: WRITE
  • Prompt: !,BHLBULL," bulletin not found.....I was unable to add this bulletin to the PHARM MGR mail group."
  • Line Location: LOC+25
Function Call: WRITE
  • Prompt: !?5,"Multiple entry was unsuccessful: ",X
  • Line Location: LOC+33
Function Call: WRITE
  • Prompt: !?5,"PHARM MGR Mail Group added to the "_BHLBULL_" Bulletin."
  • Line Location: LOC+34
Function Call: WRITE
  • Prompt: !!
  • Line Location: LOC+38
Function Call: WRITE
  • Prompt: !?5,"Cannot find the HEALTH LEVEL SEVEN package entry. Unable to install"
  • Line Location: ADDEN+6
Function Call: WRITE
  • Prompt: !?5,"the required entries to the following files:"
  • Line Location: ADDEN+7
Function Call: WRITE
  • Prompt: !!?30,"HL7 APPLICATION PARAMETER",!?30,"PROTOCOL"
  • Line Location: ADDEN+8
Function Call: WRITE
  • Prompt: !!!!?5,"Once the HL7 Package has been installed, this process can"
  • Line Location: ADDEN+9
Function Call: WRITE
  • Prompt: !?5,"be restarted with the following command: D ADDEN^BHLRXPST",!!
  • Line Location: ADDEN+10
Function Call: WRITE
  • Prompt: !,"Adding required entries to the HL7 APPLICATION PARAMETER file."
  • Line Location: ADDEN+15
Function Call: WRITE
  • Prompt: !!,"Adding required entries to the PROTOCOL file."
  • Line Location: ADDEN+18
Function Call: WRITE
  • Prompt: !!,"HL7 Lower Level Protocol Parameter exists"
  • Line Location: HLLOG+1
Function Call: WRITE
  • Prompt: !!,"HL Logical Link already exists."
  • Line Location: HLLOG1+1
Function Call: WRITE
  • Prompt: !,"ALL DONE WITH POST-INIT",!!
  • Line Location: XIT+5
Routine Call
  • DIE
  • Line Location:
    • HLLOG1+8
Routine Call
  • DIC
  • Line Location:
    • LOC+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(101 - [#101] Classic Fileman Calls
^XMB(3.8 - [#3.8] Classic Fileman Calls
^HLCS(869.2 - [#869.2] Classic Fileman Calls
^HLCS(870 - [#870] Classic Fileman Calls
^AUTTLOC - [#9999999.06] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(3.6 LOC+29
^DIC(4 - [#4] LOC+2
^DIC(9.4 - [#9.4] START+1, ADDEN+4
^HLCS(869.2 - [#869.2] HLLOG+1
^HLCS(870 - [#870] HLLOG1+1, HLLOG1+8
^ORD(101 - [#101] HLLOG1+8
^XMB(3.6 - [#3.6] LOC+24, LOC+26
^XMB(3.8 - [#3.8] LOC+7

Label References

Name Line Occurrences
HLLOG1 HLLOG+1
LOC LOC+3
XIT ADDEN+5, HLLOG1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BHLACACK XIT+3!
BHLAPACK XIT+3!
BHLBIEN LOC+24*, LOC+25, LOC+26, LOC+27, LOC+30, LOC+37!
BHLBULL LOC+23*, LOC+24, LOC+25, LOC+34, LOC+37!
BHLBULL1 LOC+21*, LOC+23, LOC+37!
BHLBULL2 LOC+22*, LOC+23, LOC+37!
BHLCODE XIT+2!
BHLDIC XIT+3!
BHLDR XIT+3!
BHLEVNT XIT+3!
BHLFAC XIT+2!
BHLFLG XIT+3!
BHLHL7 ADDEN+4*, ADDEN+5, ADDEN+11!, ADDEN+13!
BHLIEN XIT+3!
BHLISEQC XIT+3!
BHLITEM XIT+3!
BHLLOC LOC+1*, LOC+4*, XIT+2!
BHLMGRP LOC+7*, LOC+8, LOC+16*, LOC+26, LOC+31, XIT+2!
BHLMTG XIT+4!
BHLMTR XIT+4!
BHLNAME XIT+4!
BHLPKG START+1*, XIT+2!
BHLPTR XIT+4!
BHLTEXT XIT+4!
BHLTYPE XIT+4!
BHLVID XIT+4!
D0 XIT+1!
DA LOC+2!, LOC+35!, HLLOG1+8*, XIT+1!
DA(1 LOC+30*
DD LOC+9!, LOC+32!, HLLOG+2!, HLLOG1+2!, XIT+1!
DI XIT+1!
>> DIADD HLLOG+3*, HLLOG1+3*
DIC LOC+2*!, LOC+10*, LOC+13!, LOC+27*, LOC+32!, HLLOG+3*, HLLOG1+3*, XIT+1!
DIC("A" LOC+2*
DIC("B" LOC+2*
DIC("DR" LOC+11*, HLLOG+3*, HLLOG1+3*
DIC("P" LOC+29*
DIC(0 LOC+2*, LOC+10*, LOC+28*, HLLOG+3*, HLLOG1+3*
DIE HLLOG1+8*, XIT+1!
DIX XIT+1!
DIY XIT+1!
DIZ XIT+1!
DLAYGO LOC+10*, LOC+17!, HLLOG+3*, HLLOG1+3*
DO LOC+9!, LOC+32!, HLLOG+2!, HLLOG1+2!, XIT+1!
DQ XIT+1!
DR HLLOG1+8*, XIT+1!
DUZ LOC+11
DUZ(2 LOC+2
DZ XIT+1!
U LOC+2, LOC+29
X LOC+12*, LOC+14!, LOC+17!, LOC+31*, LOC+33!, LOC+35!, HLLOG+3*, HLLOG1+3*, XIT+1!
Y LOC+3, LOC+4, LOC+14, LOC+15, LOC+16, LOC+17!, LOC+33, LOC+35!, HLLOG+4, HLLOG+5
, HLLOG1+4, HLLOG1+5, XIT+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All