Routine: MDRPCOT1

Package	Total	Call Graph
VA FileMan	4	NOW^%DTC FILE^DIE ^DIK ($$GET1,GETS)^DIQ
Clinical Procedures	2	$$TRANS^MDAPI (ADDMSG,STATUS)^MDRPCOT
Imaging	2	$$GMRCACN^MAGDFCNV IMPORT^MAGGSIUI
Kernel	2	$$NOW^XLFDT $$CONVERT^XLFIPV
Consult Request Tracking	1	$$CPDOC^GMRCCP
Registration	1	IN5^VADPT
Toolkit	1	($$GET,GETLST)^XPAR

Package	Total	Caller Graph
Clinical Procedures	12	MDAPI MDHL7A MDHL7B MDRPCNT1 MDRPCOP MDRPCOT MDRPCOT2 MDRPCOTH MDRPCOW MDRPCW MDRPCW1 MDWOR

Entry Points

Name	Comments	DBIA/ICR reference
DELERR(MDTIEN)	; [Procedure] Delete Imaging Error Messages
IMGSTAT(STUDY,MDSTAT)	; [Procedure] Update the Image Status.
GETVSTR(DFN,MDSSTR,MDPR,MDTR)	; [Function] Check the Visit String
PDT(STUDIE)	; [Function] Loop through the attachments for Date/Time Performed.
SUBMIT(STUDY)	; [Function] Submit all non-pending/uncomplete images in transaction to Imaging
UPDCONS(MDC,MDDOC)	; [Function] Update Consults Procedure Status
GETIORD(MDIEN)	; [Function] Return the Instrument order number for this study ; Called from instrument interface routines
NEWIORD(MDIEN)	; [Function] Generate & return new unique instrument order number ; Notice: will overwrite existing order number if it exists
GETSTDY(MDION)	; [Function] Return study from instrument order number ; Called from instrument interface routines
MULT(MDIN)	; [Function] Return whether result is multiple or final

Name	Field # of Occurrence
NOW^%DTC	SUBMIT+16
FILE^DIE	NEWIORD+24, NEWIORD+43
^DIK	DELERR+3
$$GET1^DIQ	GETVSTR+8, GETVSTR+10, SUBMIT+8, SUBMIT+11, SUBMIT+15, SUBMIT+17, SUBMIT+20, SUBMIT+23, SUBMIT+27, SUBMIT+29 , SUBMIT+31, SUBMIT+34, NEWIORD+37, NEWIORD+38, GETSTDY+10, MULT+2, MULT+4
GETS^DIQ	UPDCONS+7
$$CPDOC^GMRCCP	UPDCONS+10
$$GMRCACN^MAGDFCNV	NEWIORD+41
IMPORT^MAGGSIUI	SUBMIT+48
$$TRANS^MDAPI	SUBMIT+52
ADDMSG^MDRPCOT	SUBMIT+52
STATUS^MDRPCOT	SUBMIT+13
IN5^VADPT	GETVSTR+7
$$NOW^XLFDT	NEWIORD+6
$$CONVERT^XLFIPV	SUBMIT+8
$$GET^XPAR	GETVSTR+12
GETLST^XPAR	UPDCONS+2

FileNo	Call Tags
^GMR(123 - [#123]	GETS^DIQ
^SC - [#44]	GET1^DIQ
^MDD(702 - [#702]	GET1^DIQ
^MDS(702.01 - [#702.01]	GET1^DIQ
^MDS(702.09 - [#702.09]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^MDD(702 - [#702]	DELERR+1, IMGSTAT+2, PDT+3, PDT+4, SUBMIT+3, SUBMIT+22, SUBMIT+35, SUBMIT+37, UPDCONS+3, UPDCONS+4 , UPDCONS+8, GETIORD+2, GETIORD+3, GETIORD+4, NEWIORD+3, NEWIORD+4, NEWIORD+5, NEWIORD+15, NEWIORD+20, NEWIORD+25 , NEWIORD+40, NEWIORD+46, GETSTDY+2, GETSTDY+10, GETSTDY+15, GETSTDY+17
^MDD(703.1 - [#703.1]	PDT+5, SUBMIT+44
^MDS(702.01 - [#702.01]	SUBMIT+32, UPDCONS+6, UPDCONS+9
^MDS(702.09 - [#702.09]	SUBMIT+44, NEWIORD+9

Name	Line Occurrences
$$MULT	SUBMIT+10
$$NEWIORD	GETIORD+3
$$UPDCONS	SUBMIT+24
DELERR	SUBMIT+14
IMGSTAT	SUBMIT+50, SUBMIT+53

Name	Field # of Occurrence
^(	IMGSTAT+2*, SUBMIT+35

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	SUBMIT+16
DA	DELERR+2!, DELERR+3*
DA(1	DELERR+3*
DATA	SUBMIT+1~
DATA("MESSAGE"	SUBMIT+52*
DEVIEN	SUBMIT+1~, SUBMIT+3*, SUBMIT+8, NEWIORD+9, GETSTDY+10
DFN	GETVSTR~
DIK	DELERR+2!, DELERR+3*
DUZ(2	SUBMIT+29
FLG	NEWIORD+16~, NEWIORD+17, NEWIORD+18, NEWIORD+20
I	NEWIORD+16~, NEWIORD+18*
MD25	GETSTDY+12~, GETSTDY+13*, GETSTDY+18, GETSTDY+19
MDACQ	SUBMIT+1~, SUBMIT+33, SUBMIT+38, SUBMIT+45
MDAPP	GETVSTR+2~, GETVSTR+12*, GETVSTR+15
MDAR	SUBMIT+1~, SUBMIT+51*, SUBMIT+52
MDARR	SUBMIT+1~, SUBMIT+48
MDARR(	SUBMIT+40*
MDARR(0	SUBMIT+42
MDC	SUBMIT+1~, SUBMIT+23*, SUBMIT+24, UPDCONS~, UPDCONS+3, UPDCONS+7, UPDCONS+10
MDCLOC	GETVSTR+1~, GETVSTR+8, GETVSTR+11, GETVSTR+14, GETVSTR+15, GETVSTR+16
MDCPDICOM	NEWIORD+36~, NEWIORD+38*, NEWIORD+39
MDCRES	SUBMIT+1~, UPDCONS+1~, UPDCONS+10*, UPDCONS+11
MDCTR	SUBMIT+1~, SUBMIT+33, SUBMIT+40
>> MDD702	NEWIORD+37
MDDEF	MULT+1~, MULT+2*, MULT+3, MULT+4
MDDEL	SUBMIT+1~, SUBMIT+33, SUBMIT+36, SUBMIT+44
MDDOC	UPDCONS~, UPDCONS+10
MDDT	PDT+1~, PDT+2, PDT+3, PDT+4, PDT+5, PDT+7, SUBMIT+1~, SUBMIT+16, SUBMIT+26, SUBMIT+46
MDF	UPDCONS+1~, UPDCONS+5, UPDCONS+9
MDFDA	SUBMIT+1~, NEWIORD+2~, NEWIORD+36~
MDFDA(702	NEWIORD+23, NEWIORD+42
MDGMRCIEN	NEWIORD+36~, NEWIORD+40*, NEWIORD+41
MDH	UPDCONS+1~, UPDCONS+2
MDH(	UPDCONS+5
MDHOLD	GETVSTR+1~, GETVSTR+8*, GETVSTR+14
MDIEN	SUBMIT+1~, SUBMIT+2, SUBMIT+10, SUBMIT+11, SUBMIT+14, SUBMIT+15, SUBMIT+17, SUBMIT+20, SUBMIT+22, SUBMIT+23 , SUBMIT+26, SUBMIT+27, SUBMIT+31, SUBMIT+35, SUBMIT+37, GETIORD~, GETIORD+2, GETIORD+3, GETIORD+4, NEWIORD~ , NEWIORD+3, NEWIORD+23, NEWIORD+40, NEWIORD+42, NEWIORD+46, GETSTDY+12~, GETSTDY+15, GETSTDY+16, GETSTDY+17, GETSTDY+18 , GETSTDY+19
MDIENS	SUBMIT+1~, SUBMIT+2*, SUBMIT+13, SUBMIT+34, SUBMIT+50, SUBMIT+53
MDIMG	SUBMIT+1~, SUBMIT+48
MDIMG(	SUBMIT+51, SUBMIT+52
MDIMG(0	SUBMIT+49
MDIN	MULT~, MULT+2
MDINPT	GETVSTR+1~, GETVSTR+7*, GETVSTR+19
MDION	GETSTDY~, GETSTDY+2, GETSTDY+10, GETSTDY+15
MDIORD	NEWIORD+36~, NEWIORD+41*, NEWIORD+42
MDKK	UPDCONS+1~, UPDCONS+5*
MDL	IMGSTAT+1~, IMGSTAT+2, PDT+1~, PDT+2, PDT+3, PDT+4, SUBMIT+1~, SUBMIT+35, SUBMIT+37
MDLOC	GETVSTR+1~, SUBMIT+1~, SUBMIT+27*, SUBMIT+28, SUBMIT+29, SUBMIT+30
>> MDLP	DELERR+1*, DELERR+3
MDLPB	SUBMIT+1~, SUBMIT+2, SUBMIT+8
MDMAG	SUBMIT+1~, SUBMIT+48
MDMAG("ACQD"	SUBMIT+44, SUBMIT+45
MDMAG("ACQL"	SUBMIT+30*
MDMAG("ACQS"	SUBMIT+29*
MDMAG("DFLG"	SUBMIT+44*
MDMAG("GDESC"	SUBMIT+43*
MDMAG("IDFN"	SUBMIT+17*, SUBMIT+18
MDMAG("PXDT"	SUBMIT+44, SUBMIT+46
MDMAG("PXIEN"	SUBMIT+20*, SUBMIT+21, SUBMIT+24
MDMAG("PXPKG"	SUBMIT+19*
MDMAG("STSCB"	SUBMIT+25*
MDMAG("TRKID"	SUBMIT+26*
MDMAG("TRTYPE"	SUBMIT+47*
MDMULT	SUBMIT+1~, SUBMIT+10*, SUBMIT+12, SUBMIT+13
MDPDEF	UPDCONS+1~, UPDCONS+4*, UPDCONS+5, UPDCONS+6, UPDCONS+9
MDPR	GETVSTR~, GETVSTR+4, GETVSTR+8, GETVSTR+10
MDPR12	GETVSTR+2~, GETVSTR+10*, GETVSTR+11
MDQ	GETSTDY+12~, GETSTDY+14, GETSTDY+15, GETSTDY+18, GETSTDY+19, GETSTDY+21, GETSTDY+22
MDR	SUBMIT+1~, SUBMIT+22, SUBMIT+24*
MDS	GETSTDY+12~, GETSTDY+14, GETSTDY+16, GETSTDY+21
MDS70209	NEWIORD+36~, NEWIORD+37*, NEWIORD+38
MDSDY	UPDCONS+1~, UPDCONS+3*, UPDCONS+4, UPDCONS+8
MDSSTR	GETVSTR~, GETVSTR+5, GETVSTR+14, GETVSTR+15, GETVSTR+16
MDST	SUBMIT+1~, SUBMIT+11*, SUBMIT+12, SUBMIT+13
MDSTAT	IMGSTAT~, IMGSTAT+2
MDTIEN	DELERR~, DELERR+1, DELERR+3
MDTOT	SUBMIT+34~*, SUBMIT+40
MDTR	GETVSTR~, GETVSTR+3, GETVSTR+6
MDTST	GETSTDY+12~, GETSTDY+17*, GETSTDY+18, GETSTDY+19
MDX	SUBMIT+1~, SUBMIT+31, SUBMIT+32, SUBMIT+33, SUBMIT+35, SUBMIT+36, SUBMIT+39, SUBMIT+40, GETSTDY+12~, GETSTDY+14* , GETSTDY+16*
MDX3	UPDCONS+1~, UPDCONS+8*
MDX4	UPDCONS+1~, UPDCONS+8
MDXC	UPDCONS+1~
MDXC(	UPDCONS+8
MDXD	UPDCONS+1~, UPDCONS+8, UPDCONS+9
MDY	SUBMIT+1~, SUBMIT+37, SUBMIT+38, SUBMIT+40, SUBMIT+44
MDZ	SUBMIT+1~, SUBMIT+32*, SUBMIT+40, SUBMIT+43
STUDIE	PDT~, PDT+3, PDT+4
STUDY	IMGSTAT~, IMGSTAT+2, SUBMIT~, SUBMIT+2, SUBMIT+3
U	SUBMIT+3, UPDCONS+6, UPDCONS+9, GETIORD+3, GETIORD+4, NEWIORD+40, NEWIORD+46, GETSTDY+17
VAIP	GETVSTR+1~
VAIP("D"	GETVSTR+6*
VAIP(13	GETVSTR+7
>> X	NEWIORD+5, NEWIORD+6, NEWIORD+7, NEWIORD+14, NEWIORD+15, NEWIORD+19, NEWIORD+20, NEWIORD+23, GETSTDY+13
>> Y	GETVSTR+16, GETVSTR+17, GETVSTR+18, GETVSTR+19, GETVSTR+20, GETVSTR+21

Customize PDF page

Package: Clinical Procedures

Routine: MDRPCOT1

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 12

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: