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

Entry Points

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

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
^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+2, DFLTDLG+3, 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
^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+2, DFLTDLG+3, 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
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+13, DEFLTS~, DEFLTS+6, MULTS~ , PRTIDS~, PRTIDS+3, PRTIDS+8, DFLTDLG~, DFLTDLG+1, DFLTDLG+3, 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+13
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+13, DEFLTS+4, MULTS+5 , MULTS+9, PRTIDS+5, PRTIDS+7, DFLTDLG+3, HAVEPRT+3, ODPTEVID+2, ISHDORD+5, ISHDORD+10, ISHDORD+11, ISPASS+2 , ISPASS1+1, GETSTS+3
USER	AUTHMREL~
VAL	SETDFLT+1~, SETDFLT+3*, SETDFLT+4
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+13
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

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: