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

Package: Lab Service

Routine: LRVR1


Information

LRVR1 ;DALOI/CJS/JAH - LAB ROUTINE DATA VERIFICATION ;8/10/04

Source Information

Source file <LRVR1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Lab Service 4 P15^LROE1  ($$NLT,$$RNLT)^LRVER1  ^LRVR2  DUZ^LRX  
Automated Lab Instruments 1 (UID,UPDT)^LAGEN  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  
VA Fileman 1 YN^DICN  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Lab Service 8 LRFLAG  LRGP  LRGV1  LRKDIFF3  LRVR  LRVRA  LRVRPOC  LRVRW  
Automated Lab Instruments 1 LAKDIFF3  
IHS Laboratory Point of Care 1 BLRPOC2  

Entry Points

Name Comments DBIA/ICR reference
TEST1 ; from LRFLAG
QUIT
LD
VER ; from LRFLAG, LRGP, LRVRW
WAIT1
T2
T3
T1
V2
EX2 ;
; If dataname then process and quit
TEST ; from LRGV1
WAIT

External References

Name Field # of Occurrence
YN^DICN T1+3
UID^LAGEN VER+18
UPDT^LAGEN VER+19
P15^LROE1 V2+8
$$NLT^LRVER1 TEST+7, EX2+22
$$RNLT^LRVER1 EX2+9
^LRVR2 LD+13
DUZ^LRX VER+13
$$FMTE^XLFDT LRVR1+17, LRVR1+19, V2+6
$$NOW^XLFDT V2+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: LRVR1+14
Function Call: WRITE
  • Prompt: !,?2,"Seq #: ",LRI,?13," Accession: ",$P($G(^LRO(68,LRAA,1,LRAD,1,LRAN,.2)),"^")
  • Line Location: LRVR1+16
Function Call: WRITE
  • Prompt: ?40," Results received: ",$$FMTE^XLFDT($P(LRX,"^",10),"1M")
  • Line Location: LRVR1+17
Function Call: WRITE
  • Prompt: !,?20,"UID: ",$P($G(^LRO(68,LRAA,1,LRAD,1,LRAN,.3),"UNKNOWN"),"^")
  • Line Location: LRVR1+18
Function Call: WRITE
  • Prompt: ?44," Last updated: ",$$FMTE^XLFDT($P(LRX,"^",11),"1M")
  • Line Location: LRVR1+19
Function Call: WRITE
  • Prompt: !,"No data there"
  • Line Location: LRVR1+25
Function Call: READ
  • Prompt: "What tray: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: T1+0
Function Call: WRITE
  • Prompt: !,"Enter a number"
  • Line Location: T1+0
Function Call: WRITE
  • Prompt: !,"Can't MANUALLY add to a SEQUENCE instrument data file."
  • Line Location: T1+2
Function Call: WRITE
  • Prompt: !,"Enter manually"
  • Line Location: T1+3
Function Call: READ
  • Prompt: "What cup: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: T2+0
Function Call: WRITE
  • Prompt: !,"Enter a number"
  • Line Location: T2+0
Function Call: WRITE
  • Prompt: !,?5,LRI
  • Line Location: T2+3
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
Function Call: WRITE
  • Prompt: !!,"Amended results exist for this accession. Please process these"
  • Line Location: VER+8
Function Call: WRITE
  • Prompt: !,"first using option Enter/verify/modify data (manual) [LRENTER]"
  • Line Location: VER+9
Function Call: WRITE
  • Prompt: !,"No tests in editing profile"
  • Line Location: VER+12
Function Call: WRITE
  • Prompt: !,$P(^LRO(69,LRODT,1,LRSN,1),U,6)
  • Line Location: V2+2
Function Call: WRITE
  • Prompt: !,">>>>ERROR - NO POINTER TO FILE #63 - PLEASE NOTIFY SYSTEM MANAGER^ <<<<<",!
  • Line Location: V2+26
Function Call: WRITE
  • Prompt: !,">>>>ERROR - NO ENTRY IN FILE #63 - PLEASE NOTIFY SYSTEM MANAGER<<^ <<<",!
  • Line Location: V2+27
Function Call: WRITE
  • Prompt: !!?5,"No Data for this Accession ",!!
  • Line Location: LD+1
Function Call: WRITE
  • Prompt: !,"Type ""^"" to skip "
  • Line Location: WAIT+0
Function Call: READ
  • Timeout: 10
  • Variable: X
  • Line Location: WAIT1+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] TEST1+3, EX2+14, EX2+19, EX2+20, EX2+21
^LAB(62 - [#62] LD+11
^LAB(69.9 - [#69.9] V2+1
^LAH( LRVR1+7, LRVR1+9, T2+3, T3+3, VER+15, VER+16*, VER+17*, VER+20*, VER+21, LD+1!
, LD+4, WAIT1
^LAH("LA7 AMENDED RESULTS" VER+6
^LR - [#63] V2+27, LD+5, LD+7, LD+9*
^LRO(68 - [#68] LRVR1+13, LRVR1+16, LRVR1+18, VER+3, V2+3, V2+4, V2+11, V2+13, V2+14, V2+16
, V2+18, V2+22, V2+25, TEST+5
^LRO(68.2 - [#68.2] T1+2
^LRO(69 - [#69] V2+2, V2+20
^TMP("LR" VER+2!, VER+12, TEST+3, TEST+5, TEST+8*, TEST1+4!, EX2+6, EX2+7, EX2+8*, EX2+10*

Label References

Name Line Occurrences
EX2 TEST1+10
LRVR1 WAIT1
QUIT T1+2, T1+3
T1 T1, T1+3
T2 T1+1, T2
T3 LRVR1+20, T3+1, T3+3
TEST VER+11
V2 VER+14
VER LRVR1+20, T1+3, T1+4
WAIT1 WAIT1

Naked Globals

Name Field # of Occurrence
^( V2+18, TEST+3!, TEST+5, EX2+6*, EX2+19
^(0 V2+2, V2+18, LD+11, TEST+5, TEST1+3
^(3 V2+11*
^(4 EX2+14

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % T1+3*
%DT V2+5~
%DT("B" V2+6*
DTIME T1, T2, T3+1
DUZ VER+13
DUZ(2 LRVR1+25
I V2+17*, V2+18*, LD+6~, LD+8*, TEST1+7*, TEST1+8, TEST1+9
>> J EX2+18*, EX2+19*, EX2+20
LRA1 V2+5~, V2+7*, V2+9
LRA2 V2+5~, V2+7*, V2+9
LRA3 V2+5~, V2+7*, V2+9
>> LRAA LRVR1+11, LRVR1+13, LRVR1+16, LRVR1+18, VER+3, VER+17, V2+3, V2+4, V2+7, V2+9*
, V2+11, V2+13, V2+14, V2+16, V2+18, V2+22, V2+25, TEST+5
>> LRAD LRVR1+13, LRVR1+16, LRVR1+18, VER+3, VER+17, V2+3, V2+4, V2+7, V2+9*, V2+11
, V2+13, V2+14, V2+16, V2+18, V2+25, TEST+5
>> LRAL V2+18*, V2+19
>> LRALERT V2+16*, V2+19*
>> LRAN LRVR1+7, LRVR1+13, LRVR1+16, LRVR1+18, VER+3, VER+17, VER+20, V2+3, V2+4, V2+7
, V2+9*, V2+11, V2+13, V2+14, V2+16, V2+18, V2+25, LD+1, TEST+5, WAIT1
LRBETST LRVR1+5~
LRBETST( TEST1+3*
LRBEY LRVR1+5~
LRBEY( EX2+12*
>> LRCDT V2+3*, V2+6, V2+10, V2+14*, V2+15
>> LRCFL EX2+14*
>> LRCW V2+29*
>> LRDFN V2+27, LD+5, LD+7, LD+9
LRDL LD+14!
>> LRDUZ(2 LRVR1+25
>> LREAL V2+16*
>> LRGVP LD+4
LRI LRVR1+5~, LRVR1+6*, LRVR1+7*, LRVR1+9, LRVR1+15, LRVR1+16, T2+3*, TEST+1~, TEST+2*, TEST+3*
, TEST+4*, TEST+5*, TEST1+2~, TEST1+3*
>> LRIDT V2+25*, V2+26, V2+27, LD+5, LD+7, LD+9
>> LRLL LRVR1+7, LRVR1+9, T1+2, T2+3, T3+3, VER+6, VER+7, VER+15, VER+16, VER+17
, VER+18, VER+19, VER+20, VER+21, LD+1, LD+4, WAIT1
>> LRLLOC V2+1*, V2+2*
LRM TEST1+6!
LRM( EX2+11*
>> LRMETH LD+4*, LD+8*, LD+9
LRN LRVR1+5~, LRVR1+6*, LRVR1+14, LRVR1+15*, LRVR1+20, T2+3*, T3, T3+1, T3+3
LRNM VER+2!
>> LRNT TEST+4*, TEST+6*, TEST+7, TEST+8, TEST1+3, EX2+20*, EX2+21, EX2+22
>> LRNX TEST1+5*
>> LRODT V2+2, V2+20
>> LRORDR TEST1+4
>> LROUTINE V2+1*, V2+16
LRPRGSQ T2+2!, T3+2!, LD+1!, LD+14!
LRPRGSQ( T2+3*, V2!
LRROOT VER+1~, VER+6*, VER+7
>> LRSAMP V2+20*, LD+11
>> LRSB EX2+4*, EX2+5, EX2+6, EX2+7, EX2+8, EX2+10, EX2+11, EX2+12
>> LRSN V2+2, V2+20
>> LRSQ LRVR1+15*, T1+3*, T2+3*, T3+3*, VER+14, VER+16*, VER+17, VER+18, VER+19, VER+20
, V2, LD+1, LD+4
>> LRSS V2+22*, V2+23, V2+27, LD*, LD+5, LD+7, LD+9
>> LRSTATUS V2+7*
>> LRSUB EX2+2*, EX2+3, EX2+4
LRTEST VER+2!, TEST1+11!
LRTEST( TEST+6*, TEST+7*, TEST+8, TEST1+3*, TEST1+7, TEST1+8, TEST1+9!, EX2+21*, EX2+22*
>> LRTRAY T1+1*, T2+1
>> LRTRCP T2+1*, T2+3
>> LRUID VER+3*, VER+6, VER+7, VER+18
>> LRVTS( EX2+5
LRX LRVR1+8~, LRVR1+9*, LRVR1+11, LRVR1+13, LRVR1+17, LRVR1+19, TEST+1~, TEST+6*, TEST+7
U V2+1, V2+2, V2+3, V2+11, V2+13, V2+14, V2+16, V2+18, V2+20, V2+22
, V2+25, LD+4, LD+5, LD+7, LD+9, LD+11, TEST+5, TEST+7, TEST1+3, EX2+2
, EX2+11, EX2+14, EX2+21, EX2+22, WAIT1
X T1*, T1+1, T2*, T2+1, T3+1*, T3+2, T3+3, VER+13*, LD+6~, LD+7*
, LD+8, TEST+5*, TEST+6, TEST+8, TEST1+8*, EX2+2, EX2+8, EX2+9, EX2+11, EX2+14
, EX2+19, EX2+20, WAIT1*
>> XP TEST1+8*, EX2+6, EX2+9*, EX2+10, EX2+11, EX2+12, EX2+22
>> Y EX2+20*, EX2+21
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All