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 |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: RAHLR1

Package: Radiology Nuclear Medicine

Routine: RAHLR1


Information

RAHLR1 ;HISC/GJC - Generate Common Order (ORM) Message ;18 Jul 2019 9:17 AM

Source Information

Source file <RAHLR1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Radiology Nuclear Medicine 4 $$ACCNUM^RAAPI  EN^RAHLR1A  ($$ESCAPE,GENERATE,INIT)^RAHLRU  ($$REPEAT,$$USESSAN,BLSEG,PID,PV1)^RAHLRU1  
Kernel 2 $$FMTHL7^XLFDT  $$HLNAME^XLFNAME  
Imaging 1 NPFON^MAG7UFO  
VA FileMan 1 $$GET1^DIQ  

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
Radiology Nuclear Medicine 2 RAHLR  RAHLRPT1  

Entry Points

Name Comments DBIA/ICR reference
EN(RADFN,RADTI,RACNI,RAEID) ;Called from RA REG*, RA EXAMINED*, & RA CANCEL*
PID ;compile the PID segment
PV1 ;compile the PV1 segment determine if the patient is
ORC ;build the 'common order segment (ORC) segment
INIT ;initialize some basic package specific variables
PARENT(PRGE,PRNT) ;Define fields ORC-8 & OBR-29 known as PARENT
; input: PRGE=purge date of the exam (if applicable)
; PRNT=parent/descendant if yes, specify if exam or printset

External References

Name Field # of Occurrence
$$GET1^DIQ ORC+48, ORC+54, ORC+60, ORC+71, ORC+72
NPFON^MAG7UFO ORC+66
$$ACCNUM^RAAPI INIT+11
EN^RAHLR1A ORC+78
$$ESCAPE^RAHLRU ORC+60, ORC+67
GENERATE^RAHLRU ORC+81
INIT^RAHLRU EN+14
$$REPEAT^RAHLRU1 ORC+39
$$USESSAN^RAHLRU1 INIT+7
BLSEG^RAHLRU1 ORC+75
PID^RAHLRU1 PID+1
PV1^RAHLRU1 PV1+2
$$FMTHL7^XLFDT ORC+39, ORC+45
$$HLNAME^XLFNAME ORC+51, ORC+57

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(72 - [#72] ORC+4
^RADPT - [#70] INIT+2, INIT+3, INIT+4
^RAMIS(71 - [#71] INIT+21, PARENT+7
^RAO(75.1 - [#75.1] INIT+19, INIT+20

Label References

Name Line Occurrences
$$PARENT ORC+41
INIT EN+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DT PARENT+6
>> HL EN+14
>> HLCS ORC+18
>> HLECH ORC+39, ORC+51, ORC+57, ORC+67, ORC+73
>> HLFS EN+14
I EN+12~, ORC+65~*, ORC+67*
I1 EN+12~
I2 EN+12~
I3 EN+12~
II EN+12~
M ORC+65~*, ORC+67*, ORC+68
PRGE PARENT~, PARENT+6
PRNT PARENT~, PARENT+7
>> RA101Z ORC+32
RACANC ORC+5*, ORC+6, ORC+22, ORC+76!
RACNI EN~, INIT+3, INIT+4, INIT+11
RACOMP ORC+5*, ORC+22, ORC+76!
RADFN EN~, PID+1, PV1+2, INIT+2, INIT+3, INIT+4, INIT+11
RADTI EN~, ORC+18, INIT+2, INIT+3, INIT+4, INIT+5, INIT+11
RAEID EN~
>> RAEXEDT EN+17
>> RAEXMDUN EN+17, ORC+6
RAOBR EN+12~
RAOBX EN+12~
>> RAOPT("" ORC+32
RAORC EN+12~, ORC+75
RAORC(10 ORC+45*
RAORC(11 ORC+51*
RAORC(13 ORC+57*
RAORC(14 ORC+61*
RAORC(15 ORC+68*
RAORC(18 ORC+73*
RAORC(2 ORC+6*
RAORC(3 ORC+21*
RAORC(4 ORC+21*
RAORC(5 ORC+18*
RAORC(6 ORC+22*, ORC+32*
RAORC(8 ORC+39*
RAORC(9 ORC+41*
RAPID EN+12~
RAPID(3 ORC+18
>> RAPURGE ORC+41, INIT+4*
RAPV1 EN+12~
RASERSEC ORC+60*, ORC+61, ORC+73, ORC+76!
RASERSEC(0 ORC+71*, ORC+72
RASERSEC(1 ORC+72*, ORC+73
RAX EN+12~, ORC+65~
RAX( ORC+67
RAXAMSTS ORC+4*, ORC+5, ORC+76!
>> RAZDAYCS ORC+21, INIT+8*, INIT+11*, INIT+16*
>> RAZDTE INIT+5*, INIT+16
RAZNME ORC+51, ORC+55!, ORC+57, ORC+76!
RAZNME("FIELD" ORC+50*, ORC+56*
RAZNME("FILE" ORC+49*, ORC+55*
RAZNME("IENS" ORC+49*, ORC+55*
>> RAZORD ORC+39, ORC+48, ORC+49, ORC+51, ORC+54, ORC+55, ORC+57, ORC+60, ORC+66, ORC+71
, INIT+19*, PARENT+7
>> RAZORD1 INIT+20*
RAZPHONE ORC+76!
>> RAZPROC INIT+21*
>> RAZRXAM ORC+45, INIT+2*
>> RAZXAM EN+17, ORC+4, ORC+17, ORC+41, INIT+3*, INIT+8, INIT+16, INIT+19, INIT+20, INIT+21
U EN+17, ORC+4, ORC+17, ORC+39, ORC+41, ORC+45, ORC+48, ORC+49, ORC+51, ORC+54
, ORC+55, ORC+57, ORC+60, ORC+66, ORC+71, INIT+1*, INIT+19, INIT+20, INIT+21, PARENT+7
VALUE PARENT+5~, PARENT+6*, PARENT+7*, PARENT+8
X EN+12~
XX EN+12~

Marked Items

Name Field # of Occurrence
$T(EN^RAHLR1A ORC+78
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All