Routine: MAGNUTL2

Information

MAGNUTL2 ;WOIFO/NST - VistRad subroutines for RPC calls ; NOV 19, 2018@1:42PM

Package	Total	Call Graph
Imaging	5	PRIOR1^MAGJEX2 FACLIST^MAGJLST1 GETEXAM2^MAGJUTL1 $$RACPRS^MAGNU003 CRTITEM^MAGVIM01
Kernel	1	$$STA^XUAF4
Master Patient Index VistA	1	($$GETICN,GETICN)^MPIF001
Toolkit	1	$$GET^XPAR
VA FileMan	1	$$GET1^DIQ

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 4

Package	Total	Caller Graph
Imaging	3	MAG PRECACHE MAGJEX2 MAGNPCHE
Kernel	1	^ORD(101

Entry Points

Name	Comments	DBIA/ICR reference
PRECACHE	; Entry point from HL7 processing, to initiate precache at ; time of radiology "Register Patient for Exam" RA REG protocol ; Do not process if the exam is being Canceled (RACANC true)
CACHE(RARPT)	; cache this case's images ; Input: RARPT: IEN in RAD/NUC MED REPORTS file (#74)
NWRKITEM(MAGOUT,RARPT)	;Create New MAG WORK ITEM ; RARPT - IEN in RAD/NUC MED REPORTS file (#74)
CPTWI(RADFN,RADTI,RACNI)
GCPRSID(RARPT)	; return SITE, ICN, CPRSContextID

External References

Name	Field # of Occurrence
$$GET1^DIQ	NWRKITEM+8, GCPRSID+5
PRIOR1^MAGJEX2	PRECACHE+9
FACLIST^MAGJLST1	CPTWI+12
GETEXAM2^MAGJUTL1	CPTWI+5
$$RACPRS^MAGNU003	NWRKITEM+6, GCPRSID+3
CRTITEM^MAGVIM01	NWRKITEM+33, CPTWI+45
$$GETICN^MPIF001	NWRKITEM+17, CPTWI+22, GCPRSID+10
GETICN^MPIF001	NWRKITEM+16, CPTWI+21, GCPRSID+10
$$GET^XPAR	PRECACHE+4
$$STA^XUAF4	NWRKITEM+27, CPTWI+39, GCPRSID+7

Used in HL7 Interface

HL7 Protocol Name	Call Tags
MAG PRECACHE	PRECACHE

FileNo	Call Tags
^RARPT - [#74]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	CPTWI+4!, CPTWI+6, CPTWI+7!

Label References

Name	Line Occurrences
CPTWI	PRECACHE+10
NWRKITEM	CACHE+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CRTAPP	NWRKITEM+3~, NWRKITEM+31, NWRKITEM+33, CPTWI+2~, CPTWI+43, CPTWI+45
CRTUSR	NWRKITEM+3~, NWRKITEM+29, NWRKITEM+33, CPTWI+2~, CPTWI+41, CPTWI+45
DFN	NWRKITEM+3~, NWRKITEM+8, NWRKITEM+15, NWRKITEM+17, GCPRSID+1~, GCPRSID+5, GCPRSID+10, GCPRSID+11
DUZ	NWRKITEM+29, CPTWI+41
DUZ(2	NWRKITEM+10, CPTWI+16, GCPRSID+7
ICN	NWRKITEM+3~, NWRKITEM+17, NWRKITEM+18, CPTWI+2~, CPTWI+22, CPTWI+23, GCPRSID+1~, GCPRSID+9, GCPRSID+10, GCPRSID+11
J	NWRKITEM+3~, NWRKITEM+13, NWRKITEM+14, NWRKITEM+15, NWRKITEM+18, NWRKITEM+20, CPTWI+2~, CPTWI+19, CPTWI+20, CPTWI+23 , CPTWI+28, CPTWI+31, CPTWI+32*
MAGCPT	CPTWI+1~, CPTWI+8*, CPTWI+9, CPTWI+31
MAGCTXID	NWRKITEM+3~, NWRKITEM+6, NWRKITEM+7, NWRKITEM+14, GCPRSID+1~, GCPRSID+3, GCPRSID+4, GCPRSID+11
MAGDATA	CPTWI+1~, CPTWI+6*, CPTWI+8
MAGI	CPTWI+1~, CPTWI+26, CPTWI+27, CPTWI+28
MAGOUT	CACHE+3~, CACHE+4, NWRKITEM~, NWRKITEM+7*, NWRKITEM+33, CPTWI+1~, CPTWI+12, CPTWI+45
MAGOUT(	CPTWI+27, CPTWI+28
MAGOUT(0	CPTWI+13
MAGRET	CPTWI+1~, CPTWI+5
MSGTAGS	NWRKITEM+3~, NWRKITEM+33, CPTWI+2~, CPTWI+45
MSGTAGS(	NWRKITEM+14, NWRKITEM+15, NWRKITEM+18, NWRKITEM+20, CPTWI+20, CPTWI+23, CPTWI+28, CPTWI+31, CPTWI+32*
PLACEID	NWRKITEM+3~, NWRKITEM+10, NWRKITEM+27, NWRKITEM+33, CPTWI+2~, CPTWI+16, CPTWI+39, CPTWI+45, GCPRSID+1~, GCPRSID+7* , GCPRSID+11
PRIORITY	NWRKITEM+3~, NWRKITEM+25, NWRKITEM+33, CPTWI+2~, CPTWI+37, CPTWI+45
>> RACANC	PRECACHE+7
RACNI	PRECACHE+7, PRECACHE+9, PRECACHE+10, CPTWI~, CPTWI+5
RADFN	PRECACHE+7, PRECACHE+9, PRECACHE+10, CPTWI~, CPTWI+5, CPTWI+12, CPTWI+20, CPTWI+22
RADTI	PRECACHE+7, PRECACHE+9, PRECACHE+10, CPTWI~, CPTWI+5
RARPT	CACHE~, CACHE+4, NWRKITEM~, NWRKITEM+6, NWRKITEM+8, GCPRSID~, GCPRSID+3, GCPRSID+5
RET	PRECACHE+6~*, PRECACHE+9
SSEP	NWRKITEM+3~, NWRKITEM+5, NWRKITEM+7, CPTWI+2~, CPTWI+15
STATUS	NWRKITEM+3~, NWRKITEM+24, NWRKITEM+33, CPTWI+2~, CPTWI+36, CPTWI+45
SUBTYPE	NWRKITEM+3~, NWRKITEM+23, NWRKITEM+33, CPTWI+2~, CPTWI+35, CPTWI+45
TYPE	NWRKITEM+3~, NWRKITEM+22, NWRKITEM+33, CPTWI+2~, CPTWI+34, CPTWI+45
U	PRECACHE+9, CPTWI+8

Marked Items

Name	Field # of Occurrence
$T(GETICN^MPIF001	NWRKITEM+16, CPTWI+21, GCPRSID+10

Customize PDF page

Package: Imaging