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

Package: Radiology Nuclear Medicine

Routine: RAPXRM


Information

RAPXRM ;HOIFO/SWM,GJC - API for Clinical Reminders ;04 Mar 2019 12:02 PM

Source Information

Source file <RAPXRM.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 3 $$NOW^XLFDT  (BMES,MES)^XPDUTL  $$NNT^XUAF4  
VA FileMan 2 $$GET1^DID  $$GET1^DIQ  
Clinical Reminders 1 (ADDERROR,COMMSG,DETIME,ERRMSG)^PXRMSXRM  
Radiology Nuclear Medicine 1 ($$RSTAT,$$UL)^RAO7PC1A  

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

Package Total Caller Graph
Clinical Reminders 1 PXRMRAD  
Order Entry Results Reporting 1 ORWGAPIA  
Radiology Nuclear Medicine 1 RACTRG9  

Entry Points

Name Comments DBIA/ICR reference
EN1(RADAS,RARM) ;retrieve data from Clin. Rem.'s new style index "ACR"
; Input:
; RADAS = last subscript of (required), for example:
; ^PXRMINDX(70,"IP",43,1,2,2920720.1049,"2;DT;7079279.895;P;3;0")
; ^PXRMINDX(70,"PI",9,3,45,2921204.155,"9;DT;7078795.8449;P;1;0")
; RARM = array name passed by reference (required)
; Output:
; RARM("aaa") = external value, eg.:
; RARM("EXAM D/T") = Exam Date and time in yyymmdd.hhmm format
; RARM("EXAM STATUS") = Exam Status name
; RARM("PROCEDURE") = Procedure name
; RARM("INTERPRETING PHYSICIAN") = Primary Staff; else Primary Resident
; If exam node doesn't exist, then RARM is undefined
; RARM("RPT STATUS") = Report status name
; RARM("DIV") = Rad/Nuc Med Division Name (file 4) ^ Station #
; RARM("I-LOC") = Imaging Location name
RAD ;Build the index for RAD/NUC MED PATIENT.
KRAD(X,DA) ;Delete index for RAD/NUC MED PATIENT file.
SRAD(X,DA) ;Set index for RAD/NUC MED PATIENT file.

External References

Name Field # of Occurrence
$$GET1^DID RAD+5, RAD+51
$$GET1^DIQ EN1+27, EN1+35
ADDERROR^PXRMSXRM RAD+24, RAD+31, RAD+39
COMMSG^PXRMSXRM RAD+50
DETIME^PXRMSXRM RAD+46
ERRMSG^PXRMSXRM RAD+48
$$RSTAT^RAO7PC1A EN1+43
$$UL^RAO7PC1A EN1+43
$$NOW^XLFDT RAD+53
BMES^XPDUTL RAD+10
MES^XPDUTL RAD+12, RAD+19, RAD+45
$$NNT^XUAF4 EN1+25

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: RAD+20

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GET1^DIQ
^RADPT - [#70] GET1^DID
^RA(79.1 - [#79.1] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PXRMINDX(70 RAD+4!, RAD+40*, RAD+41*, RAD+51*, RAD+52*, RAD+53*, KRAD+4!, KRAD+5!, SRAD+6*, SRAD+7*
^RA(72 - [#72] EN1+32
^RA(78.3 - [#78.3] EN1+44, EN1+46
^RADPT - [#70] EN1+22, EN1+29, EN1+46, RAD+15, RAD+21, RAD+26, RAD+27, RAD+33, RAD+34
^RADPT(0 RAD+6
^RAMIS(71 - [#71] EN1+33

Naked Globals

Name Field # of Occurrence
^( EN1+46
^(0 EN1+46

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D0 RAD+1~, RAD+14*, RAD+15*, RAD+21, RAD+23, RAD+26, RAD+27, RAD+28, RAD+33, RAD+34
D1 RAD+1~, RAD+25*, RAD+26*, RAD+27, RAD+28, RAD+33, RAD+34
D2 RAD+1~, RAD+32*, RAD+33*, RAD+34, RAD+35
DA RAD+1~, RAD+28*, RAD+30, RAD+35, KRAD~, KRAD+3, SRAD~, SRAD+5
DA(1 KRAD+2, KRAD+3, SRAD+4, SRAD+5
DA(2 KRAD+3, KRAD+4, KRAD+5, SRAD+5, SRAD+6, SRAD+7
DAS RAD+1~, RAD+35*, RAD+38, RAD+40, RAD+41, KRAD+1~, KRAD+3*, KRAD+4, KRAD+5, SRAD+3~
, SRAD+5*, SRAD+6, SRAD+7
DATE RAD+27*, RAD+29, RAD+40, RAD+41, KRAD+1~, KRAD+2*, KRAD+4, KRAD+5, SRAD+3~, SRAD+4*
, SRAD+6, SRAD+7
DFN RAD+1~, RAD+21*, RAD+22, RAD+40, RAD+41
DUZ RAD+52
END RAD+1~, RAD+43*, RAD+46, RAD+50
ENTRIES RAD+1~, RAD+6*, RAD+7, RAD+11
>> ETEXT RAD+23*, RAD+24, RAD+30*, RAD+31, RAD+38*, RAD+39
GLOBAL RAD+1~, RAD+5*, RAD+24, RAD+31, RAD+39, RAD+48, RAD+50
I EN1+20~, EN1+45*, EN1+46*
IND RAD+1~, RAD+14*, RAD+16*, RAD+17, RAD+18, RAD+20
J EN1+20~, EN1+46*
NE RAD+1~, RAD+14*, RAD+42*, RAD+44, RAD+50
NERROR RAD+1~, RAD+14*, RAD+24, RAD+31, RAD+39, RAD+48, RAD+50
PROC RAD+1~, RAD+36*, RAD+37, RAD+40, RAD+41
RA0 EN1+20~, EN1+29*, EN1+30, EN1+32, EN1+33, EN1+34, EN1+43, EN1+44
RACNI EN1+20~, EN1+21*, EN1+29, EN1+46
RADAS EN1~, EN1+19, EN1+21
RADFN EN1+20~, EN1+21*, EN1+22, EN1+29, EN1+46
RADTI EN1+20~, EN1+21*, EN1+22, EN1+29, EN1+31, EN1+46
RARM EN1~, EN1+17!
RARM("DIV" EN1+25*
RARM("EXAM D/ T" , EN1+31*
RARM("EXAM ST ATUS" , EN1+32*
RARM("I-LOC" EN1+27*
RARM("INTERPR ETING PHYSICIAN" , EN1+36*
RARM("PDX" EN1+44*
RARM("PROCEDURE" EN1+33*
RARM("RPT STA TUS" , EN1+43*
RARM("SDX" EN1+46*
RARPT EN1+20~, EN1+43*
RAY2 EN1+20~, EN1+22*, EN1+25, EN1+27
START RAD+2~, RAD+13*, RAD+46, RAD+50
TEMP RAD+2~, RAD+34*, RAD+36
TENP RAD+2~, RAD+7*, RAD+8*, RAD+9*, RAD+17
TEXT RAD+2~, RAD+11*, RAD+12, RAD+18*, RAD+19, RAD+44*, RAD+45
U EN1+25, EN1+27, EN1+32, EN1+33, EN1+34, EN1+43, EN1+44, EN1+46, RAD+6, RAD+21
RAD+27, RAD+36
X EN1+20~, EN1+34*, EN1+35*, EN1+36, KRAD~, SRAD~
X(1 KRAD+4, KRAD+5, SRAD+6, SRAD+7
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All