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

Package: Lab Service

Routine: LRUPAC


Information

LRUPAC ;AVAMC/REG - LAB ACCESSION COUNTS BY DATE ;2/18/93 13:08 ;

Source Information

Source file <LRUPAC.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 2 (B,F,L,M,S,V)^LRU  (BEG,EN,END)^LRUTL  
VA FileMan 1 ^DIC  

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 LRUPAC  

Entry Points

Name Comments DBIA/ICR reference
DEV
QUE
OUT
Z
AC1
H
AN
END

External References

Name Field # of Occurrence
^DIC LRUPAC+2
B^LRU LRUPAC+3
F^LRU H+1
L^LRU QUE
M^LRU H
S^LRU QUE
V^LRU END
BEG^LRUTL DEV
EN^LRUTL QUE
END^LRUTL OUT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,W(1)," ACCESSION COUNTS"
  • Line Location: LRUPAC+3
Function Call: WRITE
  • Prompt: !?5,$P(^LAB(60,T,0),"^"),"= ",S(S,T)
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !?5,$P(^LAB(60,T,0),"^"),"= ",T(T)
  • Line Location: QUE+4
Function Call: WRITE
  • Prompt: !,"LABORATORY SERVICE ",?21,W(1)," COUNTS(",LRSTR,"-",LRLST,")",!,LR("%")
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !!,"Number of accessions: "
  • Line Location: AN+0
Function Call: WRITE
  • Prompt: $S($D(S(LRU)):S(LRU),1:0)
  • Line Location: AN+0
Routine Call
  • DIC
  • Line Location:
    • LRUPAC+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] QUE+3, QUE+4
^LAB(61 - [#61] QUE+3
^LRO(68 - [#68] QUE+1, Z, AC1, AC1+1, AC1+3

Label References

Name Line Occurrences
AC1 Z, AC1+3
AN QUE+2
END LRUPAC+2, LRUPAC+3, DEV, OUT
H QUE+2, QUE+3, QUE+4
OUT AN
Z QUE+2

Naked Globals

Name Field # of Occurrence
^(0 AC1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> B Z*
DIC LRUPAC+2*!
DIC(0 LRUPAC+2*
>> I Z*, AC1, AC1+1, AC1+3*
IO QUE
IOSL QUE+3, QUE+4
IOST H
>> LR("%" H+1
>> LR("F" QUE+2*, H
>> LR("Q" QUE+3, QUE+4, H
>> LRLDT QUE+1*, Z
>> LRLST H+1
>> LRSA Z*
>> LRSDT QUE+1, Z
>> LRSTR H+1
>> LRU AC1, AN
>> POP DEV
>> S QUE+3*, AC1*, AC1+1
>> S( QUE+3, AC1*, AC1+1*, AN
>> T QUE+3*, QUE+4*, AC1+1*
>> T( QUE+4, AC1+1*
U LRUPAC+2, QUE+1
>> W LRUPAC+2*, QUE+1, Z, AC1, AC1+1, AC1+3
>> W(1 LRUPAC+2*, LRUPAC+3, H+1
>> W(2 LRUPAC+2*, QUE+2
>> W(6 Z*, AC1, AC1+1, AC1+3*
>> Y LRUPAC+2, LRUPAC+3
>> Y(0 LRUPAC+2
>> Z QUE+1*, Z*, AC1+3*
>> Z(1 QUE+1*, Z, AC1+3
>> ZTRTN DEV*
>> ZTSK DEV
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All