Routine: APCLBP

Package	Total	Call Graph
VA Fileman	3	DD^%DT ^DIC ^DIR
Patient Care Component Reports	2	^APCLSTMP DEMOCHK^APCLUTL
IHS VA Utilities	1	^XBDBQUE
PCC Medical Query	1	PEP^AMQQGTX0

Entry Points

Name	Comments	DBIA/ICR reference
BD	; Ask starting date
SORT	;
IDENT	;
ZIS	;
DESCR	;
RTYPE	;
ED	; ask ending date
AGE	;
CMMNTS	;
CLINIC	;
SEX	;
START	;
ASKPT	;
DATERNG	;
TEMPLATE	;
DEMO	;
EXIT	;
INDBEN	;

External References

Name	Field # of Occurrence
DD^%DT	ED+1
PEP^AMQQGTX0	CMMNTS+10, CLINIC+6
^APCLSTMP	RTYPE+6
DEMOCHK^APCLUTL	DEMO+1
^DIC	TEMPLATE+2, CMMNTS+6, CMMNTS+9, CLINIC+5
^DIR	ASKPT+5, CMMNTS+2, CLINIC+2, BD+3, ED+1, AGE+3, SEX+1, INDBEN+2, IDENT+1, RTYPE+1 , SORT+1
^XBDBQUE	DEMO+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?15,"*** BLOOD PRESSURE OUT OF CONTROL REPORT ***",!! Line Location: START+2
Function Call: WRITE	Prompt: ! Line Location: TEMPLATE+2
Function Call: WRITE	Prompt: !!,"Patients from all communities will be included in the report.",! Line Location: CMMNTS+4
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: CMMNTS+9
Function Call: WRITE	Prompt: ! Line Location: CLINIC+2
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: CLINIC+5
Function Call: WRITE	Prompt: ! Line Location: BD+3
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: ! Line Location: AGE+1
Function Call: WRITE	Prompt: !!,"No age range entered. All ages will be included." Line Location: AGE+4
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"Enter an age range in the format nnn-nnn. E.g. 2-5, 12-74, 5-20." Line Location: AGE+6
Function Call: WRITE	Prompt: !,$C(7),"Cannot run for patients under 2." Line Location: AGE+7
Function Call: WRITE	Prompt: !,$C(7),"Cannot run for patients over 74." Line Location: AGE+8
Function Call: WRITE	Prompt: ! Line Location: INDBEN+1
Function Call: WRITE	Prompt: ! Line Location: SORT+6
Function Call: WRITE	Prompt: ?26,"LIST OF BLOOD PRESSURE OUT OF CONTROL PATIENTS" Line Location: DESCR+1
Function Call: WRITE	Prompt: !!,"This report will produce a listing of all patients for the specified age, sex," Line Location: DESCR+2
Function Call: WRITE	Prompt: !,"communities, clinic and time period, who are considered out of control based on",!,"their mean Systolic or Diastolic blood pressure .",! Line Location: DESCR+3
Function Call: WRITE	Prompt: !,"Out of Control is defined as greater than or equal to 140/90." Line Location: DESCR+4
Routine Call	DIC Line Location: TEMPLATE+2 CMMNTS+6 CMMNTS+9 CLINIC+5
Routine Call	DIR Line Location: ASKPT+5 CMMNTS+2 CLINIC+2 BD+3 ED+1 AGE+3 SEX+1 INDBEN+2 IDENT+1 RTYPE+1 SORT+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTCOM - [#9999999.05]	CMMNTS+8

Label References

Name	Line Occurrences
@(	START+4
DESCR	START+3
ED	BD+6
EXIT	START+5
IDENT	SORT+6
RTYPE	DEMO+2
SORT	RTYPE+4
TEMPLATE	ASKPT+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCL80	EXIT+1!
APCLA	EXIT+1!
APCLAGE	EXIT+1!
APCLAGER	AGE+2!, AGE+9*, EXIT+1!
APCLBD	BD+5*, ED+1, EXIT+1!
APCLBHGH	EXIT+1!
APCLBMI	EXIT+1!
APCLBPC	EXIT+1!
APCLBPTY	EXIT+1!
APCLBPX	EXIT+1!
APCLBTH	EXIT+1!
APCLBTYP	EXIT+1!
APCLCBC	EXIT+1!
APCLCHT	EXIT+1!
APCLCLAS	EXIT+1!
APCLCLIN	EXIT+1!
APCLCLNC	EXIT+1!
APCLCLNT	CLINIC+1!, CLINIC+7, CLINIC+8!
APCLCLNT("*"	CLINIC+8
APCLCMTS	EXIT+1!
APCLCMTY	EXIT+1!
APCLCOMM	CMMNTS+1!, CMMNTS+5, CMMNTS+11, CMMNTS+12!, EXIT+1!
APCLCOMM(	CMMNTS+8*
APCLCOMM("*"	CMMNTS+12
APCLCPT	EXIT+1!
APCLCTB	EXIT+1!
>> APCLDEMO	DEMO+1, DEMO+2
APCLDT	EXIT+1!
APCLDTL	EXIT+1!
APCLED	BD+2, ED+5, EXIT+1!
APCLEDD	EXIT+2!
APCLER	EXIT+2!
APCLERR	START+1, START+4, CMMNTS+9, CLINIC+5*, EXIT+2!
APCLI	START+4, BD+1, EXIT+2!
APCLIBEN	INDBEN+3*, EXIT+2!
APCLIDEN	IDENT+5*, EXIT+2!
APCLJOB	EXIT+2!
APCLLENG	EXIT+2!
APCLMDBP	EXIT+2!
APCLMGI	EXIT+2!
APCLMHT	EXIT+2!
APCLMIEN	EXIT+2!
APCLMSBP	EXIT+2!
APCLMWT	EXIT+2!
APCLNAME	EXIT+2!
APCLOCTL	EXIT+2!
APCLPCT	EXIT+2!
APCLPG	EXIT+2!
APCLPTOT	EXIT+2!
APCLQUIT	EXIT+2!
APCLREF	EXIT+2!
APCLREP	START+1, START+4, TEMPLATE+3, TEMPLATE+5, CMMNTS+5, CMMNTS+11, CLINIC+7, ED+2, ED+4, AGE+6 , AGE+7, IDENT+2, IDENT+4, RTYPE+8, RTYPE+9, SORT+2, SORT+4, EXIT+2!
APCLROHT	EXIT+2!
APCLROWT	EXIT+2!
APCLRPT	EXIT+2!
APCLRTYP	RTYPE+2*, RTYPE+3, RTYPE+4, DEMO+4, EXIT+3!
APCLSD	BD+2, BD+5, EXIT+3!
APCLSDD	EXIT+3!
APCLSEAT	ASKPT+2, TEMPLATE+6, EXIT+3!
APCLSEX	SEX+2*, EXIT+3!
APCLSEXP	EXIT+3!
APCLSORT	SORT+5*, EXIT+3!
APCLSRT	EXIT+3!
APCLTAGS	START+1*, START+4, EXIT+3!
APCLTBP	EXIT+3!
APCLTDBP	EXIT+3!
APCLTOBC	EXIT+3!
APCLTOBP	EXIT+3!
APCLTOP	EXIT+3!
APCLTPOC	EXIT+3!
APCLTPT	EXIT+3!
APCLTSBP	EXIT+3!
APCLTYPE	ASKPT+1, ASKPT+6, ASKPT+7, TEMPLATE+5!, ED+4!, IDENT+4!, SORT+4!, EXIT+3!
APCLX	EXIT+3!
APCLY	EXIT+3!
DA	TEMPLATE+2!, CMMNTS+2!, CMMNTS+9!, CLINIC+5!, EXIT+3!
DFN	EXIT+3!
DIC	TEMPLATE+2!, CMMNTS+6!, CMMNTS+9!, CLINIC+5!, EXIT+3!
DIC("A"	TEMPLATE+2, CMMNTS+6
DIC("S"	TEMPLATE+2, CMMNTS+9, CLINIC+5*
DIC(0	TEMPLATE+2, CMMNTS+6, CMMNTS+9, CLINIC+5
DICR	TEMPLATE+2!
DIR	ASKPT+3!, ASKPT+5!, CMMNTS+2!, CLINIC+2!, BD+3!, ED+1!, AGE+3!, SEX+1!, INDBEN+2!, IDENT+1! , RTYPE+1!, SORT+1!, EXIT+3!
DIR("A"	ASKPT+5, CMMNTS+2, CLINIC+2, BD+3, ED+1, AGE+3, SEX+1, INDBEN+2, IDENT+1, RTYPE+1 , SORT+1*
DIR("B"	CMMNTS+2, CLINIC+2, SEX+1, INDBEN+2, IDENT+1, RTYPE+1, SORT+1*
DIR(0	ASKPT+4, CMMNTS+2, CLINIC+2, BD+3, ED+1, AGE+3, SEX+1, INDBEN+2, IDENT+1, RTYPE+1 , SORT+1*
DIRUT	START+4, ASKPT+5, TEMPLATE+3, TEMPLATE+5!, CMMNTS+3, CLINIC+2, CLINIC+3, BD+1!, BD+3, BD+4 , ED+1, ED+2, ED+4!, AGE+3, AGE+4!, AGE+5, SEX+1, INDBEN+2, IDENT+1, IDENT+2 , IDENT+4!, RTYPE+1, RTYPE+3, RTYPE+8, RTYPE+9!, SORT+1, SORT+2, SORT+4!, EXIT+3!
DR	TEMPLATE+2!
>> DUOUT	ASKPT+5, TEMPLATE+3, CLINIC+2, BD+3, ED+1, ED+2, AGE+3, SEX+1, INDBEN+2, IDENT+1 , IDENT+2, RTYPE+1, RTYPE+8, SORT+1, SORT+2
J	EXIT+3!
K	EXIT+3!
M	EXIT+3!
R	EXIT+3!
S	EXIT+3!
U	CMMNTS+8
X	ASKPT+3!, CMMNTS+9, CLINIC+5, RTYPE+7, EXIT+3!
X1	EXIT+3!
X2	EXIT+4!
XBNS	DEMO+3*, EXIT+4!
XBRC	DEMO+3*, EXIT+4!
XBRP	DEMO+4*, EXIT+4!
XBRX	DEMO+3*, EXIT+4!
Y	START+4, ASKPT+3!, ASKPT+6, TEMPLATE+3, TEMPLATE+6, CMMNTS+4, CMMNTS+5, CMMNTS+7, CMMNTS+8, CMMNTS+9 , CMMNTS+10, CLINIC+4, CLINIC+5, CLINIC+6, BD+5, ED+1, ED+2, ED+5, AGE+4, AGE+6 , AGE+7, AGE+9, SEX+2, INDBEN+3, IDENT+2, IDENT+5, RTYPE+2, RTYPE+7, RTYPE+8, SORT+2 , SORT+5, EXIT+4!

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLBP

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: