Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: CIMGAGP3

Package: Aberdeen GPRA Report

Routine: CIMGAGP3


Information

CIMGAGP3 ; CMI/TUCSON/LAB - aberdeen area GPRA ; [ 03/13/00 8:58 PM ]

Source Information

Source file <CIMGAGP3.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Patient Care Component Reports 2 $$START1^APCLDF  $$CLINIC^APCLV  
IHS Patient 1 ($$AGE,$$DOB)^AUPNPAT  
IHS VA Utilities 1 $$VALI^XBDIQ1  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Aberdeen GPRA Report 1 CIMGAGP2  

Entry Points

Name Comments DBIA/ICR reference
BI() ;
FLU(P,EDATE) ;
PHN ;
S(R,N,P,V) ;
L
TOBACCO3 ;lookup in health status
INJ20 ;any visit with E code
PNEU(P,EDATE) ;
SMOKE ;
HOME ;
FLUPNEU ;
TOBACCO2 ;check pov file for TOBACCO USE DOC
TOBACCO1 ;check problem file for tobacco use
TOBACCO0 ;check for tobacco documented in health factors
PHNV(P,BDATE,EDATE,LOC) ;count all phn visits for this patient
TOBACCO(P,EDATE) ;EP

External References

Name Field # of Occurrence
^%DT TOBACCO2+2
$$START1^APCLDF TOBACCO0+1, TOBACCO1+2, TOBACCO2+4, FLU+4, PNEU+3, PHNV+4
$$CLINIC^APCLV HOME+1
$$AGE^AUPNPAT FLUPNEU+1
$$DOB^AUPNPAT PNEU+3
$$VALI^XBDIQ1 PHNV+8
$$FMADD^XLFDT INJ20+3, TOBACCO2+3, FLU+1
$$FMTE^XLFDT TOBACCO2+3, FLU+3, FLU+5, PNEU+2, PNEU+3, PNEU+4, PHNV+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] TOBACCO3+3
^ATXAX("B" TOBACCO3+1
^AUPNHF("AA" TOBACCO3+3
^AUPNPAT - [#9000001] FLUPNEU+6, FLUPNEU+9, SMOKE+3
^AUPNPROB - [#9000011] TOBACCO1+3, TOBACCO1+4
^AUPNVPOV - [#9000010.07] INJ20+7, INJ20+8, INJ20+21, L+6, L+8, TOBACCO2+5, TOBACCO2+6
^AUPNVPOV("AA" INJ20+5, INJ20+6
^AUPNVPRV - [#9000010.06] PHNV+8
^AUPNVPRV("AD" PHNV+8
^AUPNVSIT - [#9000010] INJ20+7, L, HOME+3
^AUTNPOV - [#9999999.27] TOBACCO1+3, TOBACCO1+4, TOBACCO2+5, TOBACCO2+6
^AUTTHF - [#9999999.64] TOBACCO3+5
^AUTTIMM(0 BI+1
^AUTTSITE(1 PHNV+8
^CIMAGP( INJ20+22, INJ20+23*, INJ20+24*, INJ20+25*, L+1*, L+2*, L+3*, L+4*, L+6*, L+11
, L+13, L+15*, L+16*, L+17*, S+2*
^DIC(7 - [#7] PHNV+8
^DPT - [#2] FLUPNEU+6, FLUPNEU+9, SMOKE+3, INJ20+21
^ICD9 - [#80] INJ20+8, L+10, TOBACCO1+3
^XTMP("CIMGAGP" FLUPNEU+6*, FLUPNEU+9*, SMOKE+3*, INJ20+21*

Label References

Name Line Occurrences
$$BI FLU+4, PNEU+3
$$FLU FLUPNEU+7
$$PHNV PHN+1
$$PNEU FLUPNEU+4
$$TOBACCO SMOKE+1
HOME PHNV+6
S PHN+2, PHN+3, PHN+4, PHN+5, FLUPNEU+3, FLUPNEU+5, FLUPNEU+8, SMOKE+2, SMOKE+4, SMOKE+6
, INJ20+20
SMOKE FLUPNEU+2
TOBACCO0 TOBACCO+5
TOBACCO1 TOBACCO+7
TOBACCO3 TOBACCO+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% L+13*, TOBACCO3+1*, TOBACCO3+2, TOBACCO3+3, PHNV+2~, PHNV+8*
>> %1 L+13*, L+14
%DT TOBACCO2+1~, TOBACCO2+2*
A L+6*, PHNV+2~, PHNV+3!
A( PHNV+6
A(1 PHNV+5
APCL TOBACCO+2~, TOBACCO0+1!, TOBACCO1+2!, TOBACCO2+4!
APCL(1 TOBACCO0+1, TOBACCO0+2, TOBACCO0+3, TOBACCO1+2, TOBACCO1+3, TOBACCO1+4, TOBACCO2+4, TOBACCO2+5, TOBACCO2+6
APCLTOB TOBACCO+2~, TOBACCO+4, TOBACCO+6, TOBACCO+8, TOBACCO+10, TOBACCO0+2*, TOBACCO0+3*, TOBACCO0+4*, TOBACCO3+6*, TOBACCO3+7*
, TOBACCO3+8*, TOBACCO3+9*, TOBACCO1+3*, TOBACCO1+4*, TOBACCO2+5*, TOBACCO2+6*
B INJ20+4*, INJ20+5*, INJ20+6, PHNV+2~, PHNV+4*
>> BBBBB SMOKE+5
BDATE TOBACCO2+3~*, TOBACCO2+4, FLU+1~*, FLU+3*, FLU+4, PHNV~, PHNV+4
C PHNV+2~, PHNV+6*, PHNV+9, HOME+1*, HOME+3*
>> CIMAGE FLUPNEU+1*, FLUPNEU+2, FLUPNEU+6, FLUPNEU+9, SMOKE+3, SMOKE+5
>> CIMAGEP SMOKE+5*, SMOKE+6
>> CIMBDATE PHN+1, FLUPNEU+1, INJ20+4
>> CIMEDATE PHN+1, FLUPNEU+4, FLUPNEU+7, SMOKE+1, INJ20+3
>> CIMEN L+14*, L+15, L+16
CIMG FLU+2~, PNEU+1~
CIMG(1 FLU+5, PNEU+4
>> CIMGH FLUPNEU+6, FLUPNEU+9, SMOKE+3, INJ20+21
>> CIMGJ FLUPNEU+6, FLUPNEU+9, SMOKE+3, INJ20+21
>> CIMHOME PHN+1
>> CIMINJC INJ20+23*, INJ20+24
>> CIMINJP INJ20+23*, INJ20+24
>> CIMLIST(14 FLUPNEU+6
>> CIMLIST(15 FLUPNEU+9
>> CIMLIST(16 SMOKE+3
>> CIMNODE INJ20+1*, INJ20+22, INJ20+23, INJ20+25, L+1, L+2, L+3, L+4, L+6, L+11
, L+13, L+15, L+16, L+17
>> CIMRPT PHN+2, PHN+3, PHN+4, PHN+5, FLUPNEU+3, FLUPNEU+5, FLUPNEU+8, SMOKE+2, SMOKE+4, SMOKE+6
, INJ20+20, INJ20+22, INJ20+23, INJ20+24, INJ20+25, L+1, L+2, L+3, L+4, L+6
, L+11, L+13, L+15, L+16, L+17
>> CIMTIME PHN+2, PHN+3, PHN+4, PHN+5, FLUPNEU+3, FLUPNEU+5, FLUPNEU+6, FLUPNEU+8, FLUPNEU+9, SMOKE+2
, SMOKE+3, SMOKE+4, SMOKE+6, INJ20+1, INJ20+20, INJ20+23, INJ20+24, L+16
D INJ20+8*, INJ20+25, TOBACCO2+1~, TOBACCO2+2*, TOBACCO2+3, PHNV+7*, PHNV+8*
>> DFN PHN+1, FLUPNEU+1, FLUPNEU+4, FLUPNEU+6, FLUPNEU+7, FLUPNEU+9, SMOKE+1, SMOKE+3, INJ20+5, INJ20+6
, INJ20+21
E INJ20+4*, INJ20+5, TOBACCO+2~, TOBACCO0+1*, TOBACCO1+2*, TOBACCO2+4*, FLU+2~, FLU+4*, PNEU+1~, PNEU+3*
, PHNV+4*
>> EC L+10*, L+11, L+15, L+17
EDATE TOBACCO~, TOBACCO2+2, TOBACCO2+4, FLU~, FLU+1, FLU+3*, FLU+4, PNEU~, PNEU+2*, PNEU+3
, PHNV~, PHNV+4
H PHNV+2~
>> I INJ20+8*, INJ20+9, INJ20+10, INJ20+11, INJ20+12, INJ20+13, INJ20+14, INJ20+15, INJ20+16, INJ20+17
, INJ20+18, INJ20+19, INJ20+22, INJ20+23, INJ20+25
>> K L+8*, L+9, L+10
LOC PHNV~, PHNV+1*, HOME+2, HOME+3
>> M L+10*, L+17
N S~, S+2
P INJ20+8*, S~, S+2, TOBACCO~, TOBACCO+1, TOBACCO0+1, TOBACCO3+3, TOBACCO1+2, TOBACCO2+4, FLU~
, FLU+4, PNEU~, PNEU+3, PHNV~, PHNV+4
Q PHNV+2~, PHNV+8*
R S~, S+1, S+2
>> S INJ20+3*, INJ20+4, L*, L+1, L+2, L+3, L+4
>> T L*, L+1, L+2, L+3, L+4
U PHN+2, PHN+3, PHN+4, PHN+5, FLUPNEU+6, FLUPNEU+9, SMOKE+3, INJ20+7, INJ20+8, INJ20+21
, INJ20+25, L, L+1, L+2, L+3, L+4, L+6, L+8, L+10, L+17
, S+2, TOBACCO0+2, TOBACCO0+3, TOBACCO3+5, TOBACCO1+3, TOBACCO1+4, TOBACCO2+5, TOBACCO2+6, FLU+5, PNEU+4
, PHNV+6, PHNV+8, HOME+1, HOME+3
V FLUPNEU+4*, FLUPNEU+5, FLUPNEU+6, FLUPNEU+7*, FLUPNEU+8, FLUPNEU+9, INJ20+6*, INJ20+7, INJ20+8, INJ20+21
, L+6, L+8, S~, S+2, PHNV+6*, PHNV+8, HOME+1, HOME+3
X PHN+1*, PHN+2, PHN+3, PHN+4, PHN+5, SMOKE+1*, SMOKE+2, SMOKE+3, SMOKE+4, SMOKE+6
, INJ20+25*, L+1, L+2, L+3, L+4, L+6, L+11, L+13, L+15, L+16
, L+17, TOBACCO+2~, TOBACCO0+1*, TOBACCO3+3*, TOBACCO1+2*, TOBACCO2+2*, TOBACCO2+4*, FLU+2~, FLU+4*, PNEU+1~
, PNEU+3*, PHNV+2~, PHNV+6*
Y L+17*, TOBACCO3+3*, TOBACCO3+4, TOBACCO3+5*, TOBACCO3+6, TOBACCO3+7, TOBACCO3+8, TOBACCO2+2, PHNV+2~, PHNV+6*
, PHNV+7*, PHNV+8*
>> Z INJ20+7*, L
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All