Routine: BDGCEN1

Call Graph Total: 12

Package	Total	Call Graph
Kernel	5	(,HOME)^%ZIS ^%ZISC $$FMTE^XLFDT $$REPEAT^XLFSTR DISP^XQORM1
Registration	3	EN^VALM TERM^VALM0 CLEAR^VALM1
IHS Changes To ADT	2	HEAD^BDGCEN10 ($$BROWSE,$$READ,MSG,ZIS)^BDGF
IHS VA Utilities	1	GUIR^XBLM
VA Fileman	1	$$GET1^DIQ

Package

Total

Call Graph

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

EN^VALM TERM^VALM0 CLEAR^VALM1

HEAD^BDGCEN10 ($$BROWSE,$$READ,MSG,ZIS)^BDGF

GUIR^XBLM

$$GET1^DIQ

Name	Comments	DBIA/ICR reference
EN	;EP; -- main entry point for BDG CENSUS AID2
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
AGE	;EP; help for Adult vs. Peds question
EXPND	; -- expand code
INIT	; -- init variables and list array
EXIT	; -- exit code
PRINT	; print report to paper
HELP	; -- help code

Name	Field # of Occurrence
^%ZIS	PRINT+3
HOME^%ZIS	BDGCEN1+15
^%ZISC	PRINT+10
HEAD^BDGCEN10	PRINT+4, PRINT+7
$$BROWSE^BDGF	BDGCEN1+13
$$READ^BDGF	BDGCEN1+4, BDGCEN1+5, BDGCEN1+7, BDGCEN1+8, BDGCEN1+10, BDGCEN1+11
MSG^BDGF	AGE+1, AGE+2
ZIS^BDGF	BDGCEN1+14
$$GET1^DIQ	HDR+4, HDR+5
EN^VALM	EN+8
TERM^VALM0	EN+7
CLEAR^VALM1	EN+7, EN+9
GUIR^XBLM	INIT+4
$$FMTE^XLFDT	HDR+2
$$REPEAT^XLFSTR	PAD+2
DISP^XQORM1	HELP+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,^TMP("BDGCEN1",$J,X,0) Line Location: PRINT+8
Routine Call	VALM Line Location: EN+8
Routine Call	%ZIS Line Location: BDGCEN1+15
Routine Call	%ZIS Line Location: PRINT+3

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

Name	Line Occurrences (* Changed, ! Killed)
^TMP("BDGCEN1"	INIT+2!, INIT+8*, EXIT+1!, PRINT+6, PRINT+8
^TMP("BDGCEN10"	INIT+2!, INIT+6, INIT+8, INIT+9!

Name	Field # of Occurrence
BDGAGE	BDGCEN1+3~, BDGCEN1+6, BDGCEN1+8*, HDR+6
BDGBD	BDGCEN1+3~, BDGCEN1+10*, HDR+2
BDGED	BDGCEN1+3~, BDGCEN1+11*, HDR+2
BDGION	EN+3~, EN+6*, PRINT+3
BDGTX	BDGCEN1+3~, BDGCEN1+5, BDGCEN1+6, BDGCEN1+7, HDR+5, INIT+3
BDGWD	BDGCEN1+3~, BDGCEN1+4*, HDR+4
D	PAD~, PAD+2
DGPAGE	PRINT+1~, PRINT+4*
IO	PRINT+4
ION	EN+6
>> IOP	PRINT+3*
IOSL	PRINT+7
IOST	EN+6
L	PAD~, PAD+2
N	SP~, SP+1
RTN	INIT+1~, INIT+3*, INIT+4
U	BDGCEN1+5, BDGCEN1+6
VALMCNT	EN+3~, INIT+5, INIT+7, INIT+8
>> VALMHDR(1	HDR+3*
>> VALMHDR(2	HDR+7*
X	HDR+1~, HDR+2, HDR+3, HDR+4, HDR+7, INIT+1~, INIT+5, INIT+6, INIT+8, HELP+1 , PRINT+1~, PRINT+6*, PRINT+8
Y	HDR+1~, HDR+5*, HDR+7
Z	HDR+1~, HDR+6*, HDR+7

Information