Routine: PSBPRN

Package	Total	Call Graph
VA Fileman	7	^%DT (C,NOW)^%DTC ^DDS ^DIC YN^DICN ($$GET1,D)^DIQ ^DIR
Barcode Medication Administration	1	(CLEAN,PSJ1)^PSBVT
Kernel	1	$$FMADD^XLFDT
Registration	1	(DEM,INP)^VADPT
Toolkit	1	$$GET^XPAR

Package

Total

Call Graph

VA Fileman

^%DT (C,NOW)^%DTC ^DDS ^DIC YN^DICN ($$GET1,D)^DIQ ^DIR

Barcode Medication Administration

(CLEAN,PSJ1)^PSBVT

Kernel

$$FMADD^XLFDT

Registration

(DEM,INP)^VADPT

Toolkit

$$GET^XPAR

Package	Total	Caller Graph
Barcode Medication Administration	1	PSB MED LOG PRN EFFECT

Package

Total

Caller Graph

Barcode Medication Administration

PSB MED LOG PRN EFFECT

Name	Comments	DBIA/ICR reference
EDIT	; Edit Medication Log PRN Effectiveness
EDIT1	;
EN	;
DISCHRGD(DFN)	; Patient Discharged OR Deceased?
GETPRNS(RESULTS,DFN,PSBORD)	; Get the PRN's for a pt needing effectness

External References

Name	Field # of Occurrence
^%DT	EDIT1+3
C^%DTC	EDIT1+24
NOW^%DTC	GETPRNS+15
^DDS	EDIT1+27
^DIC	EDIT+4
YN^DICN	EDIT1+26, EDIT1+27
$$GET1^DIQ	EDIT1+18, EDIT1+20, EDIT1+21, GETPRNS+26, GETPRNS+27, GETPRNS+28, GETPRNS+29, GETPRNS+30, GETPRNS+31, GETPRNS+33 , GETPRNS+42, GETPRNS+43, GETPRNS+45
D^DIQ	EDIT1+5, EDIT1+16, EDIT1+24
^DIR	EDIT1+16, EDIT1+22
CLEAN^PSBVT	GETPRNS+50, DISCHRGD+14
PSJ1^PSBVT	GETPRNS+31
DEM^VADPT	DISCHRGD+4
INP^VADPT	GETPRNS+13, DISCHRGD+8
$$FMADD^XLFDT	GETPRNS+15
$$GET^XPAR	GETPRNS+14

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: EDIT+2
Function Call: WRITE	Prompt: !! Line Location: EDIT1+3
Function Call: WRITE	Prompt: Y Line Location: EDIT1+5
Function Call: WRITE	Prompt: ! Line Location: EDIT1+16
Function Call: WRITE	Prompt: @IOF,!,"Searching Date " Line Location: EDIT1+16
Function Call: WRITE	Prompt: @IOF,!,"Searching Date " Line Location: EDIT1+16
Function Call: WRITE	Prompt: ! Line Location: EDIT1+22
Function Call: WRITE	Prompt: !!?5,"No Meds Found!" Line Location: EDIT1+23
Function Call: WRITE	Prompt: !,"Edit another entry" Line Location: EDIT1+27
Routine Call	DDS Line Location: EDIT1+27
Routine Call	DIC Line Location: EDIT+4
Routine Call	DIR Line Location: EDIT1+16 EDIT1+22

RPC Name	Call Tags
PSB GETPRNS	GETPRNS

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls
^PSB(53.79 - [#53.79]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PSB(53.79 - [#53.79]	EDIT1+10, EDIT1+12, EDIT1+13, EDIT1+14, EDIT1+19, GETPRNS+19, GETPRNS+21, GETPRNS+22, GETPRNS+23, GETPRNS+24 , GETPRNS+38, GETPRNS+41
^TMP("PSB"	GETPRNS+9!, GETPRNS+34, GETPRNS+35, GETPRNS+37, GETPRNS+45, GETPRNS+46, GETPRNS+47, GETPRNS+48, DISCHRGD+5, DISCHRGD+9* , DISCHRGD+12

Name	Line Occurrences
$$DISCHRGD	GETPRNS+11
EDIT	EDIT+8
EDIT1	EDIT+6, EDIT1+27

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	EDIT1+26, EDIT1+27, GETPRNS+15
>> %DT	EDIT1+1*
>> %DT("A"	EDIT1+1*
>> %DT("B"	EDIT1+2*
DA	EDIT+2, EDIT+7!, EDIT1+22, EDIT1+27, EDIT1+28!
DDSFILE	EDIT1+27*, EDIT1+28!
DFN	EDIT+1~, EDIT+5*, EDIT+7!, EDIT1+10, EDIT1+12, GETPRNS~, GETPRNS+11, GETPRNS+19, GETPRNS+21, GETPRNS+25 , GETPRNS+31, DISCHRGD~
DIC	EDIT+3*, EDIT+4!
DIC("A"	EDIT+3*
DIC(0	EDIT+3*
>> DIR(0	EDIT1+16, EDIT1+22
>> DISCHRGD	DISCHRGD+2, DISCHRGD+5, DISCHRGD+7, DISCHRGD+9*, DISCHRGD+11, DISCHRGD+16
DR	EDIT1+27*, EDIT1+28!
IOF	EDIT1+5, EDIT1+16
IOM	EDIT1+7, EDIT1+16
PSBCNT	EDIT1+8, EDIT1+15, EDIT1+17, EDIT1+22, EDIT1+23, EDIT1+28!
>> PSBDD	GETPRNS+39*, GETPRNS+42, GETPRNS+43, GETPRNS+45
PSBDT	EDIT1+3, EDIT1+4, EDIT1+5, EDIT1+8, EDIT1+10, EDIT1+16, EDIT1+22, EDIT1+24, EDIT1+26, EDIT1+28!
PSBHOUR	GETPRNS+14*, GETPRNS+15, GETPRNS+49!, DISCHRGD+13!
PSBIEN	EDIT1+11, EDIT1+12, EDIT1+13, EDIT1+14, EDIT1+15, EDIT1+18, EDIT1+19, EDIT1+20, EDIT1+21, EDIT1+28! , GETPRNS+8~, GETPRNS+20, GETPRNS+21, GETPRNS+22, GETPRNS+23, GETPRNS+24, GETPRNS+25, GETPRNS+38, GETPRNS+41, GETPRNS+42 , GETPRNS+43, GETPRNS+45
>> PSBIENS	GETPRNS+25*, GETPRNS+26, GETPRNS+27, GETPRNS+28, GETPRNS+29, GETPRNS+30, GETPRNS+31, GETPRNS+33
>> PSBOIT	GETPRNS+32
>> PSBONX	GETPRNS+32
PSBORD	GETPRNS~, GETPRNS+22
>> PSBOTXT	GETPRNS+37
PSBPRNDT	GETPRNS+15, GETPRNS+18, GETPRNS+19, GETPRNS+49!, DISCHRGD+13!
>> PSBSOL	GETPRNS+40*, GETPRNS+45
PSBSRCH	EDIT1+8, EDIT1+10, EDIT1+12, EDIT1+28!
PSBSTOP	GETPRNS+8~
>> PSBSTRT	GETPRNS+15, GETPRNS+19, GETPRNS+21
PSBTMP	EDIT1+9!, EDIT1+28!
PSBTMP(	EDIT1+15*, EDIT1+22
PSBTRDT	GETPRNS+13*, GETPRNS+18, GETPRNS+49!, DISCHRGD+13!
>> PSBUNFR	GETPRNS+43*, GETPRNS+45
>> PSBUNIT	GETPRNS+42*, GETPRNS+45
>> PSBX	GETPRNS+25, GETPRNS+26, GETPRNS+27, GETPRNS+28, GETPRNS+29, GETPRNS+30, GETPRNS+32, GETPRNS+33, GETPRNS+35
>> PSBY	GETPRNS+38*, GETPRNS+41, GETPRNS+42, GETPRNS+43, GETPRNS+45
>> PSBZ	GETPRNS+38*, GETPRNS+39, GETPRNS+40, GETPRNS+41
RESULTS	GETPRNS~, GETPRNS+9!, GETPRNS+48, DISCHRGD+12
U	EDIT1+13, EDIT1+14, EDIT1+19, GETPRNS+22, GETPRNS+23, GETPRNS+24, GETPRNS+25, GETPRNS+26, GETPRNS+27, GETPRNS+28 , GETPRNS+29, GETPRNS+30, GETPRNS+32, GETPRNS+33, GETPRNS+45
VADM	DISCHRGD+5!
VADM(6	DISCHRGD+5
VAIN	DISCHRGD+9!
VAIN(1	DISCHRGD+9
VAIN(7	GETPRNS+13
>> X	EDIT1+24
>> X1	EDIT1+24*
>> X2	EDIT1+24*
>> Y	EDIT+4, EDIT+5, EDIT1+3, EDIT1+5, EDIT1+16, EDIT1+22, EDIT1+24, EDIT1+25, GETPRNS+34, GETPRNS+35 , GETPRNS+37, GETPRNS+44, GETPRNS+45, GETPRNS+46*

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBPRN

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: