Routine: MCARP

Package	Total	Call Graph
Medicine	47	^MCAROAT ^MCAROC1 ^MCAROC2 ^MCAROC3 ^MCAROC4 ^MCAROEP ^MCAROG ^MCAROGA ^MCAROGC ^MCAROGE ^MCAROGN ^MCAROH1 ^MCAROH2 ^MCAROK ^MCAROP ^MCAROPA ^MCAROPE ^MCAROPG ^MCAROPS ^MCAROPV ^MCARORE ^MCAROT ^MCAROV (EXIT,INIT,MCPPROC)^MCARP1 (FOOTER,STATUS)^MCESPRT $$PREVIEW^MCESSCR DISP^MCMAG ^MCOBC1 ^MCOBE1 ^MCOBEP ^MCOBGA ^MCOBGC ^MCOBGEN ^MCOBGN ^MCOBH1 ^MCOBK ^MCOBPA ^MCOBPE ^MCOBPG ^MCOBPS ^MCOBPV ^MCOBRH ^MCOBRHA ^MCOBT ^MCPARC $$ETHN^MCPFTP1 ^MCRPEC
Kernel	2	^%ZIS ^%ZTLOAD
VA Fileman	2	(,$$FIND1)^DIC $$GET1^DIQ
Registration	1	(DEM,KVAR)^VADPT

Package

Total

Call Graph

^MCAROAT  ^MCAROC1  ^MCAROC2  ^MCAROC3  ^MCAROC4  ^MCAROEP  ^MCAROG  ^MCAROGA
^MCAROGC  ^MCAROGE  ^MCAROGN  ^MCAROH1  ^MCAROH2  ^MCAROK  ^MCAROP  ^MCAROPA
^MCAROPE  ^MCAROPG  ^MCAROPS  ^MCAROPV  ^MCARORE  ^MCAROT  ^MCAROV  (EXIT,INIT,MCPPROC)^MCARP1
(FOOTER,STATUS)^MCESPRT  $$PREVIEW^MCESSCR  DISP^MCMAG  ^MCOBC1  ^MCOBE1  ^MCOBEP  ^MCOBGA  ^MCOBGC
^MCOBGEN  ^MCOBGN  ^MCOBH1  ^MCOBK  ^MCOBPA  ^MCOBPE  ^MCOBPG  ^MCOBPS
^MCOBPV  ^MCOBRH  ^MCOBRHA  ^MCOBT  ^MCPARC  $$ETHN^MCPFTP1  ^MCRPEC

Kernel

^%ZIS ^%ZTLOAD

VA Fileman

(,$$FIND1)^DIC $$GET1^DIQ

Registration

(DEM,KVAR)^VADPT

Package	Total	Caller Graph
Medicine	36	MCAPI MCARGP MCARHOLTERREPORTS MCARHP MCARP1 MCARPAC MCARPS MCBPCATH MCBPECG MCBPECHO MCBPEP MCBPETT MCBPFTP1 MCBPFTP7 MCBPGI MCBPHOLTER MCBPNONENDO MCBPRHEUM MCESCONV MCESMFDV MCESPRT MCFPCATH MCFPECG MCFPECHO MCFPEP MCFPETT MCFPGI MCFPHOLTER MCFPNONENDO MCMAGDSP MCPFTI MCPFTP MCPFTP1 MCPFTP5 MCRH1 MCRPEC
Order Entry Results Reporting	2	ORWMC ORWRP1

Package

Total

Caller Graph

Medicine

MCAPI  MCARGP  MCARHOLTERREPORTS  MCARHP  MCARP1  MCARPAC  MCARPS  MCBPCATH
MCBPECG  MCBPECHO  MCBPEP  MCBPETT  MCBPFTP1  MCBPFTP7  MCBPGI  MCBPHOLTER
MCBPNONENDO  MCBPRHEUM  MCESCONV  MCESMFDV  MCESPRT  MCFPCATH  MCFPECG  MCFPECHO
MCFPEP  MCFPETT  MCFPGI  MCFPHOLTER  MCFPNONENDO  MCMAGDSP  MCPFTI  MCPFTP
MCPFTP1  MCPFTP5  MCRH1  MCRPEC

Order Entry Results Reporting

ORWMC ORWRP1

Entry Points

External References

Name	Field # of Occurrence
^%ZIS	DEVQUE+1
^%ZTLOAD	DEVQUE+2
^DIC	LOOK+2
$$FIND1^DIC	HEAD+2
$$GET1^DIQ	HEAD+3
^MCAROAT	EP1+4
^MCAROC1	CATH1
^MCAROC2	CATH1
^MCAROC3	CATH1
^MCAROC4	CATH1
^MCAROEP	EP1
^MCAROG	GI+1
^MCAROGA	GI+3
^MCAROGC	CONSULT
^MCAROGE	GENERIC
^MCAROGN	NONENDO
^MCAROH1	HOLTER1
^MCAROH2	HOLTER1
^MCAROK	ECG1
^MCAROP	PULM
^MCAROPA	ALEAD
^MCAROPE	PULM
^MCAROPG	GENIMP
^MCAROPS	SURV
^MCAROPV	VLEAD
^MCARORE	RHFULL1+3
^MCAROT	ETT1
^MCAROV	VT+2
EXIT^MCARP1	EXIT+1
INIT^MCARP1	RHPRT+1
MCPPROC^MCARP1	MCPPROC+1
FOOTER^MCESPRT	RHPRT+4
STATUS^MCESPRT	LOOK+3
$$PREVIEW^MCESSCR	LOOK2+2
DISP^MCMAG	RHFULL1+3, RHFULL2+3
^MCOBC1	CATHB
^MCOBE1	ECGB
^MCOBEP	EPB
^MCOBGA	GIB
^MCOBGC	CONSULTB
^MCOBGEN	GENERICB
^MCOBGN	NONENDOB
^MCOBH1	HOLTERB
^MCOBK	ECHOB
^MCOBPA	ALEADB
^MCOBPE	PULMB
^MCOBPG	GENIMPB
^MCOBPS	SURVB
^MCOBPV	VLEADB
^MCOBRH	RHB
^MCOBRHA	RHB
^MCOBT	ETTB
^MCPARC	PARAC
$$ETHN^MCPFTP1	RHFULL1+1
^MCRPEC	ECHO1
DEM^VADPT	RHFULL1+1
KVAR^VADPT	RHFULL1+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Pg. "_PG,?30,HOSP,?79-$L(MCARDTM),MCARDTM Line Location: HEAD+6
Function Call: WRITE	Prompt: ! Line Location: HEAD+7
Function Call: WRITE	Prompt: !,$$HEDSTAR("CONFIDENTIAL "_MCARZ,77) Line Location: HEAD+11
Function Call: WRITE	Prompt: !,MCARGNM_" "_SSN_" " Line Location: HEAD+12
Function Call: WRITE	Prompt: ?39-($L(MCARWARD_" "_MCARRB)\2),MCARWARD_" "_MCARRB,?79-$L(" DOB: "_MCARDOB)," DOB: "_MCARDOB Line Location: HEAD+12
Function Call: WRITE	Prompt: !,$$HEDSTAR(MCARZ,77) Line Location: HEAD+14
Function Call: WRITE	Prompt: !,?39-($L("PROCEDURE DATE/TIME: "_MCARGDT2)\2),"PROCEDURE DATE/TIME: ",MCARGDT2 Line Location: HEAD+15
Function Call: WRITE	Prompt: !,FFF,! Line Location: HEAD+16
Routine Call	DIC Line Location: HEAD+2
Routine Call	DIC Line Location: LOOK+2
Routine Call	%ZIS Line Location: DEVQUE+1

FileNo	Call Tags
^SC - [#44]	FIND1^DIC, GET1^DIQ
^MCAR(691 - [#691]	Classic Fileman Calls
^MCAR(691.1 - [#691.1]	Classic Fileman Calls
^MCAR(691.5 - [#691.5]	Classic Fileman Calls
^MCAR(691.6 - [#691.6]	Classic Fileman Calls
^MCAR(691.7 - [#691.7]	Classic Fileman Calls
^MCAR(691.8 - [#691.8]	Classic Fileman Calls
^MCAR(701 - [#701]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	HEAD+4
^DPT - [#2]	HEAD+1
^MCAR(	LOOK+3, PRINT+8
^MCAR(691.9 - [#691.9]	EP1+1, EP1+4
^MCAR(692 - [#692]	VT, VT+2
^MCAR(697.2 - [#697.2]	MCPROP+3
^UTILITY($J	PRINT+7!, RHPRT+2*

Label References

Name	Line Occurrences
$$HEDSTAR	HEAD+11, HEAD+14
$$XTRCT	CATH+1, ECHO, ECG, EP, HOLTER, RHFULL, ETT
@(	CALLTEM+1, RHFULL1+3, RHFULL2+2
CALLTEM	RHPRT+3
EPEND	EP1, EP1+3, EP1+4, VT+1
EXIT	LOOK+2, DEVQUE+1, DEVQUE+2, RHPRT+6
HEAD	RHPRT+3, EP1+4, VT+2
LOOK	CATH+1, ECHO, ECG, EP, HOLTER, RHFULL
LOOK2	LOOK+2
MCPPROC	LOOK+1
PRINT	LOOK+4
RHFULL2	RHFULL1+2
VT	EP1+1

Name	Field # of Occurrence
^(0	PRINT+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %ZIS	DEVQUE+1*
CNT	MCPROP+1~, MCPROP+3*
>> D0	PRINT+7, EP1+4, VT+2*
>> DA	LOOK+2, PRINT+7
>> DFN	PRINT+8*, HEAD+1
>> DIC	CATH+1, ECHO, ECG, EP, HOLTER, RHFULL, ETT*, PRINT+8
>> DIC("A"	LOOK2+1*
>> DIC("S"	LOOK2+2*
>> DIC(0	LOOK2+1*
>> DIOT(2	PRINT+7!
DTIME	EP1+3, VT+1
DXS	PRINT+7!, CATH1!, ECHO1!, EP1+4!, VT+2!, HOLTER1!, GI+2!, PULM!, RHFULL1+3!, RHFULL2+2! , RHFULL2+3!, RHB!
FFF	HEAD+16~*
FULL	XTRCT~, XTRCT+1
>> HOSP	HEAD+1, HEAD+2, HEAD+3, HEAD+4, HEAD+6
>> I	HEDSTAR+3*
IO	LOOK+4, DEVQUE+3
IO("Q"	DEVQUE+1!, DEVQUE+2
IOF	HEAD+5
IOSL	EP1+3, VT+1
IOST	EP1+3, VT+1, HEAD+7
>> MCARDOB	HEAD+12
>> MCARDTM	HEAD+6
>> MCARGDA	LOOK+2*, LOOK+3, PRINT+7, PRINT+8, RHPRT+4, EP1+1, EP1+4, VT, VT+2
>> MCARGDT	PRINT+8*, RHPRT+1
>> MCARGDT2	HEAD+15
>> MCARGNM	HEAD+12
>> MCARGNUM	PRINT+8*
>> MCARGRTN	CATH+1, ECHO, ECG, EP, HOLTER, RHFULL, ETT*, CALLTEM+1, HEAD+9
>> MCARPPS	LOOK+2
>> MCARRB	HEAD+12
MCARRC	RHFULL1+1~*
>> MCARWARD	HEAD+12
>> MCARZ	CATH+1, ECHO, ECG, EP, HOLTER, RHFULL, ETT, DEVQUE+2, RHPRT+1, HEAD+8 , HEAD+9, HEAD+11, HEAD+14
>> MCESON	LOOK+3, RHPRT+4, LOOK2+2
MCFILE	LOOK+3, RHPRT+1, RHPRT+4, CALLTEM+1~, LOOK2+2, RHFULL1+3, RHFULL2+2
>> MCFLG	HEAD+5, HEAD+14
MCHOLD	RHFULL1+1~*
MCOUT	DEVQUE+1, PRINT+7!, RHPRT+4, CATH1, ECHO1, EP1, EP1+3, EP1+4, VT+1*, VT+2 , HOLTER1, GI+3, PULM, RHFULL1+3, RHFULL2+1, RHFULL2+2, RHB
MCPROP	MCPROP~, MCPROP+2, MCPROP+3
>> MCRH	RHFULL1+2, RHFULL1+3
>> MCRHR	RHFULL1+3, RHFULL2+2
MCT	DTIME+1*, DTIME+2!
>> MCY	EP1+2, EP1+3, VT+1*
>> ORHFS	LOOK+4
>> PG	PRINT+7, HEAD+5, HEAD+6, HEAD+7
>> POP	DEVQUE+1
PREFIX	MCPROP+1~, MCPROP+2*, MCPROP+3
>> RH	RHFULL2+1*, RHFULL2+2, RHFULL2+3
>> SSN	HEAD+12
TEMP	MCPROP+1~, MCPROP+2, MCPROP+3, MCPROP+4
>> TY	HEDSTAR+2, HEDSTAR+3, HEDSTAR+4
U	PRINT+8, EP1+3, VT+1, RHFULL1+1, HEAD+1, HEAD+4, XTRCT+1
>> V	RHFULL1+3*
>> VADM	RHFULL1+1
>> VADM(8	RHFULL1+1
X	DTIME+1*, HEDSTAR~, HEDSTAR+2
X1	HEDSTAR~, HEDSTAR+2, HEDSTAR+3
>> XQY0	CATH+1, ECHO, ECG, EP, HOLTER, RHFULL, ETT
>> Y	LOOK+2
Y1	HEDSTAR+1~, HEDSTAR+2*
>> ZTDESC	DEVQUE+2*
>> ZTQUEUED	RHPRT+5
>> ZTREQ	RHPRT+5*
>> ZTRTN	DEVQUE+2*
>> ZTSAVE("DIC"	DEVQUE+2*
>> ZTSAVE("MC*"	DEVQUE+2*
ZTSK	DEVQUE+2!, RHPRT+5!

Customize PDF page

Package: Medicine

Routine: MCARP

Information

Source Information

Call Graph

Call Graph Total: 52

Caller Graph

Caller Graph Total: 38

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
XTRCT(FULL)	;Extrinsic Function use to determine Full reporting or brief
CATHB
ETT
GENIMPB
HOLTER1
ETTB
VT
SURV
NONENDO
RHPRT	;
PRINT	; Print Report
ECGB
EPB
ECG
GENERICB
ECG1
GENIMP
PULMB
GENERIC
RHFULL1	;
RHFULL2	;
CONSULT
PARAC
PULM
HEAD	;
RHB
RHFULL
ALEADB
HEDSTAR(X,X1)	; surround text string X with asterisks to length X1
ECHO
CALLTEM	;
EPEND
LOOK2	;
GIB
NONENDOB
CONSULTB
MCPPROC	; Get require variables
EP
GI	;I $D(^DIC(120.8)) D ^MCAROGM I 1 ; new allergy info
VLEAD
SURVB
VLEADB
LOOK	;
ECHOB
CATH	;
ALEAD
HOLTER
MCPROP(MCPROP)	; Medicine Procedure file entry validator
EP1
CATH1
EXIT	;
DEVQUE	; Device Control and Queuing Control
ETT1
HOLTERB
DTIME	; Setup Date/Time
ECHO1