Routine: LRUDEL

Package	Total	Call Graph
Lab Service	4	ACC^LR7OB1 ^LRAP DEL^LRAUAW (V,XR,YN)^LRU
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	^%DT

Package

Total

Call Graph

ACC^LR7OB1 ^LRAP DEL^LRAUAW (V,XR,YN)^LRU

$$FMTE^XLFDT

^%DT

Package	Total	Caller Graph
Lab Service	2	LRAPED LRAPKILL

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !?22,"Delete an Accession Number",!! Line Location: LRUDEL+5
Function Call: WRITE	Prompt: $C(7),!!,"No accession numbers for ",LRH(0),! Line Location: D+1
Function Call: READ	Prompt: "Select Accession # : " Formatting: !! Timeout: DTIME Variable: LRAN Line Location: N1+1
Function Call: WRITE	Prompt: $C(7),!!,"Enter NUMBERS only" Line Location: REST+0
Function Call: WRITE	Prompt: $C(7),!!,"Accession number ",LRAN," for ",LRH(0)," not in ACCESSION file",!! Line Location: REST+1
Function Call: WRITE	Prompt: !!?10,$C(7),"Someone else is editing this entry ",! Line Location: REST+2
Function Call: WRITE	Prompt: !!?10,$C(7),"Someone else is editing this entry ",! Line Location: REST+3
Function Call: WRITE	Prompt: !!,"ACC # ",LRAN Line Location: REST+6
Function Call: WRITE	Prompt: !,LRAN," Deleted" Line Location: REST+7
Function Call: WRITE	Prompt: $C(7),!,"Report completed &/or released, deletion not allowed." Line Location: REST+9
Function Call: WRITE	Prompt: !!?10,"Someone else is editing this entry ",!,$C(7) Line Location: REST+10
Function Call: WRITE	Prompt: $C(7),!?4,"NOT DELETED",!! Line Location: REST+11
Function Call: WRITE	Prompt: $C(7),!!,"Entry not in file",!! Line Location: BAD+0

Name	Line Occurrences (* Changed, ! Killed)
^DIC - [#1]	REST+5
^LR - [#63]	N1+2, REST+5, REST+9, REST+10, REST+13, REST+14!
^LRO(68 - [#68]	D+1, REST+1, REST+2, REST+4, REST+7!, REST+8, REST+15!, REST+16, K+1!
^LRO(69.2 - [#69.2]	N1+2, REST+3, T+1

Name	Field # of Occurrence
^(	REST+13!, T+1!
^(0	REST+5, REST+13, REST+16, T+1*

Name	Field # of Occurrence
>> %	REST+11*
%DT	D*!
%DT("A"	D*
>> A	T+1, K+1
DTIME	N1+1
DUZ(2	REST+7, REST+15
>> H(2	D+2*, REST+14
>> LRAA	D+1, N1+2, REST+1, REST+2, REST+3, REST+4, REST+7, REST+8, REST+12, REST+15 , REST+16, T+1, K+1
>> LRABV	REST+14
>> LRAD	D*, D+1, D+2, REST+1, REST+2, REST+4, REST+7, REST+8, REST+12, REST+15 , REST+16, K+1
>> LRAN	N1+1*, REST, REST+1, REST+2, REST+4, REST+6, REST+7, REST+8, REST+12, REST+14 , REST+15, T+1, K+1
>> LRDFN	N1+2, REST+5*, REST+9, REST+10, REST+13, REST+14
>> LRFNAM	REST+5*
>> LRH(0	D*, D+1, REST+1
>> LRI	REST+8*, REST+9, REST+10, REST+13, REST+14
>> LRND	REST+4*, REST+5
LRNO	N1!
>> LRP	REST+5*
>> LRPF	REST+5*
>> LRPFN	REST+5*
>> LRRC	REST+4*, REST+6, REST+14, REST+15
>> LRSD	REST+8*
>> LRSS	N1+2, REST+6, REST+9, REST+10, REST+13
>> LRXR	REST+14
>> LRXREF	REST+14
U	REST+4, REST+5
>> X	REST+8, REST+9, REST+13, REST+16, T+1*
>> X(1	REST+13, REST+16, T+1*
>> X(2	REST+13, REST+16
>> Y	LRUDEL+4, D, REST+5, REST+6, REST+11, DATE+1

Information

Name	Comments	DBIA/ICR reference
END
D
K	; also from LRAPED
REST
BAD
T	;
DATE	; Returns the date in eye-readable month format
N1