Routine: ORRCDPT

Information

ORRCDPT ;SLC/MKB - Patient List for Physician Dashboard ; 19 Sept 2003 10:09 AM

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
Care Management	5	PATS^ORRCACK EN^ORRCDPT1 PATS^ORRCEVT GETPTUNS^ORRCTIU PATS^ORRCTSK
Order Entry Results Reporting	4	TEAMPTS^ORQPTQ1 DEFLIST^ORQPTQ11 CLINPTS^ORQPTQ2 $$RNG2FM^ORRHCU
Kernel	2	$$FMTHL7^XLFDT $$UP^XLFSTR
Registration	1	DEM^VADPT
Toolkit	1	$$GET^XPAR

Entry Points

Name	Comments	DBIA/ICR reference
TASK	; -- find patients with tasks not complete
FORMAT	; -- Format return array ^TMP($J,"ORRCPTS") from temp array ^TMP($J,"ORRCY")
MAIN(ORY,USER,TYPE,LIST)	; -- Return patient list for dashboard ; where USER = pointer to #200 ; TYPE = (C)linician or (N)urse view ; LIST(#) = <list-type>:<list-ID>:<clinic start>:<clinic stop> ; RPC = ORRC DASHBOARD PATIENTS
EN(ORY,ORUSR)	; -- Return each patient to list on dashboard for ORUSR ; in @ORY@(#) = "Patient=<dfn>^<name>^<ssn>^<dob>^<age>" ; = "Result=ORR:##^ORR:##^...^ORR:##" ; = "Task=TSK:##^TSK:##^...^TSK:##" ; = "Event=VST:ID^VST:ID^...^VST:ID" ; = "Unsigned=ORD:##^...^ORD:##^DOC:##^...^DOC:##" ; = "Notifications=1" ; RPC = ORRC PHY DASHBD PATIENTS
ADD(TYPE)	; -- Add item IDs from ^TMP($J,"ORRCY",PAT,<TYPE>) into return array
SIGN	; -- find patients that have orders or notes ORUSR needs to sign
ERROR(ORY)
GETRET()
RSLT	; -- find patients with unack'd results for ORUSR's orders
EXPDATES(LIST)
EN1(ORY,ORUSR,ORLST)	; -- Return patients on ORLST for ORUSR's dashboard ; in @ORY@(#) = "Patient=<dfn>^<name>^<ssn>^<dob>^<age>" ; = "Result=ORR:##^ORR:##^...^ORR:##" ; = "Task=TSK:##^TSK:##^...^TSK:##" ; = "Event=VST:ID^VST:ID^...^VST:ID" ; = "Unsigned=ORD:##^...^ORD:##^DOC:##^...^DOC:##" ; = "Error=^<error description>"
EVNT	; -- find patients that ORUSR has outstanding ADT alerts for

External References

Name	Field # of Occurrence
TEAMPTS^ORQPTQ1	EN1+17
DEFLIST^ORQPTQ11	EN1+15
CLINPTS^ORQPTQ2	EN1+21
PATS^ORRCACK	RSLT+2
EN^ORRCDPT1	MAIN+8
PATS^ORRCEVT	EVNT+2
GETPTUNS^ORRCTIU	SIGN+4
PATS^ORRCTSK	TASK+2
$$RNG2FM^ORRHCU	EXPDATES+5
DEM^VADPT	FORMAT+4
$$FMTHL7^XLFDT	FORMAT+5
$$UP^XLFSTR	MAIN+7, EN1+14
$$GET^XPAR	EN1+12

RPC Name	Call Tags
ORRC PHY DASHBD PATIENTS	EN
ORRC DASHBOARD PATIENTS	MAIN

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP("OR"	EN1+16
^TMP($J	EN+8!, EN+10, EN+11!, EN1+8!, EN1+9, EN1+16, EN1+22, EN1+23, EN1+24, EN1+28! , ERROR+1, ERROR+6, RSLT+3, TASK+3, EVNT+3, SIGN+5, FORMAT+3, FORMAT+6, FORMAT+7, FORMAT+8 , FORMAT+9, FORMAT+10, GETRET+1, ADD+3
^VA(200 - [#200]	EN1+11

Label References

Name	Line Occurrences
$$GETRET	ERROR+3, FORMAT+2
@(	EN1+19
ADD	FORMAT+6, FORMAT+7, FORMAT+8, FORMAT+9
EN	MAIN+10
EN1	MAIN+9
ERROR	EN1+27
EVNT	EN+9, EN1+26
EXPDATES	MAIN+6
FORMAT	EN+10, EN1+26
RSLT	EN+9, EN1+26
SIGN	EN+9, EN1+26
TASK	EN+9, EN1+26

Naked Globals

Name	Field # of Occurrence
^(	EN1+16, ADD+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DFN	FORMAT+1~, FORMAT+4*, FORMAT+5
DUZ	EN1+11
ERRI	EN1+7~, EN1+22
FROM	EN1+10~, EN1+12*, EN1+15
I	ERROR+2~, ERROR+4, ERROR+5, ERROR+6, EXPDATES+2~, EXPDATES+3, EXPDATES+4, EXPDATES+5, EXPDATES+6, EXPDATES+7
J	ERROR+2~, ERROR+4, ERROR+6*
LIST	MAIN~, MAIN+6, MAIN+8, MAIN+9, EXPDATES~
LIST(	EXPDATES+3, EXPDATES+4, EXPDATES+5, EXPDATES+6, EXPDATES+7
LIST(0	MAIN+9
ORACK	RSLT+1~, RSLT+2, RSLT+3, RSLT+4
ORBEG	EN1+7~, EN1+20*, EN1+21
ORDER	SIGN+1~
ORDOC	SIGN+1~, SIGN+4, SIGN+5, SIGN+6
OREND	EN1+7~, EN1+20*, EN1+21
OREVT	EVNT+1~, EVNT+2, EVNT+3, EVNT+4
ORI	EN1+7~, EN1+13*
ORID	EN1+7~, EN1+14, EN1+17, EN1+21, ADD+1~, ADD+2, ADD+3*
ORJ	EN1+7~, EN1+16, EN1+23
ORLST	EN1~
ORLST(	EN1+13
ORN	FORMAT+1~, FORMAT+3, FORMAT+5, FORMAT+10, ADD+4, ADD+6*
ORPAT	EN1+7~, EN1+15, EN1+17, EN1+21
ORPAT(	EN1+23
ORPAT(1	EN1+14, EN1+22
ORPT	FORMAT+1~, FORMAT+3*, FORMAT+4, FORMAT+6, FORMAT+7, FORMAT+8, FORMAT+9, FORMAT+10, ADD+3
ORSRV	EN1+10~, EN1+11*, EN1+12
ORSUB	ADD+1~, ADD+2*, ADD+3
ORTN	EN1+7~, EN1+18, EN1+19
ORTSK	TASK+1~, TASK+2, TASK+3, TASK+4
ORU	ADD+1~, ADD+2, ADD+4, ADD+5*
ORUSR	EN~, EN+8, EN1~, EN1+7, RSLT+2, TASK+2, EVNT+2, SIGN+4
ORX	EN1+7~, EN1+13, EN1+14, EN1+20, ADD+1~, ADD+2, ADD+4, ADD+5, ADD+6
ORY	MAIN~, MAIN+8, MAIN+9, MAIN+10, EN~, EN1~, EN1+27, ERROR~, ERROR+3, ERROR+4 , ERROR+6, FORMAT+2, FORMAT+5, FORMAT+10, ADD+4, ADD+6
PAT	EN1+7~, EN1+16, EN1+23, RSLT+1~, RSLT+2, RSLT+3, TASK+1~, TASK+2, TASK+3, EVNT+1~ , EVNT+2, EVNT+3, SIGN+1~, SIGN+4, SIGN+5
RANGE	EXPDATES+2~, EXPDATES+5*, EXPDATES+6, EXPDATES+7
TYPE	MAIN~, MAIN+7*, MAIN+8, ADD~, ADD+2, ADD+4
U	EN1+11, FORMAT+5, ADD+5
USER	MAIN~, MAIN+7*, MAIN+8, MAIN+9, MAIN+10
VA	FORMAT+1~
VA("PID"	FORMAT+5
VADM	FORMAT+1~
VADM(1	FORMAT+5
VADM(3	FORMAT+5
VADM(4	FORMAT+5
VAERR	FORMAT+1~
X	EN1+7~, EN1+14, EN1+15, EN1+17, EN1+18, EN1+19, ADD+1~, ADD+3, ADD+4, ADD+5

Customize PDF page

Package: Care Management

Routine: ORRCDPT

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Used in RPC

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: