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

Package: Lab Service

Routine: LRVRA


Information

LRVRA ;DALOI/JMC-Lab Routine Data Verification by UID ;2/12/97 11:06

Source Information

Source file <LRVRA.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Lab Service 4 P15^LROE1  STOP^LRVR  ^LRVR1  PT^LRX  
Kernel 2 $$FMADD^XLFDT  ($$CJ,$$UP)^XLFSTR  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Lab Service 2 LRGV  LRVR  

Entry Points

Name Comments DBIA/ICR reference
UID ; Setup accession variables for a given UID.
BLDHELP(LRSD,LRLL,LRPROF) ; Build list of UID's
; Input LRSD - seed value for partial lookups
; if null or missing then return all UID's in xref.
; LRLL - ien of loadlist.
; LRPROF - ien of profile on loadlist.
; Only max of 500 allow to be displayed.
LWP(LRSD) ; Display list of partial UID's available
NEXT ; Retrieve next UID in xref.
LW ; Display list of UID's available
WLN ; Select next accession (UID) to work with.

External References

Name Field # of Occurrence
^DIR WLN+5, LW+11, LWP+17
P15^LROE1 WLN+22
STOP^LRVR WLN+6, LW+12, LWP+19, LWP+22
^LRVR1 LRVRA+15
PT^LRX WLN+18
$$FMADD^XLFDT LRVRA+9
$$CJ^XLFSTR LW+7, LWP+7
$$UP^XLFSTR WLN+8

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: WLN+1
Function Call: WRITE
  • Prompt: !,"No accession on file for this UID."
  • Line Location: WLN+13
Function Call: WRITE
  • Prompt: !,PNM,?30,SSN
  • Line Location: WLN+18
Function Call: WRITE
  • Prompt: !,"You cannot verify an accession which has not been collected.",$C(7)
  • Line Location: WLN+25
Function Call: WRITE
  • Prompt: !,$C(7),"No results found in UID cross-reference."
  • Line Location: LW+4
Function Call: WRITE
  • Prompt: @IOF,$$CJ^XLFSTR("Current Unique Identifiers with Results Available",IOM),!!
  • Line Location: LW+7
Function Call: WRITE
  • Prompt: ?3,$P($G(^TMP($J,"LR","UIDHELP",K)),"^",2)
  • Line Location: LW+9
Function Call: WRITE
  • Prompt: ?43,$P($G(^TMP($J,"LR","UIDHELP",(K+J))),"^",2),!
  • Line Location: LW+10
Function Call: WRITE
  • Prompt: !
  • Line Location: LW+11
Function Call: WRITE
  • Prompt: !,$C(7),"No results found in UID cross-reference."
  • Line Location: LWP+4
Function Call: WRITE
  • Prompt: @IOF,$$CJ^XLFSTR("Current Unique Identifiers with Results Available",IOM),!!
  • Line Location: LWP+7
Function Call: WRITE
  • Prompt: ?3,$J(K,3),". ",$P($G(^TMP($J,"LR","UIDHELP",K)),"^",2)
  • Line Location: LWP+10
Function Call: WRITE
  • Prompt: ?43,$J(K+J,3),". ",$P($G(^TMP($J,"LR","UIDHELP",(K+J))),"^",2)
  • Line Location: LWP+13
Function Call: WRITE
  • Prompt: !
  • Line Location: LWP+15
Function Call: WRITE
  • Prompt: !
  • Line Location: LWP+16
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LWP+18
Routine Call
  • DIR
  • Line Location:
    • WLN+5
    • LW+11
    • LWP+17

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(69.9 - [#69.9] LRVRA+8
^LAH( NEXT+4, BLDHELP+11
^LR - [#63] WLN+17
^LRO(68 - [#68] WLN+12, WLN+15, WLN+16, WLN+20, UID+2, BLDHELP+14, BLDHELP+18
^LRO(68.2 - [#68.2] LRVRA+4, BLDHELP+9
^LRO(69 - [#69] WLN+24
^TMP($J LW+9, LW+10, LW+13!, LWP+9, LWP+10, LWP+12, LWP+13, LWP+21, LWP+23!, BLDHELP+7!
, BLDHELP+21*

Label References

Name Line Occurrences
$$BLDHELP LW+3, LWP+3
$$LWP WLN+9
NEXT LRVRA+5, LRVRA+14, LRVRA+15, WLN+14, WLN+27
UID WLN+11, NEXT+7
WLN LRVRA+14, WLN+10, WLN+12

Naked Globals

Name Field # of Occurrence
^( WLN+15
^(0 LRVRA+8, WLN+15, WLN+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C5 LRVRA+11!
>> DFN WLN+17*
DIC LRVRA+11!
DIR LRVRA+13~, WLN+2!, LW+1~, LWP+1~
DIR("?" WLN+3*
DIR("A" WLN+3*, LWP+16*
DIR("B" WLN+4*
DIR(0 WLN+3*, LW+11*, LWP+16*
DIRUT LRVRA+13~, WLN+6, LW+1~, LW+12, LWP+1~, LWP+20
DT LRVRA+9
DTOUT LRVRA+13~, LW+1~, LWP+1~
DUOUT LRVRA+13~, LW+1~, LWP+1~, LWP+19
>> EAMODE LRVRA+12*
I LW+1~, LW+6*, LW+8, LWP+1~, LWP+6*, LWP+8, BLDHELP+6~, BLDHELP+10*, BLDHELP+11*, BLDHELP+12
, BLDHELP+13, BLDHELP+14, BLDHELP+15
IOF LW+7, LWP+7, LWP+18
IOM LW+7, LWP+7
IOSL LW+5, LWP+5
J LW+1~, LW+5*, LW+8, LW+10, LWP+1~, LWP+5*, LWP+8, LWP+12, LWP+13, LWP+14
K LW+1~, LW+3*, LW+4, LW+5, LW+8*, LW+9, LW+10, LWP+1~, LWP+3*, LWP+4
, LWP+5, LWP+8*, LWP+9, LWP+10, LWP+11, LWP+12, LWP+13, LWP+14, BLDHELP+6~, BLDHELP+10*
, BLDHELP+11, BLDHELP+20, BLDHELP+21*, BLDHELP+22
L LW+1~, LW+5*, LW+6, LWP+1~, LWP+5*, LWP+6
LRAA WLN+12, WLN+15, WLN+16, WLN+20, WLN+21~, UID+4, UID+5*, BLDHELP+6~, BLDHELP+9*, BLDHELP+16
, BLDHELP+17*, BLDHELP+18
LRAB LRVRA+11!
LRAD WLN+12, WLN+15, WLN+16, WLN+20, WLN+21~, UID+3*, UID+4*, UID+5*, BLDHELP+6~, BLDHELP+17*
, BLDHELP+18
LRAN WLN+12, WLN+15, WLN+16, WLN+20, WLN+21~, UID+3*, UID+4*, UID+5*, BLDHELP+6~, BLDHELP+17*
, BLDHELP+18
LRANYAA LRVRA+3~, LRVRA+4*, UID+4, BLDHELP+16
>> LRCDT WLN+23
>> LRCEN WLN+15*, WLN+19
>> LRCFL LRVRA+12*
LRDEL LRVRA+11!
>> LRDFN WLN+15*, WLN+17
LRDL LRVRA+11!
>> LRDPF WLN+17*
LREND LRVRA+10, LW+1~, LW+2*, LW+6, LWP+1~, LWP+2*, LWP+6
LRFP LRVRA+11!
LRLDT LRVRA+11!
LRLL LRVRA+4, LW+3, LWP+3, NEXT+4, BLDHELP~, BLDHELP+8*, BLDHELP+9, BLDHELP+11
LRNG LRVRA+11!
LRNM LRVRA+11!
LRNOP LRVRA+3~, LRVRA+14, WLN+1*, WLN+6*, WLN+23*, WLN+24, WLN+26*, WLN+27
>> LRODT WLN+15*, WLN+24
>> LRORU3 WLN+16*
LRPROF LRVRA+4, LW+3, LWP+3, BLDHELP~, BLDHELP+8*, BLDHELP+9
LRQUIT NEXT+1~, NEXT+2*, NEXT+4, NEXT+8*
LRSD LWP~, LWP+2*, LWP+3, BLDHELP~, BLDHELP+8*, BLDHELP+12
LRSET LRVRA+11!
>> LRSN WLN+15*, WLN+24
>> LRSTATUS WLN+22*
LRTEST LRVRA+11!
>> LRTM60 LRVRA+9*
LRUID LRVRA+3~, LRVRA+5*, WLN+4, WLN+7*, WLN+8*, WLN+9*, WLN+10*, LWP+1~, LWP+2*, LWP+4
, LWP+21*, LWP+24, NEXT+3, NEXT+5~, NEXT+6*, NEXT+8, NEXT+9*, UID+2, UID+3*, UID+4*
LRUIDX NEXT+1~, NEXT+3*, NEXT+4*, NEXT+6, NEXT+9
LRVER LRVRA+11!
M LWP+1~, LWP+2*, LWP+11*, LWP+14*, LWP+16
>> PNM WLN+18
>> SSN WLN+18
T LRVRA+11!
U LRVRA+8, WLN+15, WLN+17, WLN+24
X LRVRA+7~, LRVRA+8*, LRVRA+9, LRVRA+13~, LW+1~, LWP+1~, UID+1~, UID+2*, UID+3, UID+4
, UID+5, BLDHELP+6~, BLDHELP+14*, BLDHELP+15, BLDHELP+16, BLDHELP+17
Y LRVRA+11!, LRVRA+13~, WLN+7, LW+1~, LWP+1~, LWP+20, LWP+21, BLDHELP+6~, BLDHELP+13*, BLDHELP+18*
, BLDHELP+20*, BLDHELP+21
Z LRVRA+11!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All