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

Package: Lab Service

Routine: LRAPTT


Information

LRAPTT ;DALOI/STAFF - TURNAROUND TIME PATH ;09/09/11 11:39

Source Information

Source file <LRAPTT.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
Lab Service 6 ^LRAP  (,F)^LRAPTT1  (B,L,S,V,XR)^LRU  ^LRUP  (BEG,END)^LRUTL  $$Y2K^LRX  
VA FileMan 3 (,C,H)^%DTC  ^DIC  ^DIR  
Kernel 1 $$LJ^XLFSTR  
Toolkit 1 $$GET^XPAR  

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 LRAPTT  

Entry Points

Name Comments DBIA/ICR reference
EN ; Entry point for TAT report setup
QUE ;
OUT ;
N ;
B ;
I ;
L ;
G ;
S ;
A ;
D ;
SPECTOT ; Print specimen totals section
PROCTOT ; Print procedure totals section
END ;

External References

Name Field # of Occurrence
^%DTC S+4
C^%DTC D+2
H^%DTC D+2
^DIC EN+35, EN+45
^DIR EN+9, EN+18, EN+23, EN+29, EN+39, EN+54
^LRAP EN+2
^LRAPTT1 QUE+4, QUE+10, QUE+13, N+1, SPECTOT+5, SPECTOT+13, SPECTOT+17, SPECTOT+26, SPECTOT+33, SPECTOT+37
, PROCTOT+5, PROCTOT+13, PROCTOT+17, PROCTOT+26, PROCTOT+33, PROCTOT+37
F^LRAPTT1 QUE+17
B^LRU EN+13
L^LRU QUE+4
S^LRU QUE+4
V^LRU OUT+4, END+1
XR^LRU QUE+4
^LRUP S+1
BEG^LRUTL EN+58
END^LRUTL OUT+4
$$Y2K^LRX S+10
$$LJ^XLFSTR SPECTOT+9, SPECTOT+13, SPECTOT+17, SPECTOT+19, SPECTOT+30, SPECTOT+33, SPECTOT+37, SPECTOT+39, PROCTOT+9, PROCTOT+13
, PROCTOT+17, PROCTOT+19, PROCTOT+30, PROCTOT+33, PROCTOT+37, PROCTOT+39
$$GET^XPAR SPECTOT+3, PROCTOT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"If '#', '*' or '?' is after Acc # then demographic data is in file indicated:",!?7,"# = Referral file * = Research file ? = Other file listed below"
  • Line Location: QUE+10
Function Call: WRITE
  • Prompt: !?6,"F= FULL AUTOPSY H= HEAD ONLY T= TRUNK ONLY O=OTHER LIMITATION"
  • Line Location: QUE+12
Function Call: WRITE
  • Prompt: !!,"Total cases:",$J(LRM,4)
  • Line Location: QUE+14
Function Call: WRITE
  • Prompt: !?3,"Incomplete cases:",$J(X,4)
  • Condition for execution: X
  • Line Location: QUE+14
Function Call: WRITE
  • Prompt: !?3,"Complete cases:",$J(LRF,4)
  • Line Location: QUE+14
Function Call: WRITE
  • Prompt: !,$J(LRZ,5),?5,$P(Y,U,8),?6,$P(Y,U,9),?8,$P(Y,U),?19,$E($P(Y,U,2),1,20),?40,$P(Y,U,3),?46,$P(Y,U,5),?51,$P(Y,U,4),?62,$J($P(Y,U,6),3),?66,$E($P(Y,U,7),1,13)
  • Line Location: B+1
Function Call: WRITE
  • Prompt: !!,$$LJ^XLFSTR(LRSHDR,LRHLEN,"."),": ",$J(LRCNT,5)
  • Line Location: SPECTOT+9
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: SPECTOT+13
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: SPECTOT+17
Function Call: WRITE
  • Prompt: !,$E(LRX,1,(LRHLEN))
  • Line Location: SPECTOT+18
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRX,LRHLEN,"."),": ",$J(LRSPEC(LR61),5)
  • Line Location: SPECTOT+19
Function Call: WRITE
  • Prompt: !,"T-",$P(LR61(0),"^",2)," (SNM)"
  • Line Location: SPECTOT+21
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LRPSNM=2
  • Line Location: SPECTOT+22
Function Call: WRITE
  • Prompt: " / "
  • Condition for execution: LRPSNM=3
  • Line Location: SPECTOT+22
Function Call: WRITE
  • Prompt: $P(^LAB(61,LR61,"SCT"),"^")," (SCT)"
  • Line Location: SPECTOT+22
Function Call: WRITE
  • Prompt: !
  • Line Location: SPECTOT+23
Function Call: WRITE
  • Prompt: !!,$$LJ^XLFSTR(LRSHDR,LRHLEN,"."),": ",$J(LRCNT,5)
  • Line Location: SPECTOT+30
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: SPECTOT+33
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: SPECTOT+37
Function Call: WRITE
  • Prompt: !,$E(LRX,1,(LRHLEN))
  • Line Location: SPECTOT+38
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRX,LRHLEN,"."),": ",$J(LRSPECI(LR61),5)
  • Line Location: SPECTOT+39
Function Call: WRITE
  • Prompt: !,"T-",$P(LR61(0),"^",2)," (SNM)"
  • Line Location: SPECTOT+41
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LRPSNM=2
  • Line Location: SPECTOT+42
Function Call: WRITE
  • Prompt: " / "
  • Condition for execution: LRPSNM=3
  • Line Location: SPECTOT+42
Function Call: WRITE
  • Prompt: $P(^LAB(61,LR61,"SCT"),"^")," (SCT)"
  • Line Location: SPECTOT+42
Function Call: WRITE
  • Prompt: !
  • Line Location: SPECTOT+43
Function Call: WRITE
  • Prompt: !!,$$LJ^XLFSTR(LRSHDR,LRHLEN,"."),": ",$J(LRCNT,5)
  • Line Location: PROCTOT+9
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: PROCTOT+13
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: PROCTOT+17
Function Call: WRITE
  • Prompt: !,$E(LRX,1,(LRHLEN))
  • Line Location: PROCTOT+18
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRX,LRHLEN,"."),": ",$J(LRPROC(LR615),5)
  • Line Location: PROCTOT+19
Function Call: WRITE
  • Prompt: !,"P-",$P(LR615(0),"^",2)," (SNM)"
  • Line Location: PROCTOT+21
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LRPSNM=2
  • Line Location: PROCTOT+22
Function Call: WRITE
  • Prompt: " / "
  • Condition for execution: LRPSNM=3
  • Line Location: PROCTOT+22
Function Call: WRITE
  • Prompt: $P(^LAB(61.5,LR615,"SCT"),"^")," (SCT)"
  • Line Location: PROCTOT+22
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCTOT+23
Function Call: WRITE
  • Prompt: !!,$$LJ^XLFSTR(LRSHDR,LRHLEN,"."),": ",$J(LRCNT,5)
  • Line Location: PROCTOT+30
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: PROCTOT+33
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRSHDR,LRHLEN,".")," (cont'd)"
  • Line Location: PROCTOT+37
Function Call: WRITE
  • Prompt: !,$E(LRX,1,(LRHLEN))
  • Line Location: PROCTOT+38
Function Call: WRITE
  • Prompt: !,$$LJ^XLFSTR(LRX,LRHLEN,"."),": ",$J(LRPROCI(LR615),5)
  • Line Location: PROCTOT+39
Function Call: WRITE
  • Prompt: !,"P-",$P(LR615(0),"^",2)," (SNM)"
  • Line Location: PROCTOT+41
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LRPSNM=2
  • Line Location: PROCTOT+42
Function Call: WRITE
  • Prompt: " / "
  • Condition for execution: LRPSNM=3
  • Line Location: PROCTOT+42
Function Call: WRITE
  • Prompt: $P(^LAB(61.5,LR615,"SCT"),"^")," (SCT)"
  • Line Location: PROCTOT+42
Function Call: WRITE
  • Prompt: !
  • Line Location: PROCTOT+43
Function Call: WRITE
  • Prompt: !!,"Count multiple procedure occurrence/case.: ",$S($P(LRPROC,"^",2):"YES",1:"NO")
  • Line Location: PROCTOT+45
Routine Call
  • DIC
  • Line Location:
    • EN+35
    • EN+45
Routine Call
  • DIR
  • Line Location:
    • EN+9
    • EN+18
    • EN+23
    • EN+29
    • EN+39
    • EN+54

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(61 - [#61] Classic Fileman Calls
^LAB(61.5 - [#61.5] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC("AC" QUE+5
^HOLIDAY - [#40.5] D+6
^LAB(61 - [#61] SPECTOT+14, SPECTOT+22, SPECTOT+34, SPECTOT+42
^LAB(61.5 - [#61.5] PROCTOT+14, PROCTOT+22, PROCTOT+34, PROCTOT+42
^LR - [#63] QUE+6, I+2, L+1, L+3, G+6, G+7, G+17, G+19, G+20, G+27
, A+1, A+2
^TMP($J QUE+2!, QUE+7, OUT+1!, N+1, S+12, S+14*
^VA(200 - [#200] S+9

Label References

Name Line Occurrences
@( I+2
B N+1
D S+5
END EN+10, EN+14, EN+19, EN+24, EN+30, EN+40, EN+47, EN+59
G L+3
I QUE+6
N QUE+7
OUT QUE+8
PROCTOT QUE+20
S G+28, A+3
SPECTOT QUE+18

Naked Globals

Name Field # of Occurrence
^(0 L+3, S+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %Y D+2
>> A QUE+5*, QUE+8*
>> B QUE+8*, QUE+10
DIC EN+33~, EN+34*, EN+43~, EN+44*
DIC("A" EN+34*, EN+44*
DIC(0 EN+34*, EN+44*
DIR EN+4~, EN+16!, EN+21!, EN+27!, EN+37!, EN+48!
DIR("?" EN+7*, EN+8*, EN+50*, EN+51*, EN+52*, EN+53*
DIR("A" EN+17*, EN+22*, EN+28*, EN+38*, EN+49*
DIR("B" EN+17*, EN+28*, EN+38*, EN+49*
DIR(0 EN+6*, EN+17*, EN+22*, EN+28*, EN+38*, EN+49*
DIROUT EN+4~, EN+16!, EN+21!, EN+27!, EN+37!, EN+48!
DIRUT EN+4~, EN+10, EN+16!, EN+19, EN+21!, EN+24, EN+27!, EN+30, EN+37!, EN+40
, EN+47, EN+48!, EN+55
DTOUT EN+4~, EN+16!, EN+21!, EN+27!, EN+37!, EN+48!
DUOUT EN+4~, EN+16!, EN+21!, EN+27!, EN+37!, EN+48!
>> H("F" S+10*, S+14
>> H(4 G+27*, S+9*, S+14, A+2*
>> H(5 S+10*, S+14
>> H(9 G+27*, S+14, A+2*
IO QUE+2
IOF OUT+2
IOSL QUE+10, QUE+13, N+1, SPECTOT+5, SPECTOT+13, SPECTOT+17, SPECTOT+26, SPECTOT+33, SPECTOT+37, PROCTOT+5
, PROCTOT+13, PROCTOT+17, PROCTOT+26, PROCTOT+33, PROCTOT+37
IOST OUT+2
K D+1~, D+2*, D+3*, D+4*, D+5, D+6
K( D+2*, D+4, D+5
>> LR("AU" EN+5, EN+11*, A+2
>> LR("F" QUE+5*
>> LR("Q" QUE+7, QUE+8, QUE+10, QUE+13, N+1, SPECTOT+5, SPECTOT+12, SPECTOT+13, SPECTOT+17, SPECTOT+26
, SPECTOT+32, SPECTOT+33, SPECTOT+37, PROCTOT+5, PROCTOT+12, PROCTOT+13, PROCTOT+17, PROCTOT+26, PROCTOT+32, PROCTOT+33
, PROCTOT+37
LR61 G+1~, G+7*, G+8, G+9, G+10, G+11, SPECTOT+1~, SPECTOT+11*, SPECTOT+12*, SPECTOT+14
, SPECTOT+19, SPECTOT+20, SPECTOT+22, SPECTOT+27*, SPECTOT+28*, SPECTOT+31*, SPECTOT+32*, SPECTOT+34, SPECTOT+39, SPECTOT+40
, SPECTOT+42, PROCTOT+1~
LR61(0 SPECTOT+14*, SPECTOT+21, SPECTOT+34*, SPECTOT+41
LR615 G+1~, G+20*, G+21, G+22, G+23, G+24, G+25, PROCTOT+11*, PROCTOT+12*, PROCTOT+14
, PROCTOT+19, PROCTOT+20, PROCTOT+22, PROCTOT+27*, PROCTOT+28*, PROCTOT+31*, PROCTOT+32*, PROCTOT+34, PROCTOT+39, PROCTOT+40
, PROCTOT+42
LR615(0 PROCTOT+14*, PROCTOT+21, PROCTOT+34*, PROCTOT+41
>> LRA QUE+3*, QUE+16, S+15*
>> LRA( QUE+5*, S+15*
>> LRABV L+3, A+1
>> LRB EN+20, EN+25*
>> LRC G+27*, S+2, S+4, S+7, S+10, S+15, A+2*
LRCNT SPECTOT+1~, SPECTOT+6*, SPECTOT+7*, SPECTOT+9, SPECTOT+27*, SPECTOT+28*, SPECTOT+30, PROCTOT+1~, PROCTOT+6*, PROCTOT+7*
, PROCTOT+9, PROCTOT+27*, PROCTOT+28*, PROCTOT+30
>> LRD QUE+3*, S+14, A+2*
>> LRDFN I+1*, I+2*, L+1, L+3, G+6, G+7, G+17, G+19, G+20, G+27
, A+1, A+2
LRDUP G+15~
LRDUP( G+21, G+22*
>> LRE QUE+3*, QUE+15, S+6*
>> LRE( QUE+5*, S+6*
>> LREND L+4*, S+1
>> LRF QUE+3*, QUE+14, QUE+15, QUE+16, S+2*
>> LRF( QUE+5*, S+1*, S+2*
>> LRH QUE+7*, N+1
LRHLEN SPECTOT+1~, SPECTOT+8*, SPECTOT+9, SPECTOT+13, SPECTOT+16, SPECTOT+17, SPECTOT+18, SPECTOT+19, SPECTOT+30, SPECTOT+33
, SPECTOT+36, SPECTOT+37, SPECTOT+38, SPECTOT+39, PROCTOT+1~, PROCTOT+8*, PROCTOT+9, PROCTOT+13, PROCTOT+16, PROCTOT+17
, PROCTOT+18, PROCTOT+19, PROCTOT+30, PROCTOT+33, PROCTOT+36, PROCTOT+37, PROCTOT+38, PROCTOT+39
>> LRI L+2*, L+3*, G+6, G+7, G+17, G+19, G+20
LRJ G+1~, G+5*, G+6*, G+7, G+16*, G+17*, G+19, G+20, SPECTOT+6*, SPECTOT+7*
, PROCTOT+6*, PROCTOT+7*
LRK G+1~, G+18*, G+19*, G+20
>> LRL EN+15*, EN+25*, QUE+16, S+7
>> LRLDT EN+15*, QUE+6
>> LRM QUE+3*, QUE+14, S+3*, S+13*
>> LRM( QUE+5*, QUE+8, S+3*, S+13*
LROK G+1~, G+4, G+5*, G+10*, G+11*, G+14, G+16*, G+24*, G+25*
>> LRP S+14
LRPROC EN+4~, EN+41*, EN+42, EN+44*, EN+47, EN+56*, QUE+20, G+14, G+16, G+21
, G+24, G+25, PROCTOT+8, PROCTOT+25, PROCTOT+45
LRPROC( EN+45*, G+23*, G+24, G+25, PROCTOT+7, PROCTOT+12, PROCTOT+19
LRPROCI QUE+1~, PROCTOT+25
LRPROCI( G+25*, PROCTOT+28, PROCTOT+32, PROCTOT+39
LRPSNM SPECTOT+1~, SPECTOT+3*, SPECTOT+4*, SPECTOT+20, SPECTOT+21, SPECTOT+22, SPECTOT+40, SPECTOT+41, SPECTOT+42, PROCTOT+1~
, PROCTOT+3*, PROCTOT+4*, PROCTOT+20, PROCTOT+21, PROCTOT+22, PROCTOT+40, PROCTOT+41, PROCTOT+42
>> LRR G+27*, S+4, S+5, S+10, S+11*, S+12, S+14, A+2*
>> LRSDT EN+15*, QUE+6*, I+2, L+3
LRSHDR SPECTOT+1~, SPECTOT+8*, SPECTOT+9, SPECTOT+13, SPECTOT+17, SPECTOT+29*, SPECTOT+30, SPECTOT+33, SPECTOT+37, PROCTOT+1~
, PROCTOT+8*, PROCTOT+9, PROCTOT+13, PROCTOT+17, PROCTOT+29*, PROCTOT+30, PROCTOT+33, PROCTOT+37
LRSPEC EN+4~, EN+31*, EN+32, EN+34*, QUE+18, OUT+3!, G+4, G+5, G+8, G+10
, G+11, SPECTOT+8, SPECTOT+25
LRSPEC( EN+35*, G+9*, G+10, G+11, SPECTOT+7, SPECTOT+12, SPECTOT+19
LRSPECI QUE+1~, SPECTOT+25
LRSPECI( G+8*, G+11*, SPECTOT+28, SPECTOT+32, SPECTOT+39
>> LRSS EN+5, QUE+12, I+2, L+3, G+6, G+7, G+17, G+19, G+20
>> LRT S+4*, S+6, S+7, S+14, D+7*
>> LRX S+1*, S+2, S+3, S+6, S+10, S+13, S+15, SPECTOT+14*, SPECTOT+15*, SPECTOT+16
, SPECTOT+18*, SPECTOT+19, SPECTOT+34*, SPECTOT+35*, SPECTOT+36, SPECTOT+38*, SPECTOT+39, PROCTOT+14*, PROCTOT+15*, PROCTOT+16
, PROCTOT+18*, PROCTOT+19, PROCTOT+34*, PROCTOT+35*, PROCTOT+36, PROCTOT+38*, PROCTOT+39
>> LRXR QUE+6, I+2, L+3
>> LRY S+5*, D+2
>> LRZ N+1*, B+1
>> M(2 I+2*
>> P("F" S+1
>> POP EN+59
>> SSN(1 S+14
U B+1, G+27, S+9, S+14, A+1, A+2
>> W G+27*
X EN+37!, EN+48!, QUE+14*, L+3*, G+27*, S+4*, S+5*, S+9*, S+10*, S+14
, A+1*, A+2*, D+2
>> X1 S+4*, D+2*
>> X2 S+4*, D+2*
Y EN+2, EN+11, EN+14, EN+20, EN+25, EN+31, EN+34, EN+35, EN+37!, EN+41
, EN+44, EN+45, EN+48!, EN+56, N+1*, B+1, G+27*, S+5*, D+5*, D+6*
, D+7
>> Z G+27*, S+12, S+14, A+2*
>> ZTRTN EN+58*
>> ZTSK EN+59
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  | All