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

Package: Lab Service

Routine: LRSPT


Information

LRSPT ;AVAMC/REG/WTY - AP PRELIMINARY REPORTS ;10/16/01

Source Information

Source file <LRSPT.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Lab Service 9 F^LRAPF  ^LRAPPOW  ^LRAPT1  ^LRAPT2  EN^LRSPRPT  EN^LRSPRPT2  (D,F,L,L1,S,YN)^LRU  (EN2,SET)^LRUA  
EN1^LRUPS  
VA Fileman 5 ^%DT  EN^DDIOL  ^DIR  ^DIWP  ^DIWW  
Kernel 3 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPPF1  

Entry Points

Name Comments DBIA/ICR reference
CH
END
D
CONT ;
H ;from LRAPPF1
K
DEV ;
QUE ;
SGL
GETP
AU

External References

Name Field # of Occurrence
^%DT LRSPT+11
^%ZIS DEV+2
HOME^%ZIS DEV+8
^%ZISC K+4
^%ZTLOAD DEV+7
EN^DDIOL GETP+6
^DIR CONT+2
^DIWP AU+3
^DIWW AU+4
F^LRAPF AU+3, AU+5
^LRAPPOW D+4
^LRAPT1 D+6
^LRAPT2 AU
EN^LRSPRPT D+2
EN^LRSPRPT2 CH
D^LRU LRSPT+11
F^LRU H+1
L^LRU QUE+4
L1^LRU QUE+4
S^LRU QUE+4
YN^LRU CH+2, END
EN2^LRUA LRSPT+11, SGL
SET^LRUA QUE+4
EN1^LRUPS GETP, SGL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Preliminary reports for ",LRO(68)
  • Line Location: LRSPT+12
Function Call: WRITE
  • Prompt: !!,"Save preliminary reports for reprinting "
  • Line Location: CH+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+1
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+3
Function Call: WRITE
  • Prompt: !,"Request Queued, #",ZTSK
  • Condition for execution: $D(ZTSK)
  • Line Location: DEV+7
Function Call: WRITE
  • Prompt: !
  • Line Location: DEV+7
Function Call: WRITE
  • Prompt: !,"ANATOMIC PATHOLOGY",!,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: $C(7),!!,"OK TO DELETE THE ",LRO(68)," PRELIMINARY REPORT LIST"
  • Line Location: END+0
Function Call: WRITE
  • Prompt: $C(7),!,"LIST DELETED !"
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !!,"FINE, LET'S FORGET IT",!
  • Line Location: END+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CONT+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV+8
Routine Call
  • DIR
  • Line Location:
    • CONT+2
Routine Call
  • %ZIS
  • Line Location:
    • DEV+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LR - [#63] D, D+3, D+5, AU
^LRO(69.2 - [#69.2] GETP+1, GETP+2, GETP+7*, GETP+8, GETP+9, QUE+6, QUE+8, QUE+10, QUE+11, K!
, K+1*, D!, AU+2, AU+3, END!*
^UTILITY($J D!, AU+1!

Label References

Name Line Occurrences
AU D+5
CH LRSPT+13
CONT K+2
D QUE+9, QUE+11
DEV SGL
END LRSPT+13
GETP GETP+1, GETP+2, GETP+10
H AU+3
K QUE+9
SGL LRSPT+13

Naked Globals

Name Field # of Occurrence
^(0 GETP+8*, QUE+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% CH, CH+2*, K+5!, END*
>> %DT LRSPT+11*
>> %ZIS DEV+2*
DIR K+5!, CONT+1!
DIR(0 CONT+1*
DIRUT K+5!
>> DIWF AU+1*
>> DIWR AU+1*
DTOUT K+5!, CONT+3
DUOUT K+5!
IO QUE+1
IO("Q" DEV+4, DEV+8!
IOF K+4
IOM CH+5, AU+1
IOSL AU+3
IOST QUE+12, K+2, K+4
>> LR("%" H+1
>> LR("A" AU+1*, AU+2*, AU+3
>> LR("DIWF" QUE+8*
>> LR("DVD" CH+4!, CH+5*, QUE+12
>> LR("F" K+2
>> LR("Q" QUE+10, K+2, D+2, D+3, D+6, AU, CONT+3*
>> LR("SPSM" QUE+5*
>> LRA QUE+6*, QUE+7*
>> LRAA GETP+1, GETP+2, GETP+7, GETP+8, GETP+9, QUE+6, QUE+8, QUE+10, QUE+11, K
, K+1, D, AU+2, AU+3, END
LRAN GETP, GETP+1, GETP+7, GETP+8, QUE+10*, QUE+11, K!, D, SGL
>> LRAP QUE+9, SGL*
>> LRAPX LRSPT+13
>> LRAPX(1 CH*
>> LRDFN GETP+7, QUE+9*, QUE+11*, D, D+3, D+5, AU, SGL
>> LRI GETP+7, QUE+9*, QUE+11*, SGL
>> LRO AU+5*
>> LRO(68 LRSPT+12, END
LRPRE D+1~*
>> LRQ(2 QUE+6*
>> LRS(5 QUE+6*
LRSAV CH+2*, K, K+3!, SGL*
>> LRSF515 QUE+3*
>> LRTOD LRSPT+11*
>> LRZ AU+2*, AU+4
MSG GETP+6!
MSG(1 GETP+3*, GETP+4*
MSG(2 GETP+5*
P K!
>> POP DEV+3
S K!
U QUE+6, CONT+3
X LRSPT+11*, GETP+8*, QUE+11*, K+5!, AU+3*, CONT+3
Y LRSPT+11, K+5!
>> ZTDESC DEV+5*
>> ZTQUEUED K+4
>> ZTREQ K+4*
>> ZTRTN DEV+6*
>> ZTSAVE("LR*" DEV+6*
ZTSK DEV+7, DEV+8!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All