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 |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: MAGJRPT

Package: Imaging

Routine: MAGJRPT


Information

MAGJRPT ;WIRMFO/JHC - Display Rad reports ; 3 Jul 2013 10:48 AM

Source Information

Source file <MAGJRPT.m>

Call Graph

Call Graph

Call Graph Total: 12

Package Total Call Graph
Radiology Nuclear Medicine 5 EN3^RAO7PC3  ^RAORD5  (PHARM,RDIO)^RARTUTL  SVTCOM^RAUTL11  EN2^RAUTL20  
Kernel 4 ^%ZIS  ^%ZISC  $$EC^%ZOSV  ($$FMTE,$$NOW)^XLFDT  
Imaging 2 $$PNAM^MAGJEX1  GETEXAM2^MAGJUTL1  
Uncategorized 1 DOCTEXT^BEHOTIU  

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
Imaging 4 MAGJ EXAM REPORT  MAGJ RADORDERDISP  MAGJEX1  MAGJORD  

Entry Points

Name Comments DBIA/ICR reference
ORD(MAGRPTY,DATA) ; Radiology Order Display
; RPC Call: MAGJ RADORDERDISP
; MAGRPTY holds indirect reference to returned data
;
ORDZ
COMMENTS(RADFN,RADTI,RACNI,MAGRPTY,DNODE,COMPLIC,MEDS,RDIOPHARM) ; add Complications & Tech Comments to output report
; Add Medications and Radiopharmaceuticals information to output
; RADFN, RADTI, & RACNI identify exam
; MAGRPTY is indirect reference wher output lines are to be stored
; DNODE holds reference for starting node for lines of output
; COMPLIC passes in complications data reference
; MEDS passes in Medications indicator
; RDIOPHARM passes in Radiopharmaceuticals reference
PHARMAS(TITLE,NODE) ; output lines of pharma data
TIUNOTE(RARPT,MAGRPTY,DNODE) ; FUT-70/IHS append Rad TIU Notes to report
; 1/2011--only works at IHS where TIU notes may exist for Radiology exams
; test for this by presence of DOCTEXT^BEHOTIU
; RARPT--exam pointer
; MAGRPTY--indirect reference to output file
; DNODE--starting node for lines of output
OPENDEV ;
RADRPT(MAGRPTY,DATA) ; Display rad report; 1st must pass integrity checks
; Note: adds an additional line of output for the Report Window header
; RPC is MAGJ EXAM REPORT
RPTZ
CKINTEG(REPLY,RADFN,RADTI,RACNI,RARPT,RADATA) ; check integrity between Exam, Report, and Image Group Headers
; This subroutine is used by other vrad programs
CK2
ERR ;
END ;

External References

Name Field # of Occurrence
^%ZIS OPENDEV+2
^%ZISC ORD+30
$$EC^%ZOSV ERR+1
DOCTEXT^BEHOTIU TIUNOTE+8, TIUNOTE+9
$$PNAM^MAGJEX1 CK2+2, CK2+3, CK2+4
GETEXAM2^MAGJUTL1 ORD+21, RADRPT+13
EN3^RAO7PC3 RADRPT+20
^RAORD5 ORD+28
PHARM^RARTUTL COMMENTS+31
RDIO^RARTUTL COMMENTS+38
SVTCOM^RAUTL11 COMMENTS+16
EN2^RAUTL20 CKINTEG+11
$$FMTE^XLFDT RADRPT+27
$$NOW^XLFDT RADRPT+27

Used in RPC

RPC Name Call Tags
MAGJ RADORDERDISP ORD
MAGJ EXAM REPORT RADRPT

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("ERRTN" ERR+2
^MAG(2005 - [#2005] CKINTEG+17, CKINTEG+18
^RA(78.1 - [#78.1] COMMENTS+13
^RADPT - [#70] ORD+16, COMMENTS+15
^RAO(75.1 - [#75.1] ORD+17
^RARPT - [#74] CKINTEG+6, CKINTEG+15, CKINTEG+16
^TMP($J ORD+4, ORD+22, ORD+35!, COMMENTS+16!, COMMENTS+24!, COMMENTS+27!, COMMENTS+35!, COMMENTS+43!, PHARMAS+2, PHARMAS+6
, RADRPT+6, RADRPT+14, RADRPT+21, RADRPT+23, RADRPT+24, RADRPT+26, RPTZ+2!
^VA(200 - [#200] COMMENTS+10

Label References

Name Line Occurrences
@( ERR+2
CK2 CKINTEG+5, CKINTEG+15
CKINTEG ORD+26, RADRPT+18
COMMENTS ORD+32, RADRPT+22
OPENDEV ORD+10
ORDZ ORD+11, ORD+15, ORD+18, ORD+26
PHARMAS COMMENTS+32, COMMENTS+39
RPTZ RADRPT+11, RADRPT+19, RADRPT+21
TIUNOTE ORD+33, RADRPT+28

Naked Globals

Name Field # of Occurrence
^( CKINTEG+16
^("RAE3" RPTZ+2!
^(2 ORD+22, RADRPT+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS OPENDEV+1~, OPENDEV+2*
ACN CKINTEG+10~
CKACN CKINTEG+3~, CKINTEG+6*, CKINTEG+9, CKINTEG+13, CKINTEG+14
CKDFN CKINTEG+3~, CKINTEG+6*, CKINTEG+7
COMPLIC ORD+7~, ORD+23*, ORD+32, COMMENTS~, COMMENTS+13, COMMENTS+14, RADRPT+8~, RADRPT+15*, RADRPT+22
CT COMMENTS+12~*, COMMENTS+13*, COMMENTS+15*, COMMENTS+23*, COMMENTS+41*, COMMENTS+42*, PHARMAS+3*, PHARMAS+4*, PHARMAS+5*, PHARMAS+7*
, TIUNOTE+7~, TIUNOTE+11*, TIUNOTE+13*
DATA ORD~, ORD+12, ORD+13, RADRPT~, RADRPT+10
DFN ORD+7~
DNODE COMMENTS~, COMMENTS+13, COMMENTS+15, COMMENTS+23, COMMENTS+41, COMMENTS+42, PHARMAS+3, PHARMAS+4, PHARMAS+5, PHARMAS+7
, TIUNOTE~, TIUNOTE+8, TIUNOTE+12, TIUNOTE+13, RADRPT+8~, RADRPT+23*, RADRPT+25*, RADRPT+26, RADRPT+27*
DUZ COMMENTS+10
HDR ORD+7~, ORD+22*, ORD+25*, ORD+31, RADRPT+8~, RADRPT+14*, RADRPT+17*, RPTZ+1
HI COMMENTS+19~, COMMENTS+20*
I ORD+25*, COMMENTS+20*, COMMENTS+21, COMMENTS+22*, RADRPT+17*, RADRPT+23*, RADRPT+24*, RADRPT+26, RADRPT+27*, CKINTEG+12~
, CKINTEG+13*
IEN CKINTEG+3~, CKINTEG+15*, CKINTEG+16*
IO ORD+30, OPENDEV+4
IO(0 ORD+30
IOP OPENDEV+1~, OPENDEV+2*
LINE PHARMAS+1~, PHARMAS+6*, PHARMAS+7
LINE1 COMMENTS+19~*, COMMENTS+21*
MAGCNI RADRPT+8~, RADRPT+10*, RADRPT+11, RADRPT+12, RADRPT+13, RADRPT+18, RADRPT+20, RADRPT+22, RADRPT+23, RADRPT+24
, RADRPT+26
MAGDFN RADRPT+8~, RADRPT+10*, RADRPT+11, RADRPT+12, RADRPT+13, RADRPT+18, RADRPT+20, RADRPT+22, RADRPT+23, RADRPT+24
, RADRPT+26
MAGDTI RADRPT+8~, RADRPT+10*, RADRPT+11, RADRPT+12, RADRPT+13, RADRPT+18, RADRPT+20, RADRPT+22
MAGIEN CKINTEG+3~, CKINTEG+16*, CKINTEG+17, CKINTEG+18
>> MAGJOB("USER" COMMENTS+9
MAGPRC RADRPT+8~, RADRPT+23*, RADRPT+24, RADRPT+26
MAGPSET CKINTEG+10~, CKINTEG+11
MAGPSET( CKINTEG+13
MAGRET ORD+7~, ORD+21, RADRPT+8~, RADRPT+13
MAGRPTY ORD~, ORD+4*, ORD+27, ORD+29*, ORD+31, ORD+32, ORD+33, ORDZ, COMMENTS~, COMMENTS+13
, COMMENTS+15, COMMENTS+23, COMMENTS+41, COMMENTS+42, PHARMAS+3, PHARMAS+4, PHARMAS+5, PHARMAS+7, TIUNOTE~, TIUNOTE+8
, TIUNOTE+12, TIUNOTE+13, RADRPT~, RADRPT+6*, RADRPT+22, RADRPT+26, RADRPT+27, RADRPT+28, RPTZRPTZ+1
ERR+1
MEDS ORD+8~, ORD+24*, ORD+32, COMMENTS~, COMMENTS+25, COMMENTS+40, RADRPT+9~, RADRPT+16*, RADRPT+22
MIXEDUP CKINTEG+3~, CKINTEG+4*, CKINTEG+5, CKINTEG+7*, CKINTEG+14*, CKINTEG+15, CKINTEG+16, CKINTEG+17*, CKINTEG+18*, CK2
CK2+1, CK2+2, CK2+3, CK2+4, CK2+5, CK2+6, CK2+8, CK2+9, CK2+12, CK2+13
CK2+14
NODE PHARMAS~, PHARMAS+2, PHARMAS+6*
OK CKINTEG+10~*, CKINTEG+13*, CKINTEG+14
POP ORD+7~, ORD+11, OPENDEV+3
QTMP COMMENTS+12~, COMMENTS+17*, COMMENTS+18*, COMMENTS+19, TIUNOTE+7~, TIUNOTE+11*, TIUNOTE+13*
RAACNT COMMENTS+26~, COMMENTS+30*, COMMENTS+34~, COMMENTS+37*
RACNI ORD+6~, ORD+12*, ORD+14, ORD+15, ORD+16, ORD+21, ORD+26, ORD+27, ORD+29*, ORD+32
, COMMENTS~, COMMENTS+15, COMMENTS+16, COMMENTS+28, CKINTEG~
RADATA ORD+22*, ORD+25, ORD+26, RADRPT+8~, RADRPT+14*, RADRPT+17, RADRPT+18, CKINTEG~, CKINTEG+8, CKINTEG+9
, CKINTEG+14
RADFN ORD+6~, ORD+12*, ORD+14, ORD+15, ORD+16, ORD+21, ORD+26, ORD+32, COMMENTS~, COMMENTS+15
, COMMENTS+16, COMMENTS+28, CKINTEG~, CKINTEG+7, CKINTEG+17, CK2+3, CK2+4
RADTI ORD+6~, ORD+12*, ORD+14, ORD+15, ORD+16, ORD+21, ORD+26, ORD+27, ORD+29*, ORD+32
, COMMENTS~, COMMENTS+15, COMMENTS+16, COMMENTS+28, CKINTEG~
RAOIFN ORD+6~, ORD+16*, ORD+17
RAPGE ORD+6~, ORD+28*
RAPRTSET CKINTEG+10~, CKINTEG+11*
RARPT ORD+6~, ORD+13*, ORD+15, ORD+26, ORD+33, TIUNOTE~, TIUNOTE+8, TIUNOTE+9, RADRPT+8~, RADRPT+10*
, RADRPT+18, RADRPT+28, CKINTEG~, CKINTEG+5, CKINTEG+6, CKINTEG+15, CKINTEG+16, CKINTEG+18, CK2+7, CK2+10
RAUTOE COMMENTS+26~, COMMENTS+29*, COMMENTS+34~, COMMENTS+36*
RAX ORD+6~, ORD+28*
RDIOPHARM ORD+8~, ORD+24*, ORD+32, COMMENTS~, COMMENTS+33, COMMENTS+38, COMMENTS+40, RADRPT+9~, RADRPT+16*, RADRPT+22
REF COMMENTS+26~, COMMENTS+28*, COMMENTS+31
REPLY ORD+7~, ORD+9*, ORD+11*, ORD+15*, ORD+18*, ORD+26*, ORD+34*, ORDZ, RADRPT+8~, RADRPT+12*
, RADRPT+18, RADRPT+19*, RADRPT+21*, RADRPT+29*, RPTZ, CKINTEG~, CKINTEG+4*, CK2+3*, CK2+4*, CK2+7*
CK2+11*, CK2+16*
REQONLY ORD+7~, ORD+13*, ORD+26
T CKINTEG+12~, CKINTEG+13*, CK2+6~*, CK2+7, CK2+9~*, CK2+10, CK2+13~, CK2+14*, CK2+15
TEXT TIUNOTE+7~, TIUNOTE+10
TITLE PHARMAS~, PHARMAS+4
TMPDATA ORD+7~, ORD+27*, ORD+29
TXT COMMENTS+19~, COMMENTS+21*, COMMENTS+23
U ORD+12, ORD+13, ORD+16, ORD+23, ORD+24, ORD+25, COMMENTS+13, COMMENTS+15, RADRPT+10, RADRPT+15
, RADRPT+16, RADRPT+17, CKINTEG+6, CKINTEG+7, CKINTEG+9, CKINTEG+13, CKINTEG+14, CKINTEG+17, CKINTEG+18, CK2+2
CK2+6, CK2+9, CK2+13, CK2+14
X COMMENTS+14*, COMMENTS+15, RADRPT+8~, CKINTEG+3~, CKINTEG+6*, CKINTEG+17*, CKINTEG+18*, CK2+2*, CK2+3, CK2+4
CK2+10*, CK2+11, CK2+13*, CK2+15*, CK2+16
XX ORD+7~, ORD+22*, ORD+23, ORD+24, COMMENTS+12~, COMMENTS+19*, COMMENTS+20*, COMMENTS+21*, COMMENTS+22*, TIUNOTE+7~
, TIUNOTE+13*, RADRPT+14*, RADRPT+15, RADRPT+16

Marked Items

Name Field # of Occurrence
$T(DOCTEXT^BEHOTIU TIUNOTE+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All