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

Package: Lab Service

Routine: LRAPCUM


Information

LRAPCUM ;DALOI/STAFF - AP PATIENT CUM ;03/21/13 15:28

Source Information

Source file <LRAPCUM.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Lab Service 6 ^LRAPCUM1  ^LRDPA  SUPA^LRSPRPT  ^LRSPRPTM  (D,L,YN)^LRU  (D,SET)^LRUA  
VA FileMan 2 ^DIWP  ^DIWW  
Kernel 1 ^%ZIS  

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

Package Total Caller Graph
Lab Service 3 LRAPCUM1  LRAPDS  LRAPPA  

Entry Points

Name Comments DBIA/ICR reference
P
R
C
F
E
W
MORE
S
U
B
SP
WP
A

External References

Name Field # of Occurrence
^%ZIS LRAPCUM+4
^DIWP F+5, U+6, WP+6
^DIWW F+6, U+7, WP+7
^LRAPCUM1 W+35
^LRDPA P
SUPA^LRSPRPT W+27
^LRSPRPTM W+12, W+14, W+16, W+17
D^LRU W, W+22, SP
L^LRU LRAPCUM+4
YN^LRU R
D^LRUA W, W+1
SET^LRUA W+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?15,LRAA(1)," PATIENT REPORT(S) DISPLAY"
  • Line Location: LRAPCUM+5
Function Call: WRITE
  • Prompt: !
  • Line Location: P+0
Function Call: WRITE
  • Prompt: $C(7),!!,"No ",LRAA(1)," reports on file",!
  • Line Location: R+1
Function Call: WRITE
  • Prompt: Q:LRA(2)?1P
  • Line Location: R+2
Function Call: WRITE
  • Prompt: !?2,$P(^LR(LRDFN,LRSS,LRI,LRV,C,0),U)
  • Line Location: C+0
Function Call: WRITE
  • Prompt: !,"Date Spec taken: ",LRW(1),?38,"Pathologist:",LRW(2),!,"Date Spec rec'd: ",LRW(10),?38,$S(LRSS="SP":"Resident: ",1:"Tech: "),LRW(4)
  • Line Location: W+3
Function Call: WRITE
  • Prompt: !,$S($L(LRW(3)):"Date completed: ",1:"REPORT INCOMPLETE"),LRW(3),?38,"Accession #: ",$P(B,"^",6),!,"Submitted by: ",$P(B,"^",5),?38,"Practitioner:",LRW(7),!,LR("%")
  • Line Location: W+4
Function Call: WRITE
  • Prompt: !,$C(7),"Report not verified",!
  • Line Location: W+5
Function Call: WRITE
  • Prompt: !,"Specimen: "
  • Line Location: W+6
Function Call: WRITE
  • Prompt: !,"Brief Clinical History:"
  • Line Location: W+7
Function Call: WRITE
  • Prompt: !,"Preoperative Diagnosis:"
  • Line Location: W+8
Function Call: WRITE
  • Prompt: !,"Operative Findings:"
  • Line Location: W+9
Function Call: WRITE
  • Prompt: !,"Postoperative Diagnosis:"
  • Line Location: W+10
Function Call: WRITE
  • Prompt: !,LR(69.2,.13)
  • Line Location: W+12
Function Call: WRITE
  • Prompt: !,LR(69.2,.03)
  • Line Location: W+14
Function Call: WRITE
  • Prompt: !,LR(69.2,.04)," (Date Spec taken: ",LRW(1),")"
  • Line Location: W+16
Function Call: WRITE
  • Prompt: !,LR(69.2,.14)
  • Line Location: W+17
Function Call: WRITE
  • Prompt: !,"Comments:"
  • Line Location: W+40
Function Call: WRITE
  • Prompt: !,$P(^(A,0),"^")
  • Line Location: W+41
Function Call: READ
  • Formatting: !
  • Prompt: "'^' TO STOP: "
  • Variable: LRA(2)
  • Timeout: DTIME
  • Line Location: MORE+0
Function Call: WRITE
  • Prompt: $C(7)
  • Line Location: MORE+0
Function Call: WRITE
  • Prompt: $C(13),$J("",15),$C(13)
  • Line Location: MORE+3
Function Call: WRITE
  • Prompt: !,E(1)," ",E," Date: ",T(2)," ",!
  • Line Location: WP+0
Function Call: WRITE
  • Prompt: !,^(A,0)
  • Line Location: A+0
Routine Call
  • %ZIS
  • Line Location:
    • LRAPCUM+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] R+1, R+2, C, F+2, F+4, W+6, W+7, W+8, W+9, W+10
, W+12, W+14, W+16, W+17, W+19, W+21, W+25, W+33, U+3, U+5
, B, SP, WP+4, WP+6, A
^TMP($J E!
^UTILITY($J F+1!, U+1!, WP+2!
^XUSEC("LRLAB" W+35

Label References

Name Line Occurrences
A W+5
B W+34
C W+6
E F, U, WP+1
F W+7, W+8, W+9, W+10, W+13, W+15, W+17, W+18
MORE C, F+3, W+5, W+12, W+14, W+16, W+17, W+24, W+42, MORE
, U+4, SP, WP+5
P P
R P
S R+2
SP B
U W+29
W R+2
WP SP

Naked Globals

Name Field # of Occurrence
^( R+2, W+22, SP, A

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % R*
>> A MORE+1*, S*, A*
>> B R+2*, W, W+1, W+4
>> C C*, F+2*, F+4, W+21*, W+22, W+25, W+26, U+3, U+5, B*
, SP, WP+4, WP+6
DIC P!
>> DIWF E*
>> DIWL E*
>> DIWR E*
DTIME MORE
DUZ W+35
>> E U+2*, U+3*, U+5, SP*, WP
>> E(1 SP*, WP
>> F WP+3*, WP+4*, WP+6
>> G SP*, WP+4, WP+6
IOF R+2
IOM E
>> IOP LRAPCUM+4*
>> LR( W+12, W+14, W+16, W+17, SP
>> LR("%" W+4
>> LR("Q" P*, W+26*, W+28
>> LR(0 W+12*, W+14*, W+16*, W+17*
>> LRA(1 R+2*, C, F+3, W+12, W+14, W+16, W+17, W+24, MORE+2*, U+4
, SP, WP+5
>> LRA(2 R+2, C, F+2, F+3, F+6, W+6, W+7, W+8, W+9, W+10
, W+12, W+13, W+14, W+15, W+16, W+17, W+18, W+21, W+24, W+26
, W+28*, W+29, W+30, W+36, MORE*, MORE+1, S*, U+3, U+4, U+7
, B, SP, WP+4, WP+5, WP+7
>> LRAA(1 LRAPCUM+5, R+1
>> LRDFN P, R+1, R+2, C, F+2, F+4, W+6, W+7, W+8, W+9
, W+10, W+12, W+14, W+16, W+17, W+19, W+21, W+25, W+33, U+3
, U+5, B, SP, WP+4, WP+6, A
>> LRI R+2*, C, F+2, F+4, W+6, W+7, W+8, W+9, W+10, W+12
, W+14, W+16, W+17, W+19, W+21, W+25, W+33, U+3, U+5, B
, SP, WP+4, WP+6, A
>> LRSS R+1, R+2, C, F+2, F+4, W+3, W+6, W+7, W+8, W+9
, W+10, W+12, W+14, W+16, W+17, W+19, W+21, W+25, W+33, U+3
, U+5, B, SP, WP+4, WP+6, A
>> LRV C, F+2, F+4, W+6*, W+7*, W+8*, W+9*, W+10*, W+13*, W+15*
, W+17*, W+18*, W+26*
>> LRW(1 W*, W+3, W+16
>> LRW(10 W*, W+3
>> LRW(11 W*, W+5
>> LRW(2 W*, W+3
>> LRW(3 W*, W+4
>> LRW(4 W+1*, W+3
>> LRW(7 W+1*, W+4
>> LRZ C*, F+2*, F+6, U+3*, U+7, WP+4*, WP+7
>> T(2 SP*, WP
U C, F+4, W+12, W+14, W+16, W+17, W+22, W+25
>> X F+4*, W*, W+1*, W+22*, W+23, W+25, W+29, U+5*, SP*, WP+6*
>> Y W*, W+22*, W+23, SP*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All