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 |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: APCM11E2

Package: Patient Care Component Table Maintiance

Routine: APCM11E2


Information

APCM11E2 ; IHS/CMI/LAB - IHS MU ;

Source Information

Source file <APCM11E2.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Patient Care Component Table Maintiance 2 (S,SETLIST)^APCM11E1  $$DATE^APCM1UTL  
IHS Patient 1 $$DOD^AUPNPAT  
IHS Patient Registration 1 ($$RACE,RACE)^AGUTL  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 $$FMADD^XLFDT  
Patient Care Component Reports 1 $$VD^APCLV  

Entry Points

Name Comments DBIA/ICR reference
UD1 ;
PL1 ;set denominator value into field
DEMO ;EP - CALCULATE DEMOGRAPHICS
MEDL1 ;set denominator value into field
NAM ;look for "No Active Medications" anytime during the report period
PATVRY(RX,PAT) ;EP
HASML(P,BDT,EDT) ;EP
HADRX(P,BD,ED) ;EP - did patient have a RX in file 52 with an issue date
CPOE1 ;
ORES(R,D) ;EP - DID PROVIDER HAVE ORES OR ORESLE ON DATE D
PL ;EP - CALCULATE PROBLEM LIST
CPOE ;EP - CALCULATE CPOE MEDICATIONS MEASURE
CPOEL
DEMO1 ;set denominator value into field
RXS ;
HASDEMOH ;did patient die in the hospital during report period? if so is dod and underlying cause there?
HASPL(P,BD,ED) ;does patient have a problem entered before end of report period
HADNOEP(P,BD,ED) ;EP - did patient have a RX in file 52 with an issue date
MEDL ;EP - CALCULATE MEDICATION LIST
DSPRDT(RX,TYP,SIEN) ;EP
NVA ; Set Non-VA Med Orders in the ^TMP Global
HASDEMO(P,BD,ED,T,DODV) ;
UD ;

External References

Name Field # of Occurrence
$$RACE^AGUTL HASDEMO+13
RACE^AGUTL HASDEMO+13
$$VD^APCLV HASPL+21, NAM+7
S^APCM11E1 CPOE+13, CPOE1+5, CPOE1+12, DEMO1+2, DEMO1+8, PL1+2, PL1+8, MEDL1+2, MEDL1+8
SETLIST^APCM11E1 CPOEL, DEMO1+9, PL1+9, MEDL1+9
$$DATE^APCM1UTL CPOE1+6, CPOE1+10, DEMO1+3, PL1+3, HASPL+23, MEDL1+3, NAM+10, RXS+12, NVA+9
$$DOD^AUPNPAT HASDEMOH+3
$$VAL^XBDIQ1 HADRX+15, HASDEMO+15, HASDEMOH+5, HASPL+8, HASPL+13
$$FMADD^XLFDT HADRX+9, HADNOEP+9, RXS+2, RXS+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCMMUM - [#9001300.02] CPOE+13, CPOE1+4, CPOE1+11, DEMO1+1, DEMO1+7, PL1+1, PL1+7, MEDL1+1, MEDL1+7
^AUPNPAT - [#9000001] HADRX+5, HADNOEP+5, HASDEMO+7, HASDEMO+8, HASML+6
^AUPNPROB - [#9000011] HASPL+6, HASPL+7, HASPL+8, HASPL+10
^AUPNPROB("AC" HASPL+4
^AUPNVRUP - [#9000010.54] HASPL+19, HASPL+20, HASPL+21, NAM+5, NAM+6, NAM+7
^AUPNVRUP("AC" HASPL+18, NAM+4
^AUTTCRA("B" HASPL+16, NAM+1
^DIC(19.1 - [#19.1] ORES+4, ORES+5
^DPT - [#2] HASDEMO+11, HASDEMO+16, HASDEMO+17, HASDEMO+21
^OR(100 - [#100] HADNOEP+18, HADNOEP+21, HADNOEP+22, HADNOEP+23, HADNOEP+26, UD1+10, UD1+13, UD1+14, UD1+15, UD1+18
, UD1+30, UD1+33, UD1+34, UD1+35, UD1+38
^ORD(100.02 - [#100.02] HADNOEP+26, UD1+18, UD1+38
^PS(50.606 - [#50.606] NVA+4
^PS(50.7 - [#50.7] UD+19, NVA+4
^PS(55 - [#55] HADRX+10, UD+1, UD+2, UD+3, UD+6, UD+7, UD+12, UD+13, UD+14, UD+17
, HADNOEP+10, UD1+2, UD1+3, UD1+4, UD1+8, UD1+22, UD1+23, UD1+24, UD1+28, RXS+4
, NVA+2
^PSDRUG - [#50] UD+8, NVA+4
^PSRX - [#52] HADRX+10, HADRX+11, HADRX+12, HADNOEP+10, HADNOEP+11, HADNOEP+12, HADNOEP+16, RXS+4, RXS+5, RXS+6
, RXS+7, RXS+10, RXS+12, PATVRY+2, DSPRDT+1
^VA(200 - [#200] ORES+2, ORES+6, ORES+7

Label References

Name Line Occurrences
$$HADNOEP CPOE1+8
$$HADRX CPOE1+1
$$HASDEMO DEMO1+5
$$HASML MEDL1+5
$$HASPL PL1+5
CPOE1 CPOE+15, CPOE+20
CPOEL CPOE1+9
DEMO1 DEMO+9, DEMO+13
HASDEMOH HASDEMO+22
MEDL1 MEDL+9, MEDL+15
PL1 PL+9, PL+14
RXS NAM+2
UD HADRX+8
UD1 HADNOEP+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A HADNOEP+6~, HADNOEP+21*, HADNOEP+22, HADNOEP+23, HADNOEP+26, UD1+13*, UD1+14, UD1+15, UD1+18, UD1+33*
, UD1+34, UD1+35, UD1+38, HASPL+2~, HASPL+4*, HASPL+6, HASPL+7, HASPL+8, HASPL+10, HASPL+13
, HASPL+18*, HASPL+19, HASPL+20, HASPL+21, NAM+4*, NAM+5, NAM+6, NAM+7
A0 HASML+1~
ACTIEN HASML+1~
>> APCM100R( CPOE+13
>> APCMBDAT CPOE1+1, CPOE1+8, DEMO1+5, PL1+5, MEDL1+5
>> APCMD1 CPOE+10*, DEMO+5*, PL+5*, MEDL+5*
>> APCMEDAT CPOE1+1, CPOE1+8, DEMO1+5, PL1+5, MEDL1+5
>> APCMEP CPOE1+8*, CPOE1+9, CPOE1+10, DEMO1+5*, DEMO1+6, DEMO1+8, PL1+5*, PL1+6, PL1+8, MEDL1+5*
, MEDL1+6, MEDL1+8
>> APCMFAC CPOE+18, DEMO+11, PL+12, MEDL+13
>> APCMHP CPOE1+1*, CPOE1+2, CPOE1+6
>> APCMHVTP( CPOE+14, CPOE+19, CPOE1+6, DEMO+8, DEMO+12, DEMO1+3, PL+8, PL+13, PL1+3, MEDL+8
, MEDL+14, MEDL1+3
>> APCMIC CPOE+13, CPOE1+4, CPOE1+5, CPOE1+11, CPOE1+12, DEMO1+1, DEMO1+2, DEMO1+7, DEMO1+8, PL1+1
, PL1+2, PL1+7, PL1+8, MEDL1+1, MEDL1+2, MEDL1+7, MEDL1+8
>> APCMN1 CPOE+10*, DEMO+5*, PL+5*, MEDL+5*
APCMP CPOE+9~, CPOE+12*, CPOE+13, CPOE+14, CPOE+18*, CPOE+19, CPOE1+5, CPOE1+6, CPOE1+12, DEMO+4~
, DEMO+7*, DEMO+8, DEMO+11*, DEMO+12, DEMO1+2, DEMO1+3, DEMO1+8, PL+4~, PL+7*, PL+8
, PL+12*, PL+13, PL1+2, PL1+3, PL1+8, MEDL+4~, MEDL+7*, MEDL+8, MEDL+13*, MEDL+14
, MEDL1+2, MEDL1+3, MEDL1+8
>> APCMPRV( CPOE+12, DEMO+7, PL+7, MEDL+7
>> APCMRPT CPOE+13, CPOE1+5, CPOE1+12, DEMO1+2, DEMO1+8, PL1+2, PL1+8, MEDL1+2, MEDL1+8
>> APCMRPTT CPOE+11, CPOE+13, CPOE+17, CPOE1+5, CPOE1+12, HADRX+8, HADRX+17, HADNOEP+8, HADNOEP+28, DEMO+6
, DEMO+10, DEMO1+2, DEMO1+5, DEMO1+8, PL+6, PL+11, PL1+2, PL1+8, MEDL+6, MEDL+12
, MEDL1+2, MEDL1+8
>> APCMTIME CPOE+13, CPOE1+5, CPOE1+12, DEMO1+2, DEMO1+8, PL1+2, PL1+8, MEDL1+2, MEDL1+8
APCMUD HADRX+6~, UD+1*, UD+2, UD+3, UD+6, UD+7, UD+12*, UD+13, UD+14, UD+17
, UD1+2*, UD1+3, UD1+4, UD1+8, UD1+22*, UD1+23, UD1+24, UD1+28
>> APCMVALU CPOE1+6*, CPOE1+10*, DEMO1+3*, DEMO1+6*, PL1+3*, PL1+6*, MEDL1+3*, MEDL1+6*
>> APCMVDOD DEMO1+5
B HADNOEP+6~, HADNOEP+18*, HADNOEP+19, HADNOEP+23*, HADNOEP+24, HADNOEP+25, HADNOEP+26, UD1+10*, UD1+11, UD1+15*
, UD1+16, UD1+17, UD1+18, UD1+30*, UD1+31, UD1+35*, UD1+36, UD1+37, UD1+38, HASDEMO+1~
, HASDEMO+8*, HASDEMO+9, HASPL+2~
BD HADRX~, HADRX+3, HADRX+9, HADRX+13, UD+4, UD+15, HADNOEP~, HADNOEP+3, HADNOEP+9, HADNOEP+13
, UD1+5, UD1+25, HASDEMO~, HASPL~, HASPL+12
BDT HASML~, HASML+4, NAM+8, RXS+2, RXS+3, RXS+11, NVA+5
C HASDEMO+1~, HASDEMO+2*, HASDEMO+10*, HASDEMO+11*, HASDEMO+14*, HASDEMO+15*, HASDEMO+19*, HASDEMO+21*, HASDEMO+23, HASDEMOH+4*
, HASDEMOH+6*, HASDEMOH+7, HASPL+2~, HASPL+16*, HASPL+17, HASPL+20, NAM+1*, NAM+2, NAM+6
D HADRX+6~, UD+3*, UD+4, UD+5, UD+9, UD+14*, UD+15, UD+16, UD+20, ORES~
, ORES+6, ORES+7, UD1+4*, UD1+5, UD1+6, UD1+24*, UD1+25, UD1+26, HASDEMO+1~, HASDEMO+5*
, HASDEMO+21*, HASDEMO+23, HASDEMO+24, HASDEMOH+7, HASDEMOH+8, HASPL+2~, HASPL+10*, HASPL+11, HASPL+12, HASPL+21*
, HASPL+22, HASPL+23, NAM+7*, NAM+8, NAM+9, NAM+10
D365 HASML+1~, RXS+2*, RXS+8
DC HASML+1~, RXS+10*, RXS+11
>> DFN CPOE1+1, CPOE1+8, DEMO1+5, PL1+5, MEDL1+5
DODV HASDEMO~, HASDEMO+4*, HASDEMO+22
DRG HASML+1~, NVA+4*, NVA+9
E HASDEMO+1~, HASDEMO+5*, HASDEMO+16, HASDEMO+17*, HASDEMO+18, HASDEMO+19*, HASDEMO+23, HASDEMO+24, HASDEMOH+7, HASDEMOH+8
, HASPL+2~, HASPL+3*, HASPL+4, HASPL+8*, HASPL+13*, HASPL+14, HASPL+18, HASPL+23*, HASPL+24
ED HADRX~, HADRX+4, HADRX+14, UD+5, UD+16, HADNOEP~, HADNOEP+4, HADNOEP+14, UD1+6, UD1+26
, HASDEMO~, HASDEMO+9, HASPL~, HASPL+7, HASPL+11, HASPL+22
EDT HASML~, HASML+5, NAM+9, RXS+9, NVA+7
EXDT HADRX+6~, HADRX+9*, HADRX+10*, HADNOEP+6~, HADNOEP+9*, HADNOEP+10*, HASML+1~, RXS+3*, RXS+4*
EXP HASML+1~
>> F CPOE+13*, CPOE1+4*, CPOE1+5, CPOE1+11*, CPOE1+12, DEMO1+1*, DEMO1+2, DEMO1+7*, DEMO1+8, PL1+1*
, PL1+2, PL1+7*, PL1+8, MEDL1+1*, MEDL1+2, MEDL1+7*, MEDL1+8
FDTLP HASML+1~
FILLDT HASML+1~
G HADRX+6~, HADRX+7*, HADRX+10, HADRX+15*, HADRX+16, UD+1*, UD+9*, UD+10, UD+12*, UD+20*
, UD+21, UD1+1*, UD1+21*, HASDEMO+1~, HASDEMO+5*, HASDEMO+11*, HASDEMO+23, HASDEMO+24, HASDEMOH+7, HASDEMOH+8
, HASML+1~, HASML+7*, NAM+4, NAM+10*, NAM+11, RXS+1*, RXS+4, RXS+12*, RXS+13, NVA+1*
, NVA+2, NVA+9*, NVA+10, NVA+11
I HASML+1~, NVA+2*
ID HADRX+6~, HADRX+12*, HADRX+13, HADRX+14, HADRX+15, HADNOEP+6~, HADNOEP+12*, HADNOEP+13, HADNOEP+14, HASML+1~
, RXS+7*, RXS+8, RXS+9, RXS+12
IEN HASML+1~
IFN HADRX+6~, HADRX+10*, HADRX+11, HADRX+12, HADRX+15, HADNOEP+6~, HADNOEP+10*, HADNOEP+11, HADNOEP+12, HADNOEP+16
, HASML+1~, RXS+4*, RXS+5, RXS+6, RXS+7, RXS+10, RXS+12
J ORES+3~, ORES+5*, ORES+7
K ORES+3~, ORES+4*, ORES+6
L HASDEMOH+1~, HASDEMOH+5*, HASDEMOH+6, HASML+1~
N HADNOEP+6~, HADNOEP+7*, HADNOEP+10, HADNOEP+21, HADNOEP+26*, HADNOEP+27, UD1+1*, UD1+2, UD1+13, UD1+18*
, UD1+19, UD1+21*, UD1+22, UD1+33, UD1+38*, UD1+39
O HADNOEP+6~, HADNOEP+16*, HADNOEP+17, HADNOEP+18, HADNOEP+21, HADNOEP+22, HADNOEP+23, HADNOEP+26, UD1+8*, UD1+9
, UD1+10, UD1+13, UD1+14, UD1+15, UD1+18, UD1+28*, UD1+29, UD1+30, UD1+33, UD1+34
, UD1+35, UD1+38
P HADRX~, HADRX+2, HADRX+5, HADRX+10, UD+1, UD+2, UD+3, UD+6, UD+7, UD+12
, UD+13, UD+14, UD+17, HADNOEP~, HADNOEP+2, HADNOEP+5, HADNOEP+10, UD1+2, UD1+3, UD1+4
, UD1+8, UD1+22, UD1+23, UD1+24, UD1+28, HASDEMO~, HASDEMO+7, HASDEMO+8, HASDEMO+11, HASDEMO+13
, HASDEMO+15, HASDEMO+16, HASDEMO+17, HASDEMO+21, HASDEMOH+3, HASDEMOH+5, HASPL~, HASPL+4, HASPL+18, HASML~
, HASML+3, HASML+6, NAM+4, RXS+4, NVA+2
PAT PATVRY~, PATVRY+1, PATVRY+2
PL HASDEMO+1~, HASDEMO+5*, HASDEMO+7, HASDEMO+10*, HASDEMO+23, HASDEMO+24, HASDEMOH+7, HASDEMOH+8
R HADRX+6~, UD+6*, UD+7*, UD+8*, UD+9, UD+17*, UD+18*, UD+19*, UD+20, ORES~
, ORES+1, ORES+2, ORES+6, ORES+7, HASDEMO+1~, HASDEMO+5*, HASDEMO+12*, HASDEMO+13*, HASDEMO+14*, HASDEMO+15*
, HASDEMO+23, HASDEMO+24, HASDEMOH+7, HASDEMOH+8
RTSDT HASML+1~
RX PATVRY~, PATVRY+2, DSPRDT~, DSPRDT+1
RXIEN HASML+1~
SDT HASML+1~, NVA+6*, NVA+7
SIEN DSPRDT~, DSPRDT+1
T HASDEMO~, HASDEMO+3*, HASDEMO+22
TYP DSPRDT~, DSPRDT+1
U CPOE+13, CPOE1+4, CPOE1+6, CPOE1+10, CPOE1+11, HADRX+12, HADRX+15, UD+3, UD+7, UD+8
, UD+9, UD+14, UD+17, UD+19, UD+20, ORES+6, ORES+7, HADNOEP+12, HADNOEP+16, HADNOEP+18
, HADNOEP+23, HADNOEP+26, UD1+4, UD1+8, UD1+10, UD1+15, UD1+18, UD1+24, UD1+28, UD1+30
, UD1+35, UD1+38, DEMO1+1, DEMO1+6, DEMO1+7, DEMO1+8, HASDEMO+8, HASDEMO+11, HASDEMO+17, HASDEMO+21
, HASDEMO+23, HASDEMO+24, HASDEMOH+7, HASDEMOH+8, PL1+1, PL1+6, PL1+7, PL1+8, HASPL+7, HASPL+8
, HASPL+10, HASPL+20, HASPL+21, MEDL1+1, MEDL1+6, MEDL1+7, MEDL1+8, NAM+6, NAM+7, RXS+6
, RXS+7, RXS+10, RXS+12, NVA+8, NVA+9, PATVRY+2, DSPRDT+1
UCD HASDEMOH+1~, HASDEMOH+2*, HASDEMOH+6*, HASDEMOH+7, HASDEMOH+8
V HASML+1~
VDOD HASDEMOH+1~, HASDEMOH+3*, HASDEMOH+4*, HASDEMOH+7, HASDEMOH+8
X HASDEMO+1~, HASDEMO+7*, HASDEMO+8, HASML+1~, NVA+2*, NVA+3, NVA+4, NVA+5, NVA+6, NVA+8
, NVA+9
Y HASDEMO+1~
Z HASDEMO+1~, HASDEMO+16*, HASDEMO+17

Marked Items

Name Field # of Occurrence
$T(RACE^AGUTL HASDEMO+13
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All