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

Package: Lab Service

Routine: LRUPAD


Information

LRUPAD ;AVAMC/REG/WTY - LAB ACCESSION LIST BY DATE ;9/25/00

Source Information

Source file <LRUPAD.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
Lab Service 5 (B,D,F,L,M,S,V)^LRU  ^LRUBYDIV  ^LRUPAD1  ^LRUPAD2  (BEG,EN,END)^LRUTL  
VA FileMan 2 ^%DT  ^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: 3

Package Total Caller Graph
Lab Service 3 LRAPP  LRUPAD  LRUPAD1  

Entry Points

Name Comments DBIA/ICR reference
L
QUE
O
H ;from LRUPAD1
S
END

External References

Name Field # of Occurrence
^%DT LRUPAD+7
^DIC L+3
B^LRU LRUPAD+9
D^LRU LRUPAD+7
F^LRU H+2
L^LRU QUE
M^LRU H+1
S^LRU QUE
V^LRU END
^LRUBYDIV LRUPAD+6
^LRUPAD1 O
^LRUPAD2 L+2
BEG^LRUTL L+4
EN^LRUTL LRUPAD+7
END^LRUTL QUE+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,LRO(68)," ACCESSION LIST"
  • Line Location: LRUPAD+8
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: L+0
Function Call: WRITE
  • Prompt: !?72,"-----",!,"Cell block (b) count: ",Q(1),?58,"Slide count:",?72,$J(Q(2),5)
  • Line Location: QUE+3
Function Call: WRITE
  • Prompt: !,LRO(68)," (",LRSTR,"-",LRLST,")",!
  • Line Location: H+3
Function Call: WRITE
  • Prompt: "Collection Sample: ",C,!
  • Condition for execution: $D(C)#2
  • Line Location: H+3
Function Call: WRITE
  • Prompt: "# = Not VA patient ",$S(LRSS="CY":"* = Reviewed by pathologist",1:""),?57,$S("AUSPCYEMMI"[LRSS:"% =Incomplete",1:"")
  • Line Location: H+4
Function Call: WRITE
  • Prompt: ?60,$S("CH"[LRSS:"%=Test not verified",1:"")
  • Line Location: H+5
Function Call: WRITE
  • Prompt: ?72,"Slide"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: ?72,"Count"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: ?62,"Test",?76,"Tech",!,LR("%")
  • Line Location: H+7
Function Call: WRITE
  • Prompt: ?46,"Date/time of Autopsy"
  • Condition for execution: LRSS="AU"
  • Line Location: H+8
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+8
Function Call: WRITE
  • Prompt: !!,"Enter following letter for appropriate listing:"
  • Line Location: S+0
Function Call: WRITE
  • Prompt: !?5,"'A' for listing by accession number"
  • Line Location: S+1
Function Call: WRITE
  • Prompt: !?5,"'P' for listing by patient"
  • Line Location: S+2
Routine Call
  • DIC
  • Line Location:
    • L+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(62 - [#62] QUE
^LRO(68 - [#68] LRUPAD+10, QUE+2, O

Label References

Name Line Occurrences
END LRUPAD+6, LRUPAD+9, L, L+3, L+4, QUE+5
H L+1, QUE, QUE+3
L L, L+1
O QUE+2
S L

Naked Globals

Name Field # of Occurrence
^(3 O

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT LRUPAD+7*
>> B QUE+2*, O
C LRUPAD+7!, L+3*, H+3
C(1 L+3*
DIC L+3*!
DIC("A" L+3*
DIC(0 L+3*
DTIME L
>> I QUE+2*, O
IO QUE
IOF QUE+4
IOSL QUE+3
IOST QUE+4, H+1
>> LR("%" H+7, H+8
>> LR("F" QUE*, H+1
>> LR("FORM" QUE+4
>> LR("Q" QUE+2, QUE+3, O, H+1
>> LRAA LRUPAD+6, LRUPAD+10, QUE+2, O
>> LRAA(1 LRUPAD+6, LRUPAD+8
>> LRC(5 O*
>> LRLDT LRUPAD+10*, QUE+2
>> LRLST H+3
>> LRO(68 LRUPAD+8*, H+3
>> LRSA QUE+2*
>> LRSDT LRUPAD+10, QUE+2
>> LRSS L, L+1, QUE+3, H+4, H+5, H+6, H+7, H+8, S+3
>> LRSTR H+3
>> LRU(1 QUE*
>> N O*
>> POP L+4
>> Q(1 LRUPAD+7*, QUE+3
>> Q(2 LRUPAD+7*, QUE+3
U LRUPAD+10, L, L+3
>> V LRUPAD+10*, QUE+2
>> V(1 LRUPAD+10*, QUE+1*, QUE+2
>> X LRUPAD+7*, LRUPAD+10*, L*, L+1, L+2, L+3
>> Y LRUPAD+6, LRUPAD+7, LRUPAD+9, L+3
>> Z(1 LRUPAD+7*
>> Z(4 LRUPAD+7*
>> ZTRTN L+4*
>> ZTSK L+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All