Routine: LRGV2

Information

LRGV2 ;DALOI/RWF - PART2 OF INSTRUMENT GROUP VERIFY DATA ;8/11/97

Package	Total	Call Graph
Lab Service	5	^LREXEC V25^LRVER5 V11^LRVR3 (LRSBCOM,RANGE)^LRVR4 DASH^LRX
Kernel	1	$$LJ^XLFSTR
VA Fileman	1	$$GET1^DID

Package	Total	Caller Graph
Lab Service	1	LRGV1

Name	Comments	DBIA/ICR reference
INFO	;
FINDPS	; Find previous specimen to use for delta check ; Specimen needs to be within "days back (LRTM60)" parameter and have ; a dataname in common with a dataname on the sequence entry in LAH.
NOP	;
DC	; Perform range and delta checks

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"NO DELTA SAMPLE",! Line Location: LRGV2+9
Function Call: WRITE	Prompt: !!,">> Accession #: ",LRAN," VERIFIED <<" Line Location: LRGV2+34
Function Call: WRITE	Prompt: !," STILL TO BE VERIFIED:" Line Location: LRGV2+38
Function Call: WRITE	Prompt: ?25,$$GET1^DID(63.04,LRX,"","LABEL"),! Line Location: LRGV2+40
Function Call: WRITE	Prompt: !,$P(^LAB(60,+LRTS,0),"^"),?31,@LRFP," ",$$LJ^XLFSTR(LRFLG,2)," ",$P(LRNGS,"^",7) Line Location: DC+20
Function Call: WRITE	Prompt: " ",@LRVIDO,X,@LRVIDOF,$C(7,7,7) Line Location: DC+24
Function Call: WRITE	Prompt: " ",X Line Location: DC+25
Function Call: WRITE	Prompt: !,">> Accession #: ",LRAN," NOT VERIFIED" Line Location: NOP+1
Function Call: WRITE	Prompt: " - DELTA check flag" Line Location: NOP+2
Function Call: WRITE	Prompt: " - CRITICAL range flag" Line Location: NOP+3
Function Call: WRITE	Prompt: " <<" Line Location: NOP+4
Function Call: WRITE	Prompt: $C(7) Line Location: NOP+5
Function Call: WRITE	Prompt: !,"Sequence #: ",LRSQ Line Location: INFO+1

FileNo	Call Tags
63.04	GET1^DID

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	DC+20
^LAH(	LRGV2+14!, LRGV2+17, LRGV2+29, LRGV2+37, LRGV2+40, INFO+2, FINDPS+12
^LR - [#63]	LRGV2+6, LRGV2+14, LRGV2+26, DC+7, FINDPS+7, FINDPS+9, FINDPS+12
^TMP("LR"	DC+4

Name	Field # of Occurrence
^(	LRGV2+14, DC+4
^(0	INFO+2

Name	Field # of Occurrence
IOST	DC+24, NOP+5
>> LR0	LRGV2+6
>> LRAN	LRGV2+34, NOP+1
>> LRCFL	LRGV2+24
>> LRCNT	LRGV2+19*
>> LRCRIT	LRGV2+19, LRGV2+22, DC+15, NOP+3
LRCW	DC+2~, DC+18*
>> LRDEL	DC+29
>> LRDELTA	LRGV2+19, LRGV2+22, DC+29, NOP+2
>> LRDFN	LRGV2+6, LRGV2+14, LRGV2+26, DC+7, FINDPS+7, FINDPS+9, FINDPS+12
>> LREXEC	LRGV2+24*
>> LRFLG	DC+5*, DC+15, DC+20, DC+21, DC+23
>> LRFP	DC+20
LRGVP	LRGV2+4~
>> LRIDT	LRGV2+6, LRGV2+7, LRGV2+14, LRGV2+26
>> LRLDT	LRGV2+7, LRGV2+9, DC+7, FINDPS+7, FINDPS+8*, FINDPS+9, FINDPS+12
>> LRLL	LRGV2+14, LRGV2+17, LRGV2+29, LRGV2+37, LRGV2+40, INFO+2, FINDPS+12
>> LRMETH	LRGV2+6
>> LRNGS	DC+20
>> LRNX	LRGV2+19, LRGV2+20, DC+4
>> LRORD(	LRGV2+20, DC+4
LRPRGSQ	LRGV2+32!
LRQ	DC+2~, DC+13*
LRQUIT	FINDPS+4~, FINDPS+6, FINDPS+7, FINDPS+8, FINDPS+12*
LRSB	LRGV2+4~, LRGV2+44!, DC+4*, DC+5, DC+7, DC+18, DC+28
LRSB(	LRGV2+17*, DC+5, DC+18, DC+28
>> LRSPEC	LRGV2+26, FINDPS+10
>> LRSQ	LRGV2+14, LRGV2+17, LRGV2+29, LRGV2+37, LRGV2+40, INFO+1, INFO+2, FINDPS+12
>> LRTM60	FINDPS+8
>> LRTS	DC+4*, DC+20
>> LRVF	LRGV2+12
>> LRVIDO	DC+24
>> LRVIDOF	DC+24
>> LRVRFYAL	LRGV2+22
>> LRVRM	LRGV2+19*
LRX	LRGV2+4~, LRGV2+13, LRGV2+14, LRGV2+16, LRGV2+17, LRGV2+39, LRGV2+40, FINDPS+4~, FINDPS+9, FINDPS+10 , FINDPS+11, FINDPS+12*
U	LRGV2+6, LRGV2+26, DC+5, FINDPS+10
X	DC+2~, DC+5, DC+6, DC+18, DC+22~, DC+23, DC+24, DC+25, DC+28, INFO+2* , INFO+3
>> X1	DC+5, DC+7
Y	DC+2~, DC+29, INFO+2, INFO+3