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  | All
Print Page as PDF
Routine: RAHLRPT1

Package: Radiology Nuclear Medicine

Routine: RAHLRPT1


Information

RAHLRPT1 ;HISC/GJC-Compiles HL7 'ORU' Message Type ;05 Dec 2017 2:43 PM

Source Information

Source file <RAHLRPT1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Radiology Nuclear Medicine 6 $$NAMCODE^RACPTMSC  INIT^RAHLR1  ZDS^RAHLR1A  ($$OBX11,OBXCPTM,OBXRPT,OBXTCOM)^RAHLRPT2  ($$ESCAPE,$$OBR21,GENERATE)^RAHLRU  ($$REPEAT,$$SPECSRC,BLSEG,PID)^RAHLRU1  
Kernel 2 $$FMTHL7^XLFDT  $$HLNAME^XLFNAME  
VA FileMan 2 $$GET1^DIQ  ^DIWP  
Imaging 1 NPFON^MAG7UFO  

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

Package Total Caller Graph
Radiology Nuclear Medicine 1 RAHLRPT  

Entry Points

Name Comments DBIA/ICR reference
EN(RADFN,RADTI,RACNI,RAEID) ;Called from all RA RPT* event driver protocols whose
PID ;Compile the 'PID' segment
OBR ;Compile 'OBR' Segment
OBXPRC ;Compile 'OBX' Segment for Procedure
OBXIMP ;Compile the 'OBX' segment for Impression Text
OBXDX ;Compile the 'OBX' segment for Diagnostic Code
OBXPMOD ;Compile 'OBX' segment for procedure modifiers
OBXTCOM ;Compile 'OBX' segment for tech comments
OBXCPTM ;Compile 'OBX' segment for CPT modifiers
OBXRPT ;Compile 'OBX' segment for Report Text
INTNAM(Y) ;return the name of the intepreter(s)
; input: Y=IEN of the record in the New Person (#200) file
; CNT=second level subscript is newed,initialized and checked above

External References

Name Field # of Occurrence
$$GET1^DIQ OBR+27, OBR+79, OBR+87, OBR+97
^DIWP OBXIMP+7
NPFON^MAG7UFO OBR+36
$$NAMCODE^RACPTMSC OBR+11
INIT^RAHLR1 EN+17
ZDS^RAHLR1A OBR+106
$$OBX11^RAHLRPT2 OBXPRC+5, OBXIMP+4, OBXDX+6, OBXPMOD+3
OBXCPTM^RAHLRPT2 OBXCPTM+1
OBXRPT^RAHLRPT2 OBXRPT+1
OBXTCOM^RAHLRPT2 OBXTCOM+1
$$ESCAPE^RAHLRU OBR+17, OBR+18, OBR+37, OBXPRC+4, OBXIMP+11, OBXDX+5, OBXDX+15, OBXPMOD+7
$$OBR21^RAHLRU OBR+57
GENERATE^RAHLRU OBXRPT+4
$$REPEAT^RAHLRU1 OBR+24
$$SPECSRC^RAHLRU1 OBR+23
BLSEG^RAHLRU1 OBR+103, OBXPRC+6, OBXIMP+12, OBXDX+7, OBXDX+16, OBXPMOD+8
PID^RAHLRU1 PID+1
$$FMTHL7^XLFDT OBR+20, OBR+68
$$HLNAME^XLFNAME OBR+30, OBR+83, OBR+99, INTNAM+5

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(78.3 - [#78.3] OBXDX+5, OBXDX+14
^RADPT - [#70] OBR+92, OBXDX+10, OBXDX+12, OBXDX+13, OBXPMOD+4, OBXPMOD+5
^RAMIS(71 - [#71] OBR+76, OBXPRC+4
^RAMIS(71.2 - [#71.2] OBXPMOD+7
^RARPT - [#74] OBR+5, OBXIMP+2, OBXIMP+6, OBXIMP+7
^UTILITY($J OBXIMP+5!, OBXIMP+9, OBXIMP+11, OBXIMP+16!

Label References

Name Line Occurrences
INTNAM OBR+88, OBR+93

Naked Globals

Name Field # of Occurrence
^( OBR+92

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+15~
CNT OBR+86~*, OBR+90, OBR+92, INTNAM+4*, INTNAM+5
DIW OBXIMP+16!
DIWF OBXIMP+5*, OBXIMP+16!
DIWI OBXIMP+16!
DIWL OBXIMP+5*, OBXIMP+16!
DIWR OBXIMP+5*, OBXIMP+16!
DIWT OBXIMP+16!
DIWTC OBXIMP+16!
DIWX OBXIMP+16!
DN EN+15~
DT OBR+11
FT EN+15~
>> HLDT1 OBR+68
>> HLECH OBR+17, OBR+18, OBR+24, OBR+30, OBR+37, OBR+57, OBR+83, OBR+99, OBXPRC+3, OBXPRC+4
, OBXIMP+3, OBXDX+4, OBXDX+5, OBXDX+15, OBXPMOD+2, INTNAM+5
I EN+15~, OBR+35~*, OBR+37*
J EN+15~
M OBR+35~*, OBR+37*, OBR+38
PTR EN+15~
RACNI EN~, OBR+92, OBR+106, OBXDX+10, OBXDX+12, OBXDX+13, OBXPMOD+4, OBXPMOD+5
RADFN EN~, PID+1, OBR+92, OBXDX+10, OBXDX+12, OBXDX+13, OBXPMOD+4, OBXPMOD+5
RADIWL OBXIMP+5*, OBXIMP+9, OBXIMP+11, OBXIMP+16!
RADTI EN~, OBR+92, OBR+106, OBXDX+10, OBXDX+12, OBXDX+13, OBXPMOD+4, OBXPMOD+5
RAEID EN~
RAFT OBXDX+14*, OBXDX+15, OBXDX+20!
RAI OBR+86~, OBR+90*, OBR+92, OBXIMP+6*, OBXIMP+7, OBXIMP+9*, OBXIMP+11, OBXDX+11*, OBXDX+12*, OBXDX+13
, OBXPMOD+3*, OBXPMOD+4*, OBXPMOD+5
RAJ OBR+86~, OBR+91*, OBR+92*, OBXIMP+9*, OBXIMP+10*, OBXDX+11*, OBXDX+15*, OBXPMOD+1*, OBXPMOD+3*, OBXPMOD+5*
, OBXPMOD+6
RAJ(0 OBR+92*, OBR+93
>> RAOBR OBR+103
>> RAOBR(16 OBR+24*
>> RAOBR(17 OBR+30*
>> RAOBR(18 OBR+38*
>> RAOBR(19 OBR+41*
>> RAOBR(2 OBR+7*
>> RAOBR(20 OBR+48*
>> RAOBR(21 OBR+53*
>> RAOBR(22 OBR+57*
>> RAOBR(23 OBR+68*
>> RAOBR(26 OBR+73*
>> RAOBR(3 OBR+10*
>> RAOBR(30 OBR+76*
>> RAOBR(33 OBR+83*
>> RAOBR(34 INTNAM+5*
>> RAOBR(36 OBR+99*
>> RAOBR(4 OBR+10*
>> RAOBR(5 OBR+17*, OBR+18*
>> RAOBR(8 OBR+20*
RAOBX OBXPRC+6!, OBXIMP+12, OBXIMP+16!, OBXDX+7, OBXDX+16, OBXDX+20!, OBXPMOD+8, OBXPMOD+11!
RAOBX(12 OBXPRC+5*, OBXIMP+4*, OBXDX+6*, OBXPMOD+3*
RAOBX(2 OBXPRC+2*, OBXIMP+1*, OBXIMP+10*, OBXIMP+14, OBXDX+1*, OBXDX+3*, OBXDX+8, OBXDX+15*, OBXDX+18, OBXPMOD+1*
, OBXPMOD+6*, OBXPMOD+10
RAOBX(3 OBXPRC+3*, OBXIMP+3*, OBXDX+3*, OBXPMOD+2*
RAOBX(4 OBXPRC+3*, OBXIMP+3*, OBXDX+4*, OBXPMOD+2*
RAOBX(6 OBXPRC+4*, OBXIMP+11*, OBXDX+5*, OBXDX+15*, OBXPMOD+7*
RAPTR OBXDX+13*, OBXDX+14, OBXDX+15, OBXDX+20!, OBXPMOD+5*, OBXPMOD+7, OBXPMOD+11!
>> RARPT OBR+3
>> RAVAQ OBR+3
RAX OBR+35~
RAX( OBR+37
>> RAXX OBXPRC+2*, OBXIMP+1, OBXIMP+10, OBXIMP+14*, OBXDX+1, OBXDX+3, OBXDX+8*, OBXDX+15, OBXDX+18*, OBXPMOD+1
, OBXPMOD+6, OBXPMOD+10*
>> RAZCPT OBR+11*
>> RAZCPT(0 OBR+11*, OBR+17
>> RAZDAYCS OBR+10, OBR+41, OBR+48, OBR+53, OBR+106
RAZNME OBR+28!, OBR+30, OBR+80!, OBR+83, OBR+88!, OBR+90!, OBR+99!, INTNAM+5!
RAZNME("FIELD" OBR+29*, OBR+81*, OBR+98*, INTNAM+3*
RAZNME("FILE" OBR+28*, OBR+80*, OBR+98*, INTNAM+3*
RAZNME("IENS" OBR+28*, OBR+80*, OBR+98*, INTNAM+3*
>> RAZORD OBR+27, OBR+28, OBR+30, OBR+36, OBR+76
>> RAZPMOD OBR+23*, OBR+24
>> RAZPROC OBR+11, OBR+18
>> RAZRPT OBR+2*, OBR+3*, OBR+5*, OBR+20, OBR+68, OBR+73
>> RAZRXAM OBR+57
>> RAZTRANS OBR+5*, OBR+97, OBR+98, OBR+99
>> RAZXAM OBR+2, OBR+5, OBR+18, OBR+23, OBR+75, OBR+76, OBR+79, OBR+80, OBR+83, OBR+87
, OBR+88, OBXPRC+4, OBXPRC+5, OBXIMP+2, OBXIMP+4, OBXIMP+6, OBXIMP+7, OBXDX+2, OBXDX+5, OBXDX+6
, OBXPMOD+3
U OBR+2, OBR+5, OBR+11, OBR+17, OBR+18, OBR+20, OBR+23, OBR+27, OBR+28, OBR+30
, OBR+36, OBR+68, OBR+73, OBR+75, OBR+76, OBR+79, OBR+80, OBR+83, OBR+87, OBR+88
, OBXPRC+4, OBXPRC+5, OBXIMP+2, OBXIMP+4, OBXIMP+6, OBXIMP+7, OBXDX+2, OBXDX+5, OBXDX+6, OBXDX+14
, OBXPMOD+3, OBXPMOD+7
X EN+15~, OBXIMP+7*
Y EN+15~, INTNAM~, INTNAM+3, INTNAM+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  | All