Routine: BGP5UTL2

Information

BGP5UTL2 ; IHS/CMI/LAB - NO DESCRIPTION PROVIDED 30 Jun 2015 9:01 AM ;

Call Graph

Call Graph Total: 12

Package	Total	Call Graph
DRG Grouper	2	($$CODEN,$$ICDD,$$ICDDX,$$ICDOP,$$VSTD,$$VSTP)^ICDCODE ($$CODEN,$$ICDD,$$ICDDX,$$ICDOP,$$VSTD,$$VSTP)^ICDEX
Kernel	2	$$LIST^%ZISH $$FMADD^XLFDT
Taxonomy	2	BLDTAX^ATXAPI $$ICD^ATXCHK
VA Fileman	2	EN^DDIOL ^DIR
IHS GPRA Information System	1	$$DATE^BGP5UTL
IHS Patient	1	$$DOB^AUPNPAT
IHS Standard Terminology	1	($$SUBLST,SUBLST)^BSTSAPI
IHS VA Utilities	1	$$VAL^XBDIQ1

Package	Total	Caller Graph
IHS GPRA Information System	109	BGP5ALG1 BGP5ALG2 BGP5AUEX BGP5C11 BGP5C13 BGP5CON1 BGP5CU BGP5CU1 BGP5D1 BGP5D10 BGP5D21 BGP5D21A BGP5D22 BGP5D23 BGP5D24 BGP5D25 BGP5D26 BGP5D27 BGP5D31 BGP5D35 BGP5D36 BGP5D37 BGP5D38 BGP5D39 BGP5D3A BGP5D4 BGP5D41 BGP5D5 BGP5D51 BGP5D52 BGP5D54 BGP5D55 BGP5D5A BGP5D6 BGP5D7 BGP5D71 BGP5D711 BGP5D713 BGP5D72 BGP5D721 BGP5D722 BGP5D723 BGP5D729 BGP5D731 BGP5D732 BGP5D74 BGP5D75 BGP5D8 BGP5D81 BGP5D811 BGP5D812 BGP5D82 BGP5D83 BGP5D84 BGP5D862 BGP5D863 BGP5D864 BGP5D87 BGP5D88 BGP5D89 BGP5D9 BGP5D91 BGP5DADB BGP5DAP BGP5DAR BGP5DARO BGP5DCL BGP5DEL BGP5DGPU BGP5DH BGP5DH1 BGP5DL BGP5DNDB BGP5DNG BGP5DNGP BGP5DNGS BGP5DON BGP5DPA BGP5DPA2 BGP5DPE BGP5DPE1 BGP5DPP BGP5DSL BGP5DSTM BGP5DU BGP5EL3 BGP5ELH BGP5ELHH BGP5GACW BGP5GAGP BGP5GAGS BGP5GDON BGP5GELD BGP5GFO9 BGP5GFOR BGP5GLHW BGP5GNT9 BGP5GNTL BGP5GNTP BGP5GNTS BGP5GNXP BGP5GPED BGP5GUA BGP5LHW BGP5NPL BGP5PDH1 BGP5PDLH BGP5PESL BGP5UTL1

Entry Points

Name	Comments	DBIA/ICR reference
GETDIR()	;EP - get default directory
CHKDST()	;EP - check the demo patient search template to see if it is complete
DIRCHK	;EP - CALLED FROM INPUT TX ON SITE PARAMETER
CODEN(X,F)	;EP - GET CODE
GETDEDIR()	;EP - get default directory
VSTP(C,D)	;EP
RCIS(P,BDATE,EDATE,ICDC,CPTC)	;EP
ICDDX(C,D,I)	;EP - GET CODE
ICDD(C,A,D)	;EP
DSTCONT()	;EP - called to ask user if they want to continue
SNOMED	;unfold all snomed subsets
DEMOCHK()	;EP - called to check demo patient
ICDOP(C,D,I)	;EP - GET CODE
UNFOLDTX	;EP
GETMEDS(P,BGPMBD,BGPMED,TAXM,TAXN,TAXC,BGPDNAME,BGPZ)	;EP
ICD(VAL,TAXIEN,TYP)	;EP - CHECK TAX
VSTD(C,D)	;EP

External References

Name	Field # of Occurrence
$$LIST^%ZISH	DIRCHK+3
BLDTAX^ATXAPI	UNFOLDTX+14
$$ICD^ATXCHK	ICD+6
$$DOB^AUPNPAT	RCIS+2
$$DATE^BGP5UTL	RCIS+24
$$SUBLST^BSTSAPI	SNOMED+7
SUBLST^BSTSAPI	SNOMED+1
EN^DDIOL	DIRCHK+4
^DIR	DSTCONT+5
$$CODEN^ICDCODE	CODEN+2
$$ICDD^ICDCODE	ICDD+2
$$ICDDX^ICDCODE	ICDDX+2
$$ICDOP^ICDCODE	ICDOP+3
$$VSTD^ICDCODE	VSTD+2
$$VSTP^ICDCODE	VSTP+2
$$CODEN^ICDEX	CODEN+1
$$ICDD^ICDEX	ICDD+1
$$ICDDX^ICDEX	ICDDX+1
$$ICDOP^ICDEX	ICDOP+2
$$VSTD^ICDEX	VSTD+1
$$VSTP^ICDEX	VSTP+1
$$VAL^XBDIQ1	RCIS+23
$$FMADD^XLFDT	UNFOLDTX+15, SNOMED+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: BGPBOMB Line Location: GETMEDS+24
Function Call: WRITE	Prompt: BGPBOMB Line Location: GETMEDS+25
Function Call: WRITE	Prompt: !!,"Your ",$P(BGPDPST,U,2),".",!,"If you have 'DEMO' patients whose names begin with something" Line Location: DSTCONT+2
Function Call: WRITE	Prompt: !,"other than 'DEMO,PATIENT' they will not be excluded from this report" Line Location: DSTCONT+3
Function Call: WRITE	Prompt: !,"unless you update this template.",! Line Location: DSTCONT+4
Routine Call	DIR Line Location: DSTCONT+5

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	ICD+5, GETMEDS+32, GETMEDS+34, GETMEDS+35
^ATXAX("B"	GETMEDS+24, GETMEDS+25, GETMEDS+26, UNFOLDTX+10
^ATXLAB("B"	UNFOLDTX+12
^AUPNVMED - [#9000010.14]	GETMEDS+11, GETMEDS+12, GETMEDS+16, GETMEDS+28, GETMEDS+30
^AUPNVMED("AA"	GETMEDS+9, GETMEDS+10
^AUTTSITE(1	GETDIR+5, GETDIR+9, GETDEDIR+3, GETDEDIR+7
^BGPSITE - [#90241.02]	GETDIR+3
^BGPSNOSG - [#90558.07]	SNOMED+3, SNOMED+4
^BGPTAXK - [#90554.08]	UNFOLDTX+5, UNFOLDTX+6, UNFOLDTX+7
^BMCREF - [#90001]	RCIS+11, RCIS+12, RCIS+15, RCIS+18, RCIS+24
^BMCREF("D"	RCIS+10
^BMCTDXC("B"	RCIS+8
^BMCTSVC("B"	RCIS+9
^DIBT(	CHKDST+7
^DIBT("B"	CHKDST+5
^ICDS(0	CODEN+1, ICDDX+1, ICDOP+2, VSTD+1, VSTP+1, ICDD+1, UNFOLDTX+3
^PSDRUG - [#50]	GETMEDS+14, GETMEDS+16, GETMEDS+31, GETMEDS+33, GETMEDS+36
^TMP($J	GETMEDS+4!, GETMEDS+16, GETMEDS+19, GETMEDS+20, GETMEDS+22, GETMEDS+23!, GETMEDS+27, GETMEDS+38, GETMEDS+40!, SNOMED+5! , SNOMED+6, SNOMED+9, SNOMED+10!
^XTMP("BGP15TAX"	ICD+6, ICD+7, UNFOLDTX+1!, UNFOLDTX+15*
^XTMP("BGPSNOMEDSUBSET"	SNOMED+2!, SNOMED+9, SNOMED+12
^XTV(8989.3 - [#8989.3]	GETDIR+7, GETDEDIR+5

Label References

Name	Line Occurrences
$$CHKDST	DEMOCHK+2
$$DSTCONT	DEMOCHK+4
SNOMED	UNFOLDTX+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	ICDD~, ICDD+1, ICDD+2, RCIS+7~, RCIS+23*
B	RCIS+7~
BDATE	RCIS~, RCIS+2*, RCIS+13
>> BGPBOMB	GETMEDS+24, GETMEDS+25
BGPC1	GETMEDS+6~, GETMEDS+7, GETMEDS+15, GETMEDS+16, GETMEDS+18, GETMEDS+21, GETMEDS+22, GETMEDS+27, GETMEDS+38, GETMEDS+41!
BGPD	GETMEDS+6~, GETMEDS+12*, GETMEDS+13, GETMEDS+14, GETMEDS+16, GETMEDS+41!
BGPDA	UNFOLDTX+4~, UNFOLDTX+5, UNFOLDTX+6, UNFOLDTX+7, SNOMED+3, SNOMED+4
BGPDNAME	GETMEDS~, GETMEDS+5*, GETMEDS+36, GETMEDS+41!
BGPDPST	DSTCONT+2, DEMOCHK+1~, DEMOCHK+2, DEMOCHK+3, DEMOCHK+4, DEMOCHK+5
BGPFL	UNFOLDTX+4~, UNFOLDTX+7*, UNFOLDTX+8
BGPHOLDX	DIRCHK+1~, DIRCHK+2*, DIRCHK+5
BGPINBD	GETMEDS+6~, GETMEDS+8*, GETMEDS+9, GETMEDS+41!
BGPINED	GETMEDS+6~, GETMEDS+8, GETMEDS+9, GETMEDS+10, GETMEDS+16, GETMEDS+41!
BGPL	DIRCHK+1~, DIRCHK+3, DIRCHK+6!
BGPMBD	GETMEDS~, GETMEDS+8, GETMEDS+41!
BGPMED	GETMEDS~, GETMEDS+8, GETMEDS+41!
BGPMIEN	GETMEDS+6~, GETMEDS+10*, GETMEDS+11, GETMEDS+12, GETMEDS+16
BGPTAX	UNFOLDTX+4~, UNFOLDTX+6*, UNFOLDTX+10, UNFOLDTX+12, UNFOLDTX+13, UNFOLDTX+14
BGPTAXI	UNFOLDTX+4~, UNFOLDTX+10, UNFOLDTX+12, UNFOLDTX+14
BGPTGT	UNFOLDTX+4~, UNFOLDTX+13*, UNFOLDTX+14
BGPTYP	UNFOLDTX+4~, UNFOLDTX+9*, UNFOLDTX+11, UNFOLDTX+14
BGPVAL	UNFOLDTX+4~
BGPX	DIRCHK+1~, DIRCHK+3*, DIRCHK+4!, DIRCHK+6!
BGPY	DIRCHK+4!
BGPZ	GETMEDS~, GETMEDS+4!, GETMEDS+7!
BGPZ(	GETMEDS+38*
C	ICDDX~, ICDDX+1, ICDDX+2, ICDOP~, ICDOP+2, ICDOP+3, VSTD~, VSTD+1, VSTD+2, VSTP~ , VSTP+1, VSTP+2, ICDD~, ICDD+1, ICDD+2, GETMEDS+31, GETMEDS+32, GETMEDS+33, GETMEDS+34, SNOMED+9*
CPTC	RCIS~, RCIS+5*, RCIS+9
CPTCAT	RCIS+7~, RCIS+19, RCIS+20
CPTCAT(	RCIS+9*, RCIS+20
D	ICDDX~, ICDDX+1, ICDDX+2, ICDOP~, ICDOP+2, ICDOP+3, VSTD~, VSTD+1, VSTD+2, VSTP~ , VSTP+1, VSTP+2, ICDD~, ICDD+1, ICDD+2, GETDIR+1~, GETDIR+2, GETDIR+3, GETDIR+4, GETDIR+5* , GETDIR+6, GETDIR+7, GETDIR+8, GETDIR+9, GETDIR+10, GETDEDIR+1~, GETDEDIR+2, GETDEDIR+3, GETDEDIR+4, GETDEDIR+5* , GETDEDIR+6, GETDEDIR+7, GETDEDIR+8, GETMEDS+6~, GETMEDS+30, GETMEDS+31, GETMEDS+33, GETMEDS+35, GETMEDS+36, RCIS+7~ , RCIS+12*, RCIS+13, RCIS+14
DA	DSTCONT+5!
DIR	DSTCONT+1~, DSTCONT+5!
DIR("A"	DSTCONT+5*
DIR("B"	DSTCONT+5*
DIR(0	DSTCONT+5*
DIRUT	DSTCONT+1~, DSTCONT+6
DT	RCIS+3, UNFOLDTX+15, SNOMED+12
DUZ(2	GETDIR+3
EDATE	RCIS~, RCIS+3*, RCIS+14
F	CODEN~, CODEN+1, CODEN+2
G	GETMEDS+6~, GETMEDS+29, GETMEDS+32, GETMEDS+34, GETMEDS+35, GETMEDS+36, GETMEDS+37, GETMEDS+38, RCIS+7~, RCIS+10* , RCIS+21*, RCIS+22, RCIS+23, RCIS+24
I	ICDDX~, ICDDX+2, ICDOP~, ICDOP+1, ICDOP+2, SNOMED+9
ICDC	RCIS~, RCIS+4*, RCIS+8
ICDCAT	RCIS+7~, RCIS+16, RCIS+17
ICDCAT(	RCIS+8*, RCIS+17
>> N	SNOMED+4*, SNOMED+7, SNOMED+9
>> OUT	SNOMED+6*, SNOMED+7
P	GETMEDS~, GETMEDS+9, GETMEDS+10, RCIS~, RCIS+1, RCIS+2, RCIS+10
T	GETMEDS+6~, GETMEDS+24*, GETMEDS+35
T1	GETMEDS+6~, GETMEDS+25*, GETMEDS+34
>> T2	GETMEDS+26*, GETMEDS+32
TAXC	GETMEDS~, GETMEDS+3*, GETMEDS+26, GETMEDS+37
TAXIEN	ICD~, ICD+5, ICD+6
TAXM	GETMEDS~, GETMEDS+1*, GETMEDS+24, GETMEDS+37
TAXN	GETMEDS~, GETMEDS+2*, GETMEDS+25, GETMEDS+37
TAXNM	ICD+4~, ICD+5*, ICD+6, ICD+7
TYP	ICD~, ICD+6
U	ICD+5, GETDIR+3, GETDIR+9, GETDEDIR+7, GETMEDS+12, GETMEDS+16, GETMEDS+27, GETMEDS+30, GETMEDS+31, GETMEDS+33 , GETMEDS+36, RCIS+12, RCIS+15, RCIS+18, RCIS+24, DSTCONT+2, UNFOLDTX+6, UNFOLDTX+7, SNOMED+4, SNOMED+9
VAL	ICD~, ICD+3, ICD+6, ICD+7
X	CODEN~, CODEN+1, CODEN+2, DIRCHK+2, DIRCHK+3, DIRCHK+4!, DIRCHK+5, GETMEDS+6~, GETMEDS+18, GETMEDS+19* , GETMEDS+20, GETMEDS+22, GETMEDS+27, GETMEDS+38, RCIS+7~, RCIS+8, RCIS+9, RCIS+10, RCIS+11, RCIS+12 , RCIS+15, RCIS+18, RCIS+21, RCIS+23, RCIS+24, CHKDST+4~, CHKDST+5, CHKDST+6, CHKDST+7, DSTCONT+1~ , SNOMED+7*
Y	GETMEDS+6~, GETMEDS+20, GETMEDS+22, GETMEDS+27, GETMEDS+28, GETMEDS+30, RCIS+7~, RCIS+8, RCIS+9, RCIS+15* , RCIS+16, RCIS+17, RCIS+18, RCIS+19, RCIS+20, RCIS+23, DSTCONT+1~, DSTCONT+7

Marked Items

Name	Field # of Occurrence
$T(SUBLST^BSTSAPI	SNOMED+1

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP5UTL2

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 109

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items