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  | All
Print Page as PDF
Routine: LRTT5R1

Package: Lab Service

Routine: LRTT5R1


Information

LRTT5R1 ;DALISC/FHS - LAB URGENCY TURNAROUND TIMES REPORT GENERATOR ; 12/3/1997

Source Information

Source file <LRTT5R1.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 1 $$FMTE^XLFDT  
Lab Service 1 (DHDR,LNCHECK)^LRTT5  
VA FileMan 1 ^DIR  

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

Package Total Caller Graph
Lab Service 1 LRTT5  

Entry Points

Name Comments DBIA/ICR reference
ONE ; from LRTT5
; input LRPQ(, ^TMP("LR",$J processed from LRTT5P1
CHK
SHEAD ;S LRPDHEAD="Test Number of Tests Total TAT Ave TAT",LRPPAGE=0 D DHDR^LRTT5
TYPE
CLEANUP ;
STOP

External References

Name Field # of Occurrence
^DIR ONE+12, TYPE+7
DHDR^LRTT5 SHEAD+5
LNCHECK^LRTT5 TYPE+1, TYPE+4
$$FMTE^XLFDT TYPE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?10," Institution included in report:"
  • Line Location: ONE+3
Function Call: WRITE
  • Prompt: !?20,$P(LRLLOC(I),U,2)
  • Line Location: ONE+4
Function Call: WRITE
  • Prompt: !
  • Line Location: ONE+5
Function Call: WRITE
  • Prompt: ?57,+$P(^TMP("LR",$J,LRPTYPE),U,2)\+^TMP("LR",$J,LRPTYPE)," min"
  • Line Location: ONE+9
Function Call: WRITE
  • Prompt: "Urgencies:"
  • Line Location: ONE+10
Function Call: WRITE
  • Prompt: !?5,LRPQ("URGENCY",LRX)
  • Line Location: ONE+10
Function Call: WRITE
  • Prompt: !!,"Tests:"
  • Line Location: ONE+11
Function Call: WRITE
  • Prompt: !?5,^(LRX)
  • Line Location: ONE+11
Function Call: WRITE
  • Prompt: !,$S(LRPTYPE="REGT":"Regular",1:"Irregular")," hours"
  • Line Location: SHEAD+2
Function Call: WRITE
  • Prompt: !,LRTEST,?25,$J(+LRX,9,0),?37,$J(+$P(LRX,U,2),9,0)
  • Line Location: SHEAD+3
Function Call: WRITE
  • Prompt: ?50,$J($P(LRX,U,2)/+LRX,9,1)
  • Line Location: SHEAD+3
Function Call: WRITE
  • Prompt: !!,$S(LRPDTYPE="BAD":"Tests not counted:",LRPDTYPE="REG":"Regular hours:",1:"Irregular hours:"),!
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: TYPE+5
Function Call: WRITE
  • Prompt: LRPDIFF
  • Condition for execution: $L($P(LRPLINE,U,4))
  • Line Location: TYPE+5
Function Call: WRITE
  • Prompt: ?6,$P(LRPLINE,U),?21,$E($P(LRPLINE,U,2),1,15),?37,$$FMTE^XLFDT($E($P(LRPLINE,U,3),1,12))
  • Line Location: TYPE+5
Function Call: WRITE
  • Prompt: ?6,$P(LRPLINE,U),?21,$E($P(LRPLINE,U,2),1,15),?37,$$FMTE^XLFDT($E($P(LRPLINE,U,3),1,12))
  • Line Location: TYPE+5
Function Call: WRITE
  • Prompt: !,"none found",!
  • Line Location: TYPE+6
Routine Call
  • DIR
  • Line Location:
    • ONE+12
    • TYPE+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP("LR" ONE+9, TYPE+2, TYPE+3, STOP!
^TMP("LRTT5" ONE+11

Label References

Name Line Occurrences
CLEANUP CHKTYPE+8

Naked Globals

Name Field # of Occurrence
^( ONE+11, TYPE+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR ONE+12!, TYPE+7!
DIR(0 ONE+12*, TYPE+7*
>> DIRUT ONE+12, TYPE+7
>> I ONE+4*
IOST ONE+12, TYPE+7
>> LREND ONE+2*, ONE+12*, SHEAD+5, TYPETYPE+1, TYPE+4, TYPE+7*
>> LRLLOC( ONE+4
>> LRLLOC(0 ONE+3
LRPCNT TYPE+2*, TYPE+3*, TYPE+6, STOP!
LRPDET CHK, STOP!
LRPDHEAD SHEAD+5*, STOP!
LRPDIFF TYPE+2*, TYPE+3, TYPE+5, STOP!
LRPDTYPE TYPE*, TYPE+1, TYPE+2, TYPE+3, STOP!
LRPLINE TYPE+3*, TYPE+5, STOP!
LRPN TYPE+3*, STOP!
LRPPAGE STOP!
LRPQ STOP!
LRPQ("URGENCY" ONE+10
LRPTYPE ONE+5*, ONE+6, ONE+9, STOP!
LRTEST STOP!
LRX ONE+10*, ONE+11*, STOP!
U ONE+4, ONE+9, TYPE+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All