Routine: LRDPA

Package	Total	Call Graph
Lab Service	5	EN^LR7OV2 ^LRDPA1 ^LRDPAREF LABKEY^LRPARAM (DD,INF,PT)^LRX
VA Fileman	3	EN^DDIOL (,IX)^DIC ^DIR
Kernel	1	$$DTIME^XUP
Order Entry Results Reporting	1	(LK,ULK)^ORX2

Package

Total

Call Graph

Lab Service

EN^LR7OV2 ^LRDPA1 ^LRDPAREF LABKEY^LRPARAM (DD,INF,PT)^LRX

VA Fileman

EN^DDIOL (,IX)^DIC ^DIR

Kernel

$$DTIME^XUP

Order Entry Results Reporting

(LK,ULK)^ORX2

Package	Total	Caller Graph
Lab Service	63	LR INF WARN LR7OF0 LR7OR1 LR7OSUM LRACM2 LRACM3 LRACSUM LRAPCUM LRAPDA LRAPLG LRAPMV LRAPOLD LRAPS LRAPST LRARCHD LRBLJL LRBLJLA LRBLJR LRBLP LRBLPBR LRBLPC LRBLPCS LRBLPH LRBLPT LRBLPUS LRBLPX LRBLQPR LRCE LRCHIVD LRDCOM LRDIST LRDIST4 LRFAST LRGEN LRMIBL LRMIPC LRMIPSZ LRMISEZA LRMITRZA LRMITSES LROE1 LRORD1 LROS LROW LROW4 LRQCLOG LRRP2 LRRP3 LRRSP LRSETUP LRSLOW LRSOR LRUCN LRUG LRUL LRUMD1 LRUMDS LRUPS LRUPT LRUQ LRUTRAN LRVRPOC ^LAB(62.3
IHS Changes To Lab	5	BLRLROS BLRLRRP2 BLRMIEHR BLRMIRPT BLRSGNSD
IHS Laboratory Point of Care	1	BLRPOC
IHS View Patient Record	1	BVPRP

Package

Total

Caller Graph

Lab Service

LR INF WARN  LR7OF0  LR7OR1  LR7OSUM  LRACM2  LRACM3  LRACSUM  LRAPCUM
LRAPDA  LRAPLG  LRAPMV  LRAPOLD  LRAPS  LRAPST  LRARCHD  LRBLJL
LRBLJLA  LRBLJR  LRBLP  LRBLPBR  LRBLPC  LRBLPCS  LRBLPH  LRBLPT
LRBLPUS  LRBLPX  LRBLQPR  LRCE  LRCHIVD  LRDCOM  LRDIST  LRDIST4
LRFAST  LRGEN  LRMIBL  LRMIPC  LRMIPSZ  LRMISEZA  LRMITRZA  LRMITSES
LROE1  LRORD1  LROS  LROW  LROW4  LRQCLOG  LRRP2  LRRP3
LRRSP  LRSETUP  LRSLOW  LRSOR  LRUCN  LRUG  LRUL  LRUMD1
LRUMDS  LRUPS  LRUPT  LRUQ  LRUTRAN  LRVRPOC  ^LAB(62.3

IHS Changes To Lab

BLRLROS BLRLRRP2 BLRMIEHR BLRMIRPT BLRSGNSD

IHS Laboratory Point of Care

BLRPOC

IHS View Patient Record

BVPRP

Entry Points

Name	Comments	DBIA/ICR reference
LAYG	;Don't allow DLAYGO on second pass.
NONE
EN	;
END	;from LROR, LRSETUP
FILE
DICQ	;
FL1	;
FL0
DPA1	;Entry point from PNAME^LRAPDA
WARN	;Warn the user the patient has died and display date of death (LR5.2360)
EN1	;from LRUG, LRUPS
EN2(DFN,LOCK,TALK)	;Patient Lock
DPA	;from LRUPS
E2
FL
ANY
E3
REASK

External References

Name	Field # of Occurrence
EN^DDIOL	END+8
^DIC	EN+15, FL, FL1+9, FL1+13, REASK+1, FILE+4
IX^DIC	DICQ+2
^DIR	WARN+6
EN^LR7OV2	E3+4
^LRDPA1	E3+3
^LRDPAREF	LRDPA+23
LABKEY^LRPARAM	DPA+1, FL1+1
DD^LRX	WARN+1
INF^LRX	E3+2
PT^LRX	EN+20, FL1+13, REASK+1
LK^ORX2	EN2+6
ULK^ORX2	EN2+7
$$DTIME^XUP	LRDPA+24

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You may enter patient identification or enter a file name followed by "":"".",!,"You may enter ""?:?"" for more extended help." Line Location: DPA1+4
Function Call: WRITE	Prompt: !," File: ",X Line Location: EN1+1
Function Call: WRITE	Prompt: !!,"Internal patient ID incorrect in ^LR( for ",PNM,". Contact Lab Coordinator.",$C(7) Line Location: E3+0
Function Call: WRITE	Prompt: !,$C(7),"Internal patient ID incorrect for ",PNM,". Contact Lab Coordinator." Line Location: E3+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: FILE+0
Function Call: WRITE	Prompt: !,"Select FILE: " Line Location: FILE+0
Function Call: READ	Timeout: DTIME Variable: % Line Location: DICQ+7
Function Call: WRITE	Prompt: !,"Answer 'Y' or 'N': " Line Location: DICQ+7
Function Call: WRITE	Prompt: !?10,@LRVIDO,"Patient ",PNM," died on: ",Y,@LRVIDOF,! Line Location: WARN+2
Routine Call	DIC Line Location: EN+15 FL FL1+9 FL1+13 REASK+1 FILE+4
Routine Call	DIR Line Location: WARN+6
Routine Call	DIC Line Location: DICQ+2

FileNo	Call Tags
^DIC - [#1]	Classic Fileman Calls
^DPT - [#2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DIC - [#1]	ANY, FL0
^LR - [#63]	E2, E2+1*, E3, E3+1
^LR("B"	E2+1*
^LR(0	END+6, END+11, END+12, E2+1
^ORD(100.99 - [#100.99]	E3+4

Name	Line Occurrences
%	%
ANY	DPA+6, EN1+1
DICQ	FILE+1
DPA	DPA1+4, EN+19
E2	E2
E3	END+5
END	DPA1+1, EN+20, FL1+14, REASK+1
FILE	ANY, FILE+1, FILE+4
FL	EN1+1
FL0	ANY+1
FL1	ANY
LAYG	EN+19
LRDPA	FL0, END+12
NONE	ANY+1, FL, FL1+13
WARN	EN+20

Name	Field # of Occurrence
^(0	E2+1*, E3+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	%*
AGE	DPA+4!
D	DICQ+1*, DICQ+5!
DFN	DPA1+1, EN+20, FL1+13, NONE, REASK, REASK+1, END+1, END+2, END+9, E2+1 , E3+1, E3+4, EN2~, EN2+3, EN2+5, WARN+7*
DIC	LRDPA+22, LRDPA+27, DPA+6, EN1+1, EN+2, EN+19!, ANY, FL, FL0!, FL1+4* , FL1+12, NONE+1!, END+3!, END+10!, END+12!, E3+3!, FILE+2, DICQ+1, DICQ+5!
DIC("S"	EN+4, EN+15!, FL, FL1+8!, FL1+9!, FL1+11, FL1+12, FL1+13!, REASK, REASK+1! , FILE+3, FILE+4!, DICQ+2
DIC("W"	EN+12*
DIC(0	LRDPA+25, LRDPA+26, EN+1, LAYG+1, LAYG+4, FL, FL1+4, FL1+6, FL1+7, FL1+9* , FL1+10, REASK, FILE+2, DICQ+1*
DIR	WARN+6!
DIR("A"	WARN+4*
DIR("T"	WARN+5*
DIR(0	WARN+3*
DIRUT	WARN+7, WARN+8!
DLAYGO	LRDPA+27!, DPA1+1!, EN+15!, LAYG+1!, LAYG+4, FL1+3, FL1+7*, END+3!, END+10!, END+12! , E3+3!
DOB	DPA+4!
>> DOD	EN+20, WARN+1
DTIME	LRDPA+24*, DPA+7, FILE, %
DUOUT	EN+15!, FL1+9!, REASK+1!
DUZ	LRDPA+24
HRCN	DPA+4!
LOCK	EN2~, EN2+4*, EN2+6, EN2+7
>> LRDFN	NONE, END+3, END+4, END+5, END+9, END+11, E2, E2+1, E3, E3+1 , E3+3
>> LRDPAF	E3+3
>> LRDPF	DPA+6, EN+2, ANY, FL0, FL1+3, FL1+4, FL1+6, FL1+7, NONE*, END+4 , E2+1, E3+1, E3+4
>> LRLABKY	DPA+1, LAYG+3, FL1+1, FL1+6
>> LRLOOKUP	FL1+3, FL1+5
>> LRORDRR	LRDPA+23
>> LRPARAM	LAYG+2
>> LRREFFL	LRDPA+22
>> LRVIDO	WARN+2
>> LRVIDOF	WARN+2
LRX	EN1+1*!, FL1+4, FL1+8!
MSG	END+7*, END+8!
>> PNM	EN+20, FL1+13, REASK+1*, E3, E3+1, WARN+2
SEX	DPA+4!
SSN	DPA+4!
TALK	EN2~, EN2+4*
U	LRDPA+24*
VA	DPA+2!, NONE+1!
>> VA200	EN+2, NONE+1, END+3, END+9, E3+3*
VADM	DPA+2!, NONE+1!
VAIN	DPA+2!, NONE+1!
>> X	LRDPA+24, DPA+7, DPA1+1, DPA1+4, EN1+1, FL, FL1+8, FL1+9, FL1+10, END+4* , END+12, E2+1, FILE, FILE+1, DICQ+1, DICQ+3, DICQ+4, EN2+5*
>> Y	EN+15, EN+19, EN+20, ANY+1, FL, FL0, FL1+9, FL1+13, NONE, REASK+1 , END+1, END+4, FILE, FILE+4, DICQ+3, DICQ+5, WARN+1*, WARN+2, WARN+7
>> Y(0	EN+20, FL1+13, REASK+1, DICQ+4

Customize PDF page

Package: Lab Service

Routine: LRDPA

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 70

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: