Routine: PSBUTL

Call Graph

Call Graph Total: 16

Package	Total	Call Graph
VA Fileman	10	^%DT (,H,NOW,YMD)^%DTC EN^DDIOL ^DIC FIELD^DID UPDATE^DIE $$EXTERNAL^DILFD ($$GET1,GETS)^DIQ ^DIR ^DIWP
Kernel	3	($$DEFDIR,$$DEL,$$FTG,CLOSE,OPEN)^%ZISH ENDR^%ZISS ($$PATCH,$$VERSION)^XPDUTL
Barcode Medication Administration	2	$$IVPTAB^PSBVDLU3 (CLEAN,PSJ1)^PSBVT
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
Barcode Medication Administration	8	PSB DRUG INQUIRY PSBMD PSBML PSBML2 PSBMLVAL PSBO PSBOWA PSBVDLVL

Package

Total

Caller Graph

Barcode Medication Administration

PSB DRUG INQUIRY PSBMD PSBML PSBML2 PSBMLVAL PSBO PSBOWA PSBVDLVL

Entry Points

Name	Comments	DBIA/ICR reference
SUNDAY(X,PSBDISP)	;
SCRNPTCH	;
DIFF(X,X1)	; Difference in minutes between 2 FM dates ; Code copied from Fileman Function MINUTES
DPTSET	; Set Logic for pt-merge x-ref on patient field in file 53.79
DPTKILL	; Kill Logic for pt-merge x-ref on patient field in file 53.79
CLOCK(RESULTS,X)	; Verify Client/Server Date/Times are close enough
TIMEOUT(X)	;
HFSOPEN(HANDLE)	;
DIWP(X,Y,PSB,PSBARGN)	;
SATURDAY(X,PSBDISP)	;
DRUGINQ	; Drug File Inquiry
TIMEIN	;
HFSCLOSE(HANDLE)	;
GIVEPTCH	;
RESETADM	;
VERSION()	; [Extrinsic] ; Returns V#.# for display purposes
AUDIT(PSBREC,PSBDD,PSBFLD,PSBDATA,PSBSK)	; Med Log Audit ; used by cross references to 53.79 to track changes to fields in Med Log file ; xref AU05, AU06, AU09, AU16, AU21, AU22 pass the value 53.79 as PSBDD ; xref AU303, AU304 pass the value 53.795 as PSBDD ; xref AU603, AU604 pass the value 53.796 as PSBDD ; xref AU703, AU704 pass the value 53.797 as PSBDD
CHECK(RESULTS,PSBWHAT,PSBDATA)	; Checks for KIDS Patch or Build ; Module added in Patch PSB1.03 DP/TOPEKA 22-DEC-1999 11:51:22 ; PSBWHAT: B = Returns Build Version for packages by Namespace ; P = Returns if Patch is installed ; PSBDATA: Build/Package namespace (i.e. PSB) or Patch Number ; (i.e. PSB1.01)

External References

Name	Field # of Occurrence
^%DT	CLOCK+8, TIMEIN+5
^%DTC	DIFF+2
H^%DTC	SATURDAY+1, SUNDAY+1
NOW^%DTC	CLOCK+9, TIMEIN+4, AUDIT+11
YMD^%DTC	SATURDAY+3, SUNDAY+3
$$DEFDIR^%ZISH	HFSOPEN+2, HFSCLOSE+4
$$DEL^%ZISH	HFSCLOSE+7
$$FTG^%ZISH	HFSCLOSE+6
CLOSE^%ZISH	HFSCLOSE+2
OPEN^%ZISH	HFSOPEN+4
ENDR^%ZISS	DRUGINQ+2
EN^DDIOL	SATURDAY+4, SUNDAY+4
^DIC	DRUGINQ+7
FIELD^DID	DRUGINQ+14, AUDIT+13
UPDATE^DIE	RESETADM+14
$$EXTERNAL^DILFD	AUDIT+12
$$GET1^DIQ	AUDIT+21, AUDIT+23
GETS^DIQ	DRUGINQ+10
^DIR	DRUGINQ+25
^DIWP	DIWP+2
$$IVPTAB^PSBVDLU3	RESETADM+7
CLEAN^PSBVT	RESETADM+7
PSJ1^PSBVT	RESETADM+7
$$GET^XPAR	CLOCK+11
$$PATCH^XPDUTL	CHECK+13
$$VERSION^XPDUTL	CHECK+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @IOF,!,"DRUG FILE INQUIRY",! Line Location: DRUGINQ+7
Function Call: WRITE	Prompt: !?15 Condition for execution: $X>40 Line Location: DRUGINQ+22
Function Call: WRITE	Prompt: ?40 Condition for execution: $X>15 Line Location: DRUGINQ+22
Function Call: WRITE	Prompt: PSBRET(50.1,X,.01) Line Location: DRUGINQ+22
Function Call: WRITE	Prompt: ! Line Location: DRUGINQ+24
Routine Call	DIE Line Location: RESETADM+14
Routine Call	DIC Line Location: DRUGINQ+7
Routine Call	DIR Line Location: DRUGINQ+25

RPC Name	Call Tags
PSB SERVER CLOCK VARIANCE	CLOCK
PSB CHECK SERVER	CHECK

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^PSDRUG - [#50]	Classic Fileman Calls, FIELD^DID, GETS^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("UPPERCASE"	TIMEIN+1
^PSB(53.79 - [#53.79]	DPTSET+3, DPTSET+6, DPTSET+7, DPTSET+10, DPTSET+13, DPTSET+16, DPTKILL+3!, DPTKILL+6, DPTKILL+7!, DPTKILL+10! , DPTKILL+13!, DPTKILL+16!, AUDIT+8, AUDIT+9, AUDIT+14, AUDIT+15, AUDIT+17, AUDIT+18, AUDIT+19, AUDIT+21 , AUDIT+23, AUDIT+24, AUDIT+25, RESETADM+7, SCRNPTCH+5, GIVEPTCH+1, GIVEPTCH+2, GIVEPTCH+3, GIVEPTCH+4, GIVEPTCH+5!
^TMP("PSBO"	HFSCLOSE+3!, HFSCLOSE+6
^UTILITY($J	DIWP+1!, DIWP+3, DIWP+8!

Name	Line Occurrences
$$DIFF	CLOCK+10

Name	Field # of Occurrence
^(	DIWP+6
^(0	DPTSET+13, DPTKILL+13, AUDIT+14*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	CLOCK+9, TIMEIN+4, AUDIT+11
>> %DT	CLOCK+8, TIMEIN+5
>> %H	SATURDAY+2, SUNDAY+2
>> %Y	SATURDAY+2, SUNDAY+2
AMPM	TIMEOUT+1~, TIMEOUT+6, TIMEOUT+7, TIMEOUT+9
>> D	DRUGINQ+4*
>> DA	DPTSET+3, DPTSET+6, DPTSET+7, DPTSET+10, DPTSET+13, DPTSET+16, DPTKILL+3, DPTKILL+6, DPTKILL+7, DPTKILL+10 , DPTKILL+13, DPTKILL+16, SCRNPTCH+5, GIVEPTCH+1, GIVEPTCH+2, GIVEPTCH+3, GIVEPTCH+4, GIVEPTCH+5
>> DFN	GIVEPTCH+1, GIVEPTCH+2, GIVEPTCH+4, GIVEPTCH+5
DIC	DRUGINQ+1~, DRUGINQ+4*
DIC("A"	DRUGINQ+4*
DIC("S"	DRUGINQ+6*
DIC("T"	DRUGINQ+4*
DIC(0	DRUGINQ+4*
DIR	DRUGINQ+1~
DIR(0	DRUGINQ+25*
DIWF	DIWP+2*, DIWP+8!
DIWL	DIWP+2*, DIWP+8!
DIWR	DIWP+2*, DIWP+8!
DT	TIMEIN+7
DUZ	HFSOPEN+3, HFSCLOSE+5, AUDIT+21, AUDIT+23, AUDIT+24, AUDIT+25
HANDLE	HFSOPEN~, HFSOPEN+4, HFSCLOSE~, HFSCLOSE+2
HOUR	TIMEOUT+1~, TIMEOUT+5, TIMEOUT+7, TIMEOUT+8, TIMEOUT+9
IOF	DRUGINQ+7, DRUGINQ+11, HFSOPEN+5*
IOINHI	DRUGINQ+1~, DRUGINQ+11, DRUGINQ+15, DRUGINQ+21
IOINORM	DRUGINQ+1~, DRUGINQ+12, DRUGINQ+20, DRUGINQ+23
IOM	DRUGINQ+12, HFSOPEN+5*
IOSL	DRUGINQ+24, HFSOPEN+5*
IOST	HFSOPEN+5*
MIN	TIMEOUT+1~, TIMEOUT+5*, TIMEOUT+9
>> POP	HFSOPEN+4
PSB	DIWP~, DIWP+4, DIWP+6, DIWP+7
PSBARGN	DIWP~, DIWP+6
>> PSBAUDIT	AUDIT+10
>> PSBCHEMT	RESETADM+7
PSBCLNT	CLOCK+7~, CLOCK+8*, CLOCK+10
PSBDATA	AUDIT~, AUDIT+10, AUDIT+12, AUDIT+21, AUDIT+23, AUDIT+24, AUDIT+25, CHECK~, CHECK+8, CHECK+10 , CHECK+13
PSBDD	AUDIT~, AUDIT+12, AUDIT+13
PSBDEL	HFSCLOSE+1~, HFSCLOSE+7
PSBDEL(	HFSCLOSE+5*
PSBDIFF	CLOCK+7~, CLOCK+10*, CLOCK+12, CLOCK+13
PSBDIR	HFSOPEN+1~, HFSOPEN+2, HFSOPEN+4, HFSCLOSE+1~, HFSCLOSE+4, HFSCLOSE+6, HFSCLOSE+7
PSBDISP	SATURDAY~, SATURDAY+4, SUNDAY~, SUNDAY+4
PSBDT	AUDIT+7~, AUDIT+11*, AUDIT+21, AUDIT+23, AUDIT+24, AUDIT+25
>> PSBFDA(	RESETADM+8*, RESETADM+9!
>> PSBFDAX(	RESETADM+11, RESETADM+12
PSBFILE	HFSOPEN+1~, HFSOPEN+3, HFSOPEN+4, HFSCLOSE+1~, HFSCLOSE+5, HFSCLOSE+6
PSBFLD	AUDIT~, AUDIT+12, AUDIT+13
PSBGOON	AUDIT+17, AUDIT+19*, AUDIT+26!
PSBGPTCH	SCRNPTCH+4, SCRNPTCH+7, GIVEPTCH+4!, GIVEPTCH+5!
PSBIEN	DRUGINQ+1~, DRUGINQ+9*, DRUGINQ+10, DRUGINQ+11, DRUGINQ+12, DRUGINQ+16, DRUGINQ+17, DRUGINQ+18, DRUGINQ+19, DRUGINQ+20 , RESETADM+7, RESETADM+8, RESETADM+9, RESETADM+13
>> PSBISYR	RESETADM+7
>> PSBIVPSH	RESETADM+7
>> PSBIVT	RESETADM+7
>> PSBMMEN	RESETADM+7, RESETADM+9, RESETADM+10
>> PSBOLDUZ	AUDIT+9, AUDIT+19, AUDIT+21
>> PSBOLSTS	AUDIT+8*, AUDIT+20
>> PSBONX	RESETADM+9, GIVEPTCH+1, GIVEPTCH+2
>> PSBOTYP	RESETADM+7
PSBREC	AUDIT~, AUDIT+8, AUDIT+9, AUDIT+14, AUDIT+15, AUDIT+17, AUDIT+18, AUDIT+19, AUDIT+21, AUDIT+23 , AUDIT+24, AUDIT+25
PSBREC(3	RESETADM+11, RESETADM+12
PSBRET	DRUGINQ+1~, DRUGINQ+8!
PSBRET(	DRUGINQ+22
PSBRET("LABEL"	DRUGINQ+15
PSBRET(50	DRUGINQ+11, DRUGINQ+16, DRUGINQ+17, DRUGINQ+18, DRUGINQ+19*, DRUGINQ+20
PSBSK	AUDIT~, AUDIT+17, AUDIT+21, AUDIT+24
PSBSRVR	CLOCK+7~, CLOCK+9*, CLOCK+10
PSBTMP	AUDIT+7~
PSBTMP("LABEL"	AUDIT+16, AUDIT+21, AUDIT+23, AUDIT+24, AUDIT+25
PSBWHAT	CHECK~, CHECK+7, CHECK+8*, CHECK+9, CHECK+12
>> PSBWSID	RESETADM+9*, RESETADM+10, RESETADM+11
PSBX	SCRNPTCH+5, SCRNPTCH+6, GIVEPTCH+1~, GIVEPTCH+2, GIVEPTCH+3*, GIVEPTCH+4!, GIVEPTCH+5!
RESULTS	CLOCK~, CHECK~
RESULTS(0	CLOCK+12, CLOCK+13, CHECK+7, CHECK+11, CHECK+14*
U	DPTSET+3, DPTSET+6, DPTSET+7, DPTSET+10, DPTSET+13, DPTSET+16, DPTKILL+3, DPTKILL+6, DPTKILL+7, DPTKILL+10 , DPTKILL+13, DPTKILL+16, AUDIT+8, AUDIT+9, AUDIT+19, AUDIT+21, AUDIT+23, AUDIT+24, AUDIT+25, RESETADM+7 , SCRNPTCH+5, GIVEPTCH+3
X	DIWP~, DIWP+3, DIWP+6, SATURDAY~, SATURDAY+1, SATURDAY+4, SATURDAY+5, SUNDAY~, SUNDAY+1, SUNDAY+4 , SUNDAY+5, CLOCK~, CLOCK+11, CLOCK+12, DIFF~, DIFF+2, DIFF+3, DRUGINQ+2, DRUGINQ+3, DRUGINQ+13 , DRUGINQ+14, DRUGINQ+16, DRUGINQ+17, DRUGINQ+18, DRUGINQ+19, DRUGINQ+20, DRUGINQ+22, DPTSET+3, DPTSET+7, DPTSET+10 , DPTSET+13, DPTSET+16, DPTKILL+3, DPTKILL+7, DPTKILL+10, DPTKILL+13, DPTKILL+16, TIMEIN+1, TIMEIN+2, TIMEIN+3 , TIMEIN+4, TIMEIN+5, TIMEIN+6!, TIMEIN+7, TIMEOUT~, TIMEOUT+2, TIMEOUT+3, TIMEOUT+4, TIMEOUT+5, HFSCLOSE+6* , HFSCLOSE+7, AUDIT+15, AUDIT+19, AUDIT+20, CHECK+10, CHECK+11, CHECK+13, CHECK+14, RESETADM+7, RESETADM+8 , RESETADM+11, RESETADM+12, RESETADM+13*
X1	DIFF~, DIFF+2
>> X2	DIFF+2, RESETADM+8
XY	AUDIT+17*, AUDIT+18, AUDIT+19, AUDIT+26!
Y	DIWP~, DIWP+2, DIWP+4, DIWP+6, CLOCK+8, DIFF+2, DRUGINQ+7, DRUGINQ+9, DRUGINQ+17, DRUGINQ+18 , DRUGINQ+19, TIMEIN+1, TIMEIN+6, TIMEIN+7, AUDIT+15, AUDIT+17, AUDIT+21, AUDIT+23, AUDIT+24, AUDIT+25
Y(0	RESETADM+10, SCRNPTCH+4

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBUTL

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

Used in RPC

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: