Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: ORCSAVE2

Package: Order Entry Results Reporting

Routine: ORCSAVE2


Information

ORCSAVE2 ;SLC/MKB-Utilities to update an order ;Jun 03, 2020@15:21:13

Source Information

Source file <ORCSAVE2.m>

Call Graph

Call Graph

Call Graph Total: 22

Package Total Call Graph
Order Entry Results Reporting 14 $$SIGNREQD^ORCACT1  $$PTR^ORCD  $$MEALTIME^ORCDFHO  $$NEXTCOLL^ORCDLR1  DELALRT^ORCSAVE1  CANCEL^ORCSAVE2  CANCEL^ORCSEND  (NOTIF,UNOTIF)^ORCSIGN  
(RS,S1,S2,SETALL,SK,SS,WK,WS)^ORDD100  (EK,ES,OI1,OI2)^ORDD100A  (DELOCC,SAVEOC)^OROCAPI1  IMTYPSEL^ORWDRA32  DT^ORWU  $$SIGSTS^ORX1  
VA FileMan 4 ^%DT  FILE^DICN  (,FILE)^DIE  ^DIK  
Emergency Department Integration Software 1 (COMP,VER)^EDPFMON  
Inpatient Medications 1 $$RESOLVE^PSJORPOE  
Kernel 1 ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT  
Toolkit 1 GETLST^XPAR  

Caller Graph

Caller Graph Total: 64

Package Total Caller Graph
Order Entry Results Reporting 56 OCXOZ0F  OCXOZ11  ORB3TIM2  ORB3U2  ORCACT01  ORCACT1  ORCACT2  ORCDFHO  
ORCDLG  ORCDLR  ORCDLR1  ORCDLR2  ORCDPS3  ORCHECK  ORCMENU1  ORCSAVE2  
ORCSEND  ORCSEND1  ORCSEND2  ORCSEND3  ORELR2  ORELR3  ORELR5  OREVNTX  
ORKLR  ORKLR2  ORKPS  ORMBLD  ORMBLDFH  ORMBLDOR  ORMBLDPS  ORMEVNT  
ORMEVNT1  ORMEVNT2  ORMFH  ORMFH1  ORMGMRC  ORMLR  ORMLR1  ORMORG  
ORMPS  ORMPS2  ORMPS3  ORMRA  ORMSD  ORMVBEC  ORPR06  ORPR07A  
ORTSKLPS  ORWD  ORWDPS4  ORWDXA  ORWDXC  ORWDXR  ORWORB  ORY216  
Lab Service 4 LR541PST  LR7OF5  LR7OU1  LRJPON  
Emergency Department Integration Software 2 EDPFMON  EDPHIST  
Care Management 1 ORRCACK  
Outpatient Pharmacy 1 PSOUTOR  

Entry Points

Name Comments DBIA/ICR reference
STATUS(IFN,ST) ; -- Update status of order
CKPARENT(ORIFN) ; -- Update status of parent order, if appropriate
RELEASE(ORDER,ACTION,WHEN,WHO,NATURE) ; -- Mark order as released to service
FIXRAD(DA,TYPE) ; -- Fix Radiology Orders with start dates that are no longer valid
STARTDT(DA) ; -- resolve Start and Stop dates from Responses
STRT
STOP
NEXT ; -- Resolve next lab collection to FM date/time
AM ; -- Resolve AM lab collection to FM date/time
ADMIN(START) ; -- Resolve next/closest administration times to FM date/time
SIGN(DA,WHO,WHEN,HOW,WHAT) ; -- affix ES to order
SIGSTS(IFN,ACT) ; -- Set SigSts for backdoor orders [Called from ^ORM* rtns]
; Expects ORNATR, ORVP, ORNP to be defined
UNVEIL(IFN) ; -- unveil new order
DELETE(ORDER) ; -- delete order [action]
VERIFY(IFN,DA,TYPE,WHO,WHEN) ; -- order verified
COMP(IFN,WHO,WHEN) ; -- order completed
DATES(DA,START,STOP) ; -- Update start/stop dates for order DA
OC ; -- Save order checks in ORCHECK() in ^OR(100,+ORIFN,9) ON SIGNATURE IN CPRS
VALUE(IFN,ID,INST) ; -- Returns value of prompt by identifier ID
SC(ORX,ORIFN) ; -- save responses to SC questions
CANCEL(ORDER) ; -- cancel order [action]
LAPSE(ORDER) ; -- lapse order [action]
ALPS(DA,ORACT,TYPE) ;set the lapse index ^OR(100,"ALPS")
RESP(IFN,PRMT,VAL,INST) ; -- update a single Response VALue

External References

Name Field # of Occurrence
^%DT STRT+2, STOP+2
FILE^DICN RESP+11
^DIE CANCEL+6, CANCEL+8, LAPSE+6, LAPSE+10
FILE^DIE FIXRAD+17
^DIK RESP+13
COMP^EDPFMON COMP+4
VER^EDPFMON VERIFY+6
$$SIGNREQD^ORCACT1 SIGSTS+3
$$PTR^ORCD ADMIN+7, ADMIN+8, ADMIN+9
$$MEALTIME^ORCDFHO STARTDT+4
$$NEXTCOLL^ORCDLR1 NEXT+6, AM+7
DELALRT^ORCSAVE1 LAPSE+6
CANCEL^ORCSAVE2 DELETE+2
CANCEL^ORCSEND STATUS+7
NOTIF^ORCSIGN SIGSTS+6
UNOTIF^ORCSIGN STATUS+7
RS^ORDD100 RELEASE+11
S1^ORDD100 SIGN+6
S2^ORDD100 SIGN+2
SETALL^ORDD100 STATUS+9
SK^ORDD100 DATES+3
SS^ORDD100 STRT+3, DATES+5
WK^ORDD100 DATES+3
WS^ORDD100 STRTSTRT+3, DATES+5
EK^ORDD100A DATES+8
ES^ORDD100A STOP+3, DATES+8
OI1^ORDD100A STRT+3, DATES+5
OI2^ORDD100A DATES+3
DELOCC^OROCAPI1 OC+2
SAVEOC^OROCAPI1 OC+22
IMTYPSEL^ORWDRA32 FIXRAD+4
DT^ORWU FIXRAD+10
$$SIGSTS^ORX1 SIGSTS+3
$$RESOLVE^PSJORPOE ADMIN+12
$$DT^XLFDT FIXRAD+9
$$FMADD^XLFDT STOP
$$FMTE^XLFDT FIXRAD+12
$$NOW^XLFDT STATUS+4, RELEASE+1, VERIFY+4, COMP+1, OC+9, OC+35, ALPS+5
GETLST^XPAR NEXT+4, AM+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^OR(100 - [#100] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] STATUS+1, STATUS+4, STATUS+5*, CKPARENT+2, CKPARENT+4, CKPARENT+5!, CKPARENT+6, CKPARENT+9, CKPARENT+10!, CKPARENT+11
, RELEASE+2, RELEASE+7*, RELEASE+9, FIXRAD+1, FIXRAD+2, FIXRAD+7, FIXRAD+14, STARTDT+2, STRT+3*, STOP+3*
, ADMIN+3, ADMIN+4, SIGN+2, SIGN+5*, SIGSTS+2, SIGSTS+4!, SIGSTS+5*, SIGSTS+6*, UNVEIL+1*, VERIFY+5*
, COMP+3*, DATES+2, DATES+4*, DATES+8*, OC+1, VALUE+1, VALUE+3, SC+1, SC+2, SC+4*
, CANCEL+3, LAPSE+2, LAPSE+3, ALPS+2, ALPS+3, ALPS+4*, ALPS+5*, RESP+4, RESP+9, RESP+11*
, RESP+12*
^ORD(100.01 - [#100.01] STATUS+2
^ORD(100.02 - [#100.02] RELEASE+3
^ORD(100.05 - [#100.05] OC+26*, OC+33*, OC+34*, OC+35*
^ORD(100.98 - [#100.98] FIXRAD+7, STARTDT+2
^ORD(101.41 - [#101.41] RESP+1, RESP+3, RESP+10
^ORD(101.43 - [#101.43] ADMIN+10
^SC - [#44] NEXT+3, AM+3
^TMP($J VERIFY+2, OC+20, OC+30, OC+31, OC+33, OC+34, OC+36!

Label References

Name Line Occurrences
$$VALUE FIXRAD+9, STARTDT+4, STRTSTOPSTOP+1, ADMIN+5
ADMIN STRT+1
ALPS LAPSE+10
AM STRT+1
CKPARENT STATUS+8
DATES STATUS+6, COMP+2
FIXRAD RELEASE+8
NEXT STRT+1
RESP FIXRAD+13
STARTDT RELEASE+9
STATUS CKPARENT+7, CKPARENT+15, CKPARENT+16, COMP+2

Naked Globals

Name Field # of Occurrence
^(0 STATUS+4, NEXT+3, AM+3
^(1 VALUE+3
^(3 STATUS+1, CKPARENT+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT STARTDT+1~, STRT+2*, STOP+2*
ACT SIGSTS~, SIGSTS+2, SIGSTS+4, SIGSTS+5, SIGSTS+6
ACTION RELEASE~, RELEASE+1*, RELEASE+2, RELEASE+7, RELEASE+11
ACTIVE CKPARENT+1~, CKPARENT+8*, CKPARENT+14*, CKPARENT+16
ALLDONE CKPARENT+1~, CKPARENT+8*, CKPARENT+9, CKPARENT+14*, CKPARENT+15
ALLRELSD CKPARENT+1~, CKPARENT+3*, CKPARENT+4, CKPARENT+6*, CKPARENT+7
AM AM+1~, AM+5*, AM+6, AM+7
CH CKPARENT+1~, CKPARENT+4*, CKPARENT+5, CKPARENT+6, CKPARENT+9*, CKPARENT+10, CKPARENT+11
CHSTS CKPARENT+1~, CKPARENT+6*, CKPARENT+11*, CKPARENT+12, CKPARENT+13, CKPARENT+14
CNT OC+3~, OC+4*, OC+8*, OC+9, OC+10, OC+12, OC+14, OC+15, OC+17, OC+18
OC+19, OC+20
COMP CKPARENT+1~, CKPARENT+8*, CKPARENT+13*, CKPARENT+15
DA STATUS+3~, FIXRAD~, FIXRAD+1, FIXRAD+2, FIXRAD+7, FIXRAD+9, FIXRAD+13, FIXRAD+14, FIXRAD+16, STARTDT~
, STARTDT+2, STARTDT+4, STRTSTRT+3, STOPSTOP+1, STOP+3, ADMIN+2, ADMIN+3, ADMIN+4
, ADMIN+5, ADMIN+6, SIGN~, SIGN+1, SIGN+2, SIGN+5, SIGN+6, VERIFY~, VERIFY+1, VERIFY+5
, DATES~, DATES+1, DATES+2, DATES+3, DATES+4, DATES+5, DATES+8, CANCEL+1~, CANCEL+5*, CANCEL+8!*
, LAPSE+4~, LAPSE+5*, LAPSE+8~, LAPSE+9*, LAPSE+10, ALPS~, ALPS+2, ALPS+3, ALPS+4, ALPS+5
, RESP+2~, RESP+4*, RESP+5, RESP+12
DA(1 CANCEL+5*, LAPSE+5*, RESP+7*, RESP+13*
DC CKPARENT+1~, CKPARENT+8*, CKPARENT+12*, CKPARENT+15
DIC RESP+6~, RESP+7*
DIC("DR" RESP+8*
DIC(0 RESP+7*
DIE CANCEL+1~, CANCEL+5*, CANCEL+8*, LAPSE+4~, LAPSE+5*, LAPSE+8~, LAPSE+9*
DIK RESP+2~, RESP+13*
DLG RESP+6~, RESP+9*, RESP+10
DO RESP+6~
DR CANCEL+1~, CANCEL+6*, CANCEL+8*, LAPSE+4~, LAPSE+6*, LAPSE+8~, LAPSE+9*
DUZ RELEASE+1, SIGN+3, VERIFY+4, COMP+1, OC+9
DUZ(2 NEXT+3, AM+3
ENT NEXT+1~, NEXT+3*, NEXT+4, AM+1~, AM+3*, AM+4
ERROR FIXRAD+15~
FDA FIXRAD+15~
FDA(100 FIXRAD+16*
FLD VERIFY+3~*, VERIFY+5
HOW SIGN~, SIGN+3, SIGN+6
I FIXRAD+3~, FIXRAD+5*, FIXRAD+6*, ADMIN+1~, ADMIN+4*, ADMIN+5, ADMIN+7*, ADMIN+8, OC+3~, OC+5*
OC+6, OC+7, OC+9, OC+12, VALUE+2~*, VALUE+3*, SC+2~, SC+3*
ID VALUE~, VALUE+1, VALUE+3, RESP+2~, RESP+3*, RESP+4, RESP+8
IFN STATUS~, STATUS+1, STATUS+4, STATUS+5, STATUS+6, STATUS+7, STATUS+9, SIGSTS~, SIGSTS+2, SIGSTS+3
, SIGSTS+4, SIGSTS+5, SIGSTS+6, UNVEIL~, UNVEIL+1, VERIFY~, VERIFY+1, VERIFY+5, VERIFY+6, COMP~
, COMP+1, COMP+2, COMP+3, COMP+4, VALUE~, VALUE+1, VALUE+3, RESP~, RESP+1*, RESP+4
, RESP+7, RESP+9, RESP+11, RESP+12, RESP+13
INST VALUE~, VALUE+2*, VALUE+3, RESP~, RESP+2*, RESP+4, RESP+8
J OC+3~, OC+6*, OC+7
LAPS CKPARENT+1~, CKPARENT+8*, CKPARENT+11*, CKPARENT+15
LOC ADMIN+1~, ADMIN+3*, ADMIN+9*, ADMIN+12
NATURE RELEASE~, RELEASE+3
NEXT NEXT+1~, NEXT+7*
NODE0 STATUS+3~
NODE3 STATUS+3~, STATUS+4*, STATUS+5*, STATUS+8
NOW NEXT+1~, NEXT+5*, NEXT+6*, NEXT+7, AM+1~, AM+5*, AM+6
OC OC+3~, OC+7*, OC+9, OC+10
OCINST OC+25~*, OC+26, OC+28~, OC+29*, OC+33, OC+34, OC+35
OCTXT OC+28~*, OC+31
OI ADMIN+1~, ADMIN+5*, ADMIN+9*, ADMIN+10*, ADMIN+12
OR0 RELEASE+2~*, RELEASE+3*, RELEASE+4*, RELEASE+6*, RELEASE+7, RELEASE+8, RELEASE+9, SIGSTS+2~*, SIGSTS+4, SIGSTS+6
, ALPS+1~, ALPS+2*, ALPS+3
OR5 SC+2~*, SC+3*, SC+4
ORA CANCEL+1~, CANCEL+2*, CANCEL+3, CANCEL+5, CANCEL+7, LAPSE+1~*, LAPSE+2, LAPSE+3, LAPSE+5, LAPSE+7
, LAPSE+10
ORACT ALPS~, ALPS+2, ALPS+4
>> ORCHECK( OC+5, OC+6, OC+7
>> ORCHECK("OK" OC+12
>> ORCOMMENTS( OC+14
ORCROC OC+3~, OC+23
ORCROC( OC+18*, OC+24, OC+26
ORCROCI OC+24~*, OC+25, OC+26
ORDAY NEXT+1~, NEXT+5*, NEXT+6*, NEXT+7, AM+1~, AM+6*, AM+7
>> ORDCNTRL STATUS+6
ORDER RELEASE~, RELEASE+2, RELEASE+7, RELEASE+8, RELEASE+9, RELEASE+11, DELETE~, DELETE+2, CANCEL~, CANCEL+2*
, CANCEL+3, CANCEL+5, CANCEL+8, LAPSE~, LAPSE+1, LAPSE+2, LAPSE+3, LAPSE+5, LAPSE+6, LAPSE+9
ORDG FIXRAD+3~, FIXRAD+7*, FIXRAD+8, STARTDT+1~, STARTDT+2*, STARTDT+3, STARTDT+4
>> ORDIALOG( ADMIN+7, ADMIN+8, ADMIN+9
ORDLGS FIXRAD+3~, FIXRAD+5*, FIXRAD+6*, FIXRAD+8
ORGLOB OC+16~, OC+17*, OC+20
ORI OC+16~, OC+19*, OC+20*
ORICNT OC+16~, OC+19*, OC+20*
ORIFN CKPARENT~, CKPARENT+2, CKPARENT+4, CKPARENT+5, CKPARENT+7, CKPARENT+9, CKPARENT+10, CKPARENT+15, CKPARENT+16, OC+1
OC+2, OC+5, OC+6, OC+7, OC+9, OC+12, OC+14, SC~, SC+1, SC+2
, SC+4
ORK OC+3~, OC+21, OC+22
ORK( OC+9*, OC+10*, OC+12*, OC+14*, OC+15, OC+17, OC+18, OC+19*, OC+20*, OC+27
OC+28
ORKI OC+3~, OC+27*, OC+28, OC+29
>> ORL NEXT+3, AM+3
ORLAB STARTDT+1~, STARTDT+3*, STOPSTOP+1
ORLOG ALPS+1~, ALPS+3*, ALPS+4
ORMONOI OC+30~*, OC+31, OC+33, OC+34
ORMONOQ OC+30~*, OC+32*
>> ORNATR SIGSTS+3
ORNOW STATUS+3~, STATUS+4*, STATUS+5, STATUS+6
OROCRET OC+3~, OC+22
OROCRET( OC+25, OC+29
>> ORREASONS( OC+12
ORRULE OC+16~, OC+17*, OC+19, OC+20
ORSTS CKPARENT+1~, CKPARENT+2*, CKPARENT+3, CKPARENT+15*, CKPARENT+16
ORT STARTDT+1~, STARTDT+3*, STARTDT+4*, STRTSTOP+1
ORTIME NEXT+1~, NEXT+4, AM+1~, AM+4
ORTIME( NEXT+5, NEXT+7, AM+6, AM+7
ORTIME(0 AM+5
ORVP STATUS+3~, STATUS+4*, RELEASE+11, ADMIN+8, SIGSTS+4, SIGSTS+6, ALPS+1~, ALPS+3*, ALPS+4
ORX SC~, CANCEL+1~, CANCEL+4*
ORX( SC+3
P SC+2~*, SC+3*
PAT ADMIN+1~, ADMIN+3*, ADMIN+8*, ADMIN+12
PRMT RESP~, RESP+1*, RESP+3, RESP+8, RESP+10
PROV STATUS+3~
RADINFO FIXRAD+3~, FIXRAD+4
RADINFO( FIXRAD+6
SCH ADMIN+1~, ADMIN+5*, ADMIN+8*, ADMIN+12
ST STATUS~, STATUS+1, STATUS+2, STATUS+5, STATUS+6, STATUS+7
START FIXRAD+3~, FIXRAD+9*, FIXRAD+10, ADMIN~, ADMIN+12, DATES~, DATES+1, DATES+2, DATES+4
STARTFM FIXRAD+3~, FIXRAD+10*, FIXRAD+11, FIXRAD+14
STOP DATES~, DATES+6, DATES+8
TODAY FIXRAD+3~, FIXRAD+9*, FIXRAD+11, FIXRAD+12, FIXRAD+16
TODAYEXT FIXRAD+3~, FIXRAD+12*, FIXRAD+13
TYPE FIXRAD~, FIXRAD+14, VERIFY~, VERIFY+1, VERIFY+3, ALPS~, ALPS+4
U STATUS+1, STATUS+4, STATUS+5, STATUS+7, STATUS+8, CKPARENT+2, CKPARENT+6, CKPARENT+11, CKPARENT+12, CKPARENT+13
, RELEASE+3, RELEASE+4, RELEASE+6, RELEASE+8, RELEASE+9, FIXRAD+2, FIXRAD+6, FIXRAD+7, FIXRAD+8, FIXRAD+14
, STARTDT+2, STARTDT+3, STRT+3, STOP+3, NEXT+3, NEXT+7, AM+3, AM+7, ADMIN+3, ADMIN+4
, ADMIN+10, ADMIN+12, SIGN+3, SIGSTS+2, SIGSTS+5, UNVEIL+1, VERIFY+1, VERIFY+5, COMP+3, DATES+2
, DATES+4, DATES+8, OC+9, OC+10, OC+18, OC+35, VALUE+3, SC+3, ALPS+3, RESP+3
, RESP+4, RESP+9
VAL RESP~, RESP+1*, RESP+5, RESP+11, RESP+12
WHAT SIGN~, SIGN+1*, SIGN+2, SIGN+5, SIGN+6
WHEN RELEASE~, RELEASE+1*, RELEASE+6, RELEASE+11, SIGN~, SIGN+3, VERIFY~, VERIFY+4*, VERIFY+5, COMP~
, COMP+1*, COMP+2, COMP+3
WHO RELEASE~, RELEASE+1*, RELEASE+6, SIGN~, SIGN+3, VERIFY~, VERIFY+4*, VERIFY+5, COMP~, COMP+1*
, COMP+3
X STARTDT+1~, STRT*, STRT+1, STOP*, STOP+1*, NEXT+7*, AM+7*, ADMIN+12*, SIGN+2~*, SIGN+3*
, SIGN+5, SIGSTS+2~, SIGSTS+3*, SIGSTS+5, SIGSTS+6, ALPS+1~, RESP+6~, RESP+10*
XACT STATUS+3~
Y STARTDT+1~, STRT+2*, STRT+3, STOPSTOP+2*, STOP+3, ADMIN+1~, ADMIN+12*, VALUE+2~*, VALUE+3*
, VALUE+4, RESP+11

Marked Items

Name Field # of Occurrence
$T(COMP^EDPFMON COMP+4
$T(VER^EDPFMON VERIFY+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All