Routine: BJPC1EC1

Information

BJPC1EC1 ; IHS/CMI/LAB - PCC Suite v1.0 patch 1 environment check [ 04/10/2008 9:01 AM ]

Source Information

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
VA Fileman	5	(,IX)^DIC FILE^DICN DT^DICRW ^DIE ^DIK
Kernel	4	HOME^%ZIS $$CJ^XLFSTR $$ADD^XPDMENU MES^XPDUTL
Patient Care Component	3	^APCDALVR ^BJPC1ECA ^BJPCTX
MailMan	1	^XMD

Entry Points

Name	Comments	DBIA/ICR reference
WRITEMSG	;
ASTRIGET	;
GETRECIP	;
HASFH(P,I,N)	;
MOVEFH	;move Family History problem entries to fh
HASASHF(V,I)	;
ASTRIGPM	;
OPTIONS	;
PRE	;
NEXT	;
CLINNEW	;;H. NEW CLINIC CODES (SECTION XIX): CODE^NAME^ABBRV^PRIMARY CARE CLINIC^1A WORKLOAD
IMES	;
INSTALLD(BJPCSTAL)	;EP - Determine if patch BJPCSTAL was installed, where ; APCLSTAL is the name of the INSTALL. E.g "AG6.011".
HASASAMP(V,I)	;is there a v patient ed of ASM-SMP?
DELAST	;
AS	;get rid of FEV1, FV1P
POST	;
ASAMP	;
HASASME(V,I)	;is there a v MEASUREMENT I?
ASTRIGDM	;
ASMEAPEF	;
SENDER
ASMEAFEF	;
SORRY(X)	;
ASMEAFEV	;
SUBJECT

External References

Name	Field # of Occurrence
HOME^%ZIS	DELAST+20
^APCDALVR	ASAMP+13, ASTRIGET+12, ASTRIGPM+12, ASTRIGDM+12, ASMEAPEF+13, ASMEAFEF+13, ASMEAFEV+14
^BJPC1ECA	DELAST+16
^BJPCTX	DELAST+15
^DIC	INSTALLD+9, INSTALLD+12
IX^DIC	INSTALLD+6
FILE^DICN	POST+6, MOVEFH+17
DT^DICRW	DELAST+20
^DIE	AS+11, POST+12, DELAST+7, DELAST+9, DELAST+11, DELAST+13, DELAST+18
^DIK	PRE+1, PRE+2, PRE+3, AS+2, AS+3, AS+4, DELAST+2, DELAST+3
$$CJ^XLFSTR	BJPC1EC1+15, POST+7, POST+13, ASAMP+1, ASAMP+3, ASAMP+14, ASTRIGET+1, ASTRIGET+3, ASTRIGET+13, ASTRIGPM+1 , ASTRIGPM+3, ASTRIGPM+13, ASTRIGDM+1, ASTRIGDM+3, ASTRIGDM+13, ASMEAPEF+1, ASMEAPEF+3, ASMEAPEF+14, ASMEAFEF+1, ASMEAFEF+3 , ASMEAFEF+14, ASMEAFEV+2, ASMEAFEV+4, ASMEAFEV+15, MOVEFH+1, IMES+1, SORRY+4
^XMD	SENDER+3
$$ADD^XPDMENU	OPTIONS+1, OPTIONS+3
MES^XPDUTL	BJPC1EC1+15, POST+7, POST+13, ASAMP+1, ASAMP+3, ASAMP+14, ASTRIGET+1, ASTRIGET+3, ASTRIGET+13, ASTRIGPM+1 , ASTRIGPM+3, ASTRIGPM+13, ASTRIGDM+1, ASTRIGDM+3, ASTRIGDM+13, ASMEAPEF+1, ASMEAPEF+3, ASMEAPEF+14, ASMEAFEF+1, ASMEAFEF+3 , ASMEAFEF+14, ASMEAFEV+2, ASMEAFEV+4, ASMEAFEV+15, MOVEFH+1, MOVEFH+18, IMES+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "Attempt to add coding queue incomplete visit option failed." Line Location: OPTIONS+2
Function Call: WRITE	Prompt: "Attempt to add coding queue incomplete visit option failed." Line Location: OPTIONS+4
Function Call: WRITE	Prompt: !,"Sending Mailman message to PCC Users." Line Location: SENDER+2
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+4
Routine Call	%ZIS Line Location: DELAST+20
Routine Call	DIE Line Location: AS+11 POST+12 DELAST+7 DELAST+9 DELAST+11 DELAST+13 DELAST+18
Routine Call	DIC Line Location: INSTALLD+9 INSTALLD+12
Routine Call	DIC Line Location: INSTALLD+6

FileNo	Call Tags
^DIC(40.7 - [#40.7]	Classic Fileman Calls
^DIC(9.4 - [#9.4]	Classic Fileman Calls
^AUPNVMSR - [#9000010.01]	Classic Fileman Calls
^AUPNFH - [#9000014]	Classic Fileman Calls
^APCDTKW - [#9001001]	Classic Fileman Calls
^APCDSTGC - [#9001002.8]	Classic Fileman Calls
^APCLCNTL - [#9001003]	Classic Fileman Calls
^APCLVSTS - [#9001003.7]	Classic Fileman Calls
^APCLDMTX - [#9001004.2]	Classic Fileman Calls
^APCHSURV - [#9001018]	Classic Fileman Calls
^AUTTMSR - [#9999999.07]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCDSTGC("B"	DELAST+17
^APCDTKW("B"	AS+4, DELAST+2, DELAST+3
^APCHSURV - [#9001018]	AS+6, AS+7, AS+8, AS+9*
^APCHSURV("B"	AS+10, DELAST+6, DELAST+8, DELAST+10, DELAST+12
^APCLCNTL - [#9001003]	PRE+1
^APCLDMTX - [#9001004.2]	PRE+3
^APCLPDES - [#9001004.5]	WRITEMSG+3
^APCLPDES("B"	WRITEMSG+1
^AUPNFH - [#9000014]	NEXT+2*, HASFH+3, HASFH+4
^AUPNFH("AC"	HASFH+2
^AUPNPROB - [#9000011]	MOVEFH+2, MOVEFH+3, MOVEFH+5, MOVEFH+7, MOVEFH+9, MOVEFH+14
^AUPNPROB(1	MOVEFH+14
^AUPNVAST - [#9000010.41]	ASAMP+4, ASAMP+5, ASAMP+6, ASAMP+7, ASAMP+9, ASAMP+12, ASAMP+14, ASTRIGET+4, ASTRIGET+5, ASTRIGET+6 , ASTRIGET+10, ASTRIGET+11, ASTRIGET+13, ASTRIGPM+4, ASTRIGPM+5, ASTRIGPM+6, ASTRIGPM+10, ASTRIGPM+11, ASTRIGPM+13, ASTRIGDM+4 , ASTRIGDM+5, ASTRIGDM+6, ASTRIGDM+10, ASTRIGDM+11, ASTRIGDM+13, ASMEAPEF+4, ASMEAPEF+5, ASMEAPEF+6, ASMEAPEF+10, ASMEAPEF+11 , ASMEAPEF+12, ASMEAPEF+14, ASMEAFEF+4, ASMEAFEF+5, ASMEAFEF+6, ASMEAFEF+10, ASMEAFEF+11, ASMEAFEF+12, ASMEAFEF+14, ASMEAFEV+5 , ASMEAFEV+6, ASMEAFEV+7, ASMEAFEV+11, ASMEAFEV+12, ASMEAFEV+13, ASMEAFEV+15
^AUPNVHF - [#9000010.23]	HASASHF+3
^AUPNVHF("AD"	HASASHF+2
^AUPNVMSR - [#9000010.01]	HASASME+3
^AUPNVMSR("AD"	HASASME+2
^AUPNVMSR("B"	AS+2
^AUPNVPED - [#9000010.16]	HASASAMP+3
^AUPNVPED("AD"	HASASAMP+2
^AUTTEDT("C"	ASAMP+2
^AUTTHF("B"	ASTRIGET+2, ASTRIGPM+2, ASTRIGDM+2
^AUTTMSR("B"	AS+1, ASMEAPEF+2, ASMEAFEF+2, ASMEAFEV+3
^DIC(40.7 - [#40.7]	POST+3
^DIC(9.4 - [#9.4]	BJPC1EC1+15
^TMP($J	DELAST+23!, SENDER+4!, WRITEMSG+3*
^XUSEC(	GETRECIP+4

Label References

Name	Line Occurrences
$$HASASAMP	ASAMP+7
$$HASASHF	ASTRIGET+6, ASTRIGPM+6, ASTRIGDM+6
$$HASASME	ASMEAPEF+6, ASMEAFEF+6, ASMEAFEV+7
$$HASFH	MOVEFH+10
$$INSTALLD	BJPC1EC1+8, BJPC1EC1+9, BJPC1EC1+10, BJPC1EC1+11, BJPC1EC1+12, BJPC1EC1+13, BJPC1EC1+14
ASMEAFEF	ASMEAPEF+3
ASMEAFEV	ASMEAFEF+3
ASMEAPEF	ASTRIGDM+3
ASTRIGDM	ASTRIGPM+3
ASTRIGET	ASAMP+3
ASTRIGPM	ASTRIGET+3
GETRECIP	DELAST+24
IMES	INSTALLD+7, INSTALLD+10, INSTALLD+14
NEXT	ASMEAFEV+1, ASMEAFEV+4
SORRY	BJPC1EC1+8, BJPC1EC1+9, BJPC1EC1+10, BJPC1EC1+11, BJPC1EC1+12, BJPC1EC1+13, BJPC1EC1+14, BJPC1EC1+15
WRITEMSG	DELAST+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCDALVR	ASAMP+8!, ASAMP+15!, ASTRIGET+7!, ASTRIGET+14!, ASTRIGPM+7!, ASTRIGPM+14!, ASTRIGDM+7!, ASTRIGDM+14!, ASMEAPEF+7!, ASMEAPEF+15! , ASMEAFEF+7!, ASMEAFEF+15!, ASMEAFEV+8!, ASMEAFEV+16!
APCDALVR("APCDAFLG"	ASAMP+14, ASTRIGET+13, ASTRIGPM+13, ASTRIGDM+13, ASMEAPEF+14, ASMEAFEF+14, ASMEAFEV+15
APCDALVR("APCDATMP"	ASAMP+10, ASTRIGET+8, ASTRIGPM+8, ASTRIGDM+8, ASMEAPEF+8, ASMEAFEF+8, ASMEAFEV+9*
APCDALVR("APCDPAT"	ASAMP+12, ASTRIGET+11, ASTRIGPM+11, ASTRIGDM+11, ASMEAPEF+12, ASMEAFEF+12, ASMEAFEV+13*
APCDALVR("APCDTHF"	ASTRIGET+9, ASTRIGPM+9, ASTRIGDM+9*
APCDALVR("APCDTTOP"	ASAMP+11*
APCDALVR("APCDTTYP"	ASMEAPEF+9, ASMEAFEF+9, ASMEAFEV+10*
APCDALVR("APCDTVAL"	ASMEAPEF+10, ASMEAFEF+10, ASMEAFEV+11*
APCDALVR("APCDVSIT"	ASAMP+9, ASTRIGET+10, ASTRIGPM+10, ASTRIGDM+10, ASMEAPEF+11, ASMEAFEF+11, ASMEAFEV+12*
>> BJPCDA	AS+2*
>> BJPCIEN	ASAMP+2, ASAMP+3, ASAMP+7, ASAMP+11, ASTRIGET+2, ASTRIGET+3, ASTRIGET+6, ASTRIGET+9, ASTRIGPM+2, ASTRIGPM+3 , ASTRIGPM+6, ASTRIGPM+9, ASTRIGDM+2, ASTRIGDM+3, ASTRIGDM+6, ASTRIGDM+9, ASMEAPEF+2, ASMEAPEF+3, ASMEAPEF+6, ASMEAPEF+9 , ASMEAFEF+2, ASMEAFEF+3, ASMEAFEF+6, ASMEAFEF+9, ASMEAFEV+3*, ASMEAFEV+4, ASMEAFEV+7, ASMEAFEV+10
BJPCKEY	SENDER+4!, GETRECIP+3*, GETRECIP+4
>> BJPCM	AS+1, AS+2, AS+3, AS+4
>> BJPCMR	AS+1, AS+4
BJPCSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> BJPCX	PRE+1, PRE+3, AS+6, AS+7, AS+8, AS+9, ASAMP+4, ASAMP+5, ASAMP+6, ASAMP+7 , ASAMP+9, ASAMP+12, ASAMP+14, ASTRIGET+4, ASTRIGET+5, ASTRIGET+6, ASTRIGET+10, ASTRIGET+11, ASTRIGET+13, ASTRIGPM+4 , ASTRIGPM+5, ASTRIGPM+6, ASTRIGPM+10, ASTRIGPM+11, ASTRIGPM+13, ASTRIGDM+4, ASTRIGDM+5, ASTRIGDM+6, ASTRIGDM+10, ASTRIGDM+11 , ASTRIGDM+13, ASMEAPEF+4, ASMEAPEF+5, ASMEAPEF+6, ASMEAPEF+10, ASMEAPEF+11, ASMEAPEF+12, ASMEAPEF+14, ASMEAFEF+4, ASMEAFEF+5 , ASMEAFEF+6, ASMEAFEF+10, ASMEAFEF+11, ASMEAFEF+12, ASMEAFEF+14, ASMEAFEV+5, ASMEAFEV+6, ASMEAFEV+7, ASMEAFEV+11, ASMEAFEV+12 , ASMEAFEV+13, ASMEAFEV+15, NEXT+2, MOVEFH+2, MOVEFH+3, MOVEFH+5, MOVEFH+7, MOVEFH+9, MOVEFH+14, MOVEFH+18
BJPCY	INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> CTR	GETRECIP+2, GETRECIP+4
>> D	INSTALLD+5*
D0	POST+5!, MOVEFH+16!
DA	PRE+1, PRE+2, PRE+3, AS+2, AS+3, AS+4, AS+10, AS+11!, POST+2~, POST+3 , POST+8, POST+10, POST+14!, DELAST+2, DELAST+3, DELAST+6, DELAST+7!, DELAST+8, DELAST+9!, DELAST+10 , DELAST+11!, DELAST+12, DELAST+13!, DELAST+17, DELAST+18!
DD	POST+5!, MOVEFH+16!
DIADD	MOVEFH+13*, MOVEFH+18!, MOVEFH+19!
DIC	POST+2~, POST+4, POST+9!, MOVEFH+11, MOVEFH+18!, MOVEFH+19!, INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11*
DIC("DR"	MOVEFH+14*
DIC(0	POST+4, MOVEFH+15, INSTALLD+5*
DIE	AS+11!, POST+2~, POST+11, POST+14!, DELAST+7!, DELAST+9!, DELAST+11!, DELAST+13!, DELAST+18*!
DIFQ	SORRY+1!
DIFROM	DELAST+22~
>> DIK	PRE+1, PRE+2, PRE+3, AS+2, AS+3, AS+4, DELAST+2, DELAST+3
DLAYGO	POST+4, POST+9!, MOVEFH+12, MOVEFH+18!, MOVEFH+19!
DO	POST+5!, MOVEFH+16!
DR	AS+11, POST+2~, POST+11, POST+14!, DELAST+7!, DELAST+9!, DELAST+11!, DELAST+13!, DELAST+18*
DUZ	SENDER+1
I	HASASAMP~, HASASAMP+3, HASASHF~, HASASHF+3, HASASME~, HASASME+3, HASFH~, HASFH+4
IOM	BJPC1EC1+15, POST+7, POST+13, ASAMP+1, ASAMP+3, ASAMP+14, ASTRIGET+1, ASTRIGET+3, ASTRIGET+13, ASTRIGPM+1 , ASTRIGPM+3, ASTRIGPM+13, ASTRIGDM+1, ASTRIGDM+3, ASTRIGDM+13, ASMEAPEF+1, ASMEAPEF+3, ASMEAPEF+14, ASMEAFEF+1, ASMEAFEF+3 , ASMEAFEF+14, ASMEAFEV+2, ASMEAFEV+4, ASMEAFEV+15, MOVEFH+1, IMES+1, SORRY+4
IOST	SENDER+2
N	MOVEFH+9*, MOVEFH+10, MOVEFH+14, HASFH~, HASFH+4
P	MOVEFH+5*, MOVEFH+6, MOVEFH+10, MOVEFH+14, HASFH~, HASFH+2
U	AS+7, AS+8, AS+9, ASAMP+5, ASAMP+6, ASAMP+7, ASAMP+9, ASAMP+12, ASAMP+14, ASTRIGET+5 , ASTRIGET+6, ASTRIGET+10, ASTRIGET+11, ASTRIGET+13, ASTRIGPM+5, ASTRIGPM+6, ASTRIGPM+10, ASTRIGPM+11, ASTRIGPM+13, ASTRIGDM+5 , ASTRIGDM+6, ASTRIGDM+10, ASTRIGDM+11, ASTRIGDM+13, ASMEAPEF+5, ASMEAPEF+6, ASMEAPEF+10, ASMEAPEF+11, ASMEAPEF+12, ASMEAPEF+14 , ASMEAFEF+5, ASMEAFEF+6, ASMEAFEF+10, ASMEAFEF+11, ASMEAFEF+12, ASMEAFEF+14, ASMEAFEV+6, ASMEAFEV+7, ASMEAFEV+11, ASMEAFEV+12 , ASMEAFEV+13, ASMEAFEV+15, NEXT+2, MOVEFH+3, MOVEFH+5, MOVEFH+7, MOVEFH+9, MOVEFH+14, HASASAMP+3, HASASHF+3 , HASASME+3, HASFH+4
V	HASASAMP~, HASASAMP+2, HASASHF~, HASASHF+2, HASASME~, HASASME+2
X	BJPC1EC1+7, POST+4, OPTIONS+1, OPTIONS+2, OPTIONS+3, OPTIONS+4, MOVEFH+7, MOVEFH+8, MOVEFH+10, WRITEMSG+1 , WRITEMSG+2, WRITEMSG+3, INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11, SORRY~, SORRY+2, SORRY+3, HASASAMP+1~ , HASASAMP+2, HASASAMP+3, HASASHF+1~, HASASHF+2, HASASHF+3, HASASME+1~, HASASME+2, HASASME+3, HASFH+1~, HASFH+2* , HASFH+3, HASFH+4
XMDUZ	DELAST+22~, SENDER*
XMSUB	DELAST+22~, SUBJECT*
XMTEXT	DELAST+22~, SENDER+1*
XMY	DELAST+22~
XMY(	SENDER+1, GETRECIP+4
XMY(1	SENDER+1*
>> XPDDIQ(	BJPC1EC1+7*
>> XPDDIQ("XPZ1"	BJPC1EC1+6*
>> XPDDIQ("XPZ2"	BJPC1EC1+6*
>> XPDENV	BJPC1EC1+6
>> XPDQUIT	SORRY+2, SORRY+3
Y	POST+7, POST+8, POST+9!, POST+13, MOVEFH+18, WRITEMSG+3, GETRECIP+4, INSTALLD+3~, INSTALLD+7, INSTALLD+8 , INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1, HASASAMP+1~, HASASHF+1~, HASASME+1~, HASFH+1~
Z	HASASAMP+1~, HASASAMP+2, HASASAMP+3, HASASAMP+5, HASASHF+1~, HASASHF+2, HASASHF+3, HASASHF+5, HASASME+1~, HASASME+2* , HASASME+3, HASASME+5, HASFH+1~, HASFH+2, HASFH+4*, HASFH+6

Customize PDF page

Package: Patient Care Component

Routine: BJPC1EC1

Information

Source Information

Call Graph

Call Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: