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 ;DEC 09, 2008 8:30 AM

Source Information

Source file <LRUPAD.m>

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

Caller Graph Total: 3

Package Total Caller Graph
Lab Service 3 LRAPP  LRUPAD  LRUPAD1  

Entry Points

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

External References

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,LRO(68)," ACCESSION LIST"
  • Line Location: LRUPAD+9
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • 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 IHS patient ",$S(LRSS="CY":"* = Reviewed by pathologist",1:""),?57,$S("AUSPCYEMMI"[LRSS:"% =Incomplete",1:"")
  • Line Location: H+6
Function Call: WRITE
  • Prompt: ?60,$S("CH"[LRSS:"%=Test not verified",1:"")
  • Line Location: H+8
Function Call: WRITE
  • Prompt: ?72,"Slide"
  • Line Location: H+8
Function Call: WRITE
  • Prompt: ?62,"Test",?76,"Tech",!,LR("%")
  • Line Location: H+9
Function Call: WRITE
  • Prompt: ?72,"Count"
  • Line Location: H+10
Function Call: WRITE
  • Prompt: ?62,"Test",?76,"Tech",!,LR("%")
  • Line Location: H+11
Function Call: WRITE
  • Prompt: ?62,"Test",?76,"Tech",!,$G(LR("%"))
  • Line Location: H+13
Function Call: WRITE
  • Prompt: ?46,"Date/time of Autopsy"
  • Condition for execution: LRSS="AU"
  • Line Location: H+15
Function Call: WRITE
  • Prompt: !,LR("%")
  • Line Location: H+15
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+11, QUE+2, O

Label References

Name Line Occurrences
END LRUPAD+7, LRUPAD+10, 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+8*
>> B QUE+2*, O
C LRUPAD+8!, 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+13, H+15
>> LR("F" QUE*, H+1
>> LR("FORM" QUE+4
>> LR("Q" QUE+2, QUE+3, O, H+1
>> LRAA LRUPAD+7, LRUPAD+11, QUE+2, O
>> LRAA(1 LRUPAD+7, LRUPAD+9
>> LRC(5 O*
>> LRLDT LRUPAD+11*, QUE+2
>> LRLST H+3
>> LRO(68 LRUPAD+9*, H+3
>> LRSA QUE+2*
>> LRSDT LRUPAD+11, QUE+2
>> LRSS L, L+1, QUE+3, H+6, H+8, H+10, H+13, H+15, S+3
>> LRSTR H+3
>> LRU(1 QUE*
>> N O*
>> POP L+4
>> Q(1 LRUPAD+8*, QUE+3
>> Q(2 LRUPAD+8*, QUE+3
U LRUPAD+11, L, L+3
>> V LRUPAD+11*, QUE+2
>> V(1 LRUPAD+11*, QUE+1*, QUE+2
>> X LRUPAD+8*, LRUPAD+11*, L*, L+1, L+2, L+3
>> Y LRUPAD+7, LRUPAD+8, LRUPAD+10, L+3
>> Z(1 LRUPAD+8*
>> Z(4 LRUPAD+8*
>> 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