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

Package: Lab Service

Routine: LRUPQ


Information

LRUPQ ;AVAMC/REG - LAB RESULTS BY ACCESSION AREA ;2/18/93 13:12 ;

Source Information

Source file <LRUPQ.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Lab Service 3 (D,F,L,M,S,V,YN)^LRU  ^LRUPQ1  (BEG,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: 1

Package Total Caller Graph
Lab Service 1 LRUPQ1  

Entry Points

Name Comments DBIA/ICR reference
A
N1
N2
QUE
H
L
END

External References

Name Field # of Occurrence
^%DT LRUPQ+3, LRUPQ+4, A
^DIC LRUPQ+2
D^LRU LRUPQ+3, LRUPQ+4, A
F^LRU H+1
L^LRU QUE
M^LRU H
S^LRU QUE
V^LRU END
YN^LRU LRUPQ+5
^LRUPQ1 QUE+1
BEG^LRUTL N2+1
END^LRUTL QUE+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?20,LR(1)," ACCESSION LIST"
  • Line Location: LRUPQ+3
Function Call: WRITE
  • Prompt: !!,"Accession list date: ",Z(1)," OK "
  • Line Location: LRUPQ+5
Function Call: WRITE
  • Prompt: !
  • Line Location: A+0
Function Call: WRITE
  • Prompt: $C(7),!!,"No accession numbers for ",Z(1)
  • Line Location: A+2
Function Call: READ
  • Formatting: !
  • Prompt: "Start with Acc #: FIRST // "
  • Variable: N(1)
  • Timeout: DTIME
  • Line Location: N1+0
Function Call: WRITE
  • Prompt: $C(7),!!,"Enter NUMBERS only"
  • Line Location: N1+0
Function Call: READ
  • Formatting: !
  • Prompt: "Start with Acc #: "
  • Variable: N(1)
  • Timeout: DTIME
  • Line Location: N1+1
Function Call: WRITE
  • Prompt: $C(7),!!,"NUMBERS ONLY !!"
  • Line Location: N1+1
Function Call: READ
  • Formatting: !
  • Prompt: "Go to Acc #: LAST // "
  • Variable: N(2)
  • Timeout: DTIME
  • Line Location: N2+0
Function Call: WRITE
  • Prompt: $C(7),!!,"NUMBERS ONLY !!",!!
  • Line Location: N2+0
Function Call: WRITE
  • Prompt: !,LR(4)
  • Line Location: QUE+1
Function Call: WRITE
  • Prompt: !,"LABORATORY SERVICE ",?22,LR(1)," ACCESSIONS for ",Z(1)
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"Acc #",?7,"Patient",?28,"SSN",?35,"LOC",?41,"Specimen",?56,"Received",?68,"Verified",!,LR("%")
  • Line Location: H+2
Routine Call
  • DIC
  • Line Location:
    • LRUPQ+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61 - [#61] QUE
^LAB(62 - [#62] QUE
^LRO(68 - [#68] LRUPQ+4, A+1, A+2, QUE+1

Label References

Name Line Occurrences
A A+2
END N2+1, QUE+2
H QUE
L QUE
N1 N1, N1+1
N2 N2

Naked Globals

Name Field # of Occurrence
^(3 QUE+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % LRUPQ+5*, A, A+2*
%DT LRUPQ+3*, LRUPQ+4*, A*!
%DT("A" A*
>> B QUE+1*
C LRUPQ+3!
DIC LRUPQ+2*!
DIC("S" LRUPQ+2*
DIC(0 LRUPQ+2*
DT LRUPQ+4
DTIME N1, N1+1, N2
IO QUE
IOF QUE+2
IOM L
IOST QUE+2, H
>> LR LRUPQ+2*, LRUPQ+4, A+1, A+2, QUE+1
>> LR("%" H+2
>> LR("F" QUE*, H
>> LR("Q" QUE+1, H
>> LR(1 LRUPQ+2*, LRUPQ+3, H+1
>> LR(3 LRUPQ+2*
>> LR(4 QUE+1, L*
>> LRAD A+1*, A+2, N1, N1+1, QUE+1
>> LRC(5 QUE+1*
>> LRU QUE*
>> LRU(1 QUE*
>> N QUE+1*
>> N(1 N1*, N1+1*, QUE+1
>> N(2 N2*, QUE+1
>> POP N2+1
>> Q(1 QUE*
>> Q(2 QUE*
U LRUPQ+2, LRUPQ+4, A+1, N1, N1+1, N2
>> X LRUPQ+3*, LRUPQ+4*, A*, L*
>> Y LRUPQ+2, LRUPQ+3*, LRUPQ+4*, A*, A+1
>> Z(1 LRUPQ+3*, LRUPQ+4*, LRUPQ+5, A*, A+2, H+1
>> ZTRTN N2+1*
>> ZTSK N2+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All