Routine: BUDCRP61

Package	Total	Call Graph
IHS Uniform Data System	3	EN1^BUDCRP6B GENI^BUDCRP6I $$LOC^BUDCRP6S
IHS Patient	1	($$AGE,$$HRN)^AUPNPAT
IHS VA Utilities	1	EN^XBVK
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	^DIR

Package	Total	Caller Graph
IHS Uniform Data System	2	BUDCRP6B BUDCRP6I

Entry Points

Name	Comments	DBIA/ICR reference
DS2H	;
S(V)	;
PAUSE	;
DS1HD	;
DS1H	;
DS1L1	;
GENI	;EP
DS1L	;EP
DS2HD	;
DS1	;EP
DS1H1	;
CTR(X,Y)	;
DS2	;EP
EOJ	;
DS2L1	;
DS2L	;EP
DS2H1	;
DSLIST2	;EP
DSLIST1	;EP

External References

Name	Field # of Occurrence
$$AGE^AUPNPAT	DS1L1+11, DS2L1+11
$$HRN^AUPNPAT	DS1L1+7, DS1L1+11, DS2L1+7, DS2L1+11
EN1^BUDCRP6B	DSLIST1+4, DSLIST2+4
GENI^BUDCRP6I	GENI+1
$$LOC^BUDCRP6S	DS1+2, DS2+2
^DIR	DS1H+3, DS2H+3, PAUSE+1
EN^XBVK	EOJ+1
$$FMTE^XLFDT	DS1HD+3, DS1HD+8, DS1H1+3, DS1H1+7, DS2HD+3, DS2HD+8, DS2H1+3, DS2H1+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$$CTR($$LOC^BUDCRP6S,80) Line Location: DS1+2
Function Call: WRITE	Prompt: !,$$CTR("UDS 2015",80) Line Location: DS1+3
Function Call: WRITE	Prompt: !!,"All Patients 6-9 w/first Molar Sealant (Table 6B)",! Line Location: DS1+4
Function Call: WRITE	Prompt: !!,"This report provides a list of all patients 6-9 years who had an oral " Line Location: DS1+7
Function Call: WRITE	Prompt: !,"assessment, were determined to be at moderate or high risk for caries" Line Location: DS1+8
Function Call: WRITE	Prompt: !,"and had a sealant placed on a first molar during the reporing period." Line Location: DS1+9
Function Call: WRITE	Prompt: ! Line Location: DS1+10
Function Call: WRITE	Prompt: !,"TOTAL PATIENTS WITH SEALANT: ",BUDTOT,! Line Location: DS1L+6
Function Call: WRITE	Prompt: !,$E($P(^DPT(DFN,0),U,1),1,25),?29,$S($$HRN^AUPNPAT(DFN,BUDSITE)]"":$$HRN^AUPNPAT(DFN,BUDSITE,2),1:$$HRN^AUPNPAT(DFN,DUZ(2),2)),?41,$E(BUDCOM,1,25),?70,$P(^DPT(DFN,0),U,2),?75,BUDAGE,! Line Location: DS1L1+7
Function Call: WRITE	Prompt: ?35,"Sealant: ",BUDALL Line Location: DS1L1+10
Function Call: WRITE	Prompt: ! Line Location: DS1H+3
Function Call: WRITE	Prompt: !,"*** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT ***" Line Location: DS1H1+2
Function Call: WRITE	Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,! Line Location: DS1H1+3
Function Call: WRITE	Prompt: !,$$CTR("* RPMS Uniform Data System (UDS) *",80) Line Location: DS1H1+4
Function Call: WRITE	Prompt: !,$$CTR("Patient List for Table 6B, Section M,",80),!,$$CTR("Patients Screened for DSression and Followed Up if Appropriate",80),! Line Location: DS1H1+5
Function Call: WRITE	Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),! Line Location: DS1H1+6
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: DS1H1+7
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: DS1H1+8
Function Call: WRITE	Prompt: $TR($J("",80)," ","-") Line Location: DS1H1+9
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?34,"HRN",?41,"COMMUNITY",?70,"SEX",?75,"AGE" Line Location: DS1H1+15
Function Call: WRITE	Prompt: !?5,"SEALANT DATE" Line Location: DS1H1+16
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-"),! Line Location: DS1H1+17
Function Call: WRITE	Prompt: !,$$CTR($$LOC^BUDCRP6S,80) Line Location: DS2+2
Function Call: WRITE	Prompt: !,$$CTR("UDS 2015",80) Line Location: DS2+3
Function Call: WRITE	Prompt: !!,"All Patients 6-9 years of age at risk w/o sealant on first molar (Table 6B)",! Line Location: DS2+4
Function Call: WRITE	Prompt: !!,"This report provides a list of all patients 6-9 years who had an oral " Line Location: DS2+7
Function Call: WRITE	Prompt: !,"assessment, were determined to be at moderate or high risk for caries" Line Location: DS2+8
Function Call: WRITE	Prompt: !,"and did not have a sealant placed on a first molar during the reporing period." Line Location: DS2+9
Function Call: WRITE	Prompt: ! Line Location: DS2+10
Function Call: WRITE	Prompt: !,"TOTAL PATIENTS AT RISK W/O SEALANT: ",BUDTOT,! Line Location: DS2L+6
Function Call: WRITE	Prompt: !,$E($P(^DPT(DFN,0),U,1),1,25),?29,$S($$HRN^AUPNPAT(DFN,BUDSITE)]"":$$HRN^AUPNPAT(DFN,BUDSITE,2),1:$$HRN^AUPNPAT(DFN,DUZ(2),2)),?41,$E(BUDCOM,1,25),?70,$P(^DPT(DFN,0),U,2),?75,BUDAGE,! Line Location: DS2L1+7
Function Call: WRITE	Prompt: ?35,"Follow-up: " Line Location: DS2L1+10
Function Call: WRITE	Prompt: $P(BUD2,U,2),": ",$$FMTE^XLFDT($P(BUD2,U,1),5) Line Location: DS2L1+10
Function Call: WRITE	Prompt: ! Line Location: DS2H+3
Function Call: WRITE	Prompt: !,"*** CONFIDENTIAL PATIENT INFORMATION, COVERED BY THE PRIVACY ACT ***" Line Location: DS2H1+2
Function Call: WRITE	Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BUDGPG,! Line Location: DS2H1+3
Function Call: WRITE	Prompt: !,$$CTR("* RPMS Uniform Data System (UDS) *",80) Line Location: DS2H1+4
Function Call: WRITE	Prompt: !,$$CTR("Patient List for Table 6B, Section N,",80),!,$$CTR("Patients 6-9 at Risk without dental sealant on first molar",80),! Line Location: DS2H1+5
Function Call: WRITE	Prompt: $$CTR($P(^DIC(4,BUDSITE,0),U),80),! Line Location: DS2H1+6
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: DS2H1+7
Function Call: WRITE	Prompt: $$CTR(X,80),! Line Location: DS2H1+8
Function Call: WRITE	Prompt: $TR($J("",80)," ","-") Line Location: DS2H1+9
Function Call: WRITE	Prompt: !!,"PATIENT NAME",?34,"HRN",?41,"COMMUNITY",?70,"SEX",?75,"AGE" Line Location: DS2H1+15
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-"),! Line Location: DS2H1+16
Routine Call	DIR Line Location: DS1H+3 DS2H+3 PAUSE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	DS1HD+7, DS1H1+6, DS2HD+7, DS2H1+6
^DPT - [#2]	DS1L1+7, DS1L1+11, DS2L1+7, DS2L1+11
^TMP($J	S+2*
^VA(200 - [#200]	DS1HD+3, DS1H1+3, DS2HD+3, DS2H1+3
^XTMP("BUDCRP6B"	DS1L+3, DS1L1+2, DS1L1+3, DS1L1+4, DS1L1+5, DS1L1+9, DS2L+3, DS2L1+2, DS2L1+3, DS2L1+4 , DS2L1+5, DS2L1+9

Label References

Name	Line Occurrences
$$CTR	DS1+2, DS1+3, DS1H1+4, DS1H1+5, DS1H1+6, DS1H1+7, DS1H1+8, DS2+2, DS2+3, DS2H1+4 , DS2H1+5, DS2H1+6, DS2H1+7, DS2H1+8
DS1	DSLIST1+3
DS1H	DS1L+2, DS1L+5, DS1L1+1, DS1L1+6
DS1H1	DS1H+2
DS1HD	DS1H+1
DS1L1	DS1L+4
DS2	DSLIST2+3
DS2H	DS2L+2, DS2L+5, DS2L1+1, DS2L1+6
DS2H1	DS2H+2
DS2HD	DS2H+1
DS2L1	DS2L+4
EOJ	DSLIST1+1, DSLIST2+1
GENI	DS1+5, DS2+5
PAUSE	DS1+6, DS2+6
S	DS1L+3, DS1L+7, DS1L1+12, DS1HD+1, DS1HD+2, DS1HD+3, DS1HD+4, DS1HD+5, DS1HD+6, DS1HD+7 , DS1HD+8, DS1HD+9, DS1HD+10, DS1HD+11, DS1HD+12, DS1HD+13, DS1HD+14, DS1HD+15, DS2L+3, DS2L+7 , DS2L1+13, DS2HD+1, DS2HD+2, DS2HD+3, DS2HD+4, DS2HD+5, DS2HD+6, DS2HD+7, DS2HD+8, DS2HD+9 , DS2HD+10, DS2HD+11, DS2HD+12, DS2HD+13, DS2HD+14, DS2HD+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> BUDAGE	DS1L1+2, DS1L1+3, DS1L1+4, DS1L1+5, DS1L1+7, DS1L1+9, DS2L1+2, DS2L1+3, DS2L1+4, DS2L1+5 , DS2L1+7, DS2L1+9
>> BUDALL	DS1L1+9, DS1L1+10, DS1L1+12, DS2L1+9
>> BUDBD	DS1HD+8, DS1H1+7, DS2HD+8, DS2H1+7
>> BUDCAD	DS1L1+11, DS2L1+11
>> BUDCEN	DS1HD+9, DS1H1+8, DS2HD+9, DS2H1+8
>> BUDCOM	DS1L1+4, DS1L1+5, DS1L1+7, DS1L1+9, DS1L1+11, DS2L1+4, DS2L1+5, DS2L1+7, DS2L1+9, DS2L1+11
>> BUDDECNT	S+1*, S+2
>> BUDDS1L	DSLIST1+2*
>> BUDDS2L	DSLIST2+2*
>> BUDED	DS1HD+8, DS1H1+7, DS2HD+8, DS2H1+7
>> BUDGPG	DS1H+2, DS1H1+1, DS1H1+3, DS2H+2, DS2H1+1, DS2H1+3
>> BUDH	DS1L+3, DS1L1+2, DS1L1+3, DS1L1+4, DS1L1+5, DS1L1+9, DS2L+3, DS2L1+2, DS2L1+3, DS2L1+4 , DS2L1+5, DS2L1+9
>> BUDJ	DS1L+3, DS1L1+2, DS1L1+3, DS1L1+4, DS1L1+5, DS1L1+9, DS2L+3, DS2L1+2, DS2L1+3, DS2L1+4 , DS2L1+5, DS2L1+9
>> BUDNAME	DS1L1+3, DS1L1+4, DS1L1+5, DS1L1+9, DS2L1+3, DS2L1+4, DS2L1+5, DS2L1+9
>> BUDP	DS1L+1, DS1H1+10, DS1H1+18, DS2L+1, DS2H1+10, DS2H1+17
>> BUDQUIT	DS1L+1, DS1L+2, DS1L+5, DS1L1+1, DS1L1+2, DS1L1+3, DS1L1+4, DS1L1+5, DS1L1+6, DS1H+3 , DS2L+1, DS2L+2, DS2L+5, DS2L1+1, DS2L1+2, DS2L1+3, DS2L1+4, DS2L1+5, DS2L1+6, DS2H+3
>> BUDROT	DS1L+3, DS1L+5, DS1L+6, DS1L+7, DS1L1+1, DS1L1+6, DS1L1+7, DS1L1+10, DS1L1+11, DS1H+1 , DS2L+3, DS2L+5, DS2L+6, DS2L+7, DS2L1+1, DS2L1+6, DS2L1+7, DS2L1+11, DS2H+1
>> BUDSITE	DS1L1+7, DS1L1+11, DS1HD+7, DS1H1+6, DS2L1+7, DS2L1+11, DS2HD+7, DS2H1+6
>> BUDTOT	DS1L+1, DS1L+6, DS1L+7, DS1L1+8, DS2L+1, DS2L+6, DS2L+7, DS2L1+8
DA	PAUSE+1!
>> DFN	DS1L1+5, DS1L1+7, DS1L1+9, DS1L1+11, DS2L1+5, DS2L1+7, DS2L1+9, DS2L1+11
DIR	DS1H+3!, DS2H+3!, PAUSE+1!
DIR("A"	PAUSE+1*
DIR(0	DS1H+3, DS2H+3, PAUSE+1*
DT	DS1HD+3, DS1H1+3, DS2HD+3, DS2H1+3
>> DTOUT	DS1H+3, DS2H+3
DUZ	DS1HD+3, DS1H1+3, DS2HD+3, DS2H1+3
DUZ(2	DS1L1+7, DS1L1+11, DS2L1+7, DS2L1+11
IO	DS1H+3, DS2H+3
IO(0	DS1H+3, DS2H+3
IOF	DS1+1, DS1H1+1, DS2+1, DS2H1+1
IOM	CTR+1
IOSL	DS1L+5, DS1L1+1, DS1L1+6, DS2L+5, DS2L1+1, DS2L1+6
IOST	DS1H+3, DS2H+3
U	DS1L1+7, DS1L1+11, DS1L1+12, DS1HD+3, DS1HD+7, DS1H1+3, DS1H1+6, DS2L1+7, DS2L1+11, DS2HD+3 , DS2HD+7, DS2H1+3, DS2H1+6
V	S~, S+2
X	DS1L1+11, DS1L1+12, DS1HD+8, DS1HD+9, DS1H1+7, DS1H1+8, DS2L1+11, DS2L1+13, DS2HD+8, DS2HD+9* , DS2H1+7, DS2H1+8, CTR~, CTR+1
Y	DS1H+3, DS2H+3, CTR~, CTR+1
>> ZTQUEUED	DS1H+3, DS2H+3

Customize PDF page

Package: IHS Uniform Data System

Routine: BUDCRP61

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: