Routine: MDPSU

Package	Total	Call Graph
Text Integration Utility	3	EXTRACT^TIULQ CANDO^TIUSRVA TGET^TIUSRVR1
Clinical Procedures	2	($$DEMO,$$HOSP,GETDATA,HSHDR,SET)^MDPS2 ($$CHKMED,$$PRO,HDR)^MDPS3
Consult Request Tracking	2	RT^GMRCGUIA DT^GMRCSLM2
VA FileMan	2	NOW^%DTC ($$GET1,GETS)^DIQ
Health Summary	1	CKP^GMTSUP
Kernel	1	$$FMTE^XLFDT
Medicine	1	DTIME^MCARP
Toolkit	1	$$GET^XPAR

Entry Points

Name	Comments	DBIA/ICR reference
EN1(MDGLO,MDDFN,MDSDT,MDEDT,MDMAX,MDPSC,MDALL)	; Return the List of Completed Studies ; Input: MDGLO - Return Global Array (Required) ; MDDFN - Patient DFN (Required) ; MDSDT - Start Date in FM Internal Format (Optional) ; MDEDT - End Date in FM Internal Format (Optional) ; MDMAX - Number of studies to return (Optional) ; MDPSC - Procedure Summary Code (Optional) ; MDALL - Return the all text reports with ; the procedures list (Optional) ; (Returns all studies for Patient, if no MDSDT, MDEDT,and MDMAX.)
GET702(MDGLO,MDDFN,MDC,MDSDT,MDEDT,MDMAX)	; Gather the new 702 entries
CPF	; Full Report - Health Summary Component
CPS	; One Line Summary Report
PR702	; Return the Result Text for File 702 records
NXT
PR690	; Return the Result text for File 690 Medicine report record
PRINT	; Print the text for Display
GETARY(MDG,MDCON)	; Get the Medicine Result
SETLINE(MDG,MDGL)	; Set Global Lines

Name	Field # of Occurrence
NOW^%DTC	SETLINE+2
$$GET1^DIQ	GET702+5, GET702+12, GET702+18, GET702+19, PR702+6, PR702+7, PR702+8
GETS^DIQ	GETARY+3
RT^GMRCGUIA	PR702+21
DT^GMRCSLM2	PR702+22
CKP^GMTSUP	CPF+7, CPS+6, PRINT+5, PRINT+10, PRINT+11, PRINT+13
DTIME^MCARP	SETLINE+2
$$DEMO^MDPS2	SETLINE+11
$$HOSP^MDPS2	SETLINE+9
GETDATA^MDPS2	PR690+9, GETARY+8
HSHDR^MDPS2	CPF+9, CPS+8
SET^MDPS2	CPF+5, CPS+4
$$CHKMED^MDPS3	PR702+17
$$PRO^MDPS3	GETARY+7
HDR^MDPS3	PRINT+6
EXTRACT^TIULQ	GET702+8
CANDO^TIUSRVA	PR702+12
TGET^TIUSRVR1	PR702+14, GETARY+12
$$FMTE^XLFDT	SETLINE+2
$$GET^XPAR	PR702+19

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No Procedure Data for the patient." Line Location: CPF+7
Function Call: WRITE	Prompt: !,"No Procedure Data for the patient." Line Location: CPS+6
Function Call: WRITE	Prompt: @IOF Line Location: PRINT+6

FileNo	Call Tags
^ORD(100.01 - [#100.01]	GET1^DIQ
^GMR(123 - [#123]	GET1^DIQ, GETS^DIQ
^MDD(702 - [#702]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	GET702+21
^MCAR(697.2 - [#697.2]	PR690+6, PR690+7, SETLINE+3, SETLINE+4
^MDD(702 - [#702]	GET702+3, GET702+4, PR702+10
^MDS(702.01 - [#702.01]	GET702+2, SETLINE+5
^TMP("GMRCR"	PR702+20!, PR702+22, PR702+23!
^TMP("MDGMRC"	PR702+20!, PR702+21, PR702+23!
^TMP("MDHSP"	EN1+12, CPF+4!, CPF+5, CPF+7, CPF+8, CPF+13!, CPS+3!, CPS+4, CPS+6, CPS+7 , CPS+9!
^TMP("MDPLST"	EN1+15!, EN1+24!, GET702+23, GET702+26
^TMP("MDPTXT"	GET702+30!, PR702+3!, PR702+13, PR702+14, PR702+16, PR690+3!, PR690+5, PRINT+1, PRINT+16!
^TMP("MDREST"	GETARY+2!, GETARY+9!
^TMP("MDTIUST"	GET702+7!, GET702+10, GET702+11, GET702+13!
^TMP("TIUVIEW"	PR702+14!, GETARY+13!

Name	Line Occurrences
@(	GET702+33, CPF+12
EN1	CPF+6, CPS+5
GET702	EN1+23
GETARY	PR702+18
NXT	PR702+13, PR702+14, PR702+18
PRINT	NXT+1, NXT+2, PR690+11
SETLINE	PR702+23, GETARY+9, GETARY+13

Name	Field # of Occurrence
^(	GET702+23*, GET702+26, CPF+8, CPS+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SETLINE+2!
>> DFN	CPF+2, CPF+6, CPS+2, CPS+5, PR690+8, PR690+9, GETARY+6, GETARY+8, SETLINE+9, SETLINE+11
FFF	PR702+2~, PR702+4*, GETARY+14, SETLINE+12
>> GMTS1	CPF+2, CPS+2
>> GMTS2	CPF+2, CPS+2
>> GMTSEGH	CPF+3
>> GMTSQIT	CPF+7, CPS+6, PRINT+5, PRINT+10, PRINT+11, PRINT+13
IO	NXT+1, PR690+11
IOF	PRINT+2, PRINT+6
IOSL	PRINT+6
MCARGDA	GET702+31, GET702+34!, CPF+10, CPF+13!, PR702+1, PR702+5, PR702+13, PR702+14, PR702+16, PR690+1 , PR690+4, PR690+5, PR690+8
MCARGRTN	GET702+32, GET702+34!, CPF+11, CPF+13!, PRINT+16!
MCARPPS	GET702+31, GET702+33, GET702+34!, CPF+10, CPF+12, CPF+13!, PRINT+16!
MCPRO	GET702+31, GET702+34!, CPF+10, CPF+13!, PR702+13, PR702+14, PR702+16, PR690+5, PR690+6, PR690+8 , PRINT+16!, GETARY+7*, SETLINE+3, SETLINE+5
MDAK	PR702+2~, PR702+8*, PR702+19
MDALL	EN1~, GET702+30, PR702+3, PR702+14, PR702+18, NXT, PR690+3, PR690+10
MDARR	EN1+13~, GET702+29!
MDARR(	GET702+22*
MDAX	PR702+2~
MDC	EN1+14*, EN1+23, GET702~, GET702+1, GET702+2, GET702+9
MDCK	GETARY+1~, GETARY+4*
MDCK1	SETLINE+1~, SETLINE+6, SETLINE+13
MDCLIN	PR702+2~, PR702+11, GETARY+14, SETLINE+9, SETLINE+10, SETLINE+11, SETLINE+12, SETLINE+13*
MDCODE	EN1+13~, EN1+14*, GET702+23
MDCON	EN1+13~, GET702+14, GET702+17, GET702+18, GET702+19, GET702+22, GET702+23, PR702+2~, PR702+7, PR702+14 , PR702+15, PR702+17, PR702+18, PR702+21, PR702+22, GETARY~, GETARY+3
MDCTR	EN1+13~, EN1+14, GET702+25, GET702+27, GET702+28*
MDCX	GETARY+1~
MDCX(	GETARY+4
MDDFN	EN1~, EN1+11, EN1+23, GET702~, GET702+3
MDDTE	EN1+13~, EN1+14, GET702+10, GET702+12*, GET702+15, GET702+16, GET702+21, GET702+23
MDDTM	SETLINE+1~, SETLINE+2*, SETLINE+9
MDEDT	EN1~, EN1+23, GET702~, GET702+16
>> MDF	PR690+8, PR690+9, GETARY+6, GETARY+8
MDG	PR702+16, PR702+18, PR702+23, PR690+5, PR690+9, GETARY~, GETARY+9, GETARY+13, GETARY+14, SETLINE~ , SETLINE+9, SETLINE+10, SETLINE+11, SETLINE+12, SETLINE+13
MDGL	GETARY+1~, GETARY+2*, GETARY+8, GETARY+9, SETLINE~, SETLINE+6, SETLINE+13
MDGLO	EN1~, EN1+11, EN1+12*, EN1+23, GET702~, GET702+28, GET702+30
MDHDR	CPF+1~, CPF+11*, PR690+9, GETARY+8, SETLINE+7
MDHFLG	CPF+1~, CPF+4*, PRINT+2, PRINT+5, PRINT+6, PRINT+10, PRINT+11, PRINT+13
MDHR	CPF+1~, CPF+8, CPS+1~, CPS+7
MDHSG	CPF+1~, CPF+5, CPF+6, CPS+1~, CPS+4, CPS+5
MDIAR	GET702+1~, GET702+34!
MDIAR(	GET702+2*, GET702+9
MDIL	GET702+1~, GET702+2*
MDIMG	EN1+14, PR702+2~, PR702+4, PR702+10*, PRINT+9
MDLIM	CPF+1~, CPF+6, CPS+1~, CPS+5
MDLP	EN1+13~, GET702+3, GET702+4, GET702+5, GET702+12, GET702+23, GET702+26, GET702+30*
MDLP1	EN1+13~, GET702+26*
MDMAX	EN1~, EN1+23, GET702~, GET702+27
MDMCG	PR702+2~
MDMED	PR702+2~, PR702+15, PR702+17*, PR702+18
MDNAME	SETLINE+1~, SETLINE+3, SETLINE+4, SETLINE+5
MDPLST	EN1+13~, EN1+15*
>> MDPR	PR690+8, PR690+9, GETARY+7, GETARY+8
MDPRILV	PR702+2~, PR702+11*, PR702+12, PR702+13
MDPROC	EN1+13~, GET702+5*, GET702+23
MDPSC	EN1~, EN1+14
MDPTR	PR702+2~
>> MDR	PR690+8, PR690+9, GETARY+6, GETARY+8
>> MDRDV	PR702+18, NXT, PR690+10
MDRE	PRINT+1~*, PRINT+4
MDREC	PR702+2~, PRINT+1, PRINT+3, PRINT+4, PRINT+7
MDRPG	PR702+2~, PR702+4, PRINT+1, SETLINE+6*, SETLINE+9
MDRTN	CPF+1~, CPF+3*, CPF+6
MDSC	SETLINE+1~, SETLINE+6*, SETLINE+8, SETLINE+13
MDSDT	EN1~, EN1+23, GET702~, GET702+15
MDSTAT	EN1+13~, GET702+11, GET702+17, GET702+18, GET702+19*
MDSTUDY	PR702+2~, PR702+5, PR702+6, PR702+7, PR702+8, PR702+10, PR690+2~, PR690+4
MDT	EN1+13~, GET702+32, CPF+1~, CPF+11, PR690+8, PR690+9, GETARY+6, GETARY+8
MDT1	CPF+11, CPF+13!
MDTITL	SETLINE+1~, SETLINE+4, SETLINE+5, SETLINE+10
MDTIU	PR702+2~, PR702+6*, PR702+9, PR702+12, PR702+14
MDTIUER	EN1+13~, EN1+14, GET702+7, GET702+8
MDTMP	PR690+2~, PR690+6, PR690+7, PR690+8
MDTS1	CPF+1~, CPF+6, CPS+1~, CPS+5
MDTS2	CPF+1~, CPF+6, CPS+1~, CPS+5
MDX	EN1+13~, GET702+4, GET702+6, GET702+8, GET702+9, GET702+10, GET702+11, GET702+14, GET702+23, GET702+26 , GET702+28
MDX1	GET702+30, GET702+31, GET702+32, CPF+1~, CPF+8, CPF+10, CPF+11, CPS+1~, CPS+7*
MDX3	SETLINE+1~
MDX4	PR702+2~, GETARY+1~, GETARY+4*, GETARY+5, GETARY+6, GETARY+7, GETARY+11, GETARY+12
MDXY	PR702+2~, PR702+19*, PR702+21, PR702+22
>> ORHFS	NXT+1, PR690+11
PATID	PR702+2~, PR690+2~, PR690+8, GETARY+6
RESULTS	PR702+2~, PR702+11, PR702+14, PR702+21, PR702+22, PR702+23, PR690+2~, GETARY+12, GETARY+13
U	GET702+6, GET702+8, GET702+10, GET702+11, GET702+14, GET702+23, GET702+31, GET702+32, CPF+10, CPF+11 , PR702+10, PR702+13, PR690+8, SETLINE+5
>> X	SETLINE+2*
Y	EN1+13~, GET702+21*, GET702+23

Customize PDF page

Package: Clinical Procedures

Routine: MDPSU

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: