Routine: BDGLOC1

Package	Total	Call Graph
IHS Changes To ADT	2	$$LASTPRV^BDGF1 $$HRCN^BDGF2
Kernel	2	^%ZISC $$FMTE^XLFDT
IHS Patient	1	KILL^AUPNPAT
VA Fileman	1	$$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
EN	;EP; entry point from queuing

External References

Name	Field # of Occurrence
^%ZISC	EN+38
KILL^AUPNPAT	EN+39
$$LASTPRV^BDGF1	EN+35
$$HRCN^BDGF2	EN+7
$$GET1^DIQ	EN+6, EN+8, EN+9, EN+10, EN+11, EN+14, EN+16, EN+17, EN+18, EN+22 , EN+23, EN+24, EN+25, EN+26, EN+30
$$FMTE^XLFDT	EN+30

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!!?8,"*Confidential Patient Data*",! Line Location: EN+5
Function Call: WRITE	Prompt: ?5,$E($$GET1^DIQ(2,DFN,.01),1,25) Line Location: EN+6
Function Call: WRITE	Prompt: ?29,"Chart #: ",$$HRCN^BDGF2(DFN,DUZ(2)) Line Location: EN+7
Function Call: WRITE	Prompt: !?5,"Age: ",$$GET1^DIQ(9000001,DFN,1102.98) Line Location: EN+8
Function Call: WRITE	Prompt: ?23,"Date of Birth: ",$$GET1^DIQ(2,DFN,.03) Line Location: EN+9
Function Call: WRITE	Prompt: !?5,"Sex: ",$$GET1^DIQ(2,DFN,.02,"I") Line Location: EN+10
Function Call: WRITE	Prompt: ?28,"Religion: ",$$GET1^DIQ(2,DFN,.08) Line Location: EN+11
Function Call: WRITE	Prompt: !!?5,"Patient's Address: ",! Line Location: EN+15
Function Call: WRITE	Prompt: ?5,$$GET1^DIQ(2,DFN,.111)," ",$$GET1^DIQ(2,DFN,.114) Line Location: EN+16
Function Call: WRITE	Prompt: ", ",$$GET1^DIQ(5,+$$GET1^DIQ(2,DFN,.115,"I"),1) Line Location: EN+17
Function Call: WRITE	Prompt: " ",$$GET1^DIQ(2,DFN,.116) Line Location: EN+18
Function Call: WRITE	Prompt: !!?5,"Next of Kin:" Line Location: EN+21
Function Call: WRITE	Prompt: !?5,$$GET1^DIQ(2,DFN,.211),?37,$$GET1^DIQ(2,DFN,.212) Line Location: EN+22
Function Call: WRITE	Prompt: !?5,$$GET1^DIQ(2,DFN,.213)," ",$$GET1^DIQ(2,DFN,.216) Line Location: EN+23
Function Call: WRITE	Prompt: $$GET1^DIQ(2,DFN,.217) Line Location: EN+24
Function Call: WRITE	Prompt: " ",$$GET1^DIQ(5,+$$GET1^DIQ(2,DFN,.218,"I"),1) Line Location: EN+25
Function Call: WRITE	Prompt: !?5,"Phone: ",X Line Location: EN+26
Function Call: WRITE	Prompt: !!?5,"Admission Date: " Line Location: EN+29
Function Call: WRITE	Prompt: ?20,$$FMTE^XLFDT(+$$GET1^DIQ(405,BDGN,.01,"I"),"P") Line Location: EN+30
Function Call: WRITE	Prompt: !?8,"Ward/Room-Bed: ",$G(^DPT(DFN,.1))," / ",$G(^DPT(DFN,.101)) Line Location: EN+32
Function Call: WRITE	Prompt: !,?5,"Attending Provider: " Line Location: EN+34
Function Call: WRITE	Prompt: ?25,$$LASTPRV^BDGF1(BDGN,DFN) Line Location: EN+35

FileNo	Call Tags
^DPT - [#2]	GET1^DIQ
^DGPM - [#405]	GET1^DIQ
^DIC(5 - [#5]	GET1^DIQ
^AUPNPAT - [#9000001]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^DGPM - [#405]	EN+2
^DPT - [#2]	EN+31, EN+32

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Customize PDF page

Package: IHS Changes To ADT

Routine: BDGLOC1

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Local Variables

Legend:

Name	Field # of Occurrence
BDGN	EN+1, EN+2*, EN+30, EN+31, EN+35, EN+38!
DFN	EN+1, EN+6, EN+7, EN+8, EN+9, EN+10, EN+11, EN+14, EN+16, EN+17 , EN+18, EN+22, EN+23, EN+24, EN+25, EN+26, EN+31, EN+32, EN+35, EN+38!
DUZ(2	EN+7
IO	EN+5
U	EN+2
>> X	EN+14, EN+26