Routine: PSBOHDR

Package	Total	Call Graph
VA Fileman	2	NOW^%DTC D^DIQ
Barcode Medication Administration	1	ALLR^PSBALL
General Medical Record - Vitals	1	EN6^GMRVUTL
IHS Changes To Pharmacy	1	($$VITAL,$$VITCHT,$$VITCWT)^APSPFUNC
Nursing Service	1	WARD^NURSUT5
Registration	1	(DEM,IN5)^VADPT
Toolkit	1	$$GET^XPAR

Package

Total

Call Graph

VA Fileman

NOW^%DTC D^DIQ

Barcode Medication Administration

ALLR^PSBALL

General Medical Record - Vitals

EN6^GMRVUTL

IHS Changes To Pharmacy

($$VITAL,$$VITCHT,$$VITCWT)^APSPFUNC

Nursing Service

WARD^NURSUT5

Registration

(DEM,IN5)^VADPT

Toolkit

$$GET^XPAR

Package	Total	Caller Graph
Barcode Medication Administration	19	PSBOCE PSBOCI PSBOCM1 PSBOCP1 PSBODL PSBODL1 PSBODO PSBOIV PSBOMH PSBOMH2 PSBOML PSBOMM PSBOMT PSBOMT1 PSBOMV PSBOPE PSBOPF PSBOPM PSBOWA

Package

Total

Caller Graph

Barcode Medication Administration

PSBOCE  PSBOCI  PSBOCM1  PSBOCP1  PSBODL  PSBODL1  PSBODO  PSBOIV
PSBOMH  PSBOMH2  PSBOML  PSBOMM  PSBOMT  PSBOMT1  PSBOMV  PSBOPE
PSBOPF  PSBOPM  PSBOWA

Entry Points

Name	Comments	DBIA/ICR reference
WARD(PSBWP,PSBHDR,PSBCONT,PSBDT)	; ; WARD: Nurse Location File IEN ; PSBCONT: True if this is a continuation page ; PSBDT: Date of Pt Information (Default to DT)
PTFTR()	; [Extrinsic] Patient Page footer
PT(DFN,PSBHDR,PSBCONT,PSBDT)	; ; DFN: Patient File IEN ; PSBCONT: True if this is a continuation page ; PSBDT: Date of Pt Information (Default to DT)
PSBALG	;

External References

Name	Field # of Occurrence
NOW^%DTC	PT+45, WARD+6
$$VITAL^APSPFUNC	PT+26, PT+28
$$VITCHT^APSPFUNC	PT+27
$$VITCWT^APSPFUNC	PT+29
D^DIQ	PT+45, WARD+6
EN6^GMRVUTL	PT+31, PT+33
WARD^NURSUT5	WARD+15
ALLR^PSBALL	PT+36, PSBALG+4
DEM^VADPT	PT+10
IN5^VADPT	PT+10
$$GET^XPAR	PT+25, PT+55

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(13),$TR($J("",IOM)," ","=") Line Location: PT+47
Function Call: WRITE	Prompt: !,$G(PSBHDR(0)) Line Location: PT+48
Function Call: WRITE	Prompt: !,$G(PSBHDR(1)),?(IOM-$L(PSBHDR("DATE"))),PSBHDR("DATE") Line Location: PT+49
Function Call: WRITE	Prompt: !,$G(PSBHDR(2)),?(IOM-10),$J("Page: "_PSBHDR("PAGE"),10) Line Location: PT+51
Function Call: WRITE	Prompt: !,PSBHDR(X) Line Location: PT+52
Function Call: WRITE	Prompt: !?(IOM-35\2),"* CONTINUED FROM PREVIOUS PAGE *" Line Location: PT+53
Function Call: WRITE	Prompt: !!,"Patient:",?10,PSBHDR("NAME") Line Location: PT+54
Function Call: WRITE	Prompt: ?40,$$GET^XPAR("ALL","PSB PATIENT ID LABEL")_":",?51,PSBHDR("SSN") Line Location: PT+55
Function Call: WRITE	Prompt: ?75,"DOB:",?82,PSBHDR("DOB")," (",PSBHDR("AGE"),")" Line Location: PT+56
Function Call: WRITE	Prompt: ! Condition for execution: $X>12 Line Location: PT+62
Function Call: WRITE	Prompt: ?12,PSBHDR("REAC",X) Line Location: PT+62
Function Call: WRITE	Prompt: ! Condition for execution: $X>12 Line Location: PT+64
Function Call: WRITE	Prompt: ?12,PSBHDR("ALERGY",X) Line Location: PT+64
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","=") Line Location: PT+68
Function Call: WRITE	Prompt: $TR($J("",IOM)," ","="),!,$G(PSBHDR(0)),!,$G(PSBHDR(1)),?(IOM-$L(PSBHDR("DATE"))),PSBHDR("DATE") Line Location: WARD+10
Function Call: WRITE	Prompt: !,$G(PSBHDR(2)),?(IOM-10),$J("Page: "_PSBHDR("PAGE"),10) Line Location: WARD+12
Function Call: WRITE	Prompt: !,PSBHDR(X) Line Location: WARD+13
Function Call: WRITE	Prompt: !?(IOM-35\2),"* CONTINUED FROM PREVIOUS PAGE *" Line Location: WARD+14
Function Call: WRITE	Prompt: !!,"Ward Location: "_$P(PSBWRDA(PSBWP,.01),U,2) Line Location: WARD+16
Function Call: WRITE	Prompt: ?(IOM-$L(X)),X,!,$TR($J("",IOM)," ","=") Line Location: WARD+18
Function Call: WRITE	Prompt: ! Line Location: PTFTR+2
Function Call: WRITE	Prompt: !,$TR($J("",IOM)," ","=") Line Location: PTFTR+3
Function Call: WRITE	Prompt: !,PSBHDR("NAME"),?(IOM-11\2),PSBHDR("SSN"),?(IOM-$L(X)),X Line Location: PTFTR+5
Function Call: WRITE	Prompt: !!,X Line Location: PTFTR+6

Name	Line Occurrences
PSBALG	PT+43

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	PT+45, WARD+6
DFN	PT~, PT+26, PT+28, PT+36, PSBALG+4
DT	PT+6, WARD+5
DUZ("AG"	PT+25
GMRA	PT+44!
GMRAL	PT+44!
GMRALA	PSBALG+2!, PSBALG+4
GMRALA(	PSBALG+5, PSBALG+6, PSBALG+7
GMRVSTR	PT+31, PT+33, PT+44!
IOF	PT+4, WARD+8
IOM	PT+39, PT+47, PT+49, PT+51, PT+53, PT+68, WARD+10, WARD+12, WARD+14, WARD+18 , PSBALG+10, PTFTR+3, PTFTR+5
IOSL	PTFTR+2
PSBADRX	PT+36~
PSBADRX(	PT+37, PT+38, PT+40
PSBAL	PSBALG+2!
PSBAL(	PSBALG+7*, PSBALG+8
PSBARX	PT+44!
PSBCONT	PT~, PT+53, PT+57, WARD~, WARD+14
PSBDT	PT~, PT+6, WARD~, WARD+5
PSBHDR	PT~, WARD~
PSBHDR(	PT+52, WARD+13
PSBHDR("AGE"	PT+14*, PT+56
PSBHDR("ALERGY"	PT+64, PSBALG+10, PSBALG+12, PSBALG+13*
PSBHDR("DATE"	PT+45, PT+49, WARD+6, WARD+10
PSBHDR("DOB"	PT+13*, PT+56
PSBHDR("DX"	PT+20*, PT+59
PSBHDR("HEIGHT"	PT+27, PT+32, PT+58
PSBHDR("MVMTLAST"	PT+17*, PT+59
PSBHDR("MVMTTYPE"	PT+16*, PT+59
PSBHDR("NAME"	PT+8, PT+11*, PT+54, PTFTR+5
PSBHDR("PAGE"	PT+46, PT+50, PT+51, WARD+7, WARD+11, WARD+12
PSBHDR("REAC"	PT+39, PT+41, PT+42*, PT+62
PSBHDR("ROOM"	PT+19*, PT+58, PTFTR+4
PSBHDR("SEX"	PT+15*, PT+58
PSBHDR("SSN"	PT+12*, PT+55, PTFTR+5
PSBHDR("WARD"	PT+18*, PT+58, PTFTR+4
PSBHDR("WEIGHT"	PT+29, PT+34, PT+58
PSBHDR(0	PT+48, WARD+10
PSBHDR(1	PT+49, WARD+10
PSBHDR(2	PT+51, WARD+12
>> PSBLIST	PSBALG+3*
>> PSBUNK	PTFTR+6
PSBWP	WARD~, WARD+15, WARD+16, WARD+17
PSBWRDA	WARD+4~, WARD+15
PSBWRDA(	WARD+16, WARD+17
U	PT+13, PT+15, PT+16, PT+17, PT+18, PT+19, PT+26, PT+28, PT+32, PT+34 , PT+38, PT+40, WARD+16, WARD+17, PSBALG+6, PSBALG+7
VA	PT+21!
VA("PID"	PT+12
VADM	PT+21!
VADM(1	PT+11
VADM(3	PT+13
VADM(4	PT+14
VADM(5	PT+15
VAIP	PT+21!
VAIP("D"	PT+9*
VAIP(2	PT+16
VAIP(3	PT+17
VAIP(5	PT+18
VAIP(6	PT+19
VAIP(9	PT+20
>> X	PT+26, PT+27, PT+28, PT+29, PT+32, PT+34, PT+36, PT+37, PT+38, PT+40 , PT+52, PT+62, PT+64, WARD+13, WARD+17, WARD+18, PSBALG+5, PSBALG+6, PSBALG+7, PTFTR+4* , PTFTR+5, PTFTR+6*
>> XAB	PSBALG+8*, PSBALG+9, PSBALG+11
>> Y	PT+36, PT+39, PT+40, PT+41, PT+45, WARD+6*
>> YA	PSBALG+1, PSBALG+10, PSBALG+11*, PSBALG+12
>> Z	PT+38, PT+39, PSBALG+9, PSBALG+10

Customize PDF page

Package: Barcode Medication Administration

Routine: PSBOHDR

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 19

Entry Points

External References

Interaction Calls

Label References

Local Variables

Legend: