Routine: BGP8D39

Package	Total	Call Graph
IHS GPRA Information System	8	$$ESRD^BGP8D211 $$EMP^BGP8D213 $$COPD^BGP8D22 $$HADWARF^BGP8D36 $$HOSPICE^BGP8D74 $$DATE^BGP8UTL $$LASTDX^BGP8UTL1 GETMEDS^BGP8UTL2
Kernel	2	($$FMADD,$$FMDIFF)^XLFDT ($$STRIP,$$UP)^XLFSTR
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component Reports	1	$$VD^APCLV

Name	Comments	DBIA/ICR reference
HASARB(P,BDATE,EDATE)	;
GETOP	;GET OPIOD MEDS
NONW180	;
COVERAGE(P,BDATE,EDATE,MTAX,NTAX,TYPE)	;
HASINFU(P,BDATE,EDATE)	;
MEDCOV	;EP
S
COB	;EP
HASNEB(P,BDATE,EDATE)	;
GETBENZO	;GET OPIOD MEDS

Name	Field # of Occurrence
$$VD^APCLV	COVERAGE+40
$$ESRD^BGP8D211	COVERAGE+4
$$EMP^BGP8D213	MEDCOV+75
$$COPD^BGP8D22	MEDCOV+75
$$HADWARF^BGP8D36	COVERAGE+8
$$HOSPICE^BGP8D74	COB+5
$$DATE^BGP8UTL	COVERAGE+58, COB+28, S+4
$$LASTDX^BGP8UTL1	COB+6
GETMEDS^BGP8UTL2	COVERAGE+10, HASARB+3, HASINFU+3, HASNEB+3, GETOP+2, GETBENZO+2
$$VAL^XBDIQ1	COVERAGE+22, COVERAGE+23, COVERAGE+37, COVERAGE+38, HASARB+11, HASARB+12, HASINFU+11, HASINFU+12, HASNEB+11, HASNEB+12 , GETOP+13, GETOP+14, GETBENZO+14, GETBENZO+15
$$FMADD^XLFDT	COVERAGE+27, COVERAGE+47, COVERAGE+51, COB+19, COB+20
$$FMDIFF^XLFDT	COVERAGE+29, COVERAGE+43, COVERAGE+47, COVERAGE+48, COVERAGE+55, NONW180+5
$$STRIP^XLFSTR	COVERAGE+57
$$UP^XLFSTR	COVERAGE+16, HASARB+13, HASINFU+13, HASNEB+13, GETOP+8, GETBENZO+8

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMED - [#9000010.14]	COVERAGE+15, COVERAGE+16, COVERAGE+17, COVERAGE+18, COVERAGE+45, COVERAGE+46, HASARB+7, HASARB+13, HASARB+14, HASARB+15 , HASINFU+7, HASINFU+13, HASINFU+14, HASINFU+15, HASINFU+16, HASNEB+7, HASNEB+13, HASNEB+14, HASNEB+15, GETOP+7 , GETOP+8, GETOP+9, GETOP+10, GETBENZO+7, GETBENZO+8, GETBENZO+9, GETBENZO+10
^DPT - [#2]	COVERAGE+4
^PSRX - [#52]	COVERAGE+21, COVERAGE+36, HASARB+10, HASINFU+10, HASNEB+10, GETOP+12, GETBENZO+13
^PSRX("APCC"	COVERAGE+20, COVERAGE+35, HASARB+9, HASINFU+9, HASNEB+9, GETOP+11, GETBENZO+12
^TMP($J	MEDCOV+90!, COVERAGE+1!, COB+15!, COB+19, COB+20, COB+23, COB+24

Name	Line Occurrences
$$COVERAGE	MEDCOV+8, MEDCOV+14, MEDCOV+20, MEDCOV+26, MEDCOV+32, MEDCOV+38, MEDCOV+44, MEDCOV+50, MEDCOV+56, MEDCOV+62 , MEDCOV+68, MEDCOV+75, MEDCOV+82
$$HASARB	COVERAGE+5
$$HASINFU	COVERAGE+7
$$HASNEB	COVERAGE+6
GETBENZO	COB+13
GETOP	COB+7
NONW180	COVERAGE+28
S	COB+17, COB+18

Name	Field # of Occurrence
^(	COVERAGE+20, COVERAGE+35, HASARB+9, HASINFU+9, HASNEB+9, GETOP+11, GETBENZO+12

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	MEDCOV+11, MEDCOV+17, MEDCOV+23, MEDCOV+29, MEDCOV+35, MEDCOV+41, MEDCOV+47, MEDCOV+53, MEDCOV+59, MEDCOV+65 , MEDCOV+71, MEDCOV+78, MEDCOV+85, COVERAGE+59, COVERAGE+60*
A	MEDCOV+89!, COVERAGE+2~, COVERAGE+3, COVERAGE+4, COVERAGE+13, COVERAGE+14, COVERAGE+16, COVERAGE+17, COVERAGE+18, COVERAGE+24 , HASARB+1~, HASARB+5, HASARB+6, HASARB+13, HASARB+14, HASARB+15, HASINFU+1~, HASINFU+5, HASINFU+6, HASINFU+13 , HASINFU+14, HASINFU+15, HASNEB+1~, HASNEB+5, HASNEB+6, HASNEB+13, HASNEB+14, HASNEB+15, NONW180+2~, NONW180+3 , GETOP+5, GETOP+6, GETOP+8, GETOP+9, GETOP+10, GETOP+15, GETOP+16, GETOP+17, GETBENZO+5, GETBENZO+6 , GETBENZO+8, GETBENZO+9, GETBENZO+10, GETBENZO+16, GETBENZO+17, GETBENZO+18
B	MEDCOV+89!, COVERAGE+2~, NONW180+2~, NONW180+3*, NONW180+4
BDATE	MEDCOV+89!, COVERAGE~, COVERAGE+5, COVERAGE+6, COVERAGE+7, COVERAGE+8, COVERAGE+10, HASARB~, HASARB+3, HASINFU~ , HASINFU+3, HASNEB~, HASNEB+3
BGPACEI	MEDCOV+3~, MEDCOV+4, MEDCOV+14, MEDCOV+15, MEDCOV+17, MEDCOV+18, MEDCOV+19
>> BGPACTCL	MEDCOV+7, COB+3
>> BGPACTUP	MEDCOV+6
>> BGPAGEB	MEDCOV+8, MEDCOV+14, MEDCOV+20, MEDCOV+26, MEDCOV+32, MEDCOV+38, MEDCOV+44, MEDCOV+50, MEDCOV+56, MEDCOV+62 , MEDCOV+68, MEDCOV+82, COB+4
BGPANTI	MEDCOV+3~, MEDCOV+4, MEDCOV+68, MEDCOV+69, MEDCOV+71, MEDCOV+73, MEDCOV+89!
>> BGPBDATE	MEDCOV+8, MEDCOV+14, MEDCOV+20, MEDCOV+26, MEDCOV+32, MEDCOV+38, MEDCOV+44, MEDCOV+50, MEDCOV+56, MEDCOV+62 , MEDCOV+68, MEDCOV+75, MEDCOV+82, COB+5, COB+6, GETOP+2, GETBENZO+2
BGPBENO	COB+22!, S+8!
BGPBENO(	COB+24*, S+4
BGPBENZO	COB+18, S+8!, GETBENZO+4!
BGPBENZO(	COB+16, COB+20, S+4, GETBENZO+17, GETBENZO+18
BGPBETA	MEDCOV+3~, MEDCOV+4, MEDCOV+8, MEDCOV+9, MEDCOV+11, MEDCOV+12, MEDCOV+13
BGPBIG	MEDCOV+3~, MEDCOV+4, MEDCOV+26, MEDCOV+27, MEDCOV+29, MEDCOV+30, MEDCOV+31
BGPBRONC	MEDCOV+3~, MEDCOV+4, MEDCOV+75, MEDCOV+76, MEDCOV+78, MEDCOV+79, MEDCOV+80
BGPC	MEDCOV+89!
BGPCCB	MEDCOV+3~, MEDCOV+4, MEDCOV+20, MEDCOV+21, MEDCOV+23, MEDCOV+24, MEDCOV+25
>> BGPD1	MEDCOV+2, MEDCOV+10, COB+1, COB+11
>> BGPD10	MEDCOV+2, MEDCOV+52
>> BGPD11	MEDCOV+2, MEDCOV+64
>> BGPD12	MEDCOV+2, MEDCOV+77
>> BGPD13	MEDCOV+2, MEDCOV+84
>> BGPD2	MEDCOV+2, MEDCOV+16
>> BGPD3	MEDCOV+2, MEDCOV+22
>> BGPD4	MEDCOV+2, MEDCOV+28
>> BGPD5	MEDCOV+2, MEDCOV+34
>> BGPD6	MEDCOV+2, MEDCOV+40
>> BGPD7	MEDCOV+2, MEDCOV+58
>> BGPD8	MEDCOV+2, MEDCOV+70
>> BGPD9	MEDCOV+2, MEDCOV+46
BGPDMALL	MEDCOV+3~, MEDCOV+4, MEDCOV+50, MEDCOV+51, MEDCOV+53, MEDCOV+54, MEDCOV+55, MEDCOV+89!
BGPDN	MEDCOV+89!
BGPDPP	MEDCOV+3~, MEDCOV+4, MEDCOV+44, MEDCOV+45, MEDCOV+47, MEDCOV+48, MEDCOV+49
>> BGPEDATE	MEDCOV+8, MEDCOV+14, MEDCOV+20, MEDCOV+26, MEDCOV+32, MEDCOV+38, MEDCOV+44, MEDCOV+50, MEDCOV+56, MEDCOV+62 , MEDCOV+68, MEDCOV+75, MEDCOV+82, COVERAGE+4, COB+5, COB+6, GETOP+2, GETBENZO+2
BGPG	MEDCOV+89!
BGPINFU	MEDCOV+3~, MEDCOV+4, MEDCOV+82, MEDCOV+83, MEDCOV+85, MEDCOV+86, MEDCOV+87
BGPISD	COVERAGE+2~, COVERAGE+12, COVERAGE+24, COVERAGE+27, COVERAGE+29, COVERAGE+58, NONW180+5
BGPMEDS1	MEDCOV+90!, COVERAGE+2~, COVERAGE+9!, COVERAGE+10, COVERAGE+11, HASARB+1~, HASARB+2!, HASARB+3, HASARB+4, HASINFU+1~ , HASINFU+2!, HASINFU+3, HASINFU+4, HASNEB+1~, HASNEB+2!, HASNEB+3, HASNEB+4, GETOP+1!, GETOP+2, GETOP+3 , GETOP+19!, GETBENZO+1!, GETBENZO+2, GETBENZO+3, GETBENZO+20!
BGPMEDS1(	COVERAGE+13, COVERAGE+14, COVERAGE+16!, COVERAGE+17!, COVERAGE+18!, COVERAGE+24, COVERAGE+32, COVERAGE+33, COVERAGE+39, COVERAGE+44 , HASARB+5, HASARB+6, HASARB+13!, HASARB+14!, HASARB+15!, HASINFU+5, HASINFU+6, HASINFU+13!, HASINFU+14!, HASINFU+15! , HASNEB+5, HASNEB+6, HASNEB+13!, HASNEB+14!, HASNEB+15!, NONW180+3, NONW180+4, GETOP+5, GETOP+6, GETOP+8! , GETOP+9!, GETOP+10!, GETOP+15, GETOP+16, GETOP+17, GETBENZO+5, GETBENZO+6, GETBENZO+8!, GETBENZO+9!, GETBENZO+10! , GETBENZO+16, GETBENZO+17, GETBENZO+18
BGPMP	COVERAGE+2~, COVERAGE+29*, COVERAGE+56, COVERAGE+58
BGPN	MEDCOV+89!
>> BGPN1	MEDCOV+1, MEDCOV+11, COB+1, COB+27, S+3
>> BGPN10	MEDCOV+1, MEDCOV+36
>> BGPN11	MEDCOV+1, MEDCOV+41
>> BGPN12	MEDCOV+1, MEDCOV+42
>> BGPN13	MEDCOV+1, MEDCOV+59
>> BGPN14	MEDCOV+1, MEDCOV+60
>> BGPN15	MEDCOV+1, MEDCOV+71
>> BGPN16	MEDCOV+1, MEDCOV+47
>> BGPN17	MEDCOV+1, MEDCOV+48
>> BGPN18	MEDCOV+1, MEDCOV+53
>> BGPN19	MEDCOV+1, MEDCOV+54
>> BGPN2	MEDCOV+1, MEDCOV+12
>> BGPN20	MEDCOV+1, MEDCOV+65
>> BGPN21	MEDCOV+2, MEDCOV+66
>> BGPN22	MEDCOV+2, MEDCOV+78
>> BGPN23	MEDCOV+2, MEDCOV+79
>> BGPN24	MEDCOV+2, MEDCOV+85
>> BGPN25	MEDCOV+2, MEDCOV+86
>> BGPN3	MEDCOV+1, MEDCOV+17
>> BGPN4	MEDCOV+1, MEDCOV+18
>> BGPN5	MEDCOV+1, MEDCOV+23
>> BGPN6	MEDCOV+1, MEDCOV+24
>> BGPN7	MEDCOV+1, MEDCOV+29
>> BGPN8	MEDCOV+1, MEDCOV+30
>> BGPN9	MEDCOV+1, MEDCOV+35
BGPNWARI	MEDCOV+3~, MEDCOV+4, MEDCOV+62, MEDCOV+63, MEDCOV+65, MEDCOV+66, MEDCOV+67
BGPOPI	S+8!, GETOP+4!
BGPOPI(	COB+8, COB+19, COB+26, COB+28, GETOP+16, GETOP+17
BGPSTATI	MEDCOV+3~, MEDCOV+4, MEDCOV+56, MEDCOV+57, MEDCOV+59, MEDCOV+60, MEDCOV+61, MEDCOV+89!
>> BGPSTOP	MEDCOV+6, MEDCOV+7, COB+3, COB+4, COB+5, COB+6, COB+9, COB+10
BGPSULF	MEDCOV+3~, MEDCOV+4, MEDCOV+32, MEDCOV+33, MEDCOV+35, MEDCOV+36, MEDCOV+37
BGPTHIA	MEDCOV+3~, MEDCOV+4, MEDCOV+38, MEDCOV+39, MEDCOV+41, MEDCOV+42, MEDCOV+43
BGPUDO	COB+22!, S+8!
BGPUDO(	COB+24, COB+25, COB+26, COB+28
>> BGPVALUD	S, S+7
>> BGPVALUE	MEDCOV+5, MEDCOV+13, MEDCOV+19, MEDCOV+25, MEDCOV+31, MEDCOV+37, MEDCOV+43, MEDCOV+49, MEDCOV+55, MEDCOV+61 , MEDCOV+67, MEDCOV+73, MEDCOV+80, MEDCOV+87, MEDCOV+88, COB+2, S, S+6
C	MEDCOV+89!, COVERAGE+2~, COVERAGE+13, COVERAGE+25, COVERAGE+26, COVERAGE+58, COVERAGE+59, COVERAGE+60, COVERAGE+61, COVERAGE+63 , HASARB+1~, HASARB+5, HASARB+16, HASARB+18, HASINFU+1~, HASINFU+5, HASINFU+17, HASINFU+20, HASNEB+1~, HASNEB+5* , HASNEB+16, HASNEB+18, NONW180+2~, COB+8, COB+9, COB+16, COB+17, COB+25, COB+26, GETOP+5 , GETBENZO+5*
D	MEDCOV+89!, COVERAGE+2~, NONW180+2~, NONW180+4, NONW180+5, COB+19, COB+20, GETOP+15, GETOP+16, GETOP+17 , GETBENZO+16*, GETBENZO+17, GETBENZO+18
DAYS	COVERAGE+2~, COVERAGE+31, COVERAGE+52, COVERAGE+53, COVERAGE+54, COVERAGE+56, COVERAGE+58
DC	COVERAGE+2~, COVERAGE+45*, COVERAGE+48
>> DFN	MEDCOV+8, MEDCOV+14, MEDCOV+20, MEDCOV+26, MEDCOV+32, MEDCOV+38, MEDCOV+44, MEDCOV+50, MEDCOV+56, MEDCOV+62 , MEDCOV+68, MEDCOV+75, MEDCOV+82, COB+5, COB+6, GETOP+2, GETBENZO+2
E	MEDCOV+89!, COVERAGE+2~, COB+19, COB+20
EDATE	MEDCOV+89!, COVERAGE~, COVERAGE+5, COVERAGE+6, COVERAGE+7, COVERAGE+8, COVERAGE+10, COVERAGE+27, COVERAGE+29, COVERAGE+47 , COVERAGE+55, HASARB~, HASARB+3, HASINFU~, HASINFU+3, HASNEB~, HASNEB+3
F	MEDCOV+89!
G	MEDCOV+89!, COVERAGE+2~, COVERAGE+28, COVERAGE+43, COVERAGE+55, NONW180+5, COB+19, COB+20
GAP	COVERAGE+2~, COVERAGE+31, COVERAGE+43, COVERAGE+55*, COVERAGE+58, COVERAGE+61
H	MEDCOV+89!
I	MEDCOV+89!
J	MEDCOV+89!
K	MEDCOV+89!
LEND	COVERAGE+2~, COVERAGE+31, COVERAGE+41, COVERAGE+42, COVERAGE+43, COVERAGE+51*, COVERAGE+55
M	MEDCOV+89!, COVERAGE+2~, COVERAGE+14, COVERAGE+15, COVERAGE+16, COVERAGE+17, COVERAGE+18, COVERAGE+20, COVERAGE+22, COVERAGE+23 , COVERAGE+33, COVERAGE+35, COVERAGE+37, COVERAGE+38, COVERAGE+44, COVERAGE+45, COVERAGE+46, HASARB+1~, HASARB+6, HASARB+7 , HASARB+9, HASARB+11, HASARB+12, HASARB+13, HASARB+14, HASARB+15, HASINFU+1~, HASINFU+6, HASINFU+7, HASINFU+9 , HASINFU+11, HASINFU+12, HASINFU+13, HASINFU+14, HASINFU+15, HASINFU+16, HASNEB+1~, HASNEB+6, HASNEB+7, HASNEB+9 , HASNEB+11, HASNEB+12, HASNEB+13, HASNEB+14, HASNEB+15, GETOP+6, GETOP+7, GETOP+8, GETOP+9, GETOP+10 , GETOP+11, GETOP+13, GETOP+14, GETBENZO+6, GETBENZO+7, GETBENZO+8, GETBENZO+9, GETBENZO+10, GETBENZO+12, GETBENZO+14 , GETBENZO+15
MTAX	COVERAGE~, COVERAGE+10
N	MEDCOV+89!, COVERAGE+2~, COVERAGE+46, COVERAGE+47, COVERAGE+49*, COVERAGE+51, COVERAGE+52
NTAX	COVERAGE~, COVERAGE+10
O	MEDCOV+89!
P	MEDCOV+89!, COVERAGE~, COVERAGE+4, COVERAGE+5, COVERAGE+6, COVERAGE+7, COVERAGE+8, COVERAGE+10, HASARB~, HASARB+3 , HASINFU~, HASINFU+3, HASNEB~, HASNEB+3
PER	COVERAGE+2~, COVERAGE+56, COVERAGE+57, COVERAGE+58, COVERAGE+59, COVERAGE+60
Q	MEDCOV+89!, COVERAGE+2~, COVERAGE+20, COVERAGE+21, COVERAGE+35, COVERAGE+36, HASARB+9, HASARB+10, HASINFU+9, HASINFU+10 , HASNEB+9, HASNEB+10, GETOP+11, GETOP+12, GETBENZO+12*, GETBENZO+13
R	MEDCOV+89!
S	MEDCOV+89!, COVERAGE+2~, COVERAGE+48, COVERAGE+49, COB+8, COB+10, COB+19, COB+20, GETOP+10, GETOP+16 , GETOP+17, GETBENZO+10, GETBENZO+17, GETBENZO+18
SD	COVERAGE+2~, COVERAGE+40, COVERAGE+41, COVERAGE+42, COVERAGE+43, COVERAGE+47, COVERAGE+48, COVERAGE+51
T	MEDCOV+89!, COVERAGE+2~, HASINFU+1~, HASINFU+5, HASINFU+16, COB+17, COB+18, COB+21, COB+24, COB+27 , S+5
T1	COVERAGE+2~
TYPE	COVERAGE~, COVERAGE+3, COVERAGE+5, COVERAGE+6, COVERAGE+7, COVERAGE+8, COVERAGE+28, COVERAGE+53, COVERAGE+54, COVERAGE+58 , COVERAGE+59, COVERAGE+60, COVERAGE+61
U	MEDCOV+9, MEDCOV+11, MEDCOV+12, MEDCOV+13, MEDCOV+15, MEDCOV+17, MEDCOV+18, MEDCOV+19, MEDCOV+21, MEDCOV+23 , MEDCOV+24, MEDCOV+25, MEDCOV+27, MEDCOV+29, MEDCOV+30, MEDCOV+31, MEDCOV+33, MEDCOV+35, MEDCOV+36, MEDCOV+37 , MEDCOV+39, MEDCOV+41, MEDCOV+42, MEDCOV+43, MEDCOV+45, MEDCOV+47, MEDCOV+48, MEDCOV+49, MEDCOV+51, MEDCOV+53 , MEDCOV+54, MEDCOV+55, MEDCOV+57, MEDCOV+59, MEDCOV+60, MEDCOV+61, MEDCOV+63, MEDCOV+65, MEDCOV+66, MEDCOV+67 , MEDCOV+69, MEDCOV+71, MEDCOV+73, MEDCOV+76, MEDCOV+78, MEDCOV+79, MEDCOV+80, MEDCOV+83, MEDCOV+85, MEDCOV+86 , MEDCOV+87, COVERAGE+4, COVERAGE+14, COVERAGE+16, COVERAGE+17, COVERAGE+18, COVERAGE+21, COVERAGE+24, COVERAGE+33, COVERAGE+36 , COVERAGE+39, COVERAGE+44, COVERAGE+45, COVERAGE+46, COVERAGE+58, HASARB+6, HASARB+10, HASARB+13, HASARB+14, HASARB+15 , HASINFU+6, HASINFU+10, HASINFU+13, HASINFU+14, HASINFU+15, HASINFU+16, HASNEB+6, HASNEB+10, HASNEB+13, HASNEB+14 , HASNEB+15, NONW180+4, COB+8, COB+19, COB+20, COB+24, COB+26, COB+28, S+4, GETOP+6 , GETOP+8, GETOP+9, GETOP+10, GETOP+12, GETOP+15, GETOP+16, GETOP+17, GETBENZO+6, GETBENZO+8, GETBENZO+9 , GETBENZO+10, GETBENZO+13, GETBENZO+16, GETBENZO+17, GETBENZO+18
V	MEDCOV+89!, COVERAGE+2~, COVERAGE+39*, COVERAGE+40
W	MEDCOV+89!
X	MEDCOV+89!, COVERAGE+2~, COVERAGE+32, COVERAGE+33, COVERAGE+39, COVERAGE+44, COB+8, COB+16, COB+19, COB+20* , COB+21, COB+23, COB+24, COB+25, COB+26, COB+28, S, S+2, S+4, S+5 , S+6, S+7
Y	MEDCOV+89!, COVERAGE+2~, COB+19, COB+20, COB+28, S+4
Z	MEDCOV+89!, COVERAGE+2~

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP8D39

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: