Routine: BDGCEN3

Call Graph Total: 13

Package	Total	Call Graph
Kernel	5	HOME^%ZIS ^%ZISC ($$FMTE,$$NOW)^XLFDT $$REPEAT^XLFSTR DISP^XQORM1
IHS Changes To ADT	4	^BDGCEN30 (,SET)^BDGCEN31 ^BDGCEN32 ($$BROWSE,$$CONF,$$READ,INIT,MSG,PRTKL,ZIS)^BDGF
Registration	3	EN^VALM TERM^VALM0 CLEAR^VALM1
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

HOME^%ZIS ^%ZISC ($$FMTE,$$NOW)^XLFDT $$REPEAT^XLFSTR DISP^XQORM1

^BDGCEN30 (,SET)^BDGCEN31 ^BDGCEN32 ($$BROWSE,$$CONF,$$READ,INIT,MSG,PRTKL,ZIS)^BDGF

EN^VALM TERM^VALM0 CLEAR^VALM1

$$GET1^DIQ

Name	Comments	DBIA/ICR reference
EN	;EP; -- main entry point for BDG CENSUS AID4
HDR	; -- header code
PAD(D,L)	;EP -- SUBRTN to pad length of data ; -- D=data L=length
SP(N)	; -- SUBRTN to pad N number of spaces
EXPND	; -- expand code
HDG	; heading when printing to paper
INIT	; -- init variables and list array
EXIT	; -- exit code
PRINT	; print report to paper
HELP	; -- help code

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,^TMP("BDGCEN3",$J,BDGLN,0) Line Location: PRINT+8
Function Call: WRITE	Prompt: @IOF Line Location: HDG+1
Function Call: WRITE	Prompt: !,BDGUSR,?13,"*",$$CONF^BDGF,"*" Line Location: HDG+2
Function Call: WRITE	Prompt: !,BDGDATE,?30,"Ward Census Listing",?71,"Page: ",BDGPG Line Location: HDG+3
Function Call: WRITE	Prompt: !,BDGTIME,?(80-$L(X)\2),X Line Location: HDG+5
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("-",80) Line Location: HDG+9
Function Call: WRITE	Prompt: !?3," Time",?22,"Patient Name",?55,"Chart #" Line Location: HDG+10
Function Call: WRITE	Prompt: !,$$REPEAT^XLFSTR("=",80) Line Location: HDG+11
Routine Call	VALM Line Location: EN+4
Routine Call	%ZIS Line Location: BDGCEN3+15

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

Name	Line Occurrences (* Changed, ! Killed)
^TMP("BDGCEN3"	INIT+2!, INIT+7, EXIT+1!, PRINT+4, PRINT+5, PRINT+6, PRINT+8
^TMP("BDGCEN31"	INIT+2!

Name	Field # of Occurrence
BDGBD	BDGCEN3+3~, BDGCEN3+10*, BDGCEN3+11, HDR+3, EXIT+1!, HDG+4
>> BDGDATE	HDG+3
BDGED	BDGCEN3+3~, BDGCEN3+11*, HDR+3, EXIT+1!, HDG+4
BDGLN	PRINT+1~, PRINT+4*, PRINT+5, PRINT+6, PRINT+8
BDGNB	EXIT+1!
BDGPG	PRINT+1~, HDG+1*, HDG+3
BDGPRT	EN+1~, EN+2*, INIT+1
BDGSUB	EXIT+1!
BDGSUM	PRINT+1~, PRINT+5*, HDG+8
>> BDGTIME	HDG+5
>> BDGUSR	HDG+2
BDGWD	BDGCEN3+3~, BDGCEN3+5, BDGCEN3+6, BDGCEN3+8, HDR+5, INIT+5, EXIT+1!
D	PAD~, PAD+2
IO	PRINT+2
IOF	HDG+1
IOSL	PRINT+7
IOST	EN+2
L	PAD~, PAD+2
N	SP~, SP+1
U	BDGCEN3+4
VALMCNT	EN+1~, INIT+3*, INIT+7
>> VALMHDR(1	HDR+2*
>> VALMHDR(2	HDR+4*
>> VALMHDR(3	HDR+6*
X	BDGCEN3+3~, BDGCEN3+7, BDGCEN3+8, HDR+1~, HDR+3, HDR+4, HDR+5, HDR+6, HELP+1, HDG+4~* , HDG+5
Y	BDGCEN3+3~, BDGCEN3+4*, BDGCEN3+5

Information