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 |  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: ORCFLAG

Package: Order Entry Results Reporting

Routine: ORCFLAG


Information

ORCFLAG ; SLC/MKB - Flag orders ;12/26/2006

Source Information

Source file <ORCFLAG.m>

Call Graph

Call Graph Total: 15

Package Total Call Graph
Order Entry Results Reporting 5 EN^OCXOERR  $$VALID^ORCACT0  ($$HL7DATE,$$MSH,$$PID,$$PV1)^ORMBLD  TEXT^ORQ12  ($$LOCK1,UNLK1)^ORX2  
VA Fileman 3 ^DIC  $$GET1^DIQ  ^DIR  
Kernel 2 $$NOW^XLFDT  MSG^XQOR  
MailMan 2 KILL^XM  EN^XMB  
Inpatient Medications 1 OBR^PSJHL4  
Registration 1 DEM^VADPT  
Toolkit 1 $$GET^XPAR  

Caller Graph

Caller Graph Total: 12

Package Total Caller Graph
Inpatient Medications 4 PSGOE1  PSIVORC2  PSJLIORD  PSJOE  
Order Entry Results Reporting 4 ORCACT1  ORCB  ORWDXA  ORWORB  
Outpatient Pharmacy 4 PSOORFI2  PSOORFL  PSOORNEW  PSOORRNW  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- Flag order ORIFN
SHOWFLAG ; -- Display [last] flag for order ORIFN
LTIM(X) ; -- format FM date/time into MM/DD HH:MM
PROV(ORDR) ; -- Get provider to alert
MSG(ORDER)
EN1(ORIFN) ; -- standalone entry point to un/flag order ORIFN
BULLETIN ; -- Send bulletin re: flag
UN ; -- Unflag order ORIFN
COMMENT() ; -- Comments on unflag
REASON() ; -- Reason for flag

External References

Name Field # of Occurrence
^DIC PROV+5
$$GET1^DIQ MSG+5
^DIR REASON+4, COMMENT+4
EN^OCXOERR EN+8, UN+6
$$VALID^ORCACT0 EN1+6
$$HL7DATE^ORMBLD MSG+10
$$MSH^ORMBLD MSG+6
$$PID^ORMBLD MSG+7
$$PV1^ORMBLD MSG+8
TEXT^ORQ12 BULLETIN+11
$$LOCK1^ORX2 EN1+7
UNLK1^ORX2 EN1+9
OBR^PSJHL4 MSG+1
DEM^VADPT EN1+4
$$NOW^XLFDT EN+1, EN+7, UN+1, UN+7
KILL^XM EN+9
EN^XMB BULLETIN+15
$$GET^XPAR BULLETIN+5
MSG^XQOR MSG+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Missing or invalid order!"
  • Line Location: EN1+3
Function Call: WRITE
  • Prompt: !,ORERR
  • Line Location: EN1+6
Function Call: WRITE
  • Prompt: !,$P(ORLK,U,2)
  • Line Location: EN1+7
Function Call: WRITE
  • Prompt: !,"Unable to flag!"
  • Line Location: EN+2
Function Call: WRITE
  • Prompt: !?10,"... order flagged."
  • Line Location: EN+9
Function Call: WRITE
  • Prompt: !,"Unable to unflag order!"
  • Line Location: UN+2
Function Call: WRITE
  • Prompt: !?10,"... order unflagged."
  • Line Location: UN+8
Function Call: WRITE
  • Prompt: !," FLAGGED: "_$$LTIM($P(FLAG,U,3))_" by "_$P($G(^VA(200,+$P(FLAG,U,4),0)),U)
  • Line Location: SHOWFLAG+3
Function Call: WRITE
  • Prompt: !?10,$P(FLAG,U,5)
  • Line Location: SHOWFLAG+4
Function Call: WRITE
  • Prompt: !,"Sending bulletin to "_$P($G(^VA(200,ORUSR,0)),U)_"..."
  • Line Location: BULLETIN+8
Routine Call
  • DIC
  • Line Location:
    • PROV+5
Routine Call
  • DIR
  • Line Location:
    • REASON+4
    • COMMENT+4

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^OR(100 - [#100] EN1+3, EN1+5, EN+4, EN+6!, EN+7*, UN+4*, UN+5, UN+7*, SHOWFLAG+2, BULLETIN+2
, MSG+2, MSG+4, MSG+12
^ORD(100.01 - [#100.01] BULLETIN+14
^VA(200 - [#200] SHOWFLAG+3, PROV+3, BULLETIN+3, BULLETIN+8

Label References

Name Line Occurrences
$$COMMENT UN+3
$$LTIM SHOWFLAG+3, BULLETIN+10, BULLETIN+13
$$PROV EN+4
$$REASON EN+3
@( EN1+9
BULLETIN EN+5
MSG EN+9, UN+8
SHOWFLAG UN+3

Naked Globals

Name Field # of Occurrence
^(0 UN+5
^(3 EN+6*, UN+4*, BULLETIN+2
^(8 EN1+3, MSG+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BULL BULLETIN+1~, BULLETIN+5*, BULLETIN+6
DA EN+1~, EN+2*, EN+4, EN+6, UN+1~, UN+2*, UN+4, UN+5, SHOWFLAG+2
DFN EN1+1~, EN1+3*
DIC PROV+1~, PROV+2*
DIC("A" PROV+2*
DIC("B" PROV+3*
DIC("S" PROV+4*
DIC(0 PROV+2*
DIR REASON+1~, COMMENT+1~
DIR("?" REASON+3*, COMMENT+3*
DIR("A" REASON+2*, COMMENT+2*
DIR(0 REASON+2*, COMMENT+2*
>> DTOUT COMMENT+4
DUZ EN+6, UN+4, BULLETIN+9
FLAG SHOWFLAG+1~, SHOWFLAG+2*, SHOWFLAG+3, SHOWFLAG+4
OR0 BULLETIN+1~, BULLETIN+2*, BULLETIN+10, BULLETIN+13, MSG+3~, MSG+4*, MSG+5, MSG+7, MSG+8
OR3 BULLETIN+1~, BULLETIN+2*, BULLETIN+14, MSG+3~, MSG+4*, MSG+9, MSG+10
ORACTN EN1+1~, EN1+5*, EN1+6, EN1+8*, EN1+9
ORAGE EN1+1~, EN1+4*, BULLETIN+10
ORB EN+1~, EN+8*, UN+1~, UN+6*
ORDER MSG~, MSG+2, MSG+4, MSG+12
ORDR PROV~, PROV+3*
ORDTXT BULLETIN+1~, BULLETIN+11
ORDTXT(1 BULLETIN+12
ORDTXT(2 BULLETIN+12
ORDTXT(3 BULLETIN+12
OREASON EN+1~, EN+3*, EN+6, UN+1~, UN+3*, UN+4, BULLETIN+13
>> OREBUILD EN+7*, UN+7*
ORENT BULLETIN+1~, BULLETIN+4*, BULLETIN+5
ORERR EN1+1~, EN1+6
ORFLAG MSG+3~, MSG+10*, MSG+11*, MSG+12
ORIFN EN1~, EN1+2*, EN1+3, EN1+5, EN1+6, EN1+7, EN1+9, EN+2, EN+4, EN+6
, EN+7, EN+8, EN+9, UN+2, UN+4, UN+5, UN+6, UN+7, UN+8, SHOWFLAG+2
, BULLETIN+2, BULLETIN+11
ORLK EN1+1~, EN1+7*
ORMSG MSG+3~, MSG+13
ORMSG(1 MSG+6*
ORMSG(2 MSG+7*
ORMSG(3 MSG+8*
ORMSG(4 MSG+12*
ORNOW EN+1~*, EN+6, UN+1~*, UN+4
ORNP EN+1~, EN+4*, EN+6, EN+8, UN+1~, UN+5*, UN+6, BULLETIN+3
ORPNM EN1+1~, EN1+4*, BULLETIN+10
ORPS EN1+1~, EN1+8*, MSG+11
ORSRV BULLETIN+1~, BULLETIN+3*, BULLETIN+4
ORSSN EN1+1~, EN1+4*, BULLETIN+10
ORUSR BULLETIN+1~, BULLETIN+3*, BULLETIN+4, BULLETIN+8, BULLETIN+9
ORVP EN1+1~, EN1+3*, EN+8, UN+6, MSG+3~, MSG+7*, MSG+8
ORX MSG+3~, MSG+9*, MSG+10
U EN1+3, EN1+4, EN1+7, EN+4, EN+6, EN+7, EN+8, UN+4, UN+5, UN+6
, UN+7, SHOWFLAG+3, SHOWFLAG+4, PROV+3, BULLETIN+3, BULLETIN+8, BULLETIN+10, BULLETIN+13, BULLETIN+14, MSG+5
, MSG+7, MSG+8, MSG+9, MSG+10
VA EN1+1~
VADM EN1+1~
VADM(1 EN1+4
VADM(2 EN1+4
VADM(4 EN1+4
VAERR EN1+1~
X REASON+1~, COMMENT+1~, PROV+1~, LTIM~, LTIM+2, LTIM+3
XMB BULLETIN+1~, BULLETIN+9*
XMB(1 BULLETIN+10*
XMB(10 BULLETIN+13*
XMB(11 BULLETIN+14*
XMB(2 BULLETIN+10*
XMB(3 BULLETIN+10*
XMB(4 BULLETIN+10*
XMB(5 BULLETIN+12*
XMB(6 BULLETIN+12*
XMB(7 BULLETIN+12*
XMB(8 BULLETIN+13*
XMB(9 BULLETIN+13*
XMDUZ BULLETIN+1~, BULLETIN+9*
XMY BULLETIN+1~
XMY( BULLETIN+9*
>> XMZ EN+6
Y REASON+1~, REASON+5, COMMENT+1~, COMMENT+4*, COMMENT+5, PROV+1~, PROV+5*, PROV+6, LTIM+1~*, LTIM+2*
, LTIM+3*, LTIM+4

Marked Items

Name Field # of Occurrence
$T(OBR^PSJHL4 MSG+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All