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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: SRHLUI

Package: Surgery

Routine: SRHLUI


Information

SRHLUI ;B'ham ISC/DLR - Surgery Interface Utility to process incoming segments ; [ 02/06/01 9:53 PM ]

Source Information

Source file <SRHLUI.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Surgery 2 ($$DNAME,SETDSC)^SRHLU  ^SROESHL  
Health Level Seven 1 $$FMDATE^HLFNC  
VA FileMan 1 ^DIE  

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
Surgery 2 SRHLORU  SROESHL  

Entry Points

Name Comments DBIA/ICR reference
OBR(CASE,DFN,IEN,MSG) ;process Observation Request Segment (OBR) fields 3-4,7-8,27
CHECK(IEN) ;check universal id or observation id sequence to the Surgery Interface file
VALUE(XX) ;SET the value of the identified segment field in file 133.2
DR(LVL,IEN) ;set DR or DR(... string for the FileMan DIE call
NTE(MSG,OBR,CASE) ;process Observation Segment (OBX) fields 3,5,14,16 and NTE-3
OBX(MSG,OBR,CASE) ;process Observation Segment (OBX) fields 3,5,14,16 and NTE-3
DRCHK ;CHECK DR STRING (for debugging only)

External References

Name Field # of Occurrence
^DIE OBR+20, OBX+15
$$FMDATE^HLFNC VALUE+6
$$DNAME^SRHLU VALUE+7
SETDSC^SRHLU OBR+20, NTE+4, NTE+5, NTE+8, OBX+3, OBX+4, OBX+6, OBX+7, OBX+11, OBX+12
^SROESHL OBR+19, OBX+15

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SRF - [#130] NTE+8, NTE+9*
^SRO(133.2 - [#133.2] OBR+12, OBR+14, OBR+15, OBR+17, CHECK+2, VALUE+1, VALUE+4, VALUE+5, VALUE+6, VALUE+7
, DR+3, DR+5, NTE+5, OBX+4, OBX+6, OBX+7, OBX+8, OBX+9, OBX+12, OBX+15
, OBX+16
^TMP("SR7" VALUE+1*

Label References

Name Line Occurrences
$$CHECK OBR+17, NTE+6, OBX+5, OBX+15
$$VALUE OBR+15, OBR+17, DR+3, DR+5, OBX+6, OBX+9, OBX+13, OBX+16
DR OBR+17, OBX+9, OBX+15, OBX+16
DRCHK OBR+20

Naked Globals

Name Field # of Occurrence
^(0 OBR+15, VALUE+4, VALUE+5, VALUE+6, DR+3, DR+5, NTE+9*, OBX+8
^(1 OBR+14, DR+3, DR+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
CASE OBR~, OBR+12, NTE~, NTE+8, NTE+9, OBX~, OBX+2
DA OBR+7!, OBR+12*, OBR+20!, OBX+2*, OBX+15!
DFN OBR~
DIE OBR+7!, OBR+12*, OBR+20!, OBX+7!*, OBX+15!
DO OBR+12!, OBR+20!, OBX+7!, OBX+15!
DR OBR+7!, OBR+12!, OBR+15*, OBR+18, OBR+20!, DR+3*, OBX+7!, OBX+8*, OBX+15!
DR( DR+5*, DRCHK+3
DT NTE+9
>> HL OBR+20, NTE+4, NTE+5, NTE+8, OBX+3, OBX+4, OBX+6, OBX+7, OBX+11, OBX+12
>> HL("FS" VALUE+4, VALUE+5, NTE+4, NTE+8, NTE+9, OBX+3, OBX+11
>> HLCOMP VALUE+4, NTE+4, OBX+3, OBX+11
ID OBR+20, NTE+3~, NTE+4*, NTE+5, NTE+7, OBX+1~, OBX+3*, OBX+4, OBX+6, OBX+7
, OBX+11*, OBX+12
IEN OBR~, OBR+12, OBR+14, OBR+15, OBR+17, CHECK~, CHECK+1, CHECK+2, DR~, DR+1
, DR+3, DR+5, NTE+5*, NTE+6, OBX+1~, OBX+4*, OBX+5, OBX+6, OBX+7, OBX+8
, OBX+9, OBX+12*, OBX+13, OBX+15, OBX+16
LVL OBR+8~, OBR+17*, DR~, DR+1, DR+3, DR+5, OBX+9*, OBX+15*, OBX+16*
MSG OBR~, OBR+9, OBR+12, NTE~, NTE+2, NTE+8, NTE+9, OBX~, OBX+2, OBX+11
NM OBX+1~, OBX+6*, OBX+8, OBX+13*
OBR OBR+8~, OBR+12*, OBR+21, NTE~, NTE+4, OBX~, OBX+3
OBX OBX+1~, OBX+2*
>> SRCNT DRCHK+3*
>> SRDISC OBR+20*, NTE+4*, NTE+5*, NTE+8*, OBX+3*, OBX+4*, OBX+6*, OBX+7*, OBX+11*, OBX+12*
SRESQ OBR+18~, OBR+19, OBX+1~, OBX+15~
>> SRHL OBR+20, NTE+4, NTE+5, NTE+8, OBX+3, OBX+4, OBX+6, OBX+7, OBX+11, OBX+12
>> SRJ DRCHK+3*
>> SRK DRCHK+3*
SRNOCON OBR+8~, OBR+11*
SRX OBR+8~, OBR+17*, OBX+9*, OBX+16*
TYPE OBX+1~
U OBR+12, OBR+14, OBR+15, OBR+17, CHECK+2, VALUE+4, VALUE+5, VALUE+6, VALUE+7, DR+3
, DR+5, NTE+9, OBX+6, OBX+7, OBX+8, OBX+9, OBX+15, OBX+16
VALUE VALUE+2~, VALUE+4*, VALUE+5*, VALUE+6*, VALUE+7*, VALUE+8, DR+3*, DR+5*
XX VALUE~, VALUE+1, VALUE+4, VALUE+5, VALUE+6, VALUE+7
>> Y OBR+20
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All