Routine: MAGVRS51

Information

MAGVRS51 ;WOIFO/DAC/JSL/NST - Utilities for RPC calls for DICOM file processing ; 7 Jun 2012 2:43 PM

Package	Total	Call Graph
VA FileMan	6	^DIC $$GET1^DID (,FILE,UPDATE)^DIE $$FLDNUM^DILFD ($$GET1,EN,GETS)^DIQ ^DIR
Imaging	3	$$FM2IDF^MAGVAF01 $$LOOKUP^MAGVORDR SETFDA^MAGVRS44
Master Patient Index VistA	1	($$GETICN,GETICN)^MPIF001
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: 6

Package	Total	Caller Graph
Imaging	6	MAGV AE SEC MX SETTINGS MAGV CREATE DICOM FAILED IMAGE MAGV DELETE DICOM FAILED IMAGE MAGV DICOM GET COUNT MAGV GET DICOM FAILED IMAGE MAGV SET DICOM FAILED IMAGE

Entry Points

Name	Comments	DBIA/ICR reference
OUTSEP()	; Name value separator for output data ie. NAME\|TESTPATIENT
MULTISEP()	; Name value separator for multiple option values ie. READ\|1`WRITE\|1`DELETE\|0
STATSEP()	; Status and Result separator ie. -3``No record IEN
INPUTSEP()	; Name value separator for input data ie. NAME`TESTPATIENT
DCRCTSET(OUT,ATTS)	; Set DICOM Correct data into file 2006.575
DCRCTGET(OUT,MACHID)	; Get DICOM Correct data from file 2006.575 ; Return record data for all fixed and deleted images of machine ID provided
DCRCTCNT(OUT,MACHID,SERVTYPE)	; Get count of entries with provided machine id and service type from file 2006.575
DCRCTDEL(OUT,FILEPATH)	; DICOM Correct delete entry
REFRESH(OUT,IEN,OUTI)	; Retrieve specified file data attributes
REFRESHF(OUT,IEN,OUTI)	; Retrieve specified file data attributes - Fixed Information
REFRESHP(OUT,DFN,OUTI)	; Retrieve specified file data attributes - Patient Information
MULTIPLE(FILE,FIELD)	; Process multiple DB entries
INTRFACE	; Entry for AE INSTANCE and SECURITY MATRIX interface
AEINTR2(Y)	; Edit/Add AE Instance ; Select AE Instance
AEINTR3(IEN,NEW)	; DICOM AE SECURITY MATRIX User Interface - Allows user to add and edit AE entries
AEINTR6(SMIEN,I)	; Display DICOM AE SECURITY MATRIX entries for a given AE Instance
OUTLINE(Y)

External References

Name	Field # of Occurrence
^DIC	AEINTR2+7
$$GET1^DID	MULTIPLE+4, AEINTR3+25
^DIE	AEINTR2+25, AEINTR2+32, AEINTR3+7, AEINTR3+32, AEINTR3+33
FILE^DIE	DCRCTSET+18, DCRCTSET+24, DCRCTSET+30, AEINTR3+18
UPDATE^DIE	DCRCTSET+10, DCRCTDEL+7
$$FLDNUM^DILFD	MULTIPLE+2
$$GET1^DIQ	DCRCTGET+21, DCRCTCNT+6, REFRESH+6, REFRESHF+7, REFRESHP+6, AEINTR3+26, AEINTR6+7, AEINTR6+8
EN^DIQ	AEINTR2+15
GETS^DIQ	OUTLINE+3
^DIR	AEINTR2+30, AEINTR3+31
$$FM2IDF^MAGVAF01	DCRCTGET+29
$$LOOKUP^MAGVORDR	DCRCTGET+24
SETFDA^MAGVRS44	DCRCTSET+4
$$GETICN^MPIF001	DCRCTGET+31
GETICN^MPIF001	DCRCTGET+31
DEM^VADPT	DCRCTGET+27

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"DICOM AE SECURITY MATRIX APPLICATION EDIT" Line Location: INTRFACE+3
Function Call: WRITE	Prompt: ! Line Location: AEINTR2+31
Function Call: WRITE	Prompt: !!,"Flag Names",?20,"Flag Values",! Line Location: AEINTR3+22
Function Call: WRITE	Prompt: "-------------------------------",! Line Location: AEINTR3+23
Function Call: WRITE	Prompt: FLAGNAME,?20,FLAGVALU,! Line Location: AEINTR3+27
Function Call: WRITE	Prompt: !! Line Location: AEINTR6+3
Function Call: WRITE	Prompt: $P(I,U,1)_") "_DSERVICE_" "_DROLE,! Line Location: AEINTR6+9
Function Call: WRITE	Prompt: "No DICOM AE SECURITY MATRIX entries for this AE INSTANCE",! Line Location: AEINTR6+11
Function Call: WRITE	Prompt: !,?18,$G(OUT(SUBFILE,I,.01)),?28,$G(OUT(SUBFILE,I,1)) Line Location: OUTLINE+8
Routine Call	DIC Line Location: AEINTR2+7
Routine Call	DIE Line Location: AEINTR2+25 AEINTR2+32 AEINTR3+7 AEINTR3+32 AEINTR3+33
Routine Call	DIE Line Location: DCRCTSET+18 DCRCTSET+24 DCRCTSET+30 AEINTR3+18
Routine Call	DIE Line Location: DCRCTSET+10 DCRCTDEL+7
Routine Call	DIR Line Location: AEINTR2+30 AEINTR3+31

RPC Name	Call Tags
MAGV CREATE DICOM FAILED IMAGE	DCRCTSET
MAGV DELETE DICOM FAILED IMAGE	DCRCTDEL
MAGV DICOM GET COUNT	DCRCTCNT
MAGV GET DICOM FAILED IMAGE	DCRCTGET
MAGV SET DICOM FAILED IMAGE	DCRCTSET

FileNo	Call Tags
^MAGD(2006.575 - [#2006.575]	GET1^DIQ
^MAGV(2006.9192 - [#2006.9192]	Classic Fileman Calls, GET1^DID, GET1^DIQ, GETS^DIQ
2006.919212	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^MAGD(2006.575 - [#2006.575]	DCRCTSET+7, DCRCTSET+11, DCRCTGET+4, DCRCTGET+6, DCRCTGET+7, DCRCTGET+10, DCRCTGET+14, DCRCTGET+15, DCRCTCNT+5, DCRCTCNT+6 , DCRCTDEL+4
^MAGV(2006.9192 - [#2006.9192]	AEINTR2+20, AEINTR6+4

Label References

Name	Line Occurrences
$$INPUTSEP	DCRCTSET+3, DCRCTGET+3, DCRCTCNT+2, DCRCTDEL+2
$$OUTSEP	DCRCTSET+3, DCRCTGET+3, DCRCTCNT+2, DCRCTDEL+2, REFRESH+3, REFRESHF+4, REFRESHP+3
$$STATSEP	DCRCTSET+3, DCRCTGET+3, DCRCTCNT+2, DCRCTDEL+2, REFRESH+3, REFRESHF+4, REFRESHP+3
AEINTR2	INTRFACE+4
AEINTR3	AEINTR2+10, AEINTR2+17
AEINTR6	AEINTR2+28
REFRESH	DCRCTGET+11, DCRCTGET+16
REFRESHF	DCRCTGET+12, DCRCTGET+17

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ATTS	DCRCTSET~, DCRCTSET+4
CASENUMB	DCRCTGET+2~, DCRCTGET+21, DCRCTGET+22, DCRCTGET+23, DCRCTGET+24
D	AEINTR2+2~
D0	AEINTR2+2~, AEINTR3+1~
DA	AEINTR2+2~, AEINTR2+14, AEINTR2+20!, AEINTR2+23, AEINTR2+33!, AEINTR3+1~, AEINTR3+6*, AEINTR3+10, AEINTR3+12, AEINTR3+13 , AEINTR3+14, AEINTR3+15, AEINTR3+16, AEINTR3+17, AEINTR3+26, AEINTR3+34!
DATETIME	REFRESH+1~, REFRESHF+1~, REFRESHP+1~
DFN	DCRCTGET+2~, DCRCTGET+26*, DCRCTGET+28, DCRCTGET+31, REFRESHP~
DIC	AEINTR2+2~, AEINTR2+4, AEINTR2+13, AEINTR2+16!, AEINTR2+22!, AEINTR2+24*, AEINTR3+1~, AEINTR3+8!, AEINTR3+32!, AEINTR3+33!
DIC("W"	AEINTR2+6*
DIC(0	AEINTR2+5, AEINTR2+24
DIE	AEINTR2+2~, AEINTR2+21, AEINTR3+1~, AEINTR3+2
DIR	AEINTR2+2~, AEINTR2+30!, AEINTR3+1~, AEINTR3+31!
DIR("A"	AEINTR2+29, AEINTR3+30
DIR("B"	AEINTR2+29, AEINTR3+30
DIR(0	AEINTR2+29, AEINTR3+30
DLAYGO	AEINTR2+2~, AEINTR2+3*, AEINTR3+1~
DO	AEINTR2+2~
DOB	DCRCTGET+2~, DCRCTGET+29*, DCRCTGET+32
DR	AEINTR2+25, AEINTR2+32, AEINTR3+1~, AEINTR3+4, AEINTR3+5, AEINTR3+32, AEINTR3+33
DROLE	AEINTR6+1~, AEINTR6+8*, AEINTR6+9
DSERVICE	AEINTR6+1~, AEINTR6+7*, AEINTR6+9
DSRIEN	AEINTR6+1~, AEINTR6+2, AEINTR6+4, AEINTR6+6
ERR	DCRCTSET+1~, DCRCTSET+15!, DCRCTSET+19!, DCRCTSET+26!, DCRCTSET+31!, REFRESH+1~, REFRESHF+1~, REFRESHP+1~, AEINTR3+1~
ERR("DIERR"	DCRCTSET+14, DCRCTSET+20, DCRCTSET+25, DCRCTSET+32, DCRCTDEL+8
FDA	DCRCTSET+1~, DCRCTSET+4, DCRCTSET+13!, DCRCTSET+19!, DCRCTSET+26!, DCRCTSET+31!, REFRESH+1~, REFRESH+2~, REFRESHF+1~, REFRESHF+2~ , REFRESHP+1~, REFRESHP+2~, AEINTR3+1~
FDA(	DCRCTSET+5, DCRCTSET+8, DCRCTSET+9!, DCRCTSET+17, DCRCTSET+23, DCRCTSET+29, DCRCTDEL+6, AEINTR3+12, AEINTR3+13, AEINTR3+14* , AEINTR3+15, AEINTR3+16, AEINTR3+17*
FIELD	REFRESH+1~, REFRESH+3, REFRESH+4, REFRESH+5, REFRESH+6, REFRESH+7, REFRESHF+1~, REFRESHF+4, REFRESHF+5, REFRESHF+6 , REFRESHF+7, REFRESHF+8, REFRESHP+1~, REFRESHP+3, REFRESHP+4, REFRESHP+5, REFRESHP+6, REFRESHP+7, MULTIPLE~, MULTIPLE+2
FIELDERR	DCRCTSET+1~, DCRCTSET+4, DCRCTSET+12
FILE	REFRESH+1~, REFRESH+3, REFRESH+6, REFRESHF+1~, REFRESHF+4, REFRESHF+7, REFRESHP+1~, REFRESHP+3*, REFRESHP+6, MULTIPLE~ , MULTIPLE+2, MULTIPLE+4
FILEPATH	DCRCTSET+5*, DCRCTSET+6, DCRCTSET+7, DCRCTSET+11, DCRCTDEL~, DCRCTDEL+3, DCRCTDEL+4
FLAGNAME	AEINTR3+1~, AEINTR3+25*, AEINTR3+27
FLAGVALU	AEINTR3+1~, AEINTR3+26*, AEINTR3+27
FNUM	MULTIPLE+1~, MULTIPLE+2*, MULTIPLE+3, MULTIPLE+4
FORMAT	REFRESH+1~, REFRESH+5, REFRESHF+1~, REFRESHF+6, REFRESHP+1~, REFRESHP+5*
I	AEINTR2+2~, AEINTR2+28, AEINTR6~, AEINTR6+1~, AEINTR6+2, AEINTR6+5, AEINTR6+9, AEINTR6+11, OUTLINE+1~, OUTLINE+5* , OUTLINE+7*, OUTLINE+8
ICN	DCRCTGET+2~, DCRCTGET+31*, DCRCTGET+34
IEN	DCRCTSET+1~, DCRCTSET+11, DCRCTSET+12, DCRCTSET+17, DCRCTSET+23, DCRCTSET+29, DCRCTGET+2~, DCRCTGET+3, DCRCTGET+4, DCRCTGET+6 , DCRCTGET+7, DCRCTGET+10, DCRCTGET+11, DCRCTGET+12, DCRCTGET+14, DCRCTGET+15, DCRCTGET+17, DCRCTGET+21, DCRCTCNT+1~, DCRCTCNT+2 , DCRCTCNT+5, DCRCTCNT+6, DCRCTDEL+1~, DCRCTDEL+4, DCRCTDEL+5, DCRCTDEL+6, DCRCTDEL+7, REFRESH~, REFRESH+6, REFRESHF~ , REFRESHF+7, REFRESHP+6, AEINTR2+2~, AEINTR2+9*, AEINTR2+10, AEINTR2+14, AEINTR2+17, AEINTR2+20, AEINTR2+23, AEINTR2+28 , AEINTR3~, AEINTR3+6
IENS	DCRCTSET+1~, DCRCTSET+2, DCRCTSET+4, AEINTR2+2~, AEINTR2+16!, AEINTR3+8!, AEINTR3+32!, AEINTR3+33!, AEINTR6+6, AEINTR6+7 , AEINTR6+8
ISEP	DCRCTSET+3, DCRCTGET+3, DCRCTCNT+1~, DCRCTCNT+2, DCRCTDEL+2, REFRESH+1~, REFRESHF+1~, REFRESHP+1~
J	DCRCTGET+2~, DCRCTGET+3, DCRCTGET+7, DCRCTGET+8, DCRCTGET+11, DCRCTGET+12, DCRCTGET+16, DCRCTGET+17, DCRCTGET+28, DCRCTGET+32* , DCRCTGET+33, DCRCTGET+34, DCRCTCNT+1~, DCRCTCNT+2, DCRCTCNT+6, DCRCTCNT+7, AEINTR3+24*, AEINTR3+25, AEINTR3+26
LOCATION	DCRCTSET+8*, DCRCTSET+23, DCRCTDEL+1~
MACHID	DCRCTGET~, DCRCTGET+6, DCRCTGET+10, DCRCTCNT~, DCRCTCNT+3, DCRCTCNT+6
MULTIPLE	REFRESH+1~, REFRESHF+1~, REFRESHP+1~, MULTIPLE+1~, MULTIPLE+4*, MULTIPLE+5
MULTOUT	REFRESH+1~, REFRESH+2~, REFRESHF+1~, REFRESHF+2~, REFRESHP+1~, REFRESHP+2~
NEW	AEINTR2+2~, AEINTR2+9*, AEINTR2+10, AEINTR2+12, AEINTR2+17, AEINTR2+25, AEINTR2+26, AEINTR3~, AEINTR3+4, AEINTR3+5 , AEINTR3+11, AEINTR3+21
NEWCASE	DCRCTGET+2~, DCRCTGET+21*, DCRCTGET+22
OSEP	DCRCTSET+3, DCRCTGET+3, DCRCTGET+7, DCRCTGET+8, DCRCTGET+28, DCRCTGET+32, DCRCTGET+33, DCRCTGET+34, DCRCTCNT+2, DCRCTDEL+1~ , DCRCTDEL+2, REFRESH+1~, REFRESH+3, REFRESH+7, REFRESHF+1~, REFRESHF+4, REFRESHF+8, REFRESHP+1~, REFRESHP+3*, REFRESHP+7
OUT	DCRCTSET~, DCRCTSET+6, DCRCTSET+7, DCRCTSET+12, DCRCTSET+14, DCRCTSET+20, DCRCTSET+25, DCRCTSET+32, DCRCTGET~, DCRCTGET+11 , DCRCTGET+12, DCRCTGET+16, DCRCTGET+17, DCRCTCNT~, DCRCTCNT+3, DCRCTCNT+4, DCRCTCNT+7, DCRCTDEL~, DCRCTDEL+3, DCRCTDEL+8 , DCRCTDEL+9*, REFRESH~, REFRESHF~, REFRESHP~, OUTLINE+1~
OUT(	DCRCTGET+7, DCRCTGET+8, DCRCTGET+28, DCRCTGET+32, DCRCTGET+33, DCRCTGET+34, REFRESH+7, REFRESHF+3, REFRESHF+8, REFRESHP+7 , OUTLINE+7, OUTLINE+8
OUT(1	DCRCTGET+3*
OUTI	REFRESH~, REFRESH+7, REFRESH+8, REFRESHF~, REFRESHF+3, REFRESHF+8, REFRESHF+9, REFRESHP~, REFRESHP+7, REFRESHP+8*
PATLOOK	DCRCTGET+2~, DCRCTGET+24*, DCRCTGET+25, DCRCTGET+26
RIEN	DCRCTGET+2~, DCRCTGET+13, DCRCTGET+15, DCRCTGET+16
S	AEINTR2+2~, AEINTR2+16!, AEINTR3+8!, AEINTR3+32!, AEINTR3+33!
SERVTYPE	DCRCTGET+2~, DCRCTGET+21*, DCRCTGET+23, DCRCTGET+24, DCRCTCNT~, DCRCTCNT+4, DCRCTCNT+6
SEX	DCRCTGET+2~, DCRCTGET+30*, DCRCTGET+33
SMIEN	AEINTR3+1~, AEINTR6~, AEINTR6+4, AEINTR6+6
SSEP	DCRCTSET+3, DCRCTSET+6, DCRCTSET+7, DCRCTSET+12, DCRCTSET+14, DCRCTSET+20, DCRCTSET+25, DCRCTSET+32, DCRCTGET+3, DCRCTGET+7 , DCRCTGET+8, DCRCTGET+28, DCRCTGET+32, DCRCTGET+33, DCRCTGET+34, DCRCTCNT+1~, DCRCTCNT+2, DCRCTCNT+3, DCRCTCNT+4, DCRCTCNT+7 , DCRCTDEL+2, DCRCTDEL+3, DCRCTDEL+8, DCRCTDEL+9, REFRESH+1~, REFRESH+3, REFRESH+7, REFRESHF+1~, REFRESHF+4, REFRESHF+8 , REFRESHP+1~, REFRESHP+3*, REFRESHP+7
STUDYUID	DCRCTSET+1~, DCRCTSET+8*, DCRCTSET+29
SUBFILE	OUTLINE+1~, OUTLINE+6*, OUTLINE+7, OUTLINE+8
U	DCRCTGET+6, DCRCTGET+7, DCRCTGET+10, DCRCTCNT+6, AEINTR2+9, AEINTR6+9
UFILE	REFRESH+1~, REFRESHF+1~, REFRESHP+1~
UIEN	REFRESH+1~, REFRESHF+1~, REFRESHP+1~
VADM	DCRCTGET+2~
VADM(3	DCRCTGET+29
VADM(5	DCRCTGET+30
VALUE	REFRESH+2~, REFRESH+6, REFRESH+7, REFRESHF+2~, REFRESHF+7, REFRESHF+8, REFRESHP+2~, REFRESHP+6*, REFRESHP+7
X	AEINTR2+2~, AEINTR2+16!, AEINTR3+8!, AEINTR3+32!, AEINTR3+33!
Y	INTRFACE+1~, INTRFACE+2*, INTRFACE+4, AEINTR2~, AEINTR2+8, AEINTR2+9, AEINTR2+32, AEINTR3+3, AEINTR3+32, OUTLINE~ , OUTLINE+2, OUTLINE+3

Marked Items

Name	Field # of Occurrence
$T(GETICN^MPIF001	DCRCTGET+31

Customize PDF page

Package: Imaging