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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ORCXPND1

Package: Order Entry Results Reporting

Routine: ORCXPND1


Information

ORCXPND1 ; SLC/MKB - Expanded Display cont ;09/21/12 05:58

Source Information

Source file <ORCXPND1.m>

Call Graph

Call Graph

Call Graph Total: 29

Package Total Call Graph
Order Entry Results Reporting 10 $$NMSP^ORCD  (BLANK,ITEM,SETVIDEO)^ORCXPND  (ALLERGY,ORDERS)^ORCXPND2  AP^ORCXPND3  PL^ORCXPND4  EN^ORCXPNDR  TEXT^ORQ12  EN^ORWLR1  
$$INPT^ORWPT1  START^ORWRP  
Registration 4 DISP^DGIBDSP  EN^DGRPD  DIS^DGRPDB  (KVAR,OAD)^VADPT  
Kernel 3 $$FMTE^XLFDT  ($$LJ,$$REPEAT)^XLFSTR  ($$NAME,$$PADD)^XUAF4  
Lab Service 3 RR^LR7OR1  EN1^LR7OSBR  EN^LR7OSMZ0  
Consult Request Tracking 2 RT^GMRCGUIA  DT^GMRCSLM2  
Scheduling 2 $$START^SCMCMHTC  ($$OUTPTAP,$$OUTPTPR,$$OUTPTTM)^SDUTL3  
Outpatient Pharmacy 1 OEL^PSOORRL  
Radiology Nuclear Medicine 1 (EN3,EN30)^RAO7PC3  
Text Integration Utility 1 RPC^TIUSRV  
Toolkit 1 $$GET^XPAR  
VBECS 1 CPRS^VBECA3B  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

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

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Order Entry Results Reporting 6 ORCXPNDR  ORRHCQ  ORWOR  ORWPS  ORWPT  ORWRA  

Entry Points

Name Comments DBIA/ICR reference
DELAY ; -- Delayed Orders
XRAYS ; -- Radiology
CONSULTS ; -- Consults
PLS ; List performing laboratories
SUMMRIES ; -- Discharge Summaries
COVER ; -- Cover Sheet
NOTES ; -- Progress Notes
SETLINE(LINE,CNT) ;
PROBLEMS ; -- Problem List
INC(X,Y) ; Character Position Count
; X=Current Count
; Y=Text
REPORTS ; -- Patient Profiles
DGINQB(DFN) ; Build Patient Inquiry
LABS ; -- Laboratory [RESULTS ONLY for ID=OE order #]
MEDS ; -- Pharmacy
TRIM(X) ; Trim Spaces
XRPT ; -- Body of Report for CASE, PROC
DGINQ(DFN) ; Patient Inquiry
PTINQ ; Print Patient Inquiry in List Manager
NEW ; -- New Orders
ORDERS ; -- Orders
S(X,Y,Z) ; Pad Over
; X=Column #
; Y=Current Length
; Z=Text
; SP=Text Sent
; CCNT=Line Position After Input Text

External References

Name Field # of Occurrence
DISP^DGIBDSP DGINQB+26
EN^DGRPD DGINQB+3
DIS^DGRPDB DGINQB+28
RT^GMRCGUIA CONSULTS+9
DT^GMRCSLM2 CONSULTS+8
RR^LR7OR1 LABS+5, LABS+6
EN1^LR7OSBR LABS+19
EN^LR7OSMZ0 LABS+22
$$NMSP^ORCD ORDERS+4
BLANK^ORCXPND LABS+9, LABS+30, ORDERS+9, CONSULTS+4, XRAYS+6, XRAYS+7
ITEM^ORCXPND LABS+8, ORDERS+8, CONSULTS+4, XRAYS+5, XRAYS+6
SETVIDEO^ORCXPND LABS+35, LABS+41, LABS+42
ALLERGY^ORCXPND2 COVER+2
ORDERS^ORCXPND2 ORDERS+1
AP^ORCXPND3 LABS+3
PL^ORCXPND4 PROBLEMS+1
EN^ORCXPNDR REPORTS+1
TEXT^ORQ12 LABS+7, ORDERS+7, CONSULTS+3
EN^ORWLR1 LABS+13, LABS+15
$$INPT^ORWPT1 DGINQB+16
START^ORWRP DGINQ+1
OEL^PSOORRL MEDS+3
EN3^RAO7PC3 XRAYS+1
EN30^RAO7PC3 XRAYS+2
$$START^SCMCMHTC DGINQB+8
$$OUTPTAP^SDUTL3 DGINQB+11
$$OUTPTPR^SDUTL3 DGINQB+6
$$OUTPTTM^SDUTL3 DGINQB+7
RPC^TIUSRV NOTES+2, SUMMRIES+2
KVAR^VADPT DGINQB+46
OAD^VADPT DGINQB+31
CPRS^VBECA3B LABS+13
$$FMTE^XLFDT LABS+28
$$LJ^XLFSTR PLS+5
$$REPEAT^XLFSTR PLS+8
$$GET^XPAR LABS+13
$$NAME^XUAF4 PLS+5
$$PADD^XUAF4 PLS+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Primary Care Information:"
  • Line Location: DGINQB+13
Function Call: WRITE
  • Prompt: !,"Primary Practitioner: ",$P(ORDOC,"^",2)
  • Line Location: DGINQB+14
Function Call: WRITE
  • Prompt: !,"Primary Care Team: ",$P(ORTEAM,"^",2)
  • Line Location: DGINQB+15
Function Call: WRITE
  • Prompt: !,"Attending Physician: ",$P($G(^VA(200,+ORATP,0)),U)
  • Line Location: DGINQB+17
Function Call: WRITE
  • Prompt: !,"Inpatient Provider: ",$P($G(^VA(200,+ORINP,0)),U)
  • Line Location: DGINQB+18
Function Call: WRITE
  • Prompt: !,"Associate Provider: ",ORASS
  • Line Location: DGINQB+19
Function Call: WRITE
  • Prompt: !!,"MH Treatment Information:"
  • Line Location: DGINQB+21
Function Call: WRITE
  • Prompt: !,"MH Treatment Coord: ",$E($P(ORMHP,"^",2),1,28)
  • Line Location: DGINQB+22
Function Call: WRITE
  • Prompt: ?52,"Position: ",$E($P(ORMHP,"^",3),1,18)
  • Line Location: DGINQB+23
Function Call: WRITE
  • Prompt: !,"MH Treatment Team: ",$E($P(ORMHP,"^",5),1,56)
  • Line Location: DGINQB+24
Function Call: WRITE
  • Prompt: !!,"Health Insurance Information:"
  • Line Location: DGINQB+25
Function Call: WRITE
  • Prompt: !!,"Service Connection/Rated Disabilities:"
  • Line Location: DGINQB+27
Function Call: WRITE
  • Prompt: !!,$S(CONTACT="N":"Next of Kin Information:",1:"Secondary Next of Kin Information:")
  • Line Location: DGINQB+33
Function Call: WRITE
  • Prompt: !,"Name: ",VAOA(9)
  • Line Location: DGINQB+34
Function Call: WRITE
  • Prompt: " (",VAOA(10),")"
  • Line Location: DGINQB+35
Function Call: WRITE
  • Prompt: !?7,VAOA(1)
  • Line Location: DGINQB+36
Function Call: WRITE
  • Prompt: !?7,VAOA(2)
  • Line Location: DGINQB+37
Function Call: WRITE
  • Prompt: !?7,VAOA(3)
  • Line Location: DGINQB+38
Function Call: WRITE
  • Prompt: !?7,VAOA(4)
  • Line Location: DGINQB+40
Function Call: WRITE
  • Prompt: ", "_$P(VAOA(5),"^",2)
  • Line Location: DGINQB+41
Function Call: WRITE
  • Prompt: " ",$P(VAOA(11),"^",2)
  • Line Location: DGINQB+42
Function Call: WRITE
  • Prompt: !!?7,"Phone number: ",VAOA(8)
  • Line Location: DGINQB+43
Function Call: WRITE
  • Prompt: !?7,"Work phone number: ",$P(^DPT(DFN,.21),U,11)
  • Line Location: DGINQB+44
Function Call: WRITE
  • Prompt: !?7,"Work phone number: ",$P(^DPT(DFN,.211),U,11)
  • Line Location: DGINQB+45

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] DGINQB+9, DGINQB+10, DGINQB+44, DGINQB+45
^LAB(60 - [#60] LABS+37
^OR(100 - [#100] LABS+4, ORDERS+4, ORDERS+11, ORDERS+12, CONSULTS+3, XRAYS+2
^TMP("GMRCR" CONSULTS+10, CONSULTS+11!
^TMP("LRC" LABS+19!, LABS+20, LABS+21!, LABS+22!, LABS+23, LABS+24!
^TMP("LRRR" LABS+2!, LABS+6, LABS+9, LABS+10, LABS+48!
^TMP("OR" COVER+1, CONSULTS+2
^TMP("ORDATA" PTINQ+5, PTINQ+8!
^TMP("ORLRC" LABS+14!, LABS+16*, LABS+17, LABS+18!
^TMP("ORPLS" LABS+40*, LABS+46, PLS+4, PLS+11!
^TMP("ORXPND" NOTES+3*, LABS+9*, LABS+17*, LABS+20*, LABS+23*, SETLINE+1*, ORDERS+10*, CONSULTS+5*, CONSULTS+7*, CONSULTS+10*
, XRPT+2*, XRPT+3*, SUMMRIES+3*, PTINQ+7*
^TMP("PS" MEDS+2!, MEDS+4, MEDS+6!
^TMP("TIUAUDIT" NOTES+1!, SUMMRIES+1!
^TMP($J XRAYS+3, XRAYS+4, XRAYS+5, XRAYS+6, XRAYS+7, XRAYS+8!, XRPT+2, XRPT+3
^UTILITY($J XRAYS+8!
^VA(200 - [#200] DGINQB+17, DGINQB+18

Label References

Name Line Occurrences
$$INC S+8
$$S LABS+31, LABS+33, LABS+38
@( ORDERS+11, ORDERS+12
DGINQ PTINQ+3
NOTES COVER+2
ORDERS MEDS+4
PLS LABS+46
SETLINE LABS+29, LABS+32, LABS+34, LABS+39, LABS+44, LABS+45, LABS+46, LABS+47, PLS+2, PLS+6
, PLS+9, PLS+10
XRPT XRAYS+6, XRAYS+7

Naked Globals

Name Field # of Occurrence
^( LABS+17, LABS+20, LABS+23, LABS+37, CONSULTS+10, XRAYS+7, XRPT+2, XRPT+3, PTINQ+5
^("ORD" XRPT+2
^(0 LABS+37

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AUTHOR NOTES+1~, SUMMRIES+1~
CASE XRAYS+3~, XRAYS+4*, XRAYS+5, XRAYS+6, XRAYS+7*, XRPT+2, XRPT+3
CCNT LABS+1~, LABS+10*, LABS+26*, LABS+31, LABS+33*, LABS+36*, LABS+38, S+8*
CMT LABS+45~*
CNT SETLINE~, SETLINE+1*
CONTACT DGINQB+1~, DGINQB+29*, DGINQB+30, DGINQB+33, DGINQB+44, DGINQB+45
CPRSGUI DGINQB+1~, DGINQB+2*, DGINQB+4!
DATE NOTES+1~, SUMMRIES+1~
DFN LABS+15, PTINQ+1~, PTINQ+2*, PTINQ+3, DGINQ~, DGINQB~, DGINQB+2, DGINQB+6, DGINQB+7, DGINQB+8
, DGINQB+9, DGINQB+10, DGINQB+11, DGINQB+16, DGINQB+44, DGINQB+45
DT DGINQB+11
GMRCOER CONSULTS+8~*
I NOTES+1~, NOTES+3*, LABS+17~*, LABS+20~*, LABS+23~*, ORDERS+7~, ORDERS+8*, CONSULTS+1~, CONSULTS+10*, XRPT+1~
, XRPT+3*, SUMMRIES+1~, SUMMRIES+3*
>> ID NOTES+2, MEDS+3, MEDS+4*, LABS+3, LABS+4, ORDERS+4, ORDERS+6, ORDERS+7, ORDERS+11*, ORDERS+12
, CONSULTS+3*, CONSULTS+5, CONSULTS+7, CONSULTS+8, CONSULTS+9, XRAYS+1*, XRAYS+2*, SUMMRIES+2
IDE LABS+1~, LABS+4*, LABS+5, LABS+6*
IG LABS+1~, LABS+8*
INC INC+3~*, INC+4
>> IOBOFF LABS+42
>> IOBON LABS+42
>> IOINHI LABS+41, LABS+42
>> IOINORM LABS+41, LABS+42
>> IOUOFF LABS+35
>> IOUON LABS+35
IVDT LABS+1~, LABS+11*, LABS+26, LABS+28, LABS+36, LABS+45
>> LCNT NOTES+3*, LABS+9*, LABS+17*, LABS+20*, LABS+23*, LABS+29, LABS+32, LABS+34, LABS+35, LABS+39
, LABS+41, LABS+42, LABS+44, LABS+45, LABS+46, LABS+47, PLS+2, PLS+6, PLS+9, PLS+10
, ORDERS+10*, CONSULTS+5*, CONSULTS+7*, CONSULTS+10*, XRPT+2*, XRPT+3*, SUMMRIES+3*, PTINQ+4*, PTINQ+6*, PTINQ+7
LINE LABS+28*, LABS+29, LABS+31*, LABS+32, LABS+33*, LABS+34, LABS+38*, LABS+39, LABS+43*, LABS+44
, LABS+45*, PLS+1~, PLS+5*, PLS+6, PLS+8*, PLS+9, SETLINE~, SETLINE+1
NAME LABS+1~, LABS+37*, LABS+38
>> NUM COVER+1, CONSULTS+2
ORASS DGINQB+1~, DGINQB+11*, DGINQB+19
ORATP DGINQB+1~, DGINQB+10*, DGINQB+12, DGINQB+17
ORCY LABS+1~, LABS+7!
ORCY( LABS+8
ORD XRPT+1~, XRPT+2*
ORDOC DGINQB+1~, DGINQB+6*, DGINQB+12, DGINQB+14
>> ORESULTS ORDERS+1, CONSULTS+6, CONSULTS+9, XRAYS+1, XRAYS+2
ORI PTINQ+1~, PTINQ+4*, PTINQ+5*
ORIFN LABS+1~, LABS+4*, LABS+7, ORDERS+3~, ORDERS+11*
ORINP DGINQB+1~, DGINQB+9*, DGINQB+12, DGINQB+18
ORMHP DGINQB+1~, DGINQB+8*, DGINQB+12, DGINQB+20, DGINQB+22, DGINQB+23, DGINQB+24
ORPLS PLS+1~, PLS+3*, PLS+4*, PLS+5, PLS+7
ORSSTOPT DGINQB+1~
ORSSTRT DGINQB+1~
>> ORTAB COVER+1, CONSULTS+2
ORTEAM DGINQB+1~, DGINQB+7*, DGINQB+12, DGINQB+15
ORTX CONSULTS+1~, CONSULTS+3
ORTX(1 CONSULTS+3
ORVP MEDS+3, LABS+5, LABS+6, LABS+9, LABS+10, LABS+19, LABS+22, XRAYS+1, XRAYS+3, XRAYS+4
, XRAYS+5, XRAYS+6, XRAYS+7, XRAYS+8, XRPT+2, XRPT+3, PTINQ+2, DGINQB+1~, DGINQB+2*
ORY NOTES+1~, NOTES+2, NOTES+3, NOTES+4, ORDERS+7~, SUMMRIES+1~, SUMMRIES+2, SUMMRIES+3, SUMMRIES+4
ORY( ORDERS+8
PKG COVER+1~*, COVER+2, ORDERS+3~, ORDERS+4*, ORDERS+5
PROC XRAYS+3~, XRAYS+5*, XRAYS+6*, XRAYS+7*, XRPT+2, XRPT+3
PSET XRAYS+3~*, XRAYS+5, XRAYS+7
PTLOC NOTES+1~, SUMMRIES+1~
SP S+7~*, S+8, S+9
SS LABS+1~, LABS+10*, LABS+11*, LABS+12, LABS+22, LABS+25, LABS+26, LABS+36, LABS+45
SUB LABS+1~, CONSULTS+1~, CONSULTS+8*, CONSULTS+9*, CONSULTS+10
SUBJ NOTES+1~, SUMMRIES+1~
TAB ORDERS+3~, ORDERS+5*, ORDERS+6, ORDERS+11, ORDERS+12
TCNT LABS+1~, LABS+26*, LABS+27
TEST LABS+1~, LABS+10*
TEST( LABS+11, LABS+26, LABS+36, LABS+45
TST LABS+1~, LABS+26*, LABS+36, LABS+43
U COVER+1, MEDS+4, LABS+37, LABS+38, LABS+40, LABS+41, LABS+42, PLS+8, CONSULTS+2, XRAYS+1
, DGINQB+11, DGINQB+17, DGINQB+18, DGINQB+44, DGINQB+45
>> VALM("RM" XRAYS+9*
VAOA DGINQB+1~
VAOA("A" DGINQB+30*
VAOA(1 DGINQB+36
VAOA(10 DGINQB+35
VAOA(11 DGINQB+42
VAOA(2 DGINQB+37
VAOA(3 DGINQB+38
VAOA(4 DGINQB+39, DGINQB+40
VAOA(5 DGINQB+41
VAOA(8 DGINQB+43
VAOA(9 DGINQB+32, DGINQB+34
X LABS+1~, LABS+8*, LABS+17*, LABS+20*, LABS+23*, PLS+1~, PLS+7*, PLS+8, CONSULTS+1~, CONSULTS+2*
, CONSULTS+3*, CONSULTS+4, CONSULTS+10*, XRPT+1~, XRPT+3*, PTINQ+1~, PTINQ+5*, PTINQ+7, TRIM~, TRIM+1*
, TRIM+2*, TRIM+3, S~, S+7, INC~, INC+3
XQORNOD DGINQB+1~, DGINQB+2*
XT LABS+1~, LABS+36*, LABS+37, LABS+38, LABS+40, LABS+41, LABS+42
Y S~, S+7, INC~, INC+3
Z S~, S+6, S+7

Marked Items

Name Field # of Occurrence
$T(CPRS^VBECA3B LABS+13
$T(EN^ORWLR1 LABS+13
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All