Routine: OREVNTX1

Package	Total	Call Graph
Order Entry Results Reporting	5	$$DEFTS^ORCDADT ($$CANREL,GETLST)^OREV3 ($$MATCH,$$NEW)^OREVNT ($$COMP,$$DIV,$$EMPTY,$$EVT,$$EXISTS,$$LOC,$$NAME,ACTLOG,CANCEL,CHGEVT,DONE)^OREVNTX GRP^ORQ1
Registration	1	$$PT^DGPMOBS
Toolkit	1	($$GET,DEL,EN,GETLST)^XPAR
VA FileMan	1	$$GET1^DIQ

Package	Total	Caller Graph
Order Entry Results Reporting	41	OREVNTX1 AUTHMREL OREVNTX1 CHGEVT OREVNTX1 CMEVTS OREVNTX1 COMP OREVNTX1 CPACT OREVNTX1 CURSPE OREVNTX1 DEFLTS OREVNTX1 DELDFLT OREVNTX1 DELPTEVT OREVNTX1 DFLTDLG OREVNTX1 DFLTEVT OREVNTX1 DIV OREVNTX1 DIV1 OREVNTX1 DLGIEN OREVNTX1 DONE OREVNTX1 EMPTY OREVNTX1 EVT OREVNTX1 EXISTS OREVNTX1 GETDLG OREVNTX1 GETSTS OREVNTX1 GTEVT OREVNTX1 GTEVT1 OREVNTX1 HAVEPRT OREVNTX1 ISDCOD OREVNTX1 ISHDORD OREVNTX1 ISPASS OREVNTX1 ISPASS1 OREVNTX1 LOC OREVNTX1 LOC1 OREVNTX1 MATCH OREVNTX1 MULTS OREVNTX1 NAME OREVNTX1 ODPTEVID OREVNTX1 PRMPTID OREVNTX1 PROMPT IDS OREVNTX1 PUTEVNT OREVNTX1 SETDFLT OREVNTX1 TYPEXT OREVNTX1 WRLSTED ORWOR ORWORR

Entry Points

Name	Comments	DBIA/ICR reference
PUTEVNT(ORY,DFN,EVT,ORIFN)	; Save new patient delayed events to file 100.2
GTEVT(ORY,PTEVT)	; Return Event infomation based on PTEVT ptr #100.2
GTEVT1(ORY,EVT)	; Return Event information based on EVT ptr #100.5
EVT(ORY,PTEVT)	; Return Event ptr #100.5, given PTEVT ptr #100.2
EXISTS(ORY,DFN,EVT)	;Returns PtEvtID ptr #100.2 if patient already has delayed orders
TYPEXT(ORY,DFN,EVT)	; does EVT has delayed orders? ; 1 if Patient DFN has delayed orders for EVT ; 2 if Parent/Sibling event has delayed orders ; 0 if No delayed orders for EVT
MATCH(ORY,DFN,EVT)	;If Pt's current data match selected event
NAME(ORY,PTEVT)	; Return Event name from #100.5, given PTEVT ptr #100.2
DIV(ORY,PTEVT)	; Return division for PTEVT ptr #100.2
DIV1(ORY,EVT)	; Return division for EVT ptr #100.5
LOC(ORY,PTEVT)	; Return default hospital location ^SC( for PTEVT ptr #100.2
LOC1(ORY,EVT)	; Return default hospital location ^SC( for EVT ptr #100.5
CHGEVT(ORY,NEWEVT,ORIDS)	; Change order's event
EMPTY(ORY,PTEVT)	; Return 1 if PTEVT doesn't have any orders
DELPTEVT(ORY,PTEVT)	; Delete Patient Event in #100.2
UPDTOR(ORY,PTIFN,ORIFN,PTEVT)	; If delayed order was DCed, then update the EVENT and "AEVNT"
CURSPE(ORY,PTIFN)	; Return current treating specialty
DFLTEVT(ORY,PVIFN)	; Return default release event based on provider IFN
CMEVTS(ORY,CLOC)	;Return common event list
DELDFLT(ORY,PVIFN)	; Delete default release event
WRLSTED(LST,LOC,EVTID)	; Return list of dialogs for writing event delayed orders ; .Y(n): DlgName^ListBox Text
WRLST1
GETDLG(LST,DLGID)	; Return dialog infomation based on the DLGID
DONE(LST,PTEVT)	; Terminate PTEvt
SETDFLT(ORY,EVT)	;Set personal default event
CPACT(ORY,EVT)	; Return True/False to display active orders for copy ; EVT ptr to #100.5
PRMPTID(ORY,PRTNM)	;Return event prompt IEN for OR GTX EVENT
ISDCOD(ORY,ORIFN)	;True: the order need to be filtered out
DEFLTS(ORY,EVTID)	;Return default specialty for EVTID(#100.5)
MULTS(ORY,EVTID)	;Return specialty list for the EVTID(#100.5)
PRTIDS(ORY,IDS)	;Return some prompt ids from #101.41 ; treating specialty Id^attending provider id
DFLTDLG(ORY,EVTID)	;Return event default dialog IEN
AUTHMREL(ORY,USER)	;1: user can manual release delayed orders 0: can't
HAVEPRT(ORY,PTEVT)	;return parent patient event from #100.2
GRPCHK(DG,AGRP)	;If an order's group belong to DG group
ODPTEVID(ORY,ORID)	;Return PtEvtID based on the ORID
COMP(ORY,PTEVT)	;Return 1 or 0 if PTEVT completed or not
ISHDORD(ORY,ORID)	;Return 1 if it's on-hold med order
ISPASS(ORY,PTEVTID,EVTTYPE)	;Return 1 if it's a pass event
ISPASS1(ORY,EVTID,EVTTYPE)	;Return 1 if it's a pass event
DLGIEN(ORY,DLGNAME)	;Return Order Dialog IEN based on name
GETSTS(ORY,ORDID)	;Return Order status
CHKORD(ORDER)	;Extrinsic function to determine if order is delayed and the "event" order

Name	Field # of Occurrence
$$PT^DGPMOBS	CURSPE+2
$$GET1^DIQ	MULTS+8
$$DEFTS^ORCDADT	DEFLTS+6
$$CANREL^OREV3	AUTHMREL+1
GETLST^OREV3	DFLTEVT+3, CMEVTS+4
$$MATCH^OREVNT	MATCH+5
$$NEW^OREVNT	PUTEVNT+1
$$COMP^OREVNTX	COMP+2
$$DIV^OREVNTX	DIV+2
$$EMPTY^OREVNTX	EMPTY+2
$$EVT^OREVNTX	GTEVT+7, EVT+2, ISPASS+1
$$EXISTS^OREVNTX	TYPEXT+5
$$LOC^OREVNTX	LOC+2
$$NAME^OREVNTX	NAME+2
ACTLOG^OREVNTX	DONE+3
CANCEL^OREVNTX	DELPTEVT+2
CHGEVT^OREVNTX	CHGEVT+4
DONE^OREVNTX	DONE+2
GRP^ORQ1	GRPCHK+4
$$GET^XPAR	WRLST1+4
DEL^XPAR	DELDFLT+4
EN^XPAR	SETDFLT+4
GETLST^XPAR	ISDCOD+6

RPC Name	Call Tags
OREVNTX1 PUTEVNT	PUTEVNT
OREVNTX1 GTEVT	GTEVT
OREVNTX1 WRLSTED	WRLSTED
OREVNTX1 EVT	EVT
OREVNTX1 EXISTS	EXISTS
OREVNTX1 NAME	NAME
OREVNTX1 MATCH	MATCH
OREVNTX1 GTEVT1	GTEVT1
OREVNTX1 DIV	DIV
OREVNTX1 DIV1	DIV1
OREVNTX1 LOC	LOC
OREVNTX1 LOC1	LOC1
OREVNTX1 CHGEVT	CHGEVT
OREVNTX1 EMPTY	EMPTY
OREVNTX1 DELPTEVT	DELPTEVT
OREVNTX1 GETDLG	GETDLG
OREVNTX1 CURSPE	CURSPE
OREVNTX1 DFLTEVT	DFLTEVT
OREVNTX1 DONE	DONE
OREVNTX1 CPACT	CPACT
OREVNTX1 PRMPTID	PRMPTID
OREVNTX1 ISDCOD	ISDCOD
OREVNTX1 SETDFLT	SETDFLT
OREVNTX1 DEFLTS	DEFLTS
OREVNTX1 MULTS	MULTS
OREVNTX1 PROMPT IDS	PRTIDS
OREVNTX1 DELDFLT	DELDFLT
OREVNTX1 DFLTDLG	DFLTDLG
OREVNTX1 TYPEXT	TYPEXT
OREVNTX1 AUTHMREL	AUTHMREL
OREVNTX1 HAVEPRT	HAVEPRT
OREVNTX1 CMEVTS	CMEVTS
OREVNTX1 ODPTEVID	ODPTEVID
OREVNTX1 COMP	COMP
OREVNTX1 ISHDORD	ISHDORD
OREVNTX1 ISPASS	ISPASS
OREVNTX1 ISPASS1	ISPASS1
OREVNTX1 DLGIEN	DLGIEN
OREVNTX1 GETSTS	GETSTS

FileNo	Call Tags
^DIC(45.7 - [#45.7]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DIC(45.7 - [#45.7]	MATCH+8
^DPT - [#2]	MATCH+7
^OR(100 - [#100]	ISDCOD+3, ISDCOD+4, ISDCOD+12, ODPTEVID+1, ODPTEVID+2, ISHDORD+2, ISHDORD+5, ISHDORD+10, GETSTS+2, GETSTS+3 , CHKORD+4
^ORD(100.01 - [#100.01]	ISHDORD+4
^ORD(100.5 - [#100.5]	GTEVT+8, GTEVT+9, GTEVT+10, GTEVT+11, GTEVT+12, GTEVT+13, GTEVT+14, GTEVT1+5, GTEVT1+6, GTEVT1+7 , GTEVT1+8, GTEVT1+9, GTEVT1+10, DIV1+2, LOC1+2, CMEVTS+7, CMEVTS+9, SETDFLT+2, SETDFLT+3, CPACT+4 , CPACT+5, DEFLTS+4, MULTS+5, MULTS+7, DFLTDLG+3, DFLTDLG+4, DFLTDLG+5, ISPASS+2, ISPASS1+1
^ORD(100.98 - [#100.98]	ISHDORD+6, ISHDORD+7, ISHDORD+8, ISHDORD+9
^ORD(101.41 - [#101.41]	WRLST1+5, WRLST1+6, WRLST1+7, WRLST1+8, WRLST1+9, GETDLG+4, PRMPTID+1, PRTIDS+4, PRTIDS+5, PRTIDS+6 , PRTIDS+7, DLGIEN+1, DLGIEN+2
^ORE(100.2 - [#100.2]	GTEVT+6, EXISTS+3, HAVEPRT+3, CHKORD+4
^VA(200 - [#200]	WRLST1+2

Name	Line Occurrences
$$GRPCHK	ISDCOD+9

Name	Field # of Occurrence
^(	MULTS+7
^("OR GTX EVENT"	PRMPTID+1
^(0	CMEVTS+7
^(1	HAVEPRT+3
^(5	WRLST1+2, GETDLG+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AGRP	GRPCHK~, GRPCHK+5
ANENT	WRLST1~, WRLST1+2*, WRLST1+4
CLOC	CMEVTS~, CMEVTS+2
CMEVTLST	DFLTEVT+1~, DFLTEVT+2*, DFLTEVT+3
CMEVTLST(	DFLTEVT+4, DFLTEVT+5
CNT	MULTS+2~, MULTS+9
DFID	GETDLG+1~, GETDLG+5, GETDLG+7, GETDLG+8
DFN	PUTEVNT~, PUTEVNT+1, EXISTS~, EXISTS+3, TYPEXT~, TYPEXT+5, MATCH~, MATCH+4, MATCH+5, MATCH+7
DG	GRPCHK~, GRPCHK+4
DGRP	WRLST1+3~, WRLST1+9, WRLST1+12, GETDLG+1~, GETDLG+5, GETDLG+8
DIEN	GETDLG+1~
DLGID	GETDLG~, GETDLG+2*, GETDLG+3, GETDLG+4, GETDLG+8
DLGNAME	DLGIEN~, DLGIEN+1, DLGIEN+2
DTXT	GETDLG+1~, GETDLG+5, GETDLG+6, GETDLG+8
DTYP	GETDLG+1~, GETDLG+5*, GETDLG+8
DUZ	WRLST1+2, SETDFLT+4
DUZ(2	DIV1+2
ERR	SETDFLT+1~*, SETDFLT+4, SETDFLT+5
EVT	PUTEVNT~, PUTEVNT+1, GTEVT1~, GTEVT1+2, GTEVT1+5, GTEVT1+7, GTEVT1+8, GTEVT1+9, GTEVT1+10, GTEVT1+11 , EXISTS~, EXISTS+1, EXISTS+3, TYPEXT~, TYPEXT+4, TYPEXT+5, MATCH~, MATCH+4, MATCH+5, DIV1~ , DIV1+1, DIV1+2, LOC1~, LOC1+1, LOC1+2, SETDFLT~, SETDFLT+2, SETDFLT+3, CPACT~, CPACT+2 , CPACT+4, CPACT+5
EVTDISP	GTEVT+3~, GTEVT+4, GTEVT+13, GTEVT+15, GTEVT1+3~, GTEVT1+9*, GTEVT1+11
EVTDLG	GTEVT+3~, GTEVT+5, GTEVT+14, GTEVT+15, GTEVT1+3~, GTEVT1+4, GTEVT1+10, GTEVT1+11
EVTID	GTEVT+3~, GTEVT+7, GTEVT+8, GTEVT+10, GTEVT+11, GTEVT+12, GTEVT+13, GTEVT+14, GTEVT+15, WRLSTED~ , WRLST1+4, DEFLTS~, DEFLTS+1, DEFLTS+4, DEFLTS+5, DEFLTS+6, MULTS~, MULTS+1, MULTS+5, MULTS+6* , MULTS+7, DFLTDLG~, DFLTDLG+3*, DFLTDLG+4, DFLTDLG+5, ISPASS1~, ISPASS1+1
EVTNAME	GTEVT+3~, GTEVT+4, GTEVT+12, GTEVT+15, GTEVT1+3~, GTEVT1+8*, GTEVT1+11
EVTTYPE	GTEVT+3~, GTEVT+4, GTEVT+9, GTEVT+10, GTEVT+15, GTEVT1+3~, GTEVT1+6, GTEVT1+7*, GTEVT1+11, ISPASS~ , ISPASS+3, ISPASS1~, ISPASS1+2
FID	WRLST1+3~, WRLST1+8, WRLST1+11, WRLST1+12
HDSTS	ISHDORD+3~, ISHDORD+4*, ISHDORD+11
I	MULTS+2~, MULTS+7
IDS	PRTIDS~
IDX	DFLTEVT+1~, DFLTEVT+2, DFLTEVT+4, DFLTEVT+5, CMEVTS+1~, CMEVTS+3, CMEVTS+5, CMEVTS+7, CMEVTS+10, ISDCOD+1~ , ISDCOD+2, ISDCOD+7, ISDCOD+8, PRTIDS+2~, PRTIDS+4, PRTIDS+5, PRTIDS+6, PRTIDS+7
IEN	WRLST1+3~, WRLST1+6*, WRLST1+7
INPT	ISHDORD+3~, ISHDORD+6*, ISHDORD+11
ITM	WRLST1+3~, WRLST1+7*, WRLST1+8, WRLST1+9, WRLST1+12
IVMD	ISHDORD+3~, ISHDORD+9*, ISHDORD+11
LOC	CMEVTS+1~, CMEVTS+2, WRLSTED~, WRLST1+1, WRLST1+2
LST	WRLSTED~, GETDLG~, GETDLG+8*, DONE~
LST(	WRLST1+12*
MEDS	ISHDORD+3~, ISHDORD+8*, ISHDORD+11
MNU	WRLST1+3~, WRLST1+4*, WRLST1+5, WRLST1+6, WRLST1+7
NEWEVT	CHGEVT~, CHGEVT+4
ODGP	ISHDORD+3~, ISHDORD+10*, ISHDORD+11
ODGRP	ISDCOD+1~, ISDCOD+5*, ISDCOD+9
ORATT	PRTIDS+2~, PRTIDS+3, PRTIDS+7, PRTIDS+8
ORDER	CHKORD~, CHKORD+4
ORDID	GETSTS~, GETSTS+1, GETSTS+2, GETSTS+3
ORERR	DELDFLT+2~, DELDFLT+3*, DELDFLT+4
ORGRP	GRPCHK+3~
ORGRP(	GRPCHK+5
ORGRPLST	ISDCOD+1~, ISDCOD+6
ORGRPLST(	ISDCOD+7, ISDCOD+8
ORI	CHGEVT+1~, CHGEVT+2, CHGEVT+3, CHGEVT+4
ORID	ODPTEVID~, ODPTEVID+1, ODPTEVID+2, ISHDORD~, ISHDORD+1, ISHDORD+2, ISHDORD+5, ISHDORD+10
ORIDS	CHGEVT~
ORIDS(	CHGEVT+3, CHGEVT+4
ORIFN	PUTEVNT~, PUTEVNT+1, UPDTOR~, ISDCOD~, ISDCOD+3, ISDCOD+4, ISDCOD+12
>> ORL	LOC1+2
ORTS	MATCH+7, PRTIDS+2~, PRTIDS+3, PRTIDS+5, PRTIDS+8
ORY	PUTEVNT~, PUTEVNT+1, GTEVT~, GTEVT+15, GTEVT1~, GTEVT1+11, EVT~, EVT+2, EXISTS~, EXISTS+1* , EXISTS+2, EXISTS+4, TYPEXT~, TYPEXT+5, MATCH~, MATCH+3, MATCH+5, MATCH+9, NAME~, NAME+1* , NAME+2, DIV~, DIV+2, DIV1~, DIV1+2, LOC~, LOC+2, LOC+3, LOC1~, LOC1+2 , CHGEVT~, EMPTY~, EMPTY+2, DELPTEVT~, UPDTOR~, CURSPE~, CURSPE+2, CURSPE+3, DFLTEVT~, DFLTEVT+5 , CMEVTS~, CMEVTS+3, CMEVTS+4, DELDFLT~, SETDFLT~, SETDFLT+5, CPACT~, CPACT+3, CPACT+5, PRMPTID~ , PRMPTID+1, ISDCOD~, ISDCOD+2, ISDCOD+7, ISDCOD+9, ISDCOD+10, ISDCOD+14, DEFLTS~, DEFLTS+6, MULTS~ , PRTIDS~, PRTIDS+3, PRTIDS+8, DFLTDLG~, DFLTDLG+1, DFLTDLG+5, AUTHMREL~, AUTHMREL+1, HAVEPRT~, HAVEPRT+2* , HAVEPRT+3, ODPTEVID~, ODPTEVID+2, COMP~, COMP+2, ISHDORD~, ISHDORD+11, ISPASS~, ISPASS+1, ISPASS+2 , ISPASS+3, ISPASS+4, ISPASS1~, ISPASS1+1, ISPASS1+2, ISPASS1+3, DLGIEN~, DLGIEN+2, GETSTS~, GETSTS+3*
ORY(	CMEVTS+5, CMEVTS+7, CMEVTS+10, MULTS+9
OUPT	ISHDORD+3~, ISHDORD+7*, ISHDORD+11
PAS	ISDCOD+1~, ISDCOD+11*, ISDCOD+14
PRTEVT	GTEVT+3~, GTEVT+4, GTEVT+8, GTEVT+9, GTEVT1+3~, GTEVT1+4, GTEVT1+5, GTEVT1+6, DEFLTS+2~, DEFLTS+3* , DEFLTS+4, DEFLTS+5, MULTS+3~, MULTS+4, MULTS+5*, MULTS+6
PRTNM	PRMPTID~
PTEVT	GTEVT~, GTEVT+2, GTEVT+6, GTEVT+7, EVT~, EVT+1, EVT+2, EXISTS+2~, EXISTS+3, EXISTS+4 , NAME~, NAME+1, NAME+2, DIV~, DIV+1, DIV+2, LOC~, LOC+1, LOC+2, EMPTY~ , EMPTY+1, EMPTY+2, DELPTEVT~, DELPTEVT+1, DELPTEVT+2, UPDTOR~, DONE~, DONE+1, DONE+2, DONE+3 , HAVEPRT~, HAVEPRT+1, HAVEPRT+3, COMP~, COMP+1, COMP+2
PTEVTID	ISPASS~, ISPASS+1
PTIFN	UPDTOR~, CURSPE~, CURSPE+1, CURSPE+2
PVIFN	DFLTEVT~, DELDFLT~, DELDFLT+1, DELDFLT+4
RST	GRPCHK+1~, GRPCHK+2, GRPCHK+5, GRPCHK+6
SEQ	WRLST1+3~, WRLST1+5*, WRLST1+6, WRLST1+12
SPEC	CURSPE+2~*, CURSPE+3
STS	ISHDORD+3~, ISHDORD+5*, ISHDORD+11
THEGRP	ISDCOD+1~, ISDCOD+8*, ISDCOD+9
TS	MATCH+6~, MATCH+7*, MATCH+8
TSNM	MATCH+6~, MATCH+8*, MATCH+9
TXT	WRLST1+3~, WRLST1+7, WRLST1+10, WRLST1+12
TYP	WRLST1+3~, WRLST1+9*, WRLST1+11, WRLST1+12
U	GTEVT+6, GTEVT+8, GTEVT+9, GTEVT+10, GTEVT+12, GTEVT+13, GTEVT+14, GTEVT+15, GTEVT1+5, GTEVT1+6 , GTEVT1+7, GTEVT1+8, GTEVT1+9, GTEVT1+10, GTEVT1+11, MATCH+8, MATCH+9, DIV1+2, LOC1+2, CURSPE+3 , DFLTEVT+5, CMEVTS+8, CMEVTS+9, CMEVTS+10, WRLST1+7, WRLST1+8, WRLST1+9, WRLST1+10, WRLST1+12, GETDLG+5 , GETDLG+6, GETDLG+7, GETDLG+8, SETDFLT+3, CPACT+5, ISDCOD+5, ISDCOD+8, ISDCOD+14, DEFLTS+4, MULTS+5 , MULTS+9, PRTIDS+5, PRTIDS+7, DFLTDLG+3, DFLTDLG+5, HAVEPRT+3, ODPTEVID+2, ISHDORD+5, ISHDORD+10, ISHDORD+11 , ISPASS+2, ISPASS1+1, GETSTS+3, CHKORD+4
USER	AUTHMREL~
VAL	SETDFLT+1~, SETDFLT+3*, SETDFLT+4
VALUE	CHKORD+2~, CHKORD+3, CHKORD+4, CHKORD+5
X	CMEVTS+1~, CMEVTS+9, WRLST1+3~, WRLST1+7, WRLST1+8, WRLST1+9, WRLST1+10, MULTS+2~, MULTS+7*, MULTS+8 , MULTS+9
X0	CMEVTS+1~, CMEVTS+6, CMEVTS+7, CMEVTS+8, CMEVTS+9, CMEVTS+10, GETDLG+1~, GETDLG+4, GETDLG+5, GETDLG+6 , GETDLG+7, ISDCOD+1~, ISDCOD+4*, ISDCOD+5
X3	ISDCOD+1~, ISDCOD+12*, ISDCOD+14
X5	GETDLG+1~, GETDLG+4*, GETDLG+5
Y	MULTS+2~, MULTS+8*, MULTS+9

Customize PDF page

Package: Order Entry Results Reporting

Routine: OREVNTX1

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 41

Entry Points

External References

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: