Routine: APCLHH1

Package	Total	Call Graph
IHS VA Utilities	4	^XBDBQUE $$VAL^XBDIQ1 ^XBFMK EN^XBVK
VA Fileman	3	COMMA^%DTC ^DIC ^DIR
IHS Patient	1	(,$$BEN,$$HRN)^AUPNPAT
Kernel	1	($$FMADD,$$FMTE)^XLFDT
PCC Medical Query	1	PEP^AMQQGTX0
Patient Care Component Reports	1	($$DEMO,DEMOCHK)^APCLUTL

Package

Total

Call Graph

IHS VA Utilities

^XBDBQUE $$VAL^XBDIQ1 ^XBFMK EN^XBVK

VA Fileman

COMMA^%DTC ^DIC ^DIR

IHS Patient

(,$$BEN,$$HRN)^AUPNPAT

Kernel

($$FMADD,$$FMTE)^XLFDT

PCC Medical Query

PEP^AMQQGTX0

Patient Care Component Reports

($$DEMO,DEMOCHK)^APCLUTL

Entry Points

Name	Comments	DBIA/ICR reference
BEN	;
RSORT	;
DEMO	;
CMMNTS	;
USR()	;EP - Return name of current user from ^VA(200.
DONE	;
D(D)	;
PRINT	;EP - called from xbdbque
SORTR	;
LOC()	;EP - Return location name from file 4 based on DUZ(2).
PSORT	;
CTR(X,Y)	;EP - Center X in a field Y wide.
TSORT	;
INTROT	;
EOJ	;
ZIS	;
HEADER	;EP
C(X,X2,X3)	;
HSORT	;
EP	;EP - called from option interactive
TRIBE	;
CSORT	;
NSORT	;
SORT(P,S)	;
HEADER1	;
ISORT	;
PROC	;

External References

Name	Field # of Occurrence
COMMA^%DTC	C+1
PEP^AMQQGTX0	TRIBE+11, CMMNTS+11
$$DEMO^APCLUTL	PROC+7
DEMOCHK^APCLUTL	DEMO+1
^AUPNPAT	PRINT+5
$$BEN^AUPNPAT	PROC+10, PROC+11, PRINT+7
$$HRN^AUPNPAT	PRINT+7, HSORT+1, RSORT+1
^DIC	TRIBE+7, TRIBE+10, CMMNTS+7, CMMNTS+10
^DIR	TRIBE+2, CMMNTS+2, BEN+3, SORTR+2, DONE+1, HEADER+2
^XBDBQUE	DEMO+4
$$VAL^XBDIQ1	PRINT+7, PRINT+8, ISORT+1, NSORT+1, CSORT+1, TSORT+1, PSORT+1
^XBFMK	EOJ+1
EN^XBVK	EOJ+3
$$FMADD^XLFDT	PROC+2
$$FMTE^XLFDT	HEADER1+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,APCLT Line Location: EP+3
Function Call: WRITE	Prompt: !!,"Patients from all tribes will be included in the report.",! Line Location: TRIBE+5
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: TRIBE+10
Function Call: WRITE	Prompt: !!,"Patients from all communities will be included in the report.",! Line Location: CMMNTS+5
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: CMMNTS+10
Function Call: WRITE	Prompt: ! Line Location: HEADER+2
Function Call: WRITE	Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",APCLPG,! Line Location: HEADER1+2
Function Call: WRITE	Prompt: $$CTR($P(^DIC(4,DUZ(2),0),U),80),! Line Location: HEADER1+3
Function Call: WRITE	Prompt: !,$$CTR("HOUSEHOLD INCOME/NUMBER IN HOUSEHOLD TALLY",80) Line Location: HEADER1+4
Function Call: WRITE	Prompt: !!,"Patient Name",?22,"HRN",?29,"BENI",?34,"COMMUNITY",?44,"ZIP",?50,"TRIBE",?61,"# IN",?69,"TOTAL" Line Location: HEADER1+14
Function Call: WRITE	Prompt: !?29,"FICI",?61,"HOUSE",?69,"HOUSEHOLD",!?29,"ARY",?61,"HOLD",?69,"INCOME" Line Location: HEADER1+15
Function Call: WRITE	Prompt: !,$TR($J("",80)," ","-") Line Location: HEADER1+16
Routine Call	DIC Line Location: TRIBE+7 TRIBE+10 CMMNTS+7 CMMNTS+10
Routine Call	DIR Line Location: TRIBE+2 CMMNTS+2 BEN+3 SORTR+2 DONE+1 HEADER+2

FileNo	Call Tags
^AMQQ(5 - [#9009075]	Classic Fileman Calls
^AUTTTRI - [#9999999.03]	Classic Fileman Calls
^AUTTCOM - [#9999999.05]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	PROC+3, PROC+5, PROC+6, PROC+8, PROC+9, PROC+13, PROC+14
^AUTTCOM - [#9999999.05]	CMMNTS+9
^AUTTTRI - [#9999999.03]	HEADER1+13
^DIC(4 - [#4]	HEADER1+3, LOC+1
^DPT - [#2]	PROC+4, PRINT+7
^VA(200 - [#200]	HEADER1+2, USR+1
^XTMP("APCLHH1"	PROC+2, PROC+21, DONE+4!, PRINT+3, PRINT+4, PRINT+9

Label References

Name	Line Occurrences
$$C	PRINT+13, PRINT+24
$$CTR	HEADER1+3, HEADER1+4
$$SORT	PROC+19
@(	SORT+3
BEN	CMMNTS+5, CMMNTS+6
CMMNTS	TRIBE+5, TRIBE+6, CMMNTS+6, CMMNTS+12, CMMNTS+13, BEN+4, SORTR+3
DONE	PRINT+25
EOJ	EP+1, TRIBE+3
HEADER	PRINT+2, PRINT+6, PRINT+18, PRINT+22
HEADER1	HEADER+1
SORTR	DEMO+2
TRIBE	TRIBE+6, TRIBE+12, TRIBE+13, CMMNTS+3

Name	Field # of Occurrence
^(0	USR+1, LOC+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCLBEN	BEN+1, BEN+5, PROC+10, PROC+11
APCLCOMM	CMMNTS+1!, CMMNTS+6, CMMNTS+12, CMMNTS+13!, PROC+14
APCLCOMM(	CMMNTS+9*, PROC+14, HEADER1+9
APCLCOMM(""	HEADER1+6
APCLCOMM("*"	CMMNTS+13
>> APCLCOMT	CMMNTS+1, CMMNTS+4, CMMNTS+5, CMMNTS+6, HEADER1+6, HEADER1+7, HEADER1+8
>> APCLDEMO	DEMO+1, DEMO+2, PROC+7
>> APCLERR	TRIBE+10, CMMNTS+10
APCLET	DONE+3!
APCLH	PROC+1*, PROC+21, DONE+4!, PRINT+3, PRINT+4, PRINT+9
>> APCLHI	PROC+8, PROC+16, PROC+18, PROC+21, PROC+22, PRINT+10, PRINT+13
APCLJ	EP+3, PROC+1, PROC+21, DONE+4!, PRINT+3, PRINT+4, PRINT+9
APCLM	DONE+3!
>> APCLNHH	PROC+9, PROC+16, PROC+17, PROC+21, PROC+23, PRINT+11, PRINT+12
>> APCLPG	PRINT+1, HEADER+1, HEADER1+1, HEADER1+2
>> APCLQ	PRINT+1, PRINT+3, PRINT+6, PRINT+18, PRINT+22, HEADER+2
APCLS	DONE+3!
>> APCLSORT	SORTR+1, SORTR+4, PROC+19
>> APCLSV	PRINT+3*, PRINT+4, PRINT+9
>> APCLT	EP+3*
>> APCLTEXT	EP+3*
>> APCLTHI	PROC+1, PROC+22, PRINT+21
>> APCLTNHH	PROC+1, PROC+23, PRINT+17
>> APCLTOTP	PROC+1, PROC+15
APCLTRIM	TRIBE+1!, TRIBE+6, TRIBE+12, TRIBE+13!, PROC+13
APCLTRIM(	TRIBE+9*, PROC+13, HEADER1+13
APCLTRIM(""	HEADER1+10
APCLTRIM("*"	TRIBE+13
>> APCLTRIT	TRIBE+1, TRIBE+4, TRIBE+5, TRIBE+6, HEADER1+10, HEADER1+11, HEADER1+12
APCLTS	DONE+3!
>> APCLTWD("NHH"	PROC+1, PROC+17, PRINT+17, PRINT+19
>> APCLTWD("THI"	PROC+1, PROC+18, PRINT+21, PRINT+23
>> APCLX	EP+3, PRINT+9, PRINT+10, PRINT+11
D	D~, D+1
DA	TRIBE+2!, TRIBE+10!, CMMNTS+2!, CMMNTS+10!, BEN+3!, SORTR+2!
>> DFN	PROC+3, PROC+4, PROC+5, PROC+6, PROC+7, PROC+8, PROC+9, PROC+10, PROC+11, PROC+13 , PROC+14, PROC+19, PROC+21, PRINT+4, PRINT+5, PRINT+7, PRINT+8, PRINT+9
DIC	TRIBE+7!, TRIBE+10!, CMMNTS+7!, CMMNTS+10!, EOJ+2!
DIC("A"	TRIBE+7, CMMNTS+7
DIC("S"	TRIBE+10, CMMNTS+10
DIC(0	TRIBE+7, TRIBE+10, CMMNTS+7, CMMNTS+10
DIR	TRIBE+2!, CMMNTS+2!, BEN+3!, SORTR+2!, EOJ+2!, DONE+1!, HEADER+2!
DIR("A"	TRIBE+2, CMMNTS+2, BEN+2, SORTR+2, DONE+1*
DIR("B"	TRIBE+2, CMMNTS+2, BEN+3, SORTR+2
DIR(0	TRIBE+2, CMMNTS+2, BEN+2, SORTR+2, DONE+1, HEADER+2
>> DIRUT	TRIBE+3, CMMNTS+3, BEN+4, SORTR+3, DONE+1*
DT	PROC+2, HEADER1+2
>> DTOUT	HEADER+2
>> DUOUT	DONE+1
DUZ	HEADER1+2, USR+1
DUZ(2	PRINT+7, HEADER1+3, LOC+1, HSORT+1, RSORT+1
IO	DONE+1, HEADER+2
IO(0	DONE+1, HEADER+2
IOF	EP+2, HEADER1+1
IOM	CTR+1
IOSL	PRINT+6, PRINT+18, PRINT+22
IOST	DONE+1, HEADER+2
P	SORT~, ISORT+1, NSORT+1, CSORT+1, TSORT+1, PSORT+1, HSORT+1, RSORT+1
R	SORT+1~, SORT+2, SORT+4, SORT+5, TSORT+1, PSORT+1, HSORT+1, RSORT+1, RSORT+2*
S	SORT~, SORT+3
U	CMMNTS+9, PROC+8, PROC+9, PROC+13, PROC+14, PROC+21, PRINT+7, PRINT+10, PRINT+11, HEADER1+2 , HEADER1+3, HEADER1+13, USR+1, LOC+1
X	TRIBE+10, CMMNTS+10, PROC+13, PROC+14, PROC+19, PROC+20, PROC+21, PRINT+17, PRINT+20, PRINT+21 , PRINT+24, HEADER1+5, HEADER1+6, HEADER1+7, HEADER1+9, HEADER1+10, HEADER1+11, HEADER1+13, C~, C+2 , CTR~, CTR+1, ISORT+1, NSORT+1, CSORT+1
X2	C~
X3	C~
>> XBNS	DEMO+3*
>> XBRC	DEMO+3*
>> XBRP	DEMO+3*
>> XBRX	DEMO+3*
Y	TRIBE+4, TRIBE+8, TRIBE+9, TRIBE+10, TRIBE+11, CMMNTS+4, CMMNTS+8, CMMNTS+9, CMMNTS+10, CMMNTS+11 , BEN+5, SORTR+4, PRINT+5, HEADER+2, HEADER1+9, HEADER1+13*, CTR~, CTR+1

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLHH1

Information

Source Information

Call Graph

Call Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items