Routine: MAGDCCS2

Information

MAGDCCS2 ;WOIFO/MLH - DICOM Correct - Clinical Specialties - subroutines ; Apr 27, 2022@12:03:33

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
Imaging	2	$$GMRCACN^MAGDFCNV ($$ISIHS,$$PIDLABEL)^MAGSPID
VA FileMan	2	^DIC ($$GET1,GETS)^DIQ
Kernel	1	$$DT^XLFDT
Registration	1	DEM^VADPT

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

Package	Total	Caller Graph
Imaging	1	MAGDCCS

Entry Points

Name	Comments	DBIA/ICR reference
EN	; ; MAGDY variable to be created during this execution.
PTINFO()	;
ONE	; Process the single entry that was selected. ; MAGDFN,MAGX variables expected from EN
MAGDY	;

External References

Name	Field # of Occurrence
^DIC	EN+13
$$GET1^DIQ	EN+16
GETS^DIQ	PTINFO+8, ONE+15
$$GMRCACN^MAGDFCNV	MAGDY+2
$$ISIHS^MAGSPID	PTINFO+3
$$PIDLABEL^MAGSPID	ONE+22
DEM^VADPT	PTINFO+5
$$DT^XLFDT	EN+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"* Select a request/consult with whose *" Line Location: EN+4
Function Call: WRITE	Prompt: !,"* TIU note to associate this image *" Line Location: EN+5
Function Call: WRITE	Prompt: !!,"This consult has been cancelled and cannot be selected." Line Location: EN+17
Function Call: WRITE	Prompt: !,"PATIENT: ",MAGNME,?51,$$PIDLABEL^MAGSPID(),": ",MAGPID Line Location: ONE+22
Function Call: WRITE	Prompt: !,"Req/Con No.",?13,"Procedure",?38,"To Service",?58,"Req Date" Line Location: ONE+23
Function Call: WRITE	Prompt: !,"-----------",?13,"---------",?38,"----------------",?58,"--------" Line Location: ONE+24
Function Call: WRITE	Prompt: !,MAGCASE,?13,MAGPRC,?38,MAGLOC,?58,MAGDATE Line Location: ONE+25
Function Call: WRITE	Prompt: !,"Exam status: ",MAGEXST," "," ",$G(MAGPST) Line Location: ONE+26
Routine Call	DIC Line Location: EN+13

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^GMR(123 - [#123]	Classic Fileman Calls, GET1^DIQ, GETS^DIQ
^DPT - [#2]	GETS^DIQ

Label References

Name	Line Occurrences
$$PTINFO	ONE+11
MAGDY	ONE+27
ONE	EN+21

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BEG	ONE+3~
CASE	ONE+3~
CDATE	ONE+3~
CS	ONE+3~
D	EN+2~, EN+8*
DATA	ONE+3~
DFN	PTINFO+4~, PTINFO+5*
DIC	EN+2~, EN+6*
DIC("A"	EN+7*
DIC("W"	EN+9, EN+10, EN+11*
DIC(0	EN+6*
DO	EN+2~
DUOUT	EN+2~, EN+14
DZ	EN+2~, EN+8*
END	ONE+3~
FLDS	ONE+3~
INFO	EN+2~, PTINFO+1~, PTINFO+3, PTINFO+5, PTINFO+6, PTINFO+10, PTINFO+11, PTINFO+12, ONE+3~, ONE+11* , ONE+12
MAGBEG	EN+2~, EN+3*
MAGCASE	ONE+3~, ONE+13*, ONE+15, ONE+25, MAGDY+2, MAGDY+4!
MAGCNI	ONE+3~, ONE+14*, MAGDY+3, MAGDY+4!
MAGDATE	ONE+3~, ONE+14, ONE+20, ONE+25
MAGDFN	EN+2~, EN+19, PTINFO+2, PTINFO+5, PTINFO+8, PTINFO+11, PTINFO+12, ONE+2, ONE+11, MAGDY+2
MAGDTI	ONE+3~, ONE+14*, MAGDY+3, MAGDY+4!
MAGDY	MAGDY+1!, MAGDY+2, MAGDY+3
MAGEND	EN+2~, EN+3*
MAGERR	PTINFO+1~, PTINFO+9
MAGEXST	ONE+4~, ONE+14*, ONE+26
MAGIENS	ONE+9~, ONE+17*, ONE+18, ONE+19, ONE+20, ONE+21
MAGLOC	ONE+4~, ONE+14, ONE+19, ONE+25
MAGNME	EN+2~, ONE+4~, ONE+12*, ONE+22, MAGDY+2, MAGDY+4!
MAGOUT	EN+2~, PTINFO+1~, PTINFO+10, ONE+4~
MAGOUT(2	PTINFO+11, PTINFO+12
MAGPID	EN+2~, ONE+12*, ONE+22, MAGDY+2, MAGDY+4!
MAGPIEN	ONE+4~, ONE+14*, MAGDY+3, MAGDY+4!
MAGPRC	ONE+4~, ONE+14, ONE+18, ONE+25, MAGDY+3, MAGDY+4!
MAGPSET	ONE+4~
MAGPST	ONE+4~, ONE+14, ONE+21, ONE+26, MAGDY+3
MAGRCARY	ONE+8~, ONE+15!
MAGRCARY(123	ONE+17, ONE+18, ONE+19, ONE+20, ONE+21
MAGRPT	ONE+4~
MAGX	EN+2~, EN+19*, ONE+2, ONE+11, ONE+13
MAGXX	EN+2~
MAPST	MAGDY+4!
PP	ONE+5~
PSET	ONE+5~
RACNI	ONE+6~
RADFN	ONE+6~
RADTI	ONE+6~
RAENTRY	ONE+5~
RAMEMLOW	ONE+5~
RAPRTSET	ONE+5~
RARPT	ONE+6~
RIEN	ONE+5~
STAT	ONE+5~
U	EN+19, ONE+13
VA	PTINFO+4~
VA("PID"	PTINFO+6
VADM	PTINFO+4~
VADM(1	PTINFO+6
X	ONE+5~
X1	ONE+5~
X2	ONE+5~
XX	ONE+5~
Y	EN+2~, EN+16, EN+19
Y(0	EN+15, EN+19

Customize PDF page

Package: Imaging