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

Package: Lab Service

Routine: LR7OVB


Information

LR7OVB ;HOIFO/BNT - Lab Receive HL7 Order Update from VBECS ;2/22/08 21:19

Source Information

Source file <LR7OVB.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 4 $$FIND1^DIC  FILE^DIE  FDA^DILF  $$GET1^DIQ  
Kernel 2 ($$HL7TFM,$$NOW)^XLFDT  $$STRIP^XLFSTR  
Health Level Seven 1 GENACK^HLMA1  
Order Entry Results Reporting 1 EN^ORMVBEC  

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
Kernel 1 ^ORD(101  
Lab Service 1 LR7O VBECS RECEIVE  

Entry Points

Name Comments DBIA/ICR reference
EN1(LRMSG) ; Entry point for LR7O VBECS RECEIVE Protocol
ORC ; - Process ORC segment
OBR ; -- Process OBR segment
PID ; -- Process PID segment
FMDATE(Y) ; -- Convert HL7 date/time to FM format
ERROR ;
COMPLETE(LROIEN,LRTST,LRDFN1) ; - Complete the accession for this test and the OERR order
; LROIEN = File 69 IEN
; LRTST = File 60 IEN
; LRDFN1 = File 2 IEN
GENACK ; -- Send an acknowldegement to original message

External References

Name Field # of Occurrence
$$FIND1^DIC COMPLETE+21
FILE^DIE COMPLETE+32, COMPLETE+35
FDA^DILF COMPLETE+30, COMPLETE+31, COMPLETE+35
$$GET1^DIQ COMPLETE+22
GENACK^HLMA1 GENACK+6
EN^ORMVBEC COMPLETE+38
$$HL7TFM^XLFDT FMDATE+1
$$NOW^XLFDT COMPLETE+20
$$STRIP^XLFSTR OBR+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
68.04 FDA^DILF,  FIND1^DIC,  GET1^DIQ
69.01 FDA^DILF

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] PID+7
^LR - [#63] COMPLETE+15, COMPLETE+26
^LRO(68 - [#68] COMPLETE+23, COMPLETE+33, COMPLETE+36
^LRO(69 - [#69] COMPLETE+7, COMPLETE+8, COMPLETE+9, COMPLETE+11, COMPLETE+12, COMPLETE+13, COMPLETE+14, COMPLETE+35

Label References

Name Line Occurrences
@( EN1+5
COMPLETE OBR+6
ERROR ORC+2, ORC+4, OBR+3, OBR+4, PID+7, COMPLETE+7, COMPLETE+11, COMPLETE+15
GENACK EN1+8, ERROR+2

Naked Globals

Name Field # of Occurrence
^(0 COMPLETE+36*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DFN EN1+1~
DIERR COMPLETE+30!, COMPLETE+35!
>> HL("ECH" PID+4, PID+5, PID+6
>> HL("EID" GENACK+5, GENACK+6
>> HL("EIDS" GENACK+5, GENACK+6
>> HL("FS" EN1+4, ORC+1, ORC+3, OBR+1, OBR+2, PID+3, PID+6, GENACK+4
>> HL("MID" GENACK+4
>> HLA("HLA" GENACK+4*
>> HLEID GENACK+5*
>> HLEIDS GENACK+5*
>> HLMTIENS GENACK+6
I PID+1~, PID+5*
LR0 COMPLETE+4~, COMPLETE+13*, COMPLETE+16, COMPLETE+17, COMPLETE+18, COMPLETE+19
LRA COMPLETE+4~, COMPLETE+8*, COMPLETE+9, COMPLETE+11, COMPLETE+12, COMPLETE+13, COMPLETE+14
LRAA COMPLETE+4~, COMPLETE+16*, COMPLETE+21, COMPLETE+22, COMPLETE+23, COMPLETE+30, COMPLETE+31, COMPLETE+33, COMPLETE+36
LRACK EN1+1~, EN1+8, ERROR+2, COMPLETE+6*
LRAD COMPLETE+4~, COMPLETE+17*, COMPLETE+21, COMPLETE+22, COMPLETE+23, COMPLETE+30, COMPLETE+31, COMPLETE+33, COMPLETE+36
LRAN COMPLETE+4~, COMPLETE+18*, COMPLETE+21, COMPLETE+22, COMPLETE+23, COMPLETE+30, COMPLETE+31, COMPLETE+33, COMPLETE+36
LRB COMPLETE+4~, COMPLETE+9*, COMPLETE+11, COMPLETE+12, COMPLETE+13, COMPLETE+14
LRC COMPLETE+4~, COMPLETE+12*, COMPLETE+13
LRDFN EN1+1~, COMPLETE+14*, COMPLETE+15, COMPLETE+26*
LRDFN1 OBR+6, PID+5*, PID+6*, PID+7, COMPLETE~, COMPLETE+15
LRERR EN1+1~, EN1+3, EN1+6, ORC+2*, OBR+3*, OBR+4*, PID+7*, COMPLETE+7*, COMPLETE+15*, GENACK+3
GENACK+4
LRFDA COMPLETE+30!, COMPLETE+35!
LRI EN1+1~, EN1+3*, EN1+4
LRJ EN1+1~
>> LRK COMPLETE+20*, COMPLETE+30, COMPLETE+35
>> LRLLOC COMPLETE+25*
LRMSG EN1~
LRMSG( EN1+3, EN1+4
LRODT COMPLETE+4~, COMPLETE+27*
LROIEN EN1+1~, OBR+1*, OBR+4, OBR+6, COMPLETE~, COMPLETE+7, COMPLETE+8, COMPLETE+9
>> LRQUIT EN1+2*, EN1+3, EN1+6, ERROR+1*, COMPLETE+5*, COMPLETE+8
LRSEG EN1+1~, EN1+4*, ORC+1, ORC+3, OBR+1, OBR+2, PID+3, PID+6
LRSEGID EN1+1~, EN1+4*, EN1+5
LRSN COMPLETE+4~, COMPLETE+28*
>> LRSVC COMPLETE+24*
LRTST EN1+1~, OBR+2*, OBR+3, OBR+6, COMPLETE~, COMPLETE+13, COMPLETE+21, COMPLETE+22, COMPLETE+30, COMPLETE+31
, COMPLETE+36
LRV COMPLETE+4~, COMPLETE+22*
>> LRW COMPLETE+5*
LRY COMPLETE+4~
MSA GENACK+7!
>> MSA1 GENACK+2*, GENACK+3*, GENACK+4
ORDCNTRL EN1+1~, ORC+1*, ORC+2, COMPLETE+37*
ORDSTS EN1+1~, ORC+3*, ORC+4, COMPLETE+37*
ORIFN EN1+1~, COMPLETE+19*
PIDLST PID+1~, PID+3*, PID+4, PID+5, PID+6
>> RESULT GENACK+6
X PID+1~, PID+5*, COMPLETE+23*, COMPLETE+24, COMPLETE+25, COMPLETE+26, COMPLETE+27, COMPLETE+28
Y FMDATE~, FMDATE+1, COMPLETE+33*
Y(4 COMPLETE+33*, COMPLETE+35
Y(5 COMPLETE+33*, COMPLETE+35

Marked Items

Name Field # of Occurrence
$T(@LRSEGID EN1+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All