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

Package: Lab Service

Routine: LRVRW


Information

LRVRW ;SLC/CJS-LAB ROUTINE DATA VERIFICATION BY WORKLIST ;6/2/86 9:18 AM [ 04/10/2003 12:10 PM ]

Source Information

Source file <LRVRW.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Lab Service 6 STD^LRCAPV  ^LRCAPV2  ^LRGVK  INIT^LRVR  VER^LRVR1  (PT,YMD)^LRX  
Automated Lab Instruments 1 (UID,UPDT)^LAGEN  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRVRW  LRVRW2  

Entry Points

Name Comments DBIA/ICR reference
LIST
QUIT
ISEQ ;
END
STOP
YN
WLN2
NX2
L10
T3
NEXT
1
WLN
FIND

External References

Name Field # of Occurrence
UID^LAGEN ISEQ+4
UPDT^LAGEN ISEQ+5
STD^LRCAPV QUIT+1
^LRCAPV2 QUIT+2
^LRGVK QUIT+2
INIT^LRVR 1
VER^LRVR1 L10+11
PT^LRX L10+5
YMD^LRX 1+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ACCESSION MISSING"
  • Line Location: L10+1
Function Call: WRITE
  • Prompt: !!,"Can't use. Entry has data from accession # ",$P(^(0),U,5),!,"Suggest you Clear instrument/worklist data."
  • Line Location: L10+3
Function Call: WRITE
  • Prompt: !?5," Error in Patient Lookup",!
  • Line Location: L10+6
Function Call: WRITE
  • Prompt: !,PNM,?40,HRCN
  • Line Location: L10+9
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: YN+0
Function Call: WRITE
  • Prompt: !,"Answer 'Y' or 'N': "
  • Line Location: YN+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X3
  • Line Location: WLN+0
Function Call: WRITE
  • Prompt: !!!,"SEQUENCE #: ",LRCUP,"//"
  • Line Location: WLN+0
Function Call: WRITE
  • Prompt: !,"ENTER A VALID SEQUENCE NUMBER"
  • Line Location: WLN+1
Function Call: WRITE
  • Prompt: !,"SEQUENCE NUMBER DOESN'T EXIST"
  • Line Location: WLN+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X2
  • Line Location: WLN2+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X3
  • Line Location: WLN2+0
Function Call: WRITE
  • Prompt: !!!,"TRAY: ",LRTRAY,"//"
  • Line Location: WLN2+0
Function Call: WRITE
  • Prompt: " CUP: ",LRCUP,"//"
  • Line Location: WLN2+0
Function Call: WRITE
  • Prompt: !,"ENTER A VALID TRAY, CUP FROM THE LOAD/WORK LIST"
  • Line Location: WLN2+1
Function Call: WRITE
  • Prompt: !,"TRAY, CUP DOESN'T EXIST"
  • Line Location: WLN2+2
Function Call: WRITE
  • Prompt: !,"LAST IN LIST"
  • Line Location: NX2+1
Function Call: WRITE
  • Prompt: " the following tests: "
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !,?10,$P(LRTST(I),"^",1)
  • Line Location: LIST+0
Function Call: WRITE
  • Prompt: !,?5,I
  • Line Location: FIND+0
Function Call: WRITE
  • Prompt: !,"No data for that tray & cup"
  • Line Location: T3+0
Function Call: READ
  • Prompt: "Choose sequence number: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: T3+1
Function Call: WRITE
  • Prompt: !,"Enter a number"
  • Line Location: T3+1
Function Call: WRITE
  • Prompt: !,"No data there"
  • Line Location: T3+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAH( L10+3, ISEQ+1, ISEQ+2*, ISEQ+3*, ISEQ+6*, ISEQ+7*, ISEQ+8, FIND, FIND+1, T3+3
^LR - [#63] L10+5
^LRO(68 - [#68] L10+1, L10+4, END, ISEQ+4, QUIT+1
^LRO(68.2 - [#68.2] L10+1, WLN+2, WLN2+2, NX2, ISEQ+9*, FIND+1
^XTMP("LRCAP" QUIT!

Label References

Name Line Occurrences
END L10+1, L10+11
FIND L10+2
ISEQ L10+2
L10 L10+1, L10+3, L10+6, L10+12
NEXT 1+1, L10+3, L10+6, L10+11
NX2 NX2
QUIT 1, END+1
T3 T3+1
WLN L10+1, WLN+1, WLN+2
WLN2 WLN, WLN2+1, WLN2+2
YN YN

Naked Globals

Name Field # of Occurrence
^( L10+4
^(0 L10+3, L10+5
^(2 END*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %H 1+1*
C5 L10!
>> DFN L10+5*
DIC L10!
DTIME YN, WLN, WLN2, T3+1
DUZ QUIT
>> HRCN L10+9
>> I LIST*, FIND*, FIND+1*
>> LRAA L10+1*, L10+4, END, ISEQ+3, ISEQ+4, QUIT+1
LRAB L10!
>> LRAD L10+1*, L10+4, END, ISEQ+3, ISEQ+4
>> LRAN L10+1*, L10+3, L10+4, END, ISEQ+3, ISEQ+4, ISEQ+7
>> LRCSQ QUIT
>> LRCUP 1+1*, L10+1, WLN, WLN+3*, WLN2, WLN2+3*, NEXT, NX2+1*, NX2+2*, ISEQ+3
, ISEQ+6, ISEQ+9, FIND, FIND+1
LRDEL L10!
>> LRDFN L10+5*
>> LRDPF L10+5*
>> LREND 1, L10+1, L10+6*, L10+11, WLN*, WLN2*, END*, STOP*
LRFP L10!
LRLDT L10!
>> LRLL L10+1, L10+3, WLN+2, WLN2+2, NX2, ISEQ+1, ISEQ+2, ISEQ+3, ISEQ+4, ISEQ+5
, ISEQ+6, ISEQ+7, ISEQ+8, ISEQ+9, FIND, FIND+1, T3+3
LRNG L10!
LRNM L10!
>> LRODT L10+5*
LRORU3 L10+4*, QUIT+2!
>> LRPARAM QUIT+1
LRPRGSQ L10+2, FIND!, T3+2!
LRPRGSQ( FIND*, FIND+1*, T3+3!
LRSET L10!
>> LRSN L10+5*
>> LRSQ L10+3, ISEQ+2*, ISEQ+3, ISEQ+4, ISEQ+5, ISEQ+6, ISEQ+7, ISEQ+9, FIND*, T3+3*
LRTEST L10!
>> LRTM60 1+1*
>> LRTRAY 1+1*, L10+1, WLN*, WLN+2, WLN2, WLN2+3*, NEXT, NX2+1*, NX2+2*, ISEQ+3
, ISEQ+6, ISEQ+9, FIND, FIND+1
>> LRTRCP FIND*
>> LRTST( LIST
>> LRTYPE WLN
LRVER L10!
>> N FIND*, FIND+1*, T3, T3+1, T3+3
>> PNM L10+9
T L10!
U L10+1, L10+3, L10+5, WLN, WLN2, END, NX2+1, ISEQ+3, QUIT+1
>> X 1+1, L10+1*, L10+4*, L10+5, YN*, T3*, T3+1*, T3+2, T3+3
>> X2 WLN2*, WLN2+1, WLN2+2, WLN2+3, NEXT*, NX2*, NX2+1, NX2+2
>> X3 WLN*, WLN+1, WLN+2, WLN+3, WLN2*, WLN2+1, WLN2+2, WLN2+3, NEXT*, NX2*
, NX2+1, NX2+2
Y L10!
Z L10!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All