Routine: BLRSHPM1

Package	Total	Call Graph
Lab Service	2	PRAC^LR7OMERG (DASH,DD,PT)^LRX
VA Fileman	2	Y^DIQ ^DIR
Kernel	1	$$FMTE^XLFDT

Package

Total

Call Graph

Lab Service

PRAC^LR7OMERG (DASH,DD,PT)^LRX

VA Fileman

Y^DIQ ^DIR

Kernel

$$FMTE^XLFDT

Name	Comments	DBIA/ICR reference
LEDI	; print LEDI information
CHKPAGE	;
TSTCOM	;
LST1	;from LRWRKLST

Name	Field # of Occurrence
Y^DIQ	LEDI+2, LEDI+3
^DIR	CHKPAGE+5
PRAC^LR7OMERG	LST1+36
DASH^LRX	LST1+12
DD^LRX	LST1+9, LST1+10
PT^LRX	LST1+6
$$FMTE^XLFDT	LST1+23

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: LST1+11
Function Call: WRITE	Prompt: !,"ACCESSION: ",LRACC,?25,$S(LRCE]"":"ORDER #: "_LRCE,1:"") Line Location: LST1+16
Function Call: WRITE	Prompt: ?40,"PATIENT: ",PNM," ",HRCN,! Line Location: LST1+22
Function Call: WRITE	Prompt: !," LOCATION:",$P(LRDX,"^",7) Line Location: LST1+26
Function Call: WRITE	Prompt: ! Line Location: LST1+29
Function Call: WRITE	Prompt: " PRACTITIONER: ",$S($D(^VA(200,LRPRAC,0)):$P(^(0),"^"),1:LRPRAC) Line Location: LST1+34
Function Call: WRITE	Prompt: !?16,$P(^(0),"^") Line Location: LST1+36
Function Call: WRITE	Prompt: !," Order Comment:" Line Location: LST1+39
Function Call: WRITE	Prompt: ! Line Location: LST1+41
Function Call: WRITE	Prompt: ?11,^(I,0) Line Location: LST1+41
Function Call: WRITE	Prompt: !,"Test [ ",$P(^(0),U)_" ] Comment " Line Location: TSTCOM+4
Function Call: WRITE	Prompt: !,?5,^(0) Line Location: TSTCOM+5
Function Call: WRITE	Prompt: !," Accession Comment: ",LRACO Line Location: TSTCOM+7
Function Call: WRITE	Prompt: ! Line Location: CHKPAGE+9
Function Call: WRITE	Prompt: ! Line Location: LEDI+2
Function Call: WRITE	Prompt: ?40,"ORDERING SITE UID: "_$P(LRUIDX,"^",5) Condition for execution: Y'="" " ORDERING SITE: "_$E(Y,1,20) W:$P(LRUIDX,"^",5)'="" Line Location: LEDI+2
Function Call: WRITE	Prompt: ! Line Location: LEDI+3
Function Call: WRITE	Prompt: ?40,"HOST UID: "_$P(LRUIDX,"^",4) Condition for execution: Y'="" " COLLECTING SITE: "_$E(Y,1,20) W:$P(LRUIDX,"^",4)'="" Line Location: LEDI+3
Routine Call	DIR Line Location: CHKPAGE+5

Name	Line Occurrences (* Changed, ! Killed)
^DD(68.02	LEDI+2, LEDI+3
^LAB(60 - [#60]	TSTCOM+4
^LR - [#63]	LST1+4, LST1+5
^LRO(68 - [#68]	LST1+3, LST1+8, LST1+23, LEDI+1
^LRO(69 - [#69]	LST1+38, LST1+41, TSTCOM+2, TSTCOM+3, TSTCOM+5
^VA(200 - [#200]	LST1+34, LST1+36

Name	Line Occurrences
CHKPAGE	LST1+1, LST1+14, LST1+31, LST1+41, TSTCOM+5
LEDI	LST1+35

Name	Field # of Occurrence
^(	LST1+3, LST1+41, TSTCOM+2, TSTCOM+5
^(0	LST1+5, LST1+34, LST1+36, TSTCOM+4, TSTCOM+5
^(3	LST1+8

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> C	LEDI+2, LEDI+3
>> DFN	LST1+5*
DIR	CHKPAGE+3!
DIR(0	CHKPAGE+4*
>> DIRUT	CHKPAGE+6
>> DOB	LST1+23
>> DUOUT	CHKPAGE+6
>> HRCN	LST1+22
>> I	LST1+40, LST1+41
IOSL	CHKPAGE+2
IOST	CHKPAGE+1
>> LN	LST1+13, LST1+30, LST1+34, LST1+39, LST1+41, TSTCOM+5, TSTCOM+7, CHKPAGE+2, CHKPAGE+8, LEDI+2* , LEDI+3*
>> LRAA	LST1+3, LST1+8, LST1+23, LST1+36, LEDI+1
>> LRACC	LST1+3*, LST1+16
>> LRACO	LST1+7, LST1+8, TSTCOM+7
>> LRAD	LST1+3, LST1+8, LST1+23, LST1+36, LEDI+1
>> LRAN	LST1+3, LST1+8, LST1+23, LST1+36, LEDI+1
>> LRCE	LST1+3*, LST1+16
>> LRDLA	LST1+7, LST1+8, LST1+9*, LST1+35
>> LRDLC	LST1+7, LST1+9, LST1+28
>> LRDPF	LST1+5*
>> LRDTO	LST1+10*, LST1+27
>> LRDX	LST1+3*, LST1+4, LST1+5, LST1+10, LST1+25, LST1+26, LST1+33, LST1+37, TSTCOM+8
>> LREND	CHKPAGE+7*
>> LRPRAC	LST1+33*, LST1+34
>> LRSTOP	LST1+2, LST1+15, LST1+32, LST1+41, TSTCOM+1, TSTCOM+5, TSTCOM+6, CHKPAGE+1, CHKPAGE+6*, CHKPAGE+7
>> LRTS	TSTCOM+2*, TSTCOM+3, TSTCOM+5
>> LRTST	TSTCOM+2*, TSTCOM+4
LRUIDX	LEDI+1~*, LEDI+2, LEDI+3
>> PNM	LST1+22
PR	LST1+36~*
PRAC	LST1+36~
PRAC(	LST1+36
PRAC(0	LST1+36
>> SEX	LST1+23
U	LST1+5, LST1+8, LST1+10, LST1+25, LST1+37, TSTCOM+4, TSTCOM+8
>> X	LST1+23*
>> X1	LST1+37*, LST1+38, LST1+41, TSTCOM+2, TSTCOM+3, TSTCOM+5
>> X2	LST1+37*, LST1+38, LST1+41, TSTCOM+2, TSTCOM+3, TSTCOM+5
>> X3	TSTCOM+5*
>> Y	LST1+8, LST1+9, LST1+10, LEDI+2, LEDI+3*
>> ZTQUEUED	CHKPAGE+1

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRSHPM1

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: