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 |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ORB31

Package: Order Entry Results Reporting

Routine: ORB31


Information

ORB31 ; slc/CLA - Routine to support OE/RR 3 notifications ;06/27/17 07:14

Source Information

Source file <ORB31.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Kernel 4 (,KILL)^%ZTLOAD  ($$FMADD,$$FMTE,$$NOW)^XLFDT  RESTORE^XQALERT1  FORWARD^XQALFWD  
Order Entry Results Reporting 1 $$ORDERER^ORQOR2  
Registration 1 INP^VADPT  
VA FileMan 1 (,LIST)^DIC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 21

Package Total Caller Graph
Order Entry Results Reporting 17 OCXOZ08  OCXOZ0A  OCXOZ0W  ORB FORWARD ALERT  ORB RENEW ALERT  ORB3  ORB3FUP2  ORB3REG  
ORB3SPEC  ORB3TIM1  ORB3TIM2  ORB3U1  ORB3USER  ORBPRCHK  ORKLR  ORKPS  
ORWDPLM1  
Inpatient Medications 1 PSJLMHED  
Outpatient Pharmacy 1 PSOORUT2  
Shift Handoff Tool 1 CRHDDNR  
Text Integration Utility 1 TIUTIUS  

Entry Points

Name Comments DBIA/ICR reference
QUEUE(ORN,ORBDFN,ORNUM,ORBADUZ,ORBPMSG,ORBPDATA,ORBH,ORBD,ORDGPMA,ORFORCE) ;
DUP(ORN,ORBDFN,ORBPMSG,ORNUM) ;ext funct return "1" if a duplicate notif w/in 1 min.
RECIP(ORNUM)
REGDEV(ORBDA) ;send to regular recipient devices
PRINTD ;print queued notification to device - setup via REGDEV^ORB3
FWD(ORY,ORBLST,ORBRECIP,ORBTYPE,ORBCOMNT) ; forward a notification
RENEW(ORY,XQAID) ; renew/restore an alert/notification
TERMLKUP(OCXARR,OCXTERM) ; extrinsic function returns the local terms
; linked to the nat'l OCX term in an array and the file where those
; array terms can be found. The value of the extrinsic function is the
; file pointed to for the local terms.
DUPCLN(ORBNOW) ;clean up old entires in ^XTMP("ORBDUP")
TMDEV(ORBTM) ;returns Device for a team in format device ien^device name
ENTITY(ORNUM) ;ext funct. rtns entity for parameter use
ADT(ORN,ORBDFN,ORBPRIM,ORBATTD,ORDGPMA) ;get inpt primary and attending for ADT notifs
DEFDIV(ORDUZ) ; Return user's default division, if specified.
ORDIV(ORNUM) ; Return order's division based upon patient's location when order was placed

External References

Name Field # of Occurrence
^%ZTLOAD QUEUE+31, REGDEV+7
KILL^%ZTLOAD PRINTD+1
^DIC QUEUE+15, TMDEV+7
LIST^DIC DEFDIV+8
$$ORDERER^ORQOR2 DUP+11
INP^VADPT ADT+10
$$FMADD^XLFDT DUP+5, DUP+14, DUPCLN+2, ADT+5
$$FMTE^XLFDT PRINTD+4
$$NOW^XLFDT DUP+4, REGDEV+3
RESTORE^XQALERT1 RENEW+3
FORWARD^XQALFWD FWD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: XQAMSG
  • Line Location: PRINTD+2
Function Call: WRITE
  • Prompt: !!!," ***** NOTIFICATION PROCESSED *****",!!
  • Line Location: PRINTD+3
Function Call: WRITE
  • Prompt: $$FMTE^XLFDT(ORBDT)," "
  • Line Location: PRINTD+4
Function Call: WRITE
  • Prompt: XQAMSG
  • Line Location: PRINTD+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINTD+6
Routine Call
  • DIC
  • Line Location:
    • QUEUE+15
    • TMDEV+7
Routine Call
  • DIC
  • Line Location:
    • DEFDIV+8

Used in RPC

RPC Name Call Tags
ORB FORWARD ALERT FWD
ORB RENEW ALERT RENEW

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
200.02 LIST^DIC

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] QUEUE+20, ADT+4
^OCXS(860.9 - [#860.9] TERMLKUP+10, TERMLKUP+12, TERMLKUP+13, TERMLKUP+14
^OR(100 - [#100] RECIP+2, RECIP+3, ORDIV+3, ORDIV+6
^OR(100.21 - [#100.21] TMDEV+4, TMDEV+5
^SC - [#44] ORDIV+8
^XTMP("ORBDUP" DUP+5*, DUP+6*, DUP+8, DUP+15*, DUPCLN+4, DUPCLN+5, DUPCLN+6!
^XTV(8992 - [#8992] RENEW+3

Label References

Name Line Occurrences
$$ORDIV ENTITY+5
$$RECIP DUP+12
DUPCLN DUP+16

Naked Globals

Name Field # of Occurrence
^(0 TERMLKUP+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIC QUEUE+13~, QUEUE+15*, QUEUE+21!, TMDEV+7*, TMDEV+10!
DIC(0 QUEUE+15*, TMDEV+7*
DTOUT QUEUE+21!
DUOUT QUEUE+21!
DUZ RENEW+3
FILE TERMLKUP+8~, TERMLKUP+9*, TERMLKUP+12*, TERMLKUP+16
I TERMLKUP+8~, TERMLKUP+9*, TERMLKUP+14, TERMLKUP+15*
IOF PRINTD+6
IOST PRINTD+6
>> IOT PRINTD+2
OCXARR TERMLKUP~, TERMLKUP+15*
OCXARR( TERMLKUP+14*
OCXI TERMLKUP+8~, TERMLKUP+9*, TERMLKUP+10*, TERMLKUP+11, TERMLKUP+12, TERMLKUP+13, TERMLKUP+14
OCXJ TERMLKUP+8~, TERMLKUP+9*, TERMLKUP+13*, TERMLKUP+14
OCXTERM TERMLKUP~, TERMLKUP+10
ORBADTDT ADT+1~, ADT+4*, ADT+5
ORBADUZ QUEUE~
ORBATTD ADT~, ADT+11*
ORBCOMNT FWD~, FWD+3
ORBD QUEUE~, QUEUE+19, REGDEV+1~, REGDEV+2*, REGDEV+4*, REGDEV+6
ORBDA REGDEV~
ORBDA( REGDEV+4
ORBDFN QUEUE~, QUEUE+20, DUP~, DUP+6, DUP+8, DUP+15, ADT~, ADT+4
ORBDT REGDEV+1~, REGDEV+3*, PRINTD+4, DUPCLN+1~, DUPCLN+5*, DUPCLN+6
ORBDUP DUP+1~, DUP+2*, DUP+14*, DUP+17
ORBENT ENTITY+1~, ENTITY+2*, ENTITY+6*, ENTITY+7
ORBH QUEUE~, QUEUE+18
ORBLAST DUP+1~, DUP+8*, DUP+9, DUP+10*, DUP+14
ORBLST FWD~, FWD+1, FWD+2, FWD+3
ORBLST(1 FWD+2*
ORBNOW DUP+1~, DUP+4*, DUP+5, DUP+6, DUP+14, DUP+15, DUP+16, DUPCLN~, DUPCLN+2
ORBPDATA QUEUE~
ORBPMSG QUEUE~, DUP~, DUP+6, DUP+8, DUP+15
ORBPRIM ADT~, ADT+11*
ORBRECIP FWD~, FWD+3
ORBTDEV TMDEV+1~, TMDEV+5*, TMDEV+6, TMDEV+7, TMDEV+11
ORBTDEVN TMDEV+1~, TMDEV+2*, TMDEV+9*, TMDEV+11
ORBTM TMDEV~, TMDEV+3, TMDEV+4, TMDEV+5
ORBTYPE FWD~, FWD+3
ORBX DUPCLN+1~, DUPCLN+3*, DUPCLN+4*, DUPCLN+5, DUPCLN+6
ORDD DEFDIV+2~, DEFDIV+5*, DEFDIV+11*, DEFDIV+13
ORDGPMA QUEUE~, ADT~, ADT+4, ADT+7
ORDIV ENTITY+4~, ENTITY+5*, ENTITY+6, DEFDIV+2~, DEFDIV+4*, DEFDIV+13*, DEFDIV+14, ORDIV+4~, ORDIV+5*, ORDIV+8*
, ORDIV+9
ORDUZ DEFDIV~, DEFDIV+8
ORFORCE QUEUE~
ORGOOD DEFDIV+2~, DEFDIV+5*, DEFDIV+11, DEFDIV+13*
ORI RECIP~, RECIP+2*, RECIP+3
ORLNUM DUP+1~, DUP+9*, DUP+11, DUP+12
ORN QUEUE~, DUP~, DUP+6, DUP+8, DUP+12, DUP+15, ADT~, ADT+3, ADT+7
ORNDT DUPCLN+1~, DUPCLN+2*, DUPCLN+6
ORNUM QUEUE~, DUP~, DUP+6, DUP+11, DUP+12, DUP+15, RECIP~, RECIP+1, RECIP+2, RECIP+3
, ENTITY~, ENTITY+3, ENTITY+5, ORDIV~, ORDIV+2, ORDIV+3, ORDIV+6
ORSAMEP DUP+1~, DUP+3*, DUP+11*, DUP+14
ORSAMEREC DUP+1~, DUP+12*, DUP+14
ORY FWD~, FWD+1*, FWD+4*, RENEW~, RENEW+4*
ORZ DEFDIV+2~
ORZ("DILIST" DEFDIV+9, DEFDIV+11, DEFDIV+13
ORZERR DEFDIV+2~
PTLOC ORDIV+4~, ORDIV+6*, ORDIV+7, ORDIV+8
RECIP RECIP~, RECIP+3*, RECIP+4
U QUEUE+16, QUEUE+20, RECIP+3, TERMLKUP+12, TERMLKUP+14, TMDEV+5, TMDEV+9, TMDEV+11, ADT+4, ADT+7
, ADT+11, DEFDIV+9, DEFDIV+13, ORDIV+6, ORDIV+8
>> VAIN(11 ADT+11
>> VAIN(2 ADT+11
VAINDT ADT+1~, ADT+5*, ADT+7*, ADT+9
X QUEUE+13~, QUEUE+15*, TMDEV+7*, TMDEV+10!
XQAID RENEW~, RENEW+1, RENEW+3
XQAKILL RENEW+2!
>> XQAMSG PRINTD+2, PRINTD+5
Y QUEUE+13~, QUEUE+16, QUEUE+21!, TMDEV+8, TMDEV+9, TMDEV+10!, DEFDIV+5*
ZTCPU QUEUE+13~, QUEUE+21!
ZTDESC QUEUE+13~, QUEUE+19*, QUEUE+20*, REGDEV+5*
ZTDTH QUEUE+13~, QUEUE+18*, REGDEV+5*
ZTIO QUEUE+13~, QUEUE+16*, QUEUE+17*, REGDEV+6*
ZTPAR QUEUE+13~, QUEUE+21!
ZTPRE QUEUE+13~, QUEUE+21!
ZTPRI QUEUE+13~, QUEUE+21!
ZTREQ QUEUE+13~
ZTRTN QUEUE+13~, QUEUE+18*, REGDEV+5*
ZTSAVE QUEUE+13~, QUEUE+21!
ZTSAVE("ORBADUZ(" QUEUE+26*
ZTSAVE("ORBDFN" QUEUE+24*
ZTSAVE("ORBDT" REGDEV+6*
ZTSAVE("ORBPDATA" QUEUE+28*
ZTSAVE("ORBPMSG" QUEUE+27*
ZTSAVE("ORDGPMA" QUEUE+29*
ZTSAVE("ORFORCE(" QUEUE+30*
ZTSAVE("ORN" QUEUE+23*
ZTSAVE("ORNUM" QUEUE+25*
ZTSAVE("XQAMSG" REGDEV+6*
ZTSK QUEUE+13~, PRINTD+1
ZTUCI QUEUE+13~, QUEUE+21!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All