Routine: LRLABLD0

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT
Lab Service	4	(,END)^LRLABELF ($$URGA,BARID,LBLTYP,LRBAR,UID)^LRLABLD CHK^LRLABLDS PT^LRX
VA Fileman	4	^%DT ^DIC $$GET1^DIQ ^DIR

Package	Total	Caller Graph
Lab Service	3	LRLABELF LRLABLDS LRUFCL

Entry Points

Name	Comments	DBIA/ICR reference
QUIT	;
EN	;
END	;
SEP	;
SETUP	; Called by LRLABELF
SELLOC
T1	;
P	;
LRTOP	;
SELCOLTY	; Select collection Type(s) to Print
QUE	; Tasked entry and interactive point.
T	;
LRPICK	; Choose type of output
BLDTMP	; Build TMP global with order info. ; Called from above, LRLABLDS

External References

Name	Field # of Occurrence
^%DT	EN+8
^%ZIS	SELLOC+11
^%ZISC	SELLOC+16
^%ZTLOAD	SELLOC+16
^DIC	SELLOC+4
$$GET1^DIQ	BLDTMP+6
^DIR	EN+14, LRPICK+5, SELCOLTY+11
^LRLABELF	QUE+20
END^LRLABELF	QUE+21, END+1
$$URGA^LRLABLD	P+9, SEP+21
BARID^LRLABLD	P+8, SEP+20
LBLTYP^LRLABLD	P+5, SEP+18
LRBAR^LRLABLD	P+6, SEP+19
UID^LRLABLD	P+8, SEP+20
CHK^LRLABLDS	QUE+18
PT^LRX	SETUP+7, BLDTMP+5
$$DT^XLFDT	EN+5
$$FMADD^XLFDT	QUE+2
$$FMTE^XLFDT	EN+8, SETUP+3, P+7
$$NOW^XLFDT	QUE+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?5,"Future Lab, Immediate, Ward Collect and Send Patient Orders" Line Location: EN+1
Function Call: WRITE	Prompt: !?5,"Enter each date to print separately",!! Line Location: EN+2
Function Call: WRITE	Prompt: !?10,"No Orders For "_$$FMTE^XLFDT(Y) Line Location: EN+8
Function Call: WRITE	Prompt: !!?10,"Nothing selected ",!,$C(7) Line Location: EN+9
Function Call: WRITE	Prompt: !!?10,"No Locations Selected ",$C(7) Line Location: SELLOC+7
Function Call: WRITE	Prompt: !?10,$S($G(ZTSK):"Queued to "_LRION,1:"Task NOT queued"),! Line Location: SELLOC+17
Function Call: WRITE	Prompt: ! Line Location: SELCOLTY+2
Routine Call	DIC Line Location: SELLOC+4
Routine Call	DIR Line Location: EN+14 LRPICK+5 SELCOLTY+11
Routine Call	%ZIS Line Location: SELLOC+11

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^SC - [#44]	Classic Fileman Calls, GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	T+8, T+9, T1+4
^LAB(61 - [#61]	LRTOP+3
^LAB(62 - [#62]	SETUP+11, LRTOP+2
^LR - [#63]	QUE+11, SETUP+6, BLDTMP+3
^LRO(69 - [#69]	EN+8, QUE+7, QUE+9, SETUP+4, T+4, T+5, LRTOP+1
^TMP($J	QUE+1!, QUE+2, BLDTMP+8

Label References

Name	Line Occurrences
@(	P+15, SEP+24
BLDTMP	QUE+19
END	EN+9, EN+10, EN+15, SELLOC+8, SELLOC+10, SELLOC+11, SELLOC+18
LRPICK	EN+10
LRTOP	SETUP+13
P	SETUP+16
SELCOLTY	SELLOC+9
SEP	SETUP+10, P+1
T	SETUP+14
T1	T+7

Naked Globals

Name	Field # of Occurrence
^(	SETUP+4, SETUP+6, T+8, T1+4
^(0	SETUP+6, SETUP+11, T+5, T1+4, BLDTMP+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	EN+3~, EN+6*
%DT("A"	EN+6*
%DT(0	EN+7*
%ZIS	EN+3~, SELLOC+11*
>> CNT	EN+4, QUE+3
>> DFN	SETUP+6, BLDTMP+3, BLDTMP+4
DIC	SELLOC+1~, SELLOC+2*
DIC(0	SELLOC+2*
DIR	EN+3~, EN+11!, LRPICK+2~, SELCOLTY+1~
DIR("?"	EN+13, LRPICK+3
DIR("A"	EN+13, LRPICK+4, SELCOLTY+7, SELCOLTY+8, SELCOLTY+9*
DIR(0	EN+12, LRPICK+3, SELCOLTY+10*
DIRUT	EN+3~, EN+15, LRPICK+2~, LRPICK+6, SELCOLTY+1~, SELCOLTY+12
DT	EN+5*, EN+7, QUE+2
DTOUT	EN+3~, SELLOC+1~, SELLOC+5, LRPICK+2~, SELCOLTY+1~
DUOUT	EN+3~, SELLOC+1~, SELLOC+5, LRPICK+2~, SELCOLTY+1~
HRCN	SEP+4~, SEP+5, SEP+13
I	P+12, SEP+4~, SEP+22, SELCOLTY+5, SELCOLTY+6, SELCOLTY+7, SELCOLTY+13
IO	P+10, SEP+23
IO("Q"	SELLOC+12
ION	SELLOC+14
>> LN	EN+4, QUE+3
LRAA	P+3~, P+4*, SEP+1~
LRACC	P+7, SEP+1~, SEP+13
LRAN	SEP+1~, SEP+10*
LRBAR	P+3~, SEP+1~
LRBATCH	EN+3~, EN+4*
LRCE	SETUP+4, SEP+1~, SEP+13
LRCHLOC	EN+3~, EN+4, EN+16, SELLOC
>> LRCLTY	SETUP+5*, P+7
LRCNT	SELCOLTY+1~, SELCOLTY+6*, SELCOLTY+8, SELCOLTY+10
LRCOLTY	SELCOLTY+3!, SELCOLTY+4*, SELCOLTY+5, SELCOLTY+7, SELCOLTY+13
LRCOLTY(	QUE+17, SELCOLTY+13*
>> LRCT	SETUP+2, SETUP+3, P+7
LRCT0	EN+3~
LRCT0(	EN+8*!, QUE+5
LRCT0(0	EN+9
LRDAT	SETUP+3, SEP+4~, SEP+10
>> LRDFN	QUE+19, SETUP+6, BLDTMP+3
>> LRDPF	SETUP+6, BLDTMP+3, BLDTMP+4
LRDTC	EN+3~, QUE+1!
LREND	EN+4, EN+10, SELLOC+5, SELLOC+7, SELLOC+8, SELLOC+10, QUE+8~, QUE+18, LRPICK+6, SELCOLTY+12
LRI	P+11*, P+12, P+13~
LRINFW	SETUP+6, SEP+4~, SEP+22
LRION	SELLOC+13~, SELLOC+14*, SELLOC+17
>> LRLABEL	P+15, SEP+24
LRLLOC	SETUP+8, SETUP+10, P+1, SEP+7, SEP+8, SEP+9~, SEP+13
>> LRLOCF	EN+4*
>> LRLOCF(	SELLOC+6*, QUE+13
>> LRLOCF(0	SELLOC+7, QUE+13
LRN	SETUP+15*, P+2, P+11, P+12, P+13~
>> LRNEWL	SETUP+10, P+1, SEP+7*
>> LRODT	QUE+4, QUE+5, QUE+7, QUE+9, SETUP+4, T+1, T+4, T+5, LRTOP+1, BLDTMP+8
LRORDLOC	BLDTMP+2~, BLDTMP+6, BLDTMP+7, BLDTMP+8
LRPICK	LRPICK+1!, LRPICK+7*
LRPREF	P+14, SEP+4~, SEP+16
LRRB	QUE+3, SETUP+1, SEP+4~, SEP+16*
>> LRSING	SETUP+10, P+1
>> LRSN	QUE+6, QUE+7, QUE+9, SETUP+4, T+4, T+5, LRTOP+1, BLDTMP+8
>> LRSN(0	QUE+9*, QUE+11, QUE+13, QUE+15, QUE+17, QUE+19, BLDTMP+6, BLDTMP+8
>> LRSN(1	QUE+9*
>> LRSTOP	EN+4, QUE+3
>> LRTJ	SETUP+9*, SETUP+11
>> LRTJDATA	SETUP+11*, SETUP+12, SETUP+13
LRTOP	SETUP+12, SETUP+13, LRTOP+1, LRTOP+3, LRTOP+4, SEP+4~, SEP+17*
LRTS	T+2!, SEP+4~
LRTS(	T+8*
LRTS(1	SEP+17*
LRTS(2	SEP+17*
>> LRTV	T+5*, T+6, T+8, T+9, T1+2, T1+3, T1+4
>> LRTVOL	SETUP+8, SETUP+15, T1+4, P+14*
LRURG	T+2!, T1+2*
LRURG0	T+3, T1+3, P+9, SEP+1~, SEP+16*, SEP+21
>> LRURGA	P+9, SEP+21
>> LRVOL	T1+2, T1+4
>> LRWRD	BLDTMP+8
LRXL	SETUP+15, T+3, T+9, SEP+1~, SEP+22*
N	SETUP+1, P+12, SEP+4~, SEP+22*
>> NODE	SETUP+4*, SETUP+5, SETUP+6, SETUP+8, SETUP+9, T1+4, LRTOP+2
PNM	SEP+4~, SEP+8*, BLDTMP+8
>> POP	SELLOC+11
>> S1	SETUP+12*, SETUP+15, P+14
>> S2	SETUP+13*, P+14
SSN	SEP+4~, SEP+14*
>> T	T+3, T+4, T+5, T+8, LRTOP+2*, LRTOP+4
U	SELLOC+6, QUE+13, QUE+15, QUE+17, SETUP+5, SETUP+6, SETUP+8, SETUP+9, SETUP+12, SETUP+13 , T+8, T+9, T1+2, T1+3, T1+4, LRTOP+2, LRTOP+3, BLDTMP+3, BLDTMP+6, BLDTMP+8
X	EN+3~, SELLOC+1~, T1+1~, T1+4*, LRPICK+2~, SELCOLTY+1~
Y	EN+3~, EN+8, EN+16, SELLOC+1~, SELLOC+3, SELLOC+6, SETUP+2*, LRPICK+2~, LRPICK+7, SELCOLTY+1~ , SELCOLTY+13
Y(0	SELLOC+6
>> Y1	SETUP+2*
>> Y2	SETUP+1*
>> ZTDESC	SELLOC+15*
>> ZTRTN	SELLOC+15*
>> ZTSAVE("LR*"	SELLOC+15*
ZTSK	EN+3~, SELLOC+17

Customize PDF page

Package: Lab Service

Routine: LRLABLD0

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: