Routine: BDGCEN0

Package	Total	Call Graph
Kernel	2	($$FMTE,$$NOW)^XLFDT $$REPEAT^XLFSTR
IHS Changes To ADT	1	$$TIME^BDGF
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

Kernel

($$FMTE,$$NOW)^XLFDT $$REPEAT^XLFSTR

IHS Changes To ADT

$$TIME^BDGF

VA Fileman

$$GET1^DIQ

Package	Total	Caller Graph
IHS Changes To ADT	1	BDGCEN

Package

Total

Caller Graph

IHS Changes To ADT

BDGCEN

Name	Comments	DBIA/ICR reference
BENCHMRK()	;bed control movements divided by # remaining
HEAD	;EP; -- subrtn to print heading ; DGPAGE set by calling routine

Name	Field # of Occurrence
$$TIME^BDGF	HEAD+8
$$GET1^DIQ	HEAD+3, HEAD+4
$$FMTE^XLFDT	BDGCEN0+11, HEAD+9
$$NOW^XLFDT	HEAD+8
$$REPEAT^XLFSTR	HEAD+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO CENSUS DATA FOR THIS WARD FOR ",$$FMTE^XLFDT(DGDT,2),!! Line Location: BDGCEN0+11
Function Call: WRITE	Prompt: !,$E(DGDT,4,5)_"/"_$E(DGDT,6,7)_"/"_$E(DGDT,2,3) Line Location: BDGCEN0+14
Function Call: WRITE	Prompt: ?12,$P(DGSTR,U,3) Line Location: BDGCEN0+15
Function Call: WRITE	Prompt: ?22,$P(DGSTR,U,5) Line Location: BDGCEN0+16
Function Call: WRITE	Prompt: ?32,$P(DGSTR,U,6) Line Location: BDGCEN0+17
Function Call: WRITE	Prompt: ?42,$P(DGSTR,U,4) Line Location: BDGCEN0+18
Function Call: WRITE	Prompt: ?51,$P(DGSTR,U,7) Line Location: BDGCEN0+19
Function Call: WRITE	Prompt: ?61,$P(DGSTR,U,2) Line Location: BDGCEN0+20
Function Call: WRITE	Prompt: ?71,$J($$BENCHMRK,3,0) Line Location: BDGCEN0+21
Function Call: WRITE	Prompt: !?60,"Average:",?71,$J($S(DGTOT=0:0,1:DGTOT/DGCNT),3,0) Line Location: BDGCEN0+24
Function Call: WRITE	Prompt: !,DGDUZ,?80-$L(DGSITE)/2,DGSITE Line Location: HEAD+7
Function Call: WRITE	Prompt: !,$$TIME^BDGF($$NOW^XLFDT) Line Location: HEAD+8
Function Call: WRITE	Prompt: ?28,"ADT WARD CENSUS DATA FOR" Line Location: HEAD+8
Function Call: WRITE	Prompt: !,$$FMTE^XLFDT(DT),?80-$L(DGTL)/2,DGTL,?70,"Page: ",DGPAGE Line Location: HEAD+9
Function Call: WRITE	Prompt: !,DGLIN Line Location: HEAD+10
Function Call: WRITE	Prompt: !,"Date",?10,"Admits",?19,"Trans In",?29,"Trans Out" Line Location: HEAD+11
Function Call: WRITE	Prompt: ?40,"Disch",?49,"Deaths",?57,"Remaining",?69,"Unit Score" Line Location: HEAD+12
Function Call: WRITE	Prompt: !,DGLIN,! Line Location: HEAD+13

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ
^DIC(4 - [#4]	GET1^DIQ
^DIC(42 - [#42]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^BDGCWD - [#9009016.2]	BDGCEN0+8, BDGCEN0+10, BDGCEN0+13

Name	Line Occurrences
$$BENCHMRK	BDGCEN0+21, BDGCEN0+22

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BDGBD	BDGCEN0+7
>> BDGED	BDGCEN0+8
>> BDGWD	BDGCEN0+8, BDGCEN0+10, BDGCEN0+13, HEAD+4
DGCNT	BDGCEN0+3~, BDGCEN0+4, BDGCEN0+22, BDGCEN0+24
DGDT	BDGCEN0+3~, BDGCEN0+7, BDGCEN0+8, BDGCEN0+10, BDGCEN0+11, BDGCEN0+13, BDGCEN0+14
DGDUZ	HEAD+2~, HEAD+3*, HEAD+7
DGLIN	HEAD+2~, HEAD+4*, HEAD+10, HEAD+13
>> DGPAGE	HEAD+6*, HEAD+9
DGSITE	HEAD+2~, HEAD+3*, HEAD+7
DGSTR	BDGCEN0+3~, BDGCEN0+13*, BDGCEN0+15, BDGCEN0+16, BDGCEN0+17, BDGCEN0+18, BDGCEN0+19, BDGCEN0+20, BENCHMRK+2, BENCHMRK+3
DGTL	HEAD+2~, HEAD+4*, HEAD+9
DGTOT	BDGCEN0+3~, BDGCEN0+4, BDGCEN0+22, BDGCEN0+24
DT	HEAD+9
DUZ	HEAD+3
DUZ(2	HEAD+3
I	BENCHMRK+1~, BENCHMRK+2*
IOF	HEAD+6
U	BDGCEN0+15, BDGCEN0+16, BDGCEN0+17, BDGCEN0+18, BDGCEN0+19, BDGCEN0+20, BENCHMRK+2, BENCHMRK+3
X	BENCHMRK+1~, BENCHMRK+2*, BENCHMRK+4
Y	BENCHMRK+1~, BENCHMRK+3*, BENCHMRK+4

Customize PDF page

Package: IHS Changes To ADT

Routine: BDGCEN0

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: