Routine: PXRMGECJ

Package	Total	Call Graph
VA Fileman	3	(FILE,UPDATE)^DIE $$GET1^DIQ ^DIR
Clinical Reminders	2	REOPEN^PXRMGECL FINISHED^PXRMGECU
Kernel	1	$$FMTE^XLFDT
PCE Patient Care Encounter	1	$$DATA2PCE^PXAPI

Package	Total	Caller Graph
Clinical Reminders	1	PXRMGECP

Name	Comments	DBIA/ICR reference
DISP	;Display referrals and data
EN	;Starting point
PAT	;LOOK UP ALL PATIENTS
CK1(DFN)	;Check for current open referral
MERGE(FIR,SEC,DFN)	;Merge 2 Referrals
CK2(DFN)	;Check for entries in History file 801.55
DIALOG(DIA)	;Returns expanded name of dialog
EXIT	;CLEAN UP
ASK	;Ask the User what they want to do.
MRG

Name	Field # of Occurrence
FILE^DIE	MERGE+65, MERGE+85
UPDATE^DIE	MERGE+76
$$GET1^DIQ	DISP+4, DISP+5, DISP+6
^DIR	ASK+10, ASK+14, MRG+3, MRG+7, PAT+3
$$DATA2PCE^PXAPI	MERGE+57
REOPEN^PXRMGECL	MRG+10
FINISHED^PXRMGECU	MRG+15
$$FMTE^XLFDT	DISP+18, DISP+21, DISP+38, DISP+41

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"================================================================================" Line Location: DISP+10
Function Call: WRITE	Prompt: !,NAME," (",SSN,") "," AGE:",AGE," ",LOC," ",DIV," Division",! Line Location: DISP+11
Function Call: WRITE	Prompt: !,?5,"Current Open Referral::" Line Location: DISP+12
Function Call: WRITE	Prompt: !,?10,"< N O N E >" Line Location: DISP+13
Function Call: WRITE	Prompt: !,$O(^TMP("PXRMGEC_CK1",$J,0)),?10,STAMP_" (start date)" Line Location: DISP+22
Function Call: WRITE	Prompt: !!,?5,"Historical Referral(s)::" Line Location: DISP+25
Function Call: WRITE	Prompt: !,I,?10,STAMP_" (start date)" Line Location: DISP+42
Function Call: WRITE	Prompt: ! Line Location: ASK+10
Function Call: WRITE	Prompt: !,"Try again.." Line Location: MRG+8
Function Call: WRITE	Prompt: !,"DO MERGE",! Line Location: MERGE+5
Function Call: WRITE	Prompt: @IOF,! Line Location: PAT+1
Routine Call	DIE Line Location: MERGE+76
Routine Call	DIE Line Location: MERGE+65 MERGE+85
Routine Call	DIR Line Location: ASK+10 ASK+14 MRG+3 MRG+7 PAT+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVHF - [#9000010.23]	MERGE+30, MERGE+41, MERGE+42, MERGE+43, MERGE+44
^DPT - [#2]	DISP+2, DISP+3
^PXRMD(801.5 - [#801.5]	MERGE+69, MERGE+82, MERGE+83, CK1+6, CK1+7, CK1+8
^PXRMD(801.55 - [#801.55]	MERGE+62, MERGE+63, MERGE+70, MERGE+71, MERGE+72, MERGE+73, MERGE+74, MERGE+75, CK2+6, CK2+7 , CK2+10, CK2+12, CK2+13
^TMP("PXRMGECMRG"	MERGE+31*, MERGE+87!
^TMP("PXRMGECMRGPCE"	MERGE+53, MERGE+88!
^TMP("PXRMGEC_CK1"	EN+2!, DISP+16, DISP+17, DISP+18, DISP+19, DISP+20, DISP+21, DISP+22, MRG+1, MRG+5 , MERGE+7, MERGE+8, MERGE+67, CK1+3!, CK1+8*, CK2+5, EXIT+2!
^TMP("PXRMGEC_CK2"	EN+2!, DISP+31, DISP+33, DISP+34, DISP+35, DISP+37, DISP+39, DISP+40, DISP+41, ASK+12 , MERGE+9, MERGE+11, MERGE+12, MERGE+13, MERGE+14, MERGE+16, MERGE+17, MERGE+18, CK2+3!, CK2+13* , CK2+16, CK2+19, CK2+21, CK2+22, CK2+23, CK2+24*, CK2+25!, EXIT+2!
^VA(200 - [#200]	DISP+20, DISP+40

Label References

Name	Line Occurrences
$$CK1	DISP+7
$$CK2	DISP+7
$$DIALOG	DISP+19, DISP+39
ASK	ASK+16
DISP	MRG+10, MRG+11, MRG+12, MRG+13, MRG+15
EN	MRG+14
EXIT	MRG+9
MERGE	MRG+11
MRG	MRG+8
PAT	EN+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGE	DISP+1~, DISP+6*, DISP+11
ARY	MERGE+25~, MERGE+27*, MERGE+28, MERGE+29
ARY1	MERGE+26~, MERGE+38*, MERGE+39, MERGE+40
CK2	EXIT+1!
CNT	EN+1~, DISP+36*, ASK+3, ASK+4, ASK+5, ASK+6, ASK+12, MRG, MRG+1, MRG+4 , MRG+5
CNTA	DISP+37*, MRG, MRG+4, EXIT+1!
CNTB	DISP+37*, MRG, MRG+4, EXIT+1!
COUNT	DISP+29~, DISP+30, DISP+31
CURRENT	CK2+2~, CK2+5*, CK2+8
DA	EN+1~, MERGE+25~, MERGE+29, MERGE+30, MERGE+31, MERGE+40, MERGE+41, MERGE+42, MERGE+43, MERGE+44 , MERGE+49, MERGE+50, MERGE+51, MERGE+52, MERGE+60~, MERGE+63, MERGE+64, MERGE+70, MERGE+71, MERGE+72 , MERGE+73, MERGE+74, MERGE+75, MERGE+80~, MERGE+83, MERGE+84, CK1+7, CK1+8, CK2+2~, CK2+12 , CK2+13, CK2+17~, CK2+22*, CK2+23, CK2+24, CK2+25
DATA	CK2+17~, CK2+23*, CK2+24
DATE	DISP+15~, DISP+21, DISP+23, DISP+29~, DISP+41, DISP+43, MERGE+25~, CK2+2~, CK2+7*, CK2+8 , CK2+10, CK2+12
DATE(	MERGE+7, MERGE+8, MERGE+13, MERGE+18, MERGE+19, MERGE+20
DATE1	MERGE+4~
DATE2	MERGE+4~
DAX	DISP+29~, DISP+34*, DISP+35, DISP+39, DISP+40, DISP+41
DFN	EN+1~, DISP+2, DISP+3, DISP+4, DISP+5, DISP+6, DISP+7, MRG+11, MRG+15, MERGE~ , MERGE+3, MERGE+27, MERGE+62, MERGE+63, MERGE+69, MERGE+82, MERGE+83, PAT+4*, CK1~, CK1+1 , CK1+6, CK1+7, CK2~, CK2+1, CK2+6, CK2+7, CK2+10, CK2+12
DIA	CK2+2~, CK2+10*, CK2+12, DIALOG~, DIALOG+3, DIALOG+4, DIALOG+5, DIALOG+6
DIALOG	DISP+15~, DISP+19, DISP+23, DISP+29~, DISP+39, DISP+43
DIR	EN+1~, ASK+1~
DIR("A"	ASK+2!, ASK+13, MRG+2, MRG+6*
DIR(0	EN+2!, ASK+2!, ASK+3, ASK+4, ASK+5, ASK+6, ASK+7, ASK+8, ASK+9, ASK+12 , MRG, MRG+1, MRG+4, MRG+5, PAT+2*
DIRUT	EN+1~, EN+4, ASK+16, MRG+3, MRG+7
DIV	DISP+1~, DISP+4*, DISP+11
DUZ	MERGE+48
FIR	MERGE~, MERGE+1, MERGE+7, MERGE+9, MERGE+11, MERGE+12, MERGE+13, MERGE+19, MERGE+67
FIRST	EN+1~, MRG+3*, MRG+8, MRG+11
GEC	MERGE+25~, MERGE+28, MERGE+29, MERGE+60~, MERGE+62, MERGE+63, MERGE+69, MERGE+80~, MERGE+82*, MERGE+83
GECM	MERGE+60~
GECM(1	MERGE+70, MERGE+71, MERGE+72, MERGE+73, MERGE+74, MERGE+75
GECX	MERGE+60~, MERGE+65!, MERGE+80~, MERGE+85!
GECX(1	MERGE+64, MERGE+84
HF0	MERGE+26~, MERGE+42*, MERGE+49, MERGE+50
HF12	MERGE+26~, MERGE+43*, MERGE+51
HF801	MERGE+26~
HF812	MERGE+26~, MERGE+44*, MERGE+46, MERGE+47
I	DISP+15~, DISP+16, DISP+17, DISP+18, DISP+19, DISP+20, DISP+21, DISP+29~, DISP+31, DISP+33 , DISP+34, DISP+35, DISP+36, DISP+39, DISP+40, DISP+41, DISP+42, MERGE+34, CK1+2~, CK1+4 , CK1+8, CK2+2~, CK2+4, CK2+9, CK2+13
IOF	PAT+1
J	DISP+17, DISP+18, DISP+19, DISP+20, DISP+21, DISP+22, DISP+29~, DISP+30, DISP+36, CK1+4 , CK1+7, CK1+8, CK2+2~, CK2+4, CK2+11, CK2+13, CK2+17~, CK2+21, CK2+22, CK2+23 , CK2+24, CK2+25
K	DISP+29~, DISP+30, DISP+33, DISP+34, DISP+35, DISP+39, DISP+40, DISP+41
LOC	DISP+1~, DISP+3*, DISP+11
LOOP	DISP+30, ASK+3, ASK+4, ASK+5, ASK+6, ASK+7, ASK+8, MRG, MRG+4, MRG+12* , MRG+13!, EXIT+1!
MODE	ASK+1~, ASK+10*, ASK+11, ASK+16, MRG+9, MRG+10, MRG+11, MRG+12, MRG+13, MRG+14 , MRG+15
NAME	EN+1~, DISP+2, DISP+11, DIALOG+1~, DIALOG+2, DIALOG+3, DIALOG+4, DIALOG+5, DIALOG+6, DIALOG+7
NEW	CK2+17~, CK2+18, CK2+20, CK2+24
NOEVT	MERGE+54~, MERGE+55*, MERGE+56
>> OK	MERGE+57*
OLD	MERGE+4~, CK2+17~, CK2+19*, CK2+21, CK2+22, CK2+23, CK2+25
OLD(	MERGE+19, MERGE+20, MERGE+22
OLD(0	MERGE+21
OLDDT	MERGE+4~, MERGE+21*, MERGE+22, MERGE+52, MERGE+64, MERGE+84
PKG	MERGE+25~, MERGE+46*, MERGE+57
ROOT	MERGE+25~, MERGE+35*, MERGE+49, MERGE+50, MERGE+51, MERGE+52, MERGE+57
ROPNNUM	ASK+1~, ASK+15*, MRG+10, EXIT+1!
SEC	MERGE~, MERGE+2, MERGE+8, MERGE+14, MERGE+16, MERGE+17, MERGE+18, MERGE+20
SECOND	EN+1~, MRG+7*, MRG+8, MRG+11
SOURCE	MERGE+25~, MERGE+36, MERGE+47, MERGE+57
SRCHDT	MERGE+4~, MERGE+22*, MERGE+27, MERGE+31, MERGE+62, MERGE+63, MERGE+69, MERGE+82, MERGE+83
SSN	DISP+1~, DISP+5*, DISP+11
STAMP	EN+1~, DISP+15~, DISP+18, DISP+22, DISP+29~, DISP+35, DISP+36, DISP+38*, DISP+42, DISP+44
STAMPB	DISP+29~, DISP+30, DISP+36, DISP+42, DISP+44
STATUS	EN+1~, DISP+7, DISP+13, DISP+14, DISP+26, DISP+28, ASK+3, ASK+4, ASK+5, ASK+6 , ASK+7, ASK+8, ASK+9, MRG, MRG+1, MRG+4, MRG+5, CK1+2~, CK1+4, CK1+9* , CK1+10, CK2+2~, CK2+4, CK2+14, CK2+26
SUB3	MERGE+10~, MERGE+11, MERGE+12, MERGE+13, MERGE+15~, MERGE+16, MERGE+17, MERGE+18
SUBDA	MERGE+10~, MERGE+12, MERGE+13, MERGE+15~, MERGE+17, MERGE+18
USER	DISP+15~, DISP+20, DISP+23, DISP+29~, DISP+40, DISP+43, MERGE+48*, MERGE+57
VISIT	MERGE+25~, MERGE+30, MERGE+31, MERGE+39, MERGE+40, MERGE+57
X	ASK+1~, EXIT+1!
Y	ASK+1~, ASK+10, ASK+15, MRG+3, MRG+7, PAT+4, PAT+5!
Y(0	PAT+5!
Z	CK1+2~

Customize PDF page

Package: Clinical Reminders

Routine: PXRMGECJ

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: