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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RADEM1

Package: Radiology Nuclear Medicine

Routine: RADEM1


Information

RADEM1 ;HISC/GJC-Display Patient Demographics ; May 21, 2020@10:38:36

Source Information

Source file <RADEM1.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 6 C^%DTC  $$EXTERNAL^DILFD  Y^DIQ  ^DIR  ^DIWP  ^DIWW  
Radiology Nuclear Medicine 3 ($$DATEPRT,$$SSANVAL,$$USESSAN)^RAHLRU1  D^RAUTL  EN1^RAUTL20  
Kernel 2 HOME^%ZIS  $$FMTE^XLFDT  

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

Package Total Caller Graph
Radiology Nuclear Medicine 4 RADEM  RADEM2  RAORD1  RAPROD  

Entry Points

Name Comments DBIA/ICR reference
EXAM
Q
RACN
PRT
ORDER ; Check for pat rad orders before registering a patient in rad
; Created by GJC@1/3/94
HDR ; Header
; Created by GJC@1/3/94 ; modified for SSAN by RTK 3/19/09
; The variable: RAOPT("ORDEREXAM") is defined in the entry action of
; the option RA ORDEREXAM. It is subsequently kill in the exit action
; of the option.
CM(RADFN,RADTI,RACNI) ;Return the contrast media used while performing an

External References

Name Field # of Occurrence
C^%DTC EXAM+1
HOME^%ZIS HDR+5
$$EXTERNAL^DILFD CM+9
Y^DIQ ORDER+12, ORDER+13
^DIR PRT+24, ORDER+21
^DIWP EXAM+12
^DIWW EXAM+12
$$DATEPRT^RAHLRU1 PRT+21
$$SSANVAL^RAHLRU1 PRT+19
$$USESSAN^RAHLRU1 PRT+21, PRT+22, ORDER+14, ORDER+15, ORDER+18, ORDER+19, HDR+6, HDR+7, HDR+8, HDR+9
D^RAUTL EXAM+2
EN1^RAUTL20 PRT+17
$$FMTE^XLFDT ORDER+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRT+25
Function Call: WRITE
  • Prompt: !?18,$E(RA751(2),1,28),?56,"Ord "
  • Line Location: ORDER+14
Function Call: WRITE
  • Prompt: !?10,$E(RA751(2),1,28),?51,"Ord "
  • Line Location: ORDER+15
Function Call: WRITE
  • Prompt: $S(RA751(16)]"":$$FMTE^XLFDT(RA751(16),"2D"),1:"")
  • Line Location: ORDER+16
Function Call: WRITE
  • Prompt: ?68,$E(RA751(20),1,12)
  • Line Location: ORDER+18
Function Call: WRITE
  • Prompt: ?67,$E(RA751(20),1,12)
  • Line Location: ORDER+19
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ORDER+22
Function Call: WRITE
  • Prompt: !!,"Case #",?18,"Last 5 Procedures/New Orders",?47,"Exam Dt",?56,"Exam Status",?68,"Imaging Loc."
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,"----------------",?18,"----------------------------",?47,"--------",?56,"-----------",?68,"------------"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!,"Case #",?10,"Last 5 Procedures/New Orders",?39,"Exam Date",?51,"Status of Exam",?67,"Imaging Loc."
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,"------",?10,"----------------------------",?39,"---------",?51,"--------------",?67,"------------"
  • Line Location: HDR+9
Routine Call
  • DIR
  • Line Location:
    • PRT+24
    • ORDER+21
Routine Call
  • %ZIS
  • Line Location:
    • HDR+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
70.3225 EXTERNAL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(75.1 ORDER+12, ORDER+13
^RA(72 - [#72] PRT+11, PRT+12, PRT+15
^RA(79.1 - [#79.1] RACN
^RA(79.2 - [#79.2] PRT+13
^RADPT - [#70] EXAM+2, RACN+1, PRT+3, PRT+4, PRT+7, CM+7, CM+8
^RADPT("AO" ORDER+5
^RAMIS(71 - [#71] PRT+1
^RAO(75.1 - [#75.1] ORDER+3, ORDER+8
^SC - [#44] RACN
^UTILITY($J EXAM+9!

Label References

Name Line Occurrences
$$CM EXAM+11
HDR EXAM, PRT+25, ORDER+22
ORDER EXAM+4
PRT RACN+1
Q EXAM+3
RACN EXAM+2

Naked Globals

Name Field # of Occurrence
^( EXAM+2, RACN+1
^(0 EXAM+2, RACN, RACN+1, PRT+1, PRT+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% Q!
%H Q!
>> C ORDER+12*, ORDER+13*
DIC Q!
DIR PRT+24~, ORDER+21!
DIR(0 PRT+24*, ORDER+21*
DIROUT ORDER+2~
DIRUT ORDER+2~
DIWF EXAM+9~, EXAM+12*
DIWL EXAM+9~, EXAM+12*
DIWR EXAM+9~
DIWT EXAM+9~
DT EXAM+1
DTIME EXAM+14
DTOUT ORDER+2~
DUOUT ORDER+2~
I CM+6~*, CM+7*, CM+8
I(0 CM+8*, CM+9
IOF PRT+25, ORDER+22, HDR+5
IOSL PRT+23, ORDER+20
IOST PRT+23, ORDER+20
POP Q!
RA751 ORDER+2~
RA751(0 ORDER+8*, ORDER+10, ORDER+11
RA751(16 ORDER+10*, ORDER+16
RA751(2 ORDER+10*, ORDER+12*, ORDER+14, ORDER+15
RA751(20 ORDER+11*, ORDER+13*, ORDER+18, ORDER+19
RA751(5 ORDER+8*, ORDER+9
RABAR Q!, PRT+1*, PRT+3*, PRT+4*, PRT+6*, PRT+21, PRT+22
RABARFL EXAM+6, Q!, PRT+3*
RACHKDT EXAM+1*, EXAM+2, Q!, RACN+1, PRT+3, PRT+4
RACHKDT1 EXAM+1*, Q!, PRT+5
RACN Q!, PRT+15*, PRT+20, PRT+22
RACNDSP PRT+19~, PRT+20*, PRT+21
RACNFL EXAM+8, Q!, PRT+6*
RACNI Q!, RACN+1*, PRT+3, PRT+4, PRT+7, PRT+19, CM~, CM+7, CM+8
RACODE Q!, PRT+3*, PRT+4*, PRT+6*, PRT+21, PRT+22
RACONT EXAM+14, Q!
RADATE EXAM+2*, Q!, PRT+22
RADFN EXAM+2, RACN+1, PRT+3, PRT+4, PRT+7, PRT+19, ORDER+3, ORDER+5, CM~, CM+7
, CM+8
RADISP PRT+17~, PRT+18*, PRT+21, PRT+22
RADTE EXAM+2*, Q!, RACN+1, PRT+3, PRT+4, PRT+5, PRT+21
RADTI EXAM+2*, Q!, RACN+1, PRT+3, PRT+4, PRT+7, PRT+19, CM~, CM+7, CM+8
RAESITY PRT~, PRT+12*, PRT+13
RAITYPE PRT~, PRT+13*, PRT+14*, PRT+15
>> RALOC EXAM+2*, RACN*, PRT+21, PRT+22
RALP ORDER+2~*, ORDER+3*, ORDER+5, ORDER+8
RAMEMLOW PRT+17~, PRT+18
>> RAOPT("ORDEREXAM" HDR+5
RAORFL EXAM+7, Q!, PRT+4*
RAPR1 Q!, PRT+1*, PRT+21, PRT+22
RAPRI Q!, PRT+1*
RAPRTSET PRT+17~, PRT+18
RASEQ EXAM+2*, EXAM+5, Q!, RACN+1, PRT+21*, PRT+22*
RASSAN PRT+19~*, PRT+20
RAST Q!, PRT+11*, PRT+21, PRT+22
RASTI Q!, PRT+10*, PRT+11, PRT+12, PRT+15
RAXIT EXAM*, EXAM+2, EXAM+3, EXAM+14, Q!, RACN+1, PRT+24*, PRT+25, ORDER+2*, ORDER+3
, ORDER+21*, ORDER+22
RAZCNI EXAM+11, Q!, PRT+7*
RAZDFN EXAM+10, EXAM+11, Q!, PRT+7*
RAZDTI EXAM+11, Q!, PRT+7*
U PRT+2, PRT+12, PRT+13, ORDER+8, ORDER+10, ORDER+11, ORDER+12, ORDER+13, CM+8
X EXAM+1, EXAM+9~, EXAM+10*, EXAM+11*, EXAM+14*, CM+6~*, CM+9*, CM+11*, CM+12*, CM+13
>> X1 EXAM+1*
>> X2 EXAM+1*
>> Y EXAM+2*, RACN+1*, PRT+1, PRT+2, PRT+10, PRT+15, PRT+24, ORDER+12*, ORDER+13*, ORDER+21
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 |  Naked Globals |  Local Variables  | All