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

Package: Barcode Medication Administration

Routine: PSBSVHL7


Information

PSBSVHL7 ;BIRMINGHAM/TEJ - BCMA HL7 SERVER ;5/28/10 1:48pm

Source Information

Source file <PSBSVHL7.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Health Level Seven 3 ($$HLDATE,$$HLNAME)^HLFNC  INIT^HLFNC2  GENERATE^HLMA  
Barcode Medication Administration 1 PSJ1^PSBVT  
Registration 1 DEM^VADPT  
VA Fileman 1 $$GET1^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Barcode Medication Administration 1 PSBML  

Entry Points

Name Comments DBIA/ICR reference
COMMENT ;ADD COMNMENT trigger event
PV1 ; PV1 segment
TRANS ; CALL HL7 TO Transmit Message
RXR ; RXR segment
RXO ; RXO segment
RXA ; RXA segment
ESC(PSBINF) ; Escape message data
RXC ; RXC segment
; loop through .5,.6,and .7 send segments for each "component"
PID ; PID segment -- use segment generator
MEDSTAT ;MEDPASS and UPDATE trigger events
1 ; set up environment for message
2 ; Add appropriate message txt to HLA array
ORC ; ORC segment
EN(PSBIEN,PSBHL7X) ; This is the entry point for all HL7 processing
NTE ; NTE segment(s) - notes and comments
PRNEFFE ;PRN EFFECTIVENESS trigger event

External References

Name Field # of Occurrence
$$GET1^DIQ PV1+10, ORC+19, ORC+24, RXO+5, NTE+8, NTE+18
$$HLDATE^HLFNC PID+5, ORC+10, ORC+16, ORC+21, NTE+9, NTE+19, RXA+6, RXA+14
$$HLNAME^HLFNC PID+4, PV1+10, ORC+19, ORC+24, NTE+8, NTE+18
INIT^HLFNC2 1+2
GENERATE^HLMA TRANS+2
PSJ1^PSBVT ORC+6
DEM^VADPT PID+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"PSB(BCMA) HL7 MESSAGE HAS FAILED TRANSMISSION - could not generate"
  • Line Location: TRANS+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^PS(50.7 - [#50.7] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSB(53.79 - [#53.79] MEDSTAT+2, PID+1, PV1+5, PV1+6, PV1+9, ORC+5, ORC+8, ORC+10, ORC+16, ORC+18
, ORC+21, ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+5, NTE+6, NTE+7, NTE+9
, NTE+11, NTE+14, NTE+15, NTE+16, NTE+17, NTE+19, RXR+4, RXC+2, RXC+5, RXC+9
, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6, RXA+12, RXA+13, RXA+14, RXA+16
, RXA+19, RXA+21

Label References

Name Line Occurrences
$$ESC PV1+5, PV1+6, ORC+9, ORC+11, RXO+7, RXO+8, RXO+9, NTE+6, NTE+16
COMMENT 2+5
MEDSTAT 2+4
NTE MEDSTAT+2, COMMENT+1, PRNEFFE+1
ORC MEDSTAT+1, COMMENT+1, PRNEFFE+1
PID MEDSTAT+1, COMMENT+1, PRNEFFE+1
PRNEFFE 2+6
PV1 MEDSTAT+1
RXA MEDSTAT+3
RXC MEDSTAT+3
RXO MEDSTAT+1
RXR MEDSTAT+3
TRANS MEDSTAT+3, COMMENT+1, PRNEFFE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN PID+1*
>> HL 1+2, 1+3
>> HL("ECH" 1+5, 1+6, PID+4, PV1+10, ORC+19, ORC+24, NTE+8, NTE+18, ESC+2, ESC+4
>> HL("FS" 1+4
HLA 2+1!
HLA("HLS" PID+8*, PV1+2*, PV1+12*, ORC+2*, ORC+26*, RXO+2*, RXO+11*, NTE+2*, NTE+22*, RXR+2*
, RXR+5*, RXC+6*, RXC+16*, RXA+3*, RXA+22*, TRANS+2
HLEVN 2+1!
>> PSBCHR ESC+2*, ESC+3, ESC+4, ESC+5
>> PSBCNT 2+3*, PID+2*, PID+8, PV1+2*, PV1+12, ORC+2*, ORC+26, RXO+2*, RXO+11, NTE+2*
, NTE+22, RXR+2*, RXR+5, RXR+6*, RXC+6*, RXC+16, RXA+3*, RXA+22
>> PSBCNT1 ESC+7*, ESC+8*
PSBDFN 2+2~, PID+1*, PID+2, ORC+6
PSBESC ESC+1!
PSBESC( ESC+4*, ESC+7, ESC+8
>> PSBESCX ESC+1*, ESC+2, ESC+4, ESC+7*, ESC+8
>> PSBESCXX ESC+3*, ESC+7*, ESC+8*
PSBFILE RXC+3!*, RXC+10
PSBFILE1 RXC+10*, RXC+11!
PSBHL7FD PV1+1!, PV1+5*, PV1+6*, PV1+7!, PV1+9*, PV1+10*, PV1+11!, ORC+1!, ORC+8*, ORC+9*
, ORC+10*, ORC+11*, ORC+12!, ORC+14*, ORC+15!, ORC+18*, ORC+19*, ORC+20!, ORC+23*, ORC+24*
, ORC+25!, RXO+1!, RXO+4*, RXO+5*, RXO+6!, RXO+9*, RXO+10, NTE+1!, NTE+7*, NTE+8*
, NTE+9*, NTE+10*, NTE+11*, NTE+12*, NTE+13!, NTE+17*, NTE+18*, NTE+19*, NTE+20*, NTE+21!
, RXR+1!, RXC+6!, RXC+9*, RXC+11*, RXC+12!, RXA+1!, RXA+16*, RXA+17!, RXA+19*, RXA+20!
, TRANS+1!
PSBHL7MS 2+2~, PID+2*, PID+3*, PID+4*, PID+5*, PID+6*, PID+7*, PID+8, PV1+1!, PV1+3*
, PV1+7*, PV1+11*, PV1+12, ORC+1!, ORC+3*, ORC+4*, ORC+5*, ORC+6, ORC+12*, ORC+15*
, ORC+16*, ORC+20*, ORC+21*, ORC+25*, ORC+26, RXO+1!, RXO+6*, RXO+7*, RXO+8*, RXO+10*
, RXO+11, NTE+1!, NTE+3*, NTE+6*, NTE+13*, NTE+16*, NTE+21*, NTE+22, RXR+1!, RXR+3*
, RXR+4*, RXR+5, RXR+6, RXC+6!, RXC+7*, RXC+12*, RXC+13*, RXC+14*, RXC+15, RXC+16
, RXA+1!, RXA+4*, RXA+5*, RXA+6*, RXA+7*, RXA+9*, RXA+10*, RXA+11*, RXA+14*, RXA+17*
, RXA+20*, RXA+21*, RXA+22, TRANS+1!
>> PSBHL7OP TRANS+2
>> PSBHL7T TRANS+2, TRANS+3
PSBHL7X EN~, 2+4, 2+5, 2+6, NTE+5, NTE+14
PSBHLCS 1+1~, 1+5*, PID+3, PV1+5, PV1+6, PV1+9, PV1+10, ORC+4, ORC+8, ORC+9
, ORC+10, ORC+11, ORC+14, ORC+18, ORC+19, ORC+23, ORC+24, RXO+4, RXO+5, RXO+9
, NTE+7, NTE+8, NTE+9, NTE+10, NTE+11, NTE+12, NTE+16, NTE+17, NTE+18, NTE+19
, NTE+20, RXC+9, RXC+11, RXA+14, RXA+16, RXA+19
PSBHLFS 1+1~, 1+4*, PID+2, PID+3, PID+4, PID+5, PID+6, PID+7, PID+8, PV1+2
, PV1+3, PV1+7, PV1+11, ORC+2, ORC+3, ORC+4, ORC+5, ORC+6, ORC+12, ORC+15
, ORC+16, ORC+20, ORC+21, ORC+25, RXO+2, RXO+6, RXO+7, RXO+8, RXO+10, NTE+2
, NTE+3, NTE+6, NTE+13, NTE+16, NTE+21, RXR+2, RXR+3, RXR+4, RXR+6, RXC+6
, RXC+7, RXC+12, RXC+13, RXC+14, RXC+15, RXA+3, RXA+4, RXA+5, RXA+6, RXA+7
, RXA+9, RXA+10, RXA+11, RXA+14, RXA+17, RXA+20, RXA+21
>> PSBHLSCS 1+6*
PSBIEN EN~, MEDSTAT+2, PID+1, PV1+5, PV1+6, PV1+9, ORC+4, ORC+5, ORC+8, ORC+10
, ORC+16, ORC+18, ORC+21, ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+5, NTE+6
, NTE+7, NTE+9, NTE+11, NTE+14, NTE+15, NTE+16, NTE+17, NTE+19, RXR+4, RXC+2
, RXC+5, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6, RXA+12, RXA+13
, RXA+14, RXA+16, RXA+19, RXA+21
>> PSBINDX NTE+15*, NTE+16, NTE+17, NTE+19, RXA+13*, RXA+14
PSBINF ESC~, ESC+1
>> PSBINFO ESC+1*, ESC+3, ESC+6*, ESC+8*, ESC+9
PSBINFO1 ESC+1!, ESC+3*, ESC+4, ESC+5*, ESC+6
>> PSBMRAB RXR+3
>> PSBPONX ORC+14
PSBRX RXA+2*, RXA+5, RXA+23!
PSBRXA RXA+23!
PSBRXA( RXC+12*, RXC+15*, RXA+2, RXA+10, RXA+11
PSBRXAX RXC+12*, RXC+15, RXA+1*, RXA+2*, RXA+9, RXA+10, RXA+11, RXA+23!
PSBRXTYP RXC+4!*, RXC+7
>> PSBSCH ORC+9
>> PSBSCHT ORC+11, NTE+5, RXA+16
PSBSUBFD RXC+2!*, RXC+3, RXC+4, RXC+5, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15
>> PSBSUBX RXC+5*, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15
U PID+1, PV1+5, PV1+6, PV1+9, ORC+5, ORC+8, ORC+10, ORC+16, ORC+18, ORC+21
, ORC+23, RXO+4, RXO+7, RXO+8, RXO+9, NTE+6, NTE+7, NTE+9, NTE+11, NTE+16
, NTE+17, NTE+19, RXR+4, RXC+9, RXC+10, RXC+11, RXC+13, RXC+14, RXC+15, RXA+6
, RXA+10, RXA+11, RXA+14, RXA+16, RXA+19, RXA+21, ESC+5, TRANS+3
>> VA("PID" PID+6
>> VADM(1 PID+4
>> VADM(3 PID+5
>> VADM(4 PID+3*
>> VADM(5 PID+7
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