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

Package: Lab Service

Routine: LRUPA1


Information

LRUPA1 ; IHS/DIR/FJE - LAB ACCESSION LIST COND'T 3/3/94 10:07 ;

Source Information

Source file <LRUPA1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Lab Service 2 (D,DT,SSN)^LRU  H^LRUPA  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRUPA  

Entry Points

Name Comments DBIA/ICR reference
O
H
L
W
V

External References

Name Field # of Occurrence
D^LRU V+6
DT^LRU V+10
SSN^LRU V+3
H^LRUPA LRUPA1+6, V, V+5, O, H

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$J(N,7),?11,"Entry not in lab results file"
  • Line Location: LRUPA1+6
Function Call: WRITE
  • Prompt: !
  • Line Location: V+0
Function Call: WRITE
  • Prompt: $E(A(3),4,5),"/",$E(A(3),6,7)
  • Line Location: V+0
Function Call: WRITE
  • Prompt: ?5,$J(N,5)
  • Line Location: V+2
Function Call: WRITE
  • Prompt: $E(LRP,1,15),?28,SSN(1),?34,$E(A(7),1,5)
  • Line Location: V+4
Function Call: WRITE
  • Prompt: !?7,SSN," ",$P(Z,"^",5)," ",$P(Z,"^",6)
  • Line Location: V+4
Function Call: WRITE
  • Prompt: $E(LRP,1,14),?27,HRCN,?34,$E(A(7),1,5)
  • Line Location: V+5
Function Call: WRITE
  • Prompt: !?7,HRCN," ",$P(Z,"^",5)," ",$P(Z,"^",6)
  • Line Location: V+5
Function Call: WRITE
  • Prompt: ?42,Y
  • Line Location: V+6
Function Call: WRITE
  • Prompt: ?40,"Not in lab results file"
  • Line Location: V+7
Function Call: WRITE
  • Prompt: ?72,$J(+N(6),5)
  • Line Location: V+9
Function Call: WRITE
  • Prompt: "b"
  • Condition for execution: $P(N(6),"^",2)
  • Line Location: V+9
Function Call: WRITE
  • Prompt: ?79,C(6)
  • Line Location: V+9
Function Call: WRITE
  • Prompt: ?40,Y
  • Line Location: V+10
Function Call: WRITE
  • Prompt: ?41,$S(C(2)>0&(P(0)="STERILIZER"!(P(0)="ENVIRONMENTAL")):$E($P(^LAB(62,C(2),0),"^"),1,14),$D(^LAB(61,C(3),0)):$E($P(^(0),"^"),1,13),1:"")
  • Line Location: V+11
Function Call: WRITE
  • Prompt: !
  • Condition for execution: A>0
  • Line Location: L+1
Function Call: WRITE
  • Prompt: ?54,"*"
  • Line Location: L+1
Function Call: WRITE
  • Prompt: !
  • Condition for execution: B>0
  • Line Location: O+0
Function Call: WRITE
  • Prompt: ?46,$S($D(^LAB(61,C(3),0)):$E($P(^(0),"^"),1,23),1:"")
  • Line Location: O+0
Function Call: WRITE
  • Prompt: !
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $E(A(3),4,5),"/",$E(A(3),6,7)
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $E(LRP,1,20),?28,SSN(1),?34,$E(A(7),1,5)
  • Line Location: H+1
Function Call: WRITE
  • Prompt: ?40,LRA
  • Condition for execution: LRSS="BB"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: $E(LRP,1,14),?27,HRCN,?34,$E(A(7),1,5)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: ?40,LRA
  • Condition for execution: LRSS="BB"
  • Line Location: H+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] V+2
^LAB(60 - [#60] L, L+2
^LAB(61 - [#61] V+11, O
^LAB(62 - [#62] V+11
^LR - [#63] LRUPA1+6, V+2, V+6, V+7, V+8, V+10, W, O
^LRO(68 - [#68] LRUPA1+4, LRUPA1+5, LRUPA1+6, W
^VA(200 - [#200] L+2

Label References

Name Line Occurrences
H L+1
L W
O V+8
V LRUPA1+7

Naked Globals

Name Field # of Occurrence
^( W, O
^("AU" V+6
^(0 LRUPA1+4, LRUPA1+5, V+11, O
^(3 LRUPA1+5
^(6 LRUPA1+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A W*, L+1, L+2
>> A(3 LRUPA1+5*, V, H
>> A(7 LRUPA1+5*, V+5, H+2
>> B O*, O+1
>> C(1 LRUPA1+4
>> C(2 LRUPA1+4*, V+11
>> C(3 LRUPA1+4*, V+11, O*
>> C(4 O*
>> C(6 V+8*, V+9
>> DFN V+2*
>> HRCN V+5, H+2
IOSL LRUPA1+6, V, V+5, L+1, O
>> LR("Q" LRUPA1+6, LRUPA1+7, V, V+5, V+8, W, L, L+1, O, O+1
, H
>> LRA V+10*, H+2
>> LRAA LRUPA1+4, LRUPA1+5, LRUPA1+6, W
>> LRAD LRUPA1+4, LRUPA1+5, LRUPA1+6, V, W, H
>> LRC(5 LRUPA1+7
>> LRDFN LRUPA1+5*, LRUPA1+6, V+2, V+6, V+7, V+8, V+10, W, O
>> LRDPF V+2*
>> LRI LRUPA1+5*, V+7, V+8, V+10, W, O
>> LRP V+3*, V+5, H+2
>> LRSS LRUPA1+7, V+5, V+6, V+7, V+8, V+9, V+10, W, L+1, L+2
, O, H+2
>> LRU LRUPA1+4
>> LRU(1 LRUPA1+4
>> N LRUPA1+4, LRUPA1+5, LRUPA1+6, V+2, W, H+2
>> N(6 LRUPA1+6*, LRUPA1+7, V+9
>> P(0 V+2*, V+5, V+11, H+2
>> Q(1 LRUPA1+7*
>> Q(2 LRUPA1+7*
>> SSN V+3*
>> X LRUPA1+4*, LRUPA1+5*, V+2*, V+3*, V+6*, V+8*, L+2*
>> Y V+2*, V+3, V+6*, V+10*
>> Z V+2*, V+5, W*, L, L+2
>> Z(2 W*, L+2
>> Z(3 W*, L+1, L+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All