Routine: PSBO

Package	Total	Call Graph
VA FileMan	10	(H,NOW)^%DTC ^DDS MSG^DDSUTL $$GET^DDSVAL $$FIND1^DIC FIELD^DID (FILE,VAL)^DIE ^DIK $$GET1^DIQ ^DIR
Kernel	5	(,HOME)^%ZIS ^%ZISC $$DEFDIR^%ZISH ^%ZTLOAD $$NOW^XLFDT
Barcode Medication Administration	4	PAINCMT^PSBCSUTL (CHECK,LIST,NEW,PRINT)^PSBO1 (HFSCLOSE,HFSOPEN)^PSBUTL CLEAN^PSBVT
Nursing Service	1	WARD^NURSUT5
Registration	1	DEM^VADPT

Package	Total	Caller Graph
Barcode Medication Administration	32	PSB REPORT PSBCSUTL PSBMLHS PSBMLLKU PSBMMRB PSBO BL PSBO BZ PSBO DL PSBO MD PSBO MH PSBO ML PSBO MM PSBO MV PSBO PE PSBO WA PSBO XA PSBO1 PSBOCE1 PSBOCM1 PSBOCP PSBODL PSBODO PSBOHDR PSBOHDR1 PSBOML PSBOMM PSBOMM2 PSBOMT PSBOMV PSBOPF PSBOSF PSBOWA
Order Entry Results Reporting	2	ORWPS ORWRP1A
VistA Integration Adapter	1	VIABRPC7

Entry Points

Name	Comments	DBIA/ICR reference
RPC(RESULTS,PSBTYPE,PSBDFN,PSBSTRT,PSBSTOP,PSBINCL,PSBDEV,PSBSORT,PSBOI,PSBWLOC,PSBWSORT,PSBFUTR,PSBORDNM,PSBRCRI,PSBLIST,PSBPST,PSBTR,PSBDIV,PSBSIFL,PSBCLINORD,PSB21,PSB22,PSB23,PSB24,PSB25,PSBCLLST)	;
XQ(PSBTYPE)	; Called via Kernel Menus
DQ(PSBRPT)	; Dequeue report from Taskman
IOM()	; Returns good margin or not
VAL(PSBFLDS)	; Validate that fields in PSBFLDS are filled in
SETUP	; Setup parameters for the report in PSBRPT
WRAP(X,Y,Z)	; Quick text wrap
PRNEFF(PSBEIECMT,PSBIEN)	;Check for PRN Error comment
FILTERCO	; rebuild TMP using needed recs and remove clinics not wanted
CLIN(RPTARR,DFNLST)	;Build DFN list of patient orders per Clinics selected ; Input: RPTARR - Report request array from file 53.69. (required) ; DFNLST - pass by ref array name if array needed and not ; a tmp global pass a 1. (optional) ; default is TMP global ; DFNLST - array of DFN's only
QUERY(GLB,ROOT,RPSTOPDT,RPTAR,DFNAR)	;Loops thru global xref via $Query ; for qualifying recs to find DFN's
BLDTMP(ARR)	;Build Tmp global for DFN's to be included on the report
CLINIC(CL)	;Is this a Clinic order that would show on the VDL in CO mode also?

External References

Name	Field # of Occurrence
H^%DTC	VAL+15, VAL+18
NOW^%DTC	RPC+21
^%ZIS	XQ+43, XQ+46
HOME^%ZIS	XQ+45
^%ZISC	XQ+46
$$DEFDIR^%ZISH	RPC+63
^%ZTLOAD	XQ+53
^DDS	XQ+4
MSG^DDSUTL	VAL+20
$$GET^DDSVAL	VAL+2
$$FIND1^DIC	VAL+13
FIELD^DID	VAL+6
FILE^DIE	RPC+59
VAL^DIE	RPC+22, RPC+23, RPC+24, RPC+25, RPC+26, RPC+27, RPC+29, RPC+31, RPC+32, RPC+33 , RPC+35, RPC+36, RPC+37, RPC+38, RPC+39, RPC+41, RPC+42, RPC+43, RPC+44, RPC+45 , RPC+46, RPC+48, RPC+49, RPC+50, RPC+51, RPC+52, RPC+55, RPC+58
^DIK	XQ+6, XQ+9, XQ+37
$$GET1^DIQ	XQ+41, XQ+46, XQ+49, XQ+51, VAL+12, VAL+13, VAL+18, QUERY+13
^DIR	XQ+3, XQ+30
WARD^NURSUT5	SETUP+28
PAINCMT^PSBCSUTL	RPC+15
CHECK^PSBO1	XQ+9
LIST^PSBO1	RPC+60, RPC+61
NEW^PSBO1	RPC+14, XQ+2
PRINT^PSBO1	RPC+62, RPC+67
HFSCLOSE^PSBUTL	RPC+65
HFSOPEN^PSBUTL	RPC+63
CLEAN^PSBVT	DQ+7
DEM^VADPT	SETUP+20, SETUP+32, BLDTMP+3
$$NOW^XLFDT	CLIN+10

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Error: ",$P(PSBRPT(0),U,2) Line Location: XQ+3
Function Call: WRITE	Prompt: @IOF Line Location: XQ+5
Function Call: WRITE	Prompt: !,"Cancelling Request..." Line Location: XQ+6
Function Call: WRITE	Prompt: "Cancelled!" Line Location: XQ+6
Function Call: WRITE	Prompt: !,"Cancelling Request..." Line Location: XQ+9
Function Call: WRITE	Prompt: "Cancelled!" Line Location: XQ+9
Function Call: WRITE	Prompt: "Cancelled!" Line Location: XQ+37
Function Call: WRITE	Prompt: !,"**************************************************************" Line Location: IOM+2
Function Call: WRITE	Prompt: !,"* SORRY, Your selected DEVICE does not print 132 columns. *" Line Location: IOM+3
Function Call: WRITE	Prompt: !,"**************************************************************" Line Location: IOM+4
Function Call: WRITE	Prompt: ! Line Location: IOM+5
Function Call: WRITE	Prompt: Z Line Location: WRAP+11
Routine Call	DDS Line Location: XQ+4
Routine Call	DIC Line Location: VAL+13
Routine Call	DIE Line Location: RPC+59
Routine Call	DIE Line Location: RPC+22 RPC+23 RPC+24 RPC+25 RPC+26 RPC+27 RPC+29 RPC+31 RPC+32 RPC+33 RPC+35 RPC+36 RPC+37 RPC+38 RPC+39 RPC+41 RPC+42 RPC+43 RPC+44 RPC+45 RPC+46 RPC+48 RPC+49 RPC+50 RPC+51 RPC+52 RPC+55 RPC+58
Routine Call	DIR Line Location: XQ+3 XQ+30
Routine Call	%ZIS Line Location: XQ+43 XQ+46
Routine Call	%ZIS Line Location: XQ+45

Used in RPC

RPC Name	Call Tags
PSB REPORT	RPC

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^ORD(101.24 - [#101.24]	FIND1^DIC, GET1^DIQ
^SC - [#44]	GET1^DIQ
^PSB(53.69 - [#53.69]	Classic Fileman Calls, FIELD^DID, GET1^DIQ, GET^DDSVAL, VAL^DIE

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	SETUP+37
^DPT("CN"	SETUP+31
^PS(53.46 - [#53.46]	CLINIC+2, CLINIC+3, CLINIC+4
^PS(55 - [#55]	CLIN+13, CLIN+17, QUERY+11
^PSB(53.69 - [#53.69]	XQ+16, XQ+34, XQ+50, DQ+2, DQ+3*, SETUP+4, SETUP+5, SETUP+6, SETUP+7, SETUP+9 , FILTERCO+9
^PSB(53.79 - [#53.79]	PRNEFF+2, PRNEFF+3
^SC("B"	XQ+16, XQ+34
^TMP("PSBO"	RPC+9, RPC+12!, RPC+16, RPC+62, RPC+63, RPC+66, XQ+55!, DQ+5!, SETUP+3!, SETUP+22 , SETUP+34, SETUP+40, SETUP+41, SETUP+47*, SETUP+48
^TMP("PSJ"	FILTERCO+5, FILTERCO+6, FILTERCO+7, FILTERCO+11, FILTERCO+12!, FILTERCO+14
^TMP("PSJCL"	SETUP+47!, CLIN+8!, BLDTMP+5, BLDTMP+7
^TMP("PSJTMP"	FILTERCO+3!, FILTERCO+4!, FILTERCO+11*, FILTERCO+12, FILTERCO+13!

Label References

Name	Line Occurrences
$$CLINIC	QUERY+12
@(	DQ+4
BLDTMP	CLIN+21
CLIN	SETUP+46
DQ	RPC+64, XQ+46
QUERY	CLIN+14, CLIN+18
SETUP	DQ+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	RPC+24
>> %H	VAL+15, VAL+18
>> %ZIS	XQ+42*
A	CLINIC+3~*, CLINIC+4
ARR	BLDTMP~
ARR(	BLDTMP+2
CL	CLINIC~, CLINIC+1, CLINIC+2, CLINIC+3
CLN	QUERY+2~, QUERY+9*, QUERY+13
CLNAM	FILTERCO+1~, FILTERCO+7*, FILTERCO+9
CLNNAM	QUERY+2~, QUERY+13*, QUERY+15
>> CLNODE	QUERY+11*, QUERY+12
COCNT	FILTERCO+1~, FILTERCO+3, FILTERCO+10, FILTERCO+11
DA	XQ+1~, XQ+4*, XQ+16, XQ+34, XQ+41, XQ+46, XQ+49, XQ+50, XQ+51, XQ+52 , VAL+2, VAL+12, VAL+18
>> DDSERROR	VAL+21*
DDSFILE	XQ+1~, XQ+4*
DFN	RPC+13, SETUP+20, SETUP+32, QUERY+2~, QUERY+9, QUERY+10, QUERY+11, QUERY+17, BLDTMP+2*, BLDTMP+5 , BLDTMP+7
DFNAR	QUERY~
DFNAR(	QUERY+10, QUERY+17*
DFNARR	CLIN+7~, CLIN+14, CLIN+18, CLIN+20, CLIN+21
DFNLST	CLIN~, CLIN+20*
DIC	RPC+10~
DIK	XQ+1~, XQ+6, XQ+9, XQ+37*
DIR	XQ+18!
DIR("?"	XQ+28*
DIR("A"	XQ+21, XQ+24, XQ+25, XQ+26, XQ+27*
DIR(0	XQ+3, XQ+23
>> DIRUT	XQ+9
DR	XQ+1~, XQ+4*
GLB	CLIN+7~, CLIN+13, CLIN+14, CLIN+17, CLIN+18, QUERY~, QUERY+3, QUERY+8*, QUERY+9
IO	RPC+64, XQ+44, XQ+46
IO(0	XQ+44
IOF	XQ+5, XQ+48
IOM	IOM+1
IOP	XQ+41, XQ+42, XQ+45!, XQ+46*!
NOD1	QUERY+2~, QUERY+4, QUERY+6, QUERY+11
NOD2	QUERY+2~, QUERY+4, QUERY+6, QUERY+11
>> OR	QUERY+9*, QUERY+11
>> POP	RPC+63
PSB	VAL+1~, VAL+2, VAL+4, VAL+6, WRAP+7~, WRAP+12, WRAP+13, WRAP+14, WRAP+15
PSB("LABEL"	VAL+7
PSB("TITLE"	VAL+7
PSB21	RPC~
PSB22	RPC~
PSB23	RPC~
PSB24	RPC~
PSB25	RPC~
PSBANS	RPC+10~, XQ+1~, XQ+9, XQ+31, XQ+36
PSBANS1	XQ+1~
PSBCL	XQ+14, XQ+16, XQ+20, XQ+21, XQ+32, XQ+33, XQ+34, XQ+35!
PSBCL(	XQ+14, XQ+16, XQ+20, XQ+21*, XQ+32, XQ+34
PSBCL(""	XQ+12
PSBCLINORD	RPC~, RPC+57, RPC+58, SETUP+11*
PSBCLLST	RPC~, RPC+61
PSBCLLST(0	RPC+61
PSBCMTCH	PRNEFF+1~, PRNEFF+2*, PRNEFF+3
PSBCNT	XQ+1~, XQ+20*, XQ+21, XQ+23, XQ+26, XQ+27, XQ+28
PSBDAYS	VAL+1~, VAL+13, VAL+14, VAL+15, VAL+18
PSBDEV	RPC~, RPC+20, RPC+22, RPC+23, RPC+62, RPC+67
PSBDFN	RPC~, RPC+13, RPC+15, RPC+33, DQ+1~, SETUP+18, SETUP+19, SETUP+20, SETUP+22, SETUP+31 , SETUP+32, SETUP+34, SETUP+37, SETUP+40
PSBDIV	RPC~, RPC+31
PSBEIECMT	PRNEFF~, PRNEFF+3*, PRNEFF+4
PSBFDA	RPC+10~
PSBFDA(	RPC+34*
PSBFLD	VAL+1~, VAL+2*
PSBFLD(	VAL+2*, VAL+3!, VAL+4, VAL+10, VAL+11, VAL+16
PSBFLDS	VAL~, VAL+2
PSBFUTR	RPC~, RPC+47, RPC+48, RPC+49, RPC+50, RPC+51, RPC+52
PSBI	XQ+13~, XQ+14*, XQ+15
PSBIEN	PRNEFF~, PRNEFF+2, PRNEFF+3
PSBIENS	RPC+10~, RPC+17, RPC+22, RPC+23, RPC+24, RPC+25, RPC+26, RPC+27, RPC+29, RPC+31 , RPC+32, RPC+33, RPC+34, RPC+35, RPC+36, RPC+37, RPC+38, RPC+39, RPC+41, RPC+42 , RPC+43, RPC+44, RPC+45, RPC+46, RPC+48, RPC+49, RPC+50, RPC+51, RPC+52, RPC+55 , RPC+58, RPC+64, FILTERCO+2~, FILTERCO+9
PSBINCL	RPC~, RPC+40, RPC+41, RPC+42, RPC+43, RPC+44, RPC+45, RPC+46
PSBINDX	SETUP+1~, SETUP+36, SETUP+37, SETUP+38, SETUP+39, SETUP+40
PSBLIST	RPC~, RPC+60
PSBLIST(0	RPC+60
PSBMODE	RPC+11~
PSBMSG	VAL+1~, VAL+5, VAL+19, VAL+20
PSBMSG(	VAL+8, VAL+17, VAL+18*
PSBMSG(""	VAL+8, VAL+17, VAL+18
PSBMSG(0	VAL+5*
PSBMSG(1	VAL+5*
PSBMSG(2	VAL+5*
PSBMSG(3	VAL+5*
PSBOI	RPC~, RPC+25
PSBORDNM	RPC~
PSBPST	RPC~, RPC+28*, RPC+29
PSBRCRI	RPC~, RPC+24
PSBRPT	RPC+10~, RPC+14, XQ+1~, XQ+2, DQ~, DQ+2, DQ+3, SETUP+4, SETUP+5, SETUP+6 , SETUP+7, SETUP+9, SETUP+46, FILTERCO+2
PSBRPT(	SETUP+4, SETUP+9, SETUP+13, SETUP+15, SETUP+19, SETUP+27, SETUP+36, SETUP+37, SETUP+38, PRNEFF+2
PSBRPT(0	RPC+16, RPC+17, XQ+3, XQ+4, DQ+4, SETUP+12, SETUP+13
PSBRPT(2	SETUP+5*, SETUP+45
PSBRPT(3	SETUP+6*, SETUP+12
PSBRPT(4	SETUP+7, SETUP+8, SETUP+10, SETUP+11
PSBSAVE	XQ+1~, XQ+6, XQ+7
PSBSIFL	RPC~, RPC+54, RPC+55
PSBSIFLG	DQ+5!, SETUP+10*
>> PSBSIO	XQ+41, XQ+44, XQ+46
PSBSORT	RPC~, RPC+26, RPC+27, SETUP+1~, SETUP+15, SETUP+18, SETUP+26, SETUP+44
PSBST	VAL+1~, VAL+15*, VAL+18
PSBSTOP	RPC~, RPC+19, RPC+38, VAL+1~, VAL+16, VAL+17, VAL+18
PSBSTOP(0	RPC+19*, RPC+39
PSBSTRT	RPC~, RPC+18, RPC+36, VAL+1, VAL+11*, VAL+15, VAL+17
PSBSTRT(0	RPC+18*, RPC+37
PSBTR	RPC~, RPC+30*, RPC+32
PSBTYPE	RPC~, RPC+14, RPC+15, RPC+26, RPC+27, RPC+60, RPC+61, XQ~, XQ+2, XQ+4 , XQ+9
PSBWLOC	RPC~, RPC+34
>> PSBWRD	SETUP+27*, SETUP+28, SETUP+30
PSBWRDA	SETUP+1~, SETUP+28
PSBWRDA(	SETUP+30
PSBWRDA(""	SETUP+29
PSBWRDL	SETUP+1~, SETUP+30*, SETUP+31
PSBWSORT	RPC~, RPC+35
PSJINDX	BLDTMP+1~, BLDTMP+6*, BLDTMP+7
QQ	SETUP+1~, SETUP+30, FILTERCO+1~, FILTERCO+5, FILTERCO+6, FILTERCO+7, FILTERCO+11
RECS	SETUP+1~, SETUP+2, SETUP+18, SETUP+23, SETUP+41, SETUP+48, BLDTMP+8*
RESULTS	RPC~, RPC+9, RPC+62, RPC+66*
ROOT	CLIN+7~, CLIN+13, CLIN+14, CLIN+17, CLIN+18, QUERY~, QUERY+8
RPSTOPDT	QUERY~, QUERY+14
RPTAR	QUERY~
RPTAR(2	QUERY+15
RPTARR	CLIN~, CLIN+14, CLIN+18
RPTARR(	CLIN+9
STARTDT	CLIN+7~, CLIN+9, CLIN+10, CLIN+13, CLIN+17
STPDT	QUERY+2~, QUERY+9*, QUERY+14
U	RPC+16, RPC+22, RPC+23, RPC+24, XQ+3, XQ+16, XQ+31, XQ+34, XQ+50, DQ+3 , DQ+4, VAL+12, VAL+18, SETUP+9, SETUP+10, SETUP+11, SETUP+15, SETUP+19, SETUP+22, SETUP+27 , SETUP+30, SETUP+34, SETUP+36, SETUP+37, SETUP+38, PRNEFF+2, PRNEFF+3, FILTERCO+6, FILTERCO+7, CLIN+9 , BLDTMP+5
VA	SETUP+20~, BLDTMP+1~, BLDTMP+3!
VA("PID"	SETUP+21, SETUP+22, SETUP+33, SETUP+34, BLDTMP+4, BLDTMP+5
VADM	SETUP+20~, BLDTMP+1~, BLDTMP+3!
VADM(1	SETUP+21, SETUP+22, SETUP+33, SETUP+34, SETUP+36, SETUP+38, SETUP+39, BLDTMP+4, BLDTMP+5, BLDTMP+6
X	VAL+15, VAL+18, SETUP+4*, WRAP~, WRAP+9, WRAP+10
Y	XQ+18!, XQ+31, XQ+34, VAL+17, VAL+18, WRAP~, WRAP+11, WRAP+12, WRAP+13
Z	VAL+7, VAL+8, WRAP~, WRAP+8, WRAP+11, WRAP+12, WRAP+14, WRAP+15*
>> ZTDESC	XQ+51*
>> ZTDTH	XQ+50*
>> ZTIO	XQ+49*
>> ZTREQ	DQ+6*
>> ZTRTN	XQ+52*
>> ZTSK	XQ+54, DQ+3

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBO

Information

Source Information

Call Graph

Call Graph Total: 21

Caller Graph

Caller Graph Total: 35

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: