Routine: PXRMGECU

Package	Total	Call Graph
Kernel	2	(,STAT)^%ZTLOAD $$NOW^XLFDT
VA Fileman	2	UPDATE^DIE ^DIK
Clinical Reminders	1	($$TIUSTAT,ACOPYDEL)^PXRMGECK

Package	Total	Caller Graph
Clinical Reminders	2	PXRMGECJ PXRMGECZ
Order Entry Results Reporting	1	ORQQPXRM
Text Integration Utility	1	TIUEDI1

Name	Comments	DBIA/ICR reference
FINISHED(DFN,ANS)	;Delete 801.5 entries if finished	ICR #4258 Status: Active Usage: Controlled Subscription
GECDT(DFN,GEC,VISIT,NOTEIEN)	;Get Date/Time from file
EVAL(DFN,GEC,WHERE)	;Evaluate for missing dialogs
T	;TEXT
STATUS(DFN)	;Evaluate The status of the Referral	ICR #4258 Status: Active Usage: Controlled Subscription
CHECKGEC(IEN)	;
CURADD	;-Set Data into File 801.5 and 801.55 (history)
NEWADD	;-Set Data into File 801.5 and 801.55 (history)
CON(IEN,DFN)	;CHECK TO see if 2 DIA ARE DONE to display consult
DEL(NOTEIEN)	;Delete HF and 801.5 Called from DELETE^TIUEDI1	ICR #4375 Status: Active Usage: Private
API(RESULT,IEN,DFN,VISIT,WHERE,NOTEIEN)	;	ICR #4258 Status: Active Usage: Controlled Subscription

Name	Field # of Occurrence
^%ZTLOAD	DEL+29
STAT^%ZTLOAD	STATUS+5
UPDATE^DIE	NEWADD+11, NEWADD+19, CURADD+11, CURADD+19
^DIK	FINISHED+5, DEL+13
$$TIUSTAT^PXRMGECK	STATUS+53, STATUS+54, STATUS+56, STATUS+57, STATUS+59, STATUS+60, STATUS+62, STATUS+63
ACOPYDEL^PXRMGECK	DEL+31, STATUS+17, EVAL+11
$$NOW^XLFDT	NEWADD+5, NEWADD+14

FileNo	Call Tags
^PXRMD(801.5 - [#801.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVHF - [#9000010.23]	STATUS+28, STATUS+29, STATUS+30
^AUPNVHF("AED"	DEL+11, DEL+17
^AUPNVHF("C"	STATUS+27
^PX(839.7 - [#839.7]	DEL+10, DEL+16, STATUS+20, STATUS+21, STATUS+22, STATUS+23
^PXD(811.9 - [#811.9]	CHECKGEC+3
^PXRMD(801.41 - [#801.41]	CON+4, CON+5, CON+6, CON+7, CHECKGEC+4, CHECKGEC+5
^PXRMD(801.5 - [#801.5]	FINISHED+4, CON+11, CON+12, CON+13, DEL+3, DEL+4, DEL+5, DEL+6, DEL+7, DEL+8 , DEL+9, DEL+14, DEL+15, GECDT+3, GECDT+4, GECDT+5, NEWADD+3, NEWADD+10, CURADD+3, CURADD+5 , CURADD+10, CURADD+14, STATUS+4, STATUS+36, STATUS+38, STATUS+43, STATUS+44, STATUS+45, STATUS+46, EVAL+24 , EVAL+29, EVAL+34, EVAL+35, EVAL+36, EVAL+37

Name	Line Occurrences
$$CHECKGEC	API+3
$$EVAL	API+5
$$GECDT	API+5
CURADD	GECDT+3
NEWADD	GECDT+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ANS	FINISHED~, FINISHED+3
BOX	STATUS+15~, STATUS+16, STATUS+73, EVAL+13~, EVAL+52, EVAL+53
>> CNT	CON+10, CON+11, CON+12, CON+13, CON+15
DA	FINISHED+5, FINISHED+6!, DEL+13
DFN	FINISHED~, FINISHED+2, FINISHED+4, CON~, CON+11, CON+12, CON+13, DEL+1~, DEL+4*, DEL+5 , DEL+11, DEL+15, DEL+17, API~, API+5, GECDT~, GECDT+3, GECDT+4, GECDT+5, NEWADD+3 , NEWADD+4, NEWADD+10, NEWADD+13, CURADD+3, CURADD+4, CURADD+5, CURADD+10, CURADD+13, CURADD+14, STATUS~ , STATUS+4, STATUS+27, STATUS+36, STATUS+38, STATUS+43, STATUS+44, STATUS+45, STATUS+46, STATUS+53, STATUS+54 , STATUS+56, STATUS+57, STATUS+59, STATUS+60, STATUS+62, STATUS+63, EVAL~, EVAL+24, EVAL+29, EVAL+34 , EVAL+35, EVAL+36, EVAL+37
DFNDT	API+2~, GECDT+5*, GECDT+6
DIANAME	EVAL+13~, EVAL+16, EVAL+17, EVAL+18, EVAL+19
DIEN	CHECKGEC+1~, CHECKGEC+3*, CHECKGEC+4
DIK	FINISHED+5, FINISHED+6!, DEL+13
DT	NEWADD+9, NEWADD+10, NEWADD+18, CURADD+9, CURADD+10, CURADD+18
DUZ	NEWADD+8, NEWADD+17, CURADD+8, CURADD+17
ENCDT	DEL+1~, DEL+5*, DEL+11, DEL+15, DEL+17
FILEIEN	DEL+1~, DEL+8*, DEL+9, DEL+13
FORTH	EVAL+13~, EVAL+23, EVAL+24, EVAL+25*, EVAL+30, EVAL+53
GEC	DEL+1~, DEL+7, DEL+8, API+2~, API+3, API+4, API+5, CHECKGEC+4, CHECKGEC+5, CHECKGEC+6 , GECDT~, NEWADD+3, NEWADD+6, NEWADD+10, NEWADD+15, CURADD+3, CURADD+6, CURADD+10, CURADD+15, EVAL~ , EVAL+16, EVAL+17, EVAL+18, EVAL+19, EVAL+24, EVAL+34, EVAL+35, EVAL+36, EVAL+37
>> GEC1	STATUS+20*, STATUS+32
>> GEC1DA	CON+4*, CON+8
>> GEC2	STATUS+21*, STATUS+32
>> GEC2DA	CON+5*, CON+8
>> GEC3	STATUS+22*, STATUS+32
>> GEC3DA	CON+6*, CON+8
GECDA	DEL+1~, DEL+10, DEL+11, DEL+16, DEL+17
>> GECF	STATUS+23*, STATUS+32
>> GECFDA	CON+7*
GECIEN	DEL+21~
GECNODE	DEL+1~, DEL+9*, DEL+10
GECT	DEL+1~, DEL+10, DEL+15, DEL+16
GET	DEL+21~
GEX	NEWADD+20!, CURADD+20!
GEX(1	NEWADD+4, NEWADD+5, NEWADD+6, NEWADD+7, NEWADD+8, NEWADD+9, NEWADD+10, CURADD+4, CURADD+5, CURADD+6* , CURADD+7, CURADD+8, CURADD+9*, CURADD+10
GEX(2	NEWADD+13, NEWADD+14, NEWADD+15, NEWADD+16, NEWADD+17, NEWADD+18, CURADD+13, CURADD+14, CURADD+15, CURADD+16 , CURADD+17, CURADD+18
HFARY	DEL+2~, DEL+19
HFARY(	DEL+12, DEL+18
HFDA	DEL+1~, DEL+11, DEL+12, DEL+17, DEL+18, STATUS+15~, STATUS+27*, STATUS+28, STATUS+29, STATUS+30
IEN	CON~, CON+8, API~, API+3, CHECKGEC~, CHECKGEC+2, CHECKGEC+3, CHECKGEC+5
MESSAGE	STATUS+8, STATUS+10, STATUS+15~, STATUS+26, STATUS+37, STATUS+38, STATUS+39, STATUS+51, STATUS+52, STATUS+54* , STATUS+55, STATUS+57, STATUS+58, STATUS+60, STATUS+61, STATUS+63, STATUS+64, STATUS+65, STATUS+66, STATUS+67 , STATUS+68, STATUS+69, STATUS+71, STATUS+72, STATUS+73, STATUS+75, EVAL+13~, EVAL+28, EVAL+29, EVAL+30 , EVAL+40, EVAL+41, EVAL+44, EVAL+45, EVAL+46, EVAL+47, EVAL+48, EVAL+50, EVAL+53*, EVAL+54
MISSING	STATUS+15~, STATUS+35, STATUS+43, STATUS+44, STATUS+45, STATUS+46, STATUS+50, STATUS+52, STATUS+55, STATUS+58 , STATUS+61, STATUS+65, STATUS+66, STATUS+67, STATUS+68, STATUS+69, STATUS+71, EVAL+13~, EVAL+28, EVAL+34* , EVAL+35, EVAL+36, EVAL+37*, EVAL+39, EVAL+43, EVAL+45, EVAL+46, EVAL+47, EVAL+48
NOTEIEN	DEL~, DEL+3, DEL+4, DEL+5, DEL+6, DEL+7, DEL+8, DEL+14, DEL+15, API~ , API+1*, API+5, GECDT~, NEWADD+7, NEWADD+10, NEWADD+16, CURADD+7, CURADD+10, CURADD+16
OK	CON+1~, CON+3, CON+8, CON+15, CON+16
PATDA	FINISHED+4*, FINISHED+5, FINISHED+6!
RESULT	API~, API+4, API+5
RIEN	CHECKGEC+1~, CHECKGEC+3*
>> SOURCE	STATUS+30*, STATUS+31, STATUS+32
STOP	GECDT+1~, GECDT+2, NEWADD+1, NEWADD+21, CURADD+1, CURADD+21, STATUS+2~, STATUS+3, STATUS+9, STATUS+10 , STATUS+15~, STATUS+25, STATUS+27, STATUS+33*, STATUS+36
TIUNODE	DEL+1~
U	API+4, API+5, CHECKGEC+4, CHECKGEC+5
VISIT	API~, API+5, GECDT~
WHERE	API~, API+5, EVAL~, EVAL+25, EVAL+30, EVAL+40, EVAL+41, EVAL+49
ZTDESC	DEL+21~, DEL+28*
ZTDTH	DEL+21~, DEL+25*
ZTIO	DEL+21~, DEL+23*
ZTRTN	DEL+21~, DEL+24*
ZTSAVE	DEL+21~
ZTSAVE("GECT"	DEL+26*
ZTSAVE("HFARY("	DEL+27*
ZTSK	DEL+21~, STATUS+2~, STATUS+4*
ZTSK(0	STATUS+6
ZTSK(1	STATUS+7

Name	Field # of Occurrence
$T(T+1	EVAL+16
$T(T+10	STATUS+61, STATUS+69, EVAL+48
$T(T+11	STATUS+65
$T(T+12	EVAL+50
$T(T+13	EVAL+50
$T(T+2	EVAL+17
$T(T+3	EVAL+18
$T(T+4	EVAL+19
$T(T+5	STATUS+71, EVAL+40, EVAL+41
$T(T+6	STATUS+72, EVAL+40, EVAL+50
$T(T+7	STATUS+52, STATUS+66, EVAL+45
$T(T+8	STATUS+55, STATUS+67, EVAL+46
$T(T+9	STATUS+58, STATUS+68, EVAL+47

Customize PDF page

Package: Clinical Reminders

Routine: PXRMGECU

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 4

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items