Routine: LRBLPH

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

LRBLPH ;AVAMC/REG - PATIENT DRUG LIST ;2/18/93 09:44

Source Information

Source file <LRBLPH.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Lab Service	3	^LRDPA (F,L,M,S,V)^LRU (BEG,END)^LRUTL

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Lab Service	1	LRBLPH

Entry Points

Name	Comments	DBIA/ICR reference
QUE
OUT
H
END

External References

Name	Field # of Occurrence
^LRDPA	LRBLPH+3
F^LRU	H+1
L^LRU	QUE
M^LRU	H
S^LRU	QUE
V^LRU	LRBLPH+3, END
BEG^LRUTL	LRBLPH+4
END^LRUTL	OUT

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!,"Must be entry in Patient File (2)" Line Location: LRBLPH+3
Function Call: WRITE	Prompt: ! Line Location: LRBLPH+4
Function Call: WRITE	Prompt: !,"OUTPATIENT PHARMACY ITEM: ",$P(^PSDRUG(LRX,0),"^") Line Location: QUE+3
Function Call: WRITE	Prompt: !,"IV DRUG: ",$P(^PS(52.6,LRX,0),"^") Line Location: QUE+5
Function Call: WRITE	Prompt: !,"INPATIENT PHARMACY ITEM: ",$P(^PSDRUG(LRX,0),"^") Line Location: QUE+7
Function Call: WRITE	Prompt: !,"Medication List for ",PNM," ",SSN,!,LR("%") Line Location: H+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.6 - [#52.6]	QUE+5
^PS(55 - [#55]	QUE+2, QUE+4, QUE+6
^PSDRUG - [#50]	QUE+3, QUE+7
^PSRX - [#52]	QUE+2
^TMP($J	QUE!, QUE+2, QUE+3, QUE+4!, QUE+5, QUE+6!*, QUE+7

Label References

Name	Line Occurrences
END	LRBLPH+3, LRBLPH+4, OUT
H	QUE+1, QUE+3, QUE+5, QUE+7
LRBLPH	LRBLPH+3
OUT	QUE+4, QUE+6

Naked Globals

Name	Field # of Occurrence
^(	QUE+2, QUE+4, QUE+6
^(0	QUE+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DFN	QUE+2, QUE+4, QUE+6
IO	QUE
IOSL	QUE+3, QUE+5, QUE+7
IOST	H
>> LR("%"	H+1
>> LR("F"	QUE+1*, H
>> LR("Q"	QUE+3, QUE+4, QUE+5, QUE+6, QUE+7, H
>> LRDFN	LRBLPH+3
>> LRDPAF	LRBLPH+3*
>> LRDPF	LRBLPH+3
>> LRX	QUE+3, QUE+5, QUE+7*
>> PNM	H+1
>> POP	LRBLPH+4
>> SSN	H+1
>> X	QUE+2, QUE+4, QUE+6*
>> Y	QUE+2, QUE+4, QUE+6*
>> ZTRTN	LRBLPH+4*
>> ZTSK	LRBLPH+4