Routine: LRFAST

Information

LRFAST ;VA/DALOI/JMC - FAST ENTRY ;May 23, 2006

Call Graph

Call Graph Total: 22

Package	Total	Call Graph
Lab Service	18	SLROT^LRBEBA2 AQ1^LRBEBA3 $$CHKINP^LRBEBA4 ^LRCAPV ^LRDPA END^LRMIEDZ PAT1^LRMIEDZ2 NEW^LROR6 (,LROEND)^LRORDK ^LROW1 REST^LROW2 ^LRPARAM ^LRVER1 $$SELPL^LRVERA ^LRWLST (COLTY,DPT,LOC)^LRWU PRAC^LRWU1 (DEM,PT,YMD)^LRX
VA Fileman	3	^%DT ^DIC YN^DICN
Kernel	1	$$NOW^XLFDT

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
Lab Service	3	LRFAST LRHYPH2 LROE2
IHS Changes To Lab	1	BLRAG05D

Entry Points

Name	Comments	DBIA/ICR reference
QUIT
SHORT
LROE	;from LROE1	ICR #5591 Status: Active Usage: Private
LROE1
URG	;
SH	; W !,"Do you want to enter draw times" S %=2 D YN^DICN S LRADT=(%=1) Q:%=-1
Q11
EN	; D QUIT,^LRORDK,LROEND^LRORDK D ^LRPARAM S LRLONG="" G SHORT
Q12
QSN2
AMIS	;
QSN1

External References

Name	Field # of Occurrence
^%DT	QSN2
^DIC	URG+1
YN^DICN	SHORT+2, SH+1
SLROT^LRBEBA2	QSN2+4
AQ1^LRBEBA3	QSN2+5
$$CHKINP^LRBEBA4	QSN2+3
^LRCAPV	LROE1+2
^LRDPA	AMIS+1
END^LRMIEDZ	QUIT+8
PAT1^LRMIEDZ2	LROE1+11
NEW^LROR6	QSN2+1
^LRORDK	QUIT+8, EN+1
LROEND^LRORDK	EN+1
^LROW1	URG+2
REST^LROW2	QSN2+7
^LRPARAM	LRFAST+8, QUIT+9, EN+1
^LRVER1	LROE1+8
$$SELPL^LRVERA	SHORT+3
^LRWLST	QSN2+8
COLTY^LRWU	Q11
DPT^LRWU	QSN1
LOC^LRWU	Q12
PRAC^LRWU1	Q11
DEM^LRX	LROE1+8
PT^LRX	QSN1
YMD^LRX	AMIS+2
$$NOW^XLFDT	AMIS+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"BYPASSING ORDER ENTRY!!",$C(7) Line Location: SHORT+0
Function Call: WRITE	Prompt: $C(7),!,"ROLLOVER ",$S($P(^("RO"),U,2):"IS RUNNING.",1:"HAS NOT RUN.")," ACCESSIONING SHOULDN'T BE DONE NOW.",$C(7),!," Are you sure you want to continue" Line Location: SHORT+1
Function Call: WRITE	Prompt: !,"OK, try later." Line Location: SHORT+2
Function Call: WRITE	Prompt: !,"Do you want to enter draw times" Line Location: SH+0
Function Call: WRITE	Prompt: !,"Do you want to enter draw times" Line Location: SH+1
Function Call: WRITE	Prompt: !,"If you answer 'yes', you will be asked for the approximate time the specimen",!,"was taken from the patient. Otherwise, the current time will be assumed." Line Location: SH+2
Function Call: WRITE	Prompt: !!,$C(7),"ORDER CANCELED",!! Line Location: Q11+0
Function Call: WRITE	Prompt: !!,$C(7),"...process aborted" Line Location: QSN2+1
Function Call: READ	Timeout: DTIME Variable: % Line Location: EN+2
Function Call: WRITE	Prompt: !,"Answer 'Y' or 'N': " Line Location: EN+2
Routine Call	DIC Line Location: URG+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^LAB(62.05 - [#62.05]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(62.05 - [#62.05]	URG+1
^LAB(69.9 - [#69.9]	SHORT, SHORT+1, LROE1+10
^LR - [#63]	QSN1
^LRO(68 - [#68]	LROE1, LROE1+2, LROE1+7
^LRO(69 - [#69]	AMIS+2, QSN2+7, LROE+1, LROE+5
^TMP("LR"	QUIT!, QUIT+3!

Label References

Name	Line Occurrences
%	%
LROE1	LROE+5
QSN2	QSN2
QUIT	SHORT+4, AMIS+1, QSN1, Q12, Q11, URG+2, QSN2, QSN2+3, LROE+7, EN+1
SH	SH+2
SHORT	EN+1

Naked Globals

Name	Field # of Occurrence
^(	QSN1, QSN2+7, LROE+5
^("RO"	SHORT+1
^(0	AMIS+2*, LROE1+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SHORT+2, SH+1, SH+2, QSN2+1, QUIT!, %
%DT	QSN2*!
%DT("A"	QSN2*
%DT(0	QSN2*
>> %H	AMIS+2*
A	QUIT!
AGE	QUIT!
>> BLROPT	EN+1*
>> BLROPT(0	EN+1*
D1	QUIT!
D2	QUIT!
DFN	AMIS+1!, QUIT!
DIC	AMIS+1!, URG+1*, QUIT+1!
DIC("B"	URG+1*
DIC("S"	URG+1*
DIC(0	AMIS+1, URG+1
DIE	QUIT!
DL	QUIT!
DLAYGO	QUIT!
DOB	QUIT!
DQ	QUIT!
DR	QSN1!, QUIT!
DT	AMIS+1
DTIME	%
>> DTOUT	AMIS+1, QSN2+6
>> DUOUT	AMIS+1, QSN2+6
DUZ	QSN2+2, QSN2+7
DUZ(2	SHORT+3, SHORT+5, QSN2+7
DX	QUIT!
H8	QUIT!
HRCN	QUIT+7!
I	QUIT!
I1	QUIT!
I111	LROE+4~, LROE+5*
I5	QUIT+4!
J	QUIT!
K	QUIT!
LRAA	LROE+5*, LROE1, LROE1+2, LROE1+7, QUIT!
LRACC	QUIT!
LRACD	QUIT+3!
LRAD	AMIS+1, LROE+5, LROE1+7, QUIT!
LRADDTST	QUIT+3!
LRADT	SH+1*, QSN2, QUIT!
LRALERT	QUIT+5!
LRAN	QSN2+8, LROE+5*, LROE1+7, QUIT!
LRAOD	QUIT+3!
LRAP	QUIT!
LRBED	QUIT+3!
LRBEQT	LRFAST+5~, QUIT+6!
LRBETS	LRFAST+5~, QUIT+6!
LRBETYP	LRFAST+5~, QUIT+6!
LRBEVT	LRFAST+5~, QUIT+6!
LRBEX	LRFAST+5~, QUIT+6!
LRBEY	LRFAST+5~, QSN2+3*, QSN2+6, QUIT+6!
LRBEZ	LRFAST+5~, QUIT+6!
LRCAPLOC	QUIT+5!
LRCCOM	QUIT+4!
LRCDEF0X	QUIT+5!
LRCDT	AMIS+1, QSN2, QSN2+2, QSN2+7, QUIT!
LRCFL	QUIT+4!
LRCOM	QUIT+5!
LRCS	QUIT+4!
LRCSN	QUIT+4!
LRCSP	QUIT+4!
LRCSS	QUIT+3!
LRCSX	QUIT+4!
LRCW	QUIT!
LRCWDT	QUIT+1!
LRD	QUIT+1!
LRDAT	QUIT+1!
LRDAX	QUIT+5!
LRDEL	QUIT+1!
LRDFN	AMIS+1, QSN1, QSN2+2, QSN2+3, QUIT+1!
LRDPF	QSN2+3, QUIT+1!
LRDTO	QUIT+3!
LRDUZ	LROE1+5~
LRDUZ(2	LROE1+5*
LRDV	QUIT+1!
LRDVF	QUIT+1!
LREAL	QUIT+1!
LREDIT	QUIT+1!
LREND	QSN1, Q12, Q11, LROE+5, LROE1+3, QUIT+1!
LREXEC	QUIT+3!
LREXP	QUIT+4!
LRFFLG	QUIT+1!
LRFLOG	QUIT+3!
LRFP	QUIT+1!
LRGCOM	QUIT+3!
LRGVP	QUIT+3!
>> LRIDIV	LROE1+1*
LRIDT	AMIS+1, QSN2, QUIT+1!
LRIN	QUIT+1!
LRINI	QUIT+1!
LRIOZERO	QUIT+3!
LRIX	QUIT+1!
LRJ	QUIT+5!
LRLBLBP	QUIT+2!
LRLCT	QUIT+2!
LRLDT	QUIT+2!
LRLLOC	QSN1, QSN2+2, LROE+1, QUIT+2!
LRLONG	LRFAST+6!, LRFAST+7, SHORT, Q12, Q11, QUIT+2!, EN+1
LRLWC	QSN2+2, QUIT+4!
LRM	QUIT+4!
LRMA	QUIT+5!
LRMAX	QUIT+4!
LRMAX1	QUIT+5!
LRMAX2	QUIT+5!
LRMETH	QUIT+2!
LRMIDEF	LROE1+10*, LROE1+12!
LRMIOTH	LROE1+10*, LROE1+12!
LRMX	QUIT+5!
LRNAME	QUIT+2!
LRNATURE	LRFAST+6!, QSN2+1!, QUIT!
LRNCWL	QSN2+7*!
LRNG	QUIT+2!
LRNG2	QUIT+2!
LRNG3	QUIT+2!
LRNG4	QUIT+2!
LRNG5	QUIT+2!
LRNIDT	QUIT+3!
LRNN	URG+2*, QUIT+4!
LRNOCODE	QUIT+5!
LRNOLABL	QSN2+8*!
LRNOW	QUIT+5!
LRNP	QUIT+2!
LRNT	AMIS+1*, QUIT+2!
LRNTN	QUIT+2!
LRNX	QUIT+2!
LROCN	QUIT+3!
LRODT	AMIS+1*, AMIS+2, QSN2+3, QSN2+7, LROE+1, LROE+5, QUIT+2!
LRODTSV	QUIT+5!
LROE	LROE+1!, QUIT+5!
LROE(	LROE+5*
LROID	QUIT+3!
LROLLOC	QUIT+5!
LROLRDFN	QUIT+3!
LRORD	QUIT+1!
LRORDER	QUIT+4!
LRORDR	QUIT+4!
LRORDTIM	QUIT+4!
LRORIFN	QUIT+4!
LROSN	QUIT+4!
>> LROT	QSN2+4
LROUT	QUIT+2!
LROUTINE	SHORT*, URG+1, QUIT+2!
LROWDT	QUIT+2!
LROWLE	QUIT+2!
LRPANEL	SHORT*, QUIT+5!
>> LRPARAM	AMIS+1, LROE1+2
LRPER	QUIT+4!
LRPHSET	QUIT+4!
LRPL	SHORT+5~*, LROE1+5
LRPLOC	QUIT+4!
LRPR	QUIT+2!
LRPRAC	Q11*, QSN2+2, QUIT+2!
LRPTP	SHORT, LROE1+10, QUIT+2!
LRRB	QUIT+2!
LRSAMP	AMIS+1*, QSN2+2, QUIT+2!
LRSB	QUIT+1!
LRSN	QSN2+7, LROE+1, LROE+5, QUIT+2!
LRSNO	QSN2+2*, QUIT+4!
LRSNSV	QUIT+5!
LRSPCDSC	QUIT+4!
LRSPEC	URG+2, QSN2+8*, QUIT+2!
LRSS	QSN2+3, QUIT+2!
LRSSP	QUIT+2!
LRSSQ	QUIT+4!
LRSSX	QUIT+4!
LRST	QUIT+2!
LRSUB	QUIT+2!
LRSUF0	QUIT+6!
LRSUM	QUIT+2!
LRSVSN	QUIT+4!
LRTB	QUIT+2!
LRTCOM	QUIT+5!
LRTD	QUIT+2!
LRTEC	QUIT+4!
LRTEST	QSN2+4, QUIT+2!
LRTJ	QUIT+4!
>> LRTM60	AMIS+2*
LRTN	QUIT+3!
LRTNSV	QUIT+5!
LRTP	QUIT+4!
LRTREA	QUIT+5!
LRTS	QUIT+3!
LRTSTN	QUIT+4!
LRTSTNM	QUIT+4!
>> LRTSTS	QSN2+8*
LRTX	QUIT+3!
LRTY	QUIT+4!
>> LRUID	LROE1+7*
LRUNQ	QUIT+3!
LRUR	QUIT+5!
LRURG	URG+1*, QUIT+3!
LRUSI	QUIT+3!
LRUSNM	QUIT+3!
LRVF	QUIT+4!
LRVOL	QUIT+5!
LRVRM	QUIT+4!
LRWL0	QUIT+3!
LRWLC	QUIT+3!
LRWPC	QUIT+5!
LRWRD	QSN1, QUIT+3!
LRX	LROE1*, LROE1+1, LROE1+8, LROE1+9, LROE1+13!
LRXD	QUIT+3!
LRXDH	QUIT+3!
LRXDP	QUIT+3!
LRXS	QUIT+4!
LRXST	QSN2+4, QUIT+5!
LRY	QUIT+5!
LRYR	QUIT+3!
PNM	QUIT+3!, QUIT+5!
POP	QUIT+4!
S	QUIT+3!
S2	QUIT+4!
S5	QUIT+4!
S9	URG+2*, QSN2+8, QUIT+3!
SEX	QUIT+3!
SSN	QUIT+3!
T	QUIT+3!
T1	QUIT+4!
U	SHORT, SHORT+1, AMIS+1*, AMIS+2, URG+1, QSN2, QSN2+2, LROE+1, LROE+5, LROE1+1 , LROE1+2, LROE1+8, LROE1+9, LROE1+10, EN+1
X	SHORT+3, SHORT+4, SHORT+5, AMIS+2, LROE+5, QUIT+3!
X1	QUIT+3!
X2	QUIT+4!
X3	URG+2, QUIT+4!
X9	QUIT+4!
>> XQY0	EN+1
Y	AMIS+1*, URG+1, QSN2, QUIT+3!
Z	QUIT+3!

Customize PDF page

Package: Lab Service

Routine: LRFAST

Information

Source Information

Call Graph

Call Graph Total: 22

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: