APCM13E2 ; IHS/CMI/LAB - IHS MU ;
Source file <APCM13E2.m>
| Package | Total | Call Graph | 
|---|---|---|
| Patient Care Component Table Maintiance | 2 | (S,SETLIST)^APCM13E1 $$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 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| PL1 | ;set denominator value into field | |
| HOSP(O,FAC) | ; | |
| DEMO | ;EP - CALCULATE DEMOGRAPHICS | |
| MEDL1 | ;set denominator value into field | |
| HASDEMOH | ;did patient die in the hospital during report period?  if so is dod and underlying cause there? | |
| PATVRY(RX,PAT) | ;EP | |
| HASML(P,BDT,EDT) | ;EP | |
| 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 | |
| HADRX(P,BD,ED,PROV,RXS,RPT) | ;EP - did patient have a RX in file 52 with an issue date | |
| CPOEL | ||
| DEMO1 | ;set denominator value into field | |
| RXS | ; | |
| NAM | ;look for "No Active Medications" anytime during the report period | |
| HASPL(P,BD,ED) | ;does patient have a problem entered before end of report period | |
| HASDEMO(P,BD,ED,T,DODV) | ; | |
| MEDL | ;EP - CALCULATE MEDICATION LIST | |
| DSPRDT(RX,TYP,SIEN) | ;EP | |
| NVA | ; Set Non-VA Med Orders in the ^TMP Global | |
| TEST | ; | 
| Name | Field # of Occurrence | 
|---|---|
| $$RACE^AGUTL | HASDEMO+13 | 
| RACE^AGUTL | HASDEMO+13 | 
| $$VD^APCLV | HASPL+21, NAM+7 | 
| S^APCM13E1 | CPOE+12, CPOE1+6, CPOE1+10, DEMO1+2, DEMO1+8, PL1+2, PL1+8, MEDL1+2, MEDL1+8 | 
| SETLIST^APCM13E1 | CPOEL, DEMO1+9, PL1+9, MEDL1+9 | 
| $$DATE^APCM1UTL | DEMO1+3, PL1+3, HASPL+23, MEDL1+3, NAM+10, RXS+12, NVA+9 | 
| $$DOD^AUPNPAT | HASDEMOH+3 | 
| $$VAL^XBDIQ1 | HOSP+2, HASDEMO+15, HASDEMOH+5, HASPL+8, HASPL+13 | 
| $$FMADD^XLFDT | RXS+2, RXS+3 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^APCM13OB - [#9001301.02] | CPOE+12, CPOE1+5, CPOE1+9, DEMO1+1, DEMO1+7, PL1+1, PL1+7, MEDL1+1, MEDL1+7 | 
| ^AUPNPAT - [#9000001] | HADRX+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 | 
| ^DIC(40.7 - [#40.7] | HADRX+19, HOSP+9 | 
| ^DPT - [#2] | HASDEMO+11, HASDEMO+16, HASDEMO+17, HASDEMO+21 | 
| ^OR(100 - [#100] | HADRX+13, HADRX+14, HADRX+15, HADRX+16, HADRX+18, HADRX+22, HADRX+26, HADRX+27, HADRX+28, HADRX+34 , HADRX+35, HADRX+36, HADRX+42, HADRX+46, HADRX+47, HADRX+48, HOSP+7 | 
| ^ORD(100.98 - [#100.98] | HADRX+10 | 
| ^PS(50.606 - [#50.606] | NVA+4 | 
| ^PS(50.7 - [#50.7] | NVA+4 | 
| ^PS(55 - [#55] | RXS+4, NVA+2 | 
| ^PSDRUG - [#50] | NVA+4 | 
| ^PSRX - [#52] | RXS+4, RXS+5, RXS+6, RXS+7, RXS+10, RXS+12, PATVRY+2, DSPRDT+1 | 
| ^SC - [#44] | HADRX+19, HOSP+8, HOSP+9 | 
| ^VA(200 - [#200] | ORES+2, ORES+6, ORES+7 | 
| Name | Line Occurrences | 
|---|---|
| $$HADRX | CPOE1+2 | 
| $$HASDEMO | DEMO1+5 | 
| $$HASML | MEDL1+5 | 
| $$HASPL | PL1+5 | 
| $$HOSP | HADRX+39 | 
| $$ORES | HADRX+24, HADRX+44 | 
| CPOE1 | CPOE+14, CPOE+19 | 
| DEMO1 | DEMO+9, DEMO+13 | 
| HASDEMOH | HASDEMO+22 | 
| MEDL1 | MEDL+9, MEDL+15 | 
| PL1 | PL+9, PL+14 | 
| RXS | NAM+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| A | HADRX+26*, HADRX+46*, HADRX+47, HADRX+48, 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 | TEST+6! | 
| APCM100R( | CPOE+12 | 
| >> APCMBDAT | TEST+10*, CPOE1+2, DEMO1+5, PL1+5, MEDL1+5 | 
| >> APCMD1 | CPOE+9*, DEMO+5*, PL+5*, MEDL+5* | 
| >> APCMEDAT | TEST+11*, CPOE1+2, DEMO1+5, PL1+5, MEDL1+5 | 
| >> APCMEP | DEMO1+5*, DEMO1+6, DEMO1+8, PL1+5*, PL1+6, PL1+8, MEDL1+5*, MEDL1+6, MEDL1+8 | 
| >> APCMFAC | CPOE+17, DEMO+11, PL+12, MEDL+13 | 
| >> APCMHP | CPOE1+2*, CPOE1+3, CPOE1+6, CPOE1+8, CPOE1+10 | 
| >> APCMHVTP( | TEST+4*, DEMO+8, DEMO+12, DEMO1+3, PL+8, PL+13, PL1+3, MEDL+8, MEDL+14, MEDL1+3 | 
| >> APCMIC | TEST+7*, CPOE+12, CPOE1+5, CPOE1+6, CPOE1+9, CPOE1+10, 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+9*, DEMO+5*, PL+5*, MEDL+5* | 
| APCMP | TEST+3*, TEST+4, TEST+5, CPOE+8~, CPOE+11*, CPOE+12, CPOE+17*, CPOE1+2, CPOE1+6, CPOE1+10 , 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( | TEST+5*, CPOE+11, DEMO+7, PL+7, MEDL+7 | 
| >> APCMRPT | TEST+8*, CPOE+12, CPOE1+6, CPOE1+10, DEMO1+2, DEMO1+8, PL1+2, PL1+8, MEDL1+2, MEDL1+8 | 
| >> APCMRPTT | TEST+1*, CPOE+10, CPOE+12, CPOE+16, CPOE1+2, CPOE1+6, CPOE1+10, 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 | 
| APCMRXS | CPOE1+1!, CPOE1+2 | 
| >> APCMTIME | TEST+9*, CPOE+12, CPOE1+6, CPOE1+10, DEMO1+2, DEMO1+8, PL1+2, PL1+8, MEDL1+2, MEDL1+8 | 
| >> APCMVALU | CPOE1+8*, DEMO1+3*, DEMO1+6*, PL1+3*, PL1+6*, MEDL1+3*, MEDL1+6* | 
| >> APCMVDOD | DEMO1+5 | 
| B | HADRX+22*, HADRX+23, HADRX+24, HADRX+28*, HADRX+29, HADRX+30, HADRX+42*, HADRX+43, HADRX+44, HADRX+48* , HADRX+49, HADRX+50, HASDEMO+1~, HASDEMO+8*, HASDEMO+9, HASPL+2~ | 
| BD | HADRX~, HADRX+3, HADRX+12, HADRX+33, HASDEMO~, HASPL~, HASPL+12 | 
| BDT | HASML~, HASML+4, NAM+8, RXS+2, RXS+3, RXS+11, NVA+5 | 
| C | HADRX+19*, HOSP+1~, HOSP+8*, HOSP+9*, 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~, HADRX+12*, HADRX+13*, HADRX+14, HADRX+15, HADRX+24, HADRX+33*, HADRX+34*, HADRX+35, ORES~ , ORES+6, ORES+7, 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 | 
| DENOM | HADRX+6~, HADRX+7*, HADRX+20*, HADRX+40*, HADRX+52 | 
| >> DFN | TEST+2*, CPOE1+2, DEMO1+5, PL1+5, MEDL1+5 | 
| DISPG | HADRX+6~, HADRX+10*, HADRX+11, HADRX+14, HADRX+15 | 
| 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+12, HADRX+34, HASDEMO~, HASDEMO+9, HASPL~, HASPL+7, HASPL+11, HASPL+22 | 
| EDT | HASML~, HASML+5, NAM+9, RXS+9, NVA+7 | 
| EXDT | HADRX+6~, HASML+1~, RXS+3*, RXS+4* | 
| EXP | HASML+1~ | 
| >> F | CPOE+12*, CPOE1+5*, CPOE1+6, CPOE1+9*, CPOE1+10, DEMO1+1*, DEMO1+2, DEMO1+7*, DEMO1+8, PL1+1* , PL1+2, PL1+7*, PL1+8, MEDL1+1*, MEDL1+2, MEDL1+7*, MEDL1+8 | 
| FAC | HOSP~, HOSP+8 | 
| FDTLP | HASML+1~ | 
| FILLDT | HASML+1~ | 
| G | HADRX+6~, HADRX+7*, 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 | 
| H | HADRX+6~ | 
| I | HADRX+6~, HASML+1~, NVA+2* | 
| ID | HADRX+6~, HADRX+44, HASML+1~, RXS+7*, RXS+8, RXS+9, RXS+12 | 
| IEN | HASML+1~ | 
| IFN | HADRX+6~, 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 | HOSP+1~, HOSP+7*, HOSP+8, HOSP+9, HASDEMOH+1~, HASDEMOH+5*, HASDEMOH+6, HASML+1~ | 
| >> N | HADRX+25*, HADRX+26, HADRX+31*, HADRX+45*, HADRX+46, HADRX+51* | 
| NUMER | HADRX+6~, HADRX+7*, HADRX+31*, HADRX+51*, HADRX+52 | 
| O | HADRX+15*, HADRX+16, HADRX+27, HADRX+28, HADRX+46, HADRX+47, HADRX+48, HOSP~, HOSP+2, HOSP+7 | 
| P | HADRX~, HADRX+2, HADRX+5, HADRX+12, HADRX+38, 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 | 
| PROV | HADRX~, HADRX+17, HADRX+39 | 
| R | 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 | 
| RPT | HADRX~, HADRX+9, HADRX+32 | 
| RTSDT | HASML+1~ | 
| RX | PATVRY~, PATVRY+2, DSPRDT~, DSPRDT+1 | 
| RXIEN | HASML+1~ | 
| RXS | HADRX~ | 
| SDT | HASML+1~, NVA+6*, NVA+7 | 
| SIEN | DSPRDT~, DSPRDT+1 | 
| STOP | HADRX+6~, HADRX+12*, HADRX+13 | 
| T | HASDEMO~, HASDEMO+3*, HASDEMO+22 | 
| TYP | DSPRDT~, DSPRDT+1 | 
| U | CPOE+12, CPOE1+5, CPOE1+6, CPOE1+8, CPOE1+9, CPOE1+10, HADRX+16, HADRX+18, HADRX+19, HADRX+22 , HADRX+28, HADRX+36, HADRX+42, HADRX+48, HADRX+52, HOSP+7, HOSP+8, HOSP+9, ORES+6, ORES+7 , 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 | CPOE1+7*, HADRX+6~, HADRX+16*, HADRX+17, HADRX+18*, HADRX+19, HADRX+36*, HADRX+37, HADRX+38, HOSP+1~ , HOSP+2*, HOSP+3, HOSP+4, HOSP+5, HOSP+6, HASML+1~ | 
| VDOD | HASDEMOH+1~, HASDEMOH+3*, HASDEMOH+4*, HASDEMOH+7, HASDEMOH+8 | 
| >> VP | HADRX+12*, HADRX+13, HADRX+14, HADRX+15 | 
| X | HADRX+6~, HADRX+14*, HADRX+15, HADRX+18, HADRX+22, HADRX+26, HADRX+27, HADRX+28, HADRX+35*, HADRX+36 , HADRX+39, HADRX+42, 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 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(RACE^AGUTL | HASDEMO+13 |