Routine: PSDLBLB

Package	Total	Call Graph
VA Fileman	3	^DIC GETS^DIQ ^DIR
Kernel	2	^%ZISC $$HTE^XLFDT
Registration	1	(DEM,INP,KVAR)^VADPT

Package	Total	Caller Graph
Controlled Substances	1	PSDLBLP

Entry Points

Name	Comments	DBIA/ICR reference
ASKN	;ask nursing location
END	;kill variables and exit
HDR	;prints header information
WARD2
DONE
PRINT	;print labels
SAVE	;save queued variables

External References

Name	Field # of Occurrence
^%ZISC	END+5
^DIC	ASKN+2
GETS^DIQ	ASKN+4
^DIR	DONE+1, HDR+1
DEM^VADPT	PSDLBLB+3
INP^VADPT	PSDLBLB+4
KVAR^VADPT	END+1
$$HTE^XLFDT	HDR+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,?15,"** NO PATIENT WARD INFO **",!! Line Location: PRINT+2
Function Call: WRITE	Prompt: @PSDBAR1,$P(NODE,"^"),@PSDBAR0,!! Line Location: PRINT+8
Function Call: WRITE	Prompt: @IOF Line Location: DONE+0
Function Call: WRITE	Prompt: ! Line Location: DONE+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+2
Function Call: WRITE	Prompt: !,"Patient ID List for " Line Location: HDR+2
Function Call: WRITE	Prompt: PSD(1) Line Location: HDR+3
Function Call: WRITE	Prompt: $S($G(PSD2)]"":PSD2,$G(PSDN)]"":PSDN,$G(NAOUN)]"":NAOUN,$O(PSDW(""))]"":$O(PSDW("")),1:"") Line Location: HDR+4
Function Call: WRITE	Prompt: " Printed: ",$$HTE^XLFDT($H,"P"),?70,"Page: ",PG,! Line Location: HDR+5
Function Call: WRITE	Prompt: "PATIENT",?45,"ROOM-BED",!,LN,!! Line Location: HDR+6
Function Call: WRITE	Prompt: ! Line Location: ASKN+2
Function Call: WRITE	Prompt: !!,"Compiling Ward data for ",NAOUN,"..." Line Location: WARD2+0
Routine Call	DIC Line Location: ASKN+2
Routine Call	DIR Line Location: DONE+1 HDR+1

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^NURSF(211.4 - [#211.4]	GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	WARD2+2, WARD2+3
^DPT - [#2]	PSDLBLB+2
^DPT("ACN"	PSDLBLB+2
^PSD(58.8 - [#58.8]	WARD2+1
^SC - [#44]	ASKN+3
^TMP("PSDLBLP"	PSDLBLB+6*, PRINT+2, PRINT+4, PRINT+5, END+4!

Label References

Name	Line Occurrences
DONE	PRINT+2
HDR	PRINT+2, PRINT+3, PRINT+5, PRINT+6

Naked Globals

Name	Field # of Occurrence
^(	PRINT+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	END+2!
%H	END+2!
%ZIS	END+2!
ANS	END+2!
DA	END+2!, HDR+1!, ASKN+1!
DFN	PSDLBLB+3*, PSDLBLB+5!, END+2!
DIC	END+2!, ASKN+1!*, ASKN+2!
DIC("A"	ASKN+1*
DIC(0	ASKN+1*
DIR	DONE+1!, END+2!, HDR+1!
DIR("A"	DONE+1*
DIR(0	DONE+1, HDR+1
DIROUT	END+2!
DIRUT	DONE+1!, END+2!
DTOUT	END+2!
DUOUT	END+2!
IOF	DONE, HDR+2
IOSL	PRINT+5, PRINT+6
IOST	DONE, DONE+1, HDR+1
JJ	END+2!, WARD2+1*
JJ1	END+2!, WARD2+1*, WARD2+2, WARD2+3
JJ2	END+2!, WARD2+1*
LN	PRINT+1*, END+2!, HDR+6
>> NAOU	WARD2+1
>> NAOUN	HDR+4, SAVE+2, WARD2
NODE	PRINT+5*, PRINT+7, PRINT+8, END+2!
PATN	PSDLBLB+3*, PSDLBLB+6, END+2!
PG	PRINT+1, END+2!, HDR+1, HDR+2, HDR+5
POP	END+2!
PSD	PRINT+5*, PRINT+7, END+2!, ASKN+3~
PSD(	ASKN+5, ASKN+6
PSD(1	HDR+2, ASKN+4, ASKN+5*, ASKN+6
PSD1	PSDLBLB+2, PSDLBLB+3, PRINT+5, END+2!
>> PSD2	HDR+4, ASKN+3*
PSDBAR0	PRINT+8, END+2!
PSDBAR1	PRINT+8, END+2!
PSDCNT	PSDLBLB+6, PRINT+1, END+2!
PSDN	PRINT+4*, PRINT+5, PRINT+7, END+2!, HDR+4
PSDOUT	PRINT+1, PRINT+4, PRINT+5, PRINT+6, DONE+1, END+2!, HDR+1, ASKN+2*
PSDPRT	PRINT+8, END+3!
PSDR	END+3!
PSDRM	PSDLBLB+4*, PSDLBLB+6, END+3!
PSDT	PSDLBLB+4, END+3!
PSDW	END+3!
PSDW(	PSDLBLB+2, ASKN+6, WARD2+3
PSDW(""	HDR+4
PSDWN	PSDLBLB+2*, PSDLBLB+6, END+3!
PSDX1	PRINT+1*, END+3!
PSDX2	END+3!
SSN	PSDLBLB+3*, PSDLBLB+6, END+3!
U	PRINT+7, ASKN+3
VA	END+1!
VA("BID"	PSDLBLB+3
VADM	PSDLBLB+5!, END+3!
VADM(1	PSDLBLB+3
VADM(2	PSDLBLB+3
VAERR	PSDLBLB+3, END+3!
VAIN	PSDLBLB+5!, END+3!
VAIN(5	PSDLBLB+4
VAINDT	PSDLBLB+4*, PSDLBLB+5!, END+3!
X	END+3!
Y	END+3!, HDR+1, ASKN+2, ASKN+3, ASKN+4
ZTDESC	END+3!
ZTIO	END+3!
>> ZTQUEUED	END+5
>> ZTREQ	END+5*
ZTRTN	END+3!
ZTSAVE	END+3!
ZTSAVE("NAOUN"	SAVE+2*
ZTSAVE("PSD2"	SAVE+1*
ZTSAVE("PSDW("	SAVE+1*
ZTSK	END+3!

Customize PDF page

Package: Controlled Substances

Routine: PSDLBLB

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: