©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
APCM25E9 ;IHS/CMI/LAB - IHS MU; ; 29 Jul 2013 4:09 PM
Source file <APCM25E9.m>
| Package | Total | Call Graph |
|---|---|---|
| Patient Care Component Reports | 3 | $$START1^APCLDF $$DEMO^APCLUTL ($$CLINIC,$$DDTM,$$LOCENC,$$SC,$$VD)^APCLV |
| Patient Care Component Table Maintiance | 3 | $$DATE^APCM1UTL (S,SETLIST)^APCM25E1 $$BD^APCM25E4 |
| IHS Colorectal Cancer Scrn | 1 | ($$AUDITHIE,AUDITHIE)^BCCDUTIL |
| IHS Patient | 1 | $$DOB^AUPNPAT |
| IHS Personal Health Record | 1 | PHR^BPHRMUPM |
| Kernel | 1 | ($$FMADD,$$FMDIFF,$$FMTE)^XLFDT |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SETD | ||
| TOTRX | ;EP - did patient have a RX in file 52 with an issue date
|
|
| B | ||
| D | ||
| CPOE | ;EP - CALCULATE EPRESCRIBING
|
|
| HB | ||
| ORES(R,D) | ;EP - DID PROVIDER HAVE ORES OR ORESLE ON DATE D
|
|
| HASPEA(P,BD,ED,R,RPT,VSTS) | ;did a ccda get transmitted for each visit? return #visits^#w/ccda
|
|
| NMSP(PKG) | ; -- Returns package namespace from pointer
|
|
| PEA | ;EP - PATIENT ELECTRONIC ACCESS
|
|
| ERDDT(V) | ;EP - get ER departure date/time
|
| Name | Field # of Occurrence |
|---|---|
| $$START1^APCLDF | HASPEA+13 |
| $$DEMO^APCLUTL | TOTRX+13 |
| $$CLINIC^APCLV | B+40, HASPEA+29 |
| $$DDTM^APCLV | SETD+5 |
| $$LOCENC^APCLV | B+32, B+41 |
| $$SC^APCLV | B+33, B+42, B+48 |
| $$VD^APCLV | SETD+16 |
| $$DATE^APCM1UTL | B+11, HB+11, HASPEA+8, HASPEA+15, SETD+16 |
| S^APCM25E1 | CPOE+10, D+3, D+11, D+16, D+24, PEA+11, PEA+15, B+2, B+16, B+18 , B+56, B+60, HB+2, HB+16, HB+18 |
| SETLIST^APCM25E1 | D+7, D+20, B+20, HB+20 |
| $$BD^APCM25E4 | SETD+11 |
| $$DOB^AUPNPAT | HASPEA+13 |
| $$AUDITHIE^BCCDUTIL | SETD+8 |
| AUDITHIE^BCCDUTIL | SETD+8 |
| PHR^BPHRMUPM | B+9, HB+9 |
| $$GET1^DIQ | NMSP+1, SETD+3, SETD+7, ERDDT+5 |
| $$FMADD^XLFDT | TOTRX+5 |
| $$FMDIFF^XLFDT | SETD+12 |
| $$FMTE^XLFDT | HASPEA+13 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(9.4 - [#9.4] | GET1^DIQ |
| ^AUPNVSIT - [#9000010] | GET1^DIQ |
| ^AUPNVER - [#9000010.29] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^APCM25OB - [#9001304.02] | CPOE+9, D+1, D+9, D+14, D+22, PEA+10, PEA+14, B+1, B+15, B+17 , B+55, B+59, HB+1, HB+15, HB+17 |
| ^APCM25OB("B" | B+1, B+2, B+14, HB+1, HB+2, HB+14 |
| ^AUPNPAT - [#9000001] | HASPEA+6, HASPEA+7, HASPEA+8 |
| ^AUPNVER("AD" | ERDDT+3 |
| ^AUPNVINP - [#9000010.02] | B+28, B+29, B+32, B+33, B+35 |
| ^AUPNVINP("AC" | B+27 |
| ^AUPNVPRV - [#9000010.06] | HASPEA+25, HASPEA+26 |
| ^AUPNVPRV("AD" | HASPEA+24 |
| ^AUPNVSIT - [#9000010] | HASPEA+20, HASPEA+21, HASPEA+23, SETD+5 |
| ^DIC(19.1 - [#19.1] | ORES+4, ORES+5 |
| ^DIC(40.7 - [#40.7] | TOTRX+28, TOTRX+35 |
| ^OR(100 - [#100] | TOTRX+6, TOTRX+7, TOTRX+10, TOTRX+12, TOTRX+14, TOTRX+15, TOTRX+16, TOTRX+18, TOTRX+27, TOTRX+33 , TOTRX+46 |
| ^SC - [#44] | TOTRX+28, TOTRX+35, TOTRX+36 |
| ^TMP($J | CPOE+2!, CPOE+5!, D+5, D+6, D+18, D+19, D+25!, TOTRX+3!, TOTRX+8, TOTRX+9* , TOTRX+41*, TOTRX+42*, TOTRX+49*, TOTRX+50* |
| ^VA(200 - [#200] | ORES+2, ORES+6, ORES+7 |
| Name | Line Occurrences |
|---|---|
| $$ERDDT | SETD+6 |
| $$HASPEA | PEA+7, B+52 |
| $$NMSP | TOTRX+16 |
| B | PEA+5 |
| HB | B+51 |
| SETD | HASPEA+22 |
| TOTRX | CPOE+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| A | TOTRX+4~, HASPEA+2~ |
| >> APCMATTE("S2.020.EP.1" | B+1 |
| >> APCMATTE("S2.025.H.1" | HB+1 |
| >> APCMATTE("S2.026.EP" | B+1 |
| >> APCMBDAT | TOTRX+5, PEA+7, B+9, B+30, B+52, HB+9 |
| >> APCMD1 | CPOE+7*, PEA+3* |
| >> APCMDEMO | TOTRX+13 |
| >> APCMEDAT | TOTRX+6, PEA+7, B+31, B+52 |
| >> APCMEDUD | B+7, HB+8 |
| >> APCMEP | PEA+7*, PEA+9, PEA+13, B+11, B+52*, B+54, B+58, HB+11 |
| >> APCMFAC | D+13, D+15, D+16, D+18, D+19, D+23, D+24, TOTRX+36, TOTRX+42, TOTRX+50 , B+22, B+32, B+41 |
| APCMHER | B+24~, B+25!, B+51, B+52, HB+3 |
| APCMHER( | B+35*, B+44*, B+50* |
| APCMHERL | B+24~ |
| >> APCMHVTP( | PEA+5, B+3 |
| >> APCMIC | CPOE+9, CPOE+10, D+1, D+3, D+9, D+11, D+14, D+16, D+22, D+24 , PEA+10, PEA+11, PEA+14, PEA+15, B+55, B+56, B+59, B+60 |
| >> APCMMETH | TOTRX+32, B+37, B+45 |
| >> APCMN1 | CPOE+7*, PEA+3* |
| >> APCMNEDV | B+4*, B+7*, B+8*, B+9, HB+5*, HB+8*, HB+9 |
| APCMP | CPOE+6~, CPOE+8*, CPOE+9, CPOE+10, D+2, D+3, D+5, D+6, D+10, D+11 , D+13*, PEA+2~, PEA+4*, PEA+5, PEA+7, PEA+11, PEA+15, B+1, B+2, B+3 , B+16, B+18, B+22*, B+52, B+56, B+60, HB+1, HB+2, HB+16, HB+18 |
| >> APCMPRV( | CPOE+8, TOTRX+26, PEA+4 |
| >> APCMRPT | CPOE+10, D+3, D+11, D+16, D+24, PEA+11, PEA+15, B+2, B+16, B+18 , B+56, B+60, HB+2, HB+16, HB+18 |
| >> APCMRPTT | CPOE+8, CPOE+10, D+3, D+11, D+12, D+16, D+24, TOTRX+24, TOTRX+30, TOTRX+41 , TOTRX+42, TOTRX+49, TOTRX+50, PEA+4, PEA+11, PEA+15, B+2, B+16, B+18, B+21 , B+56, B+60, HB+2, HB+16, HB+18 |
| APCMRXS | CPOE+3! |
| APCMRXS( | CPOE+9, D+2, D+10, D+15, D+23, TOTRX+41*, TOTRX+42*, TOTRX+49*, TOTRX+50* |
| >> APCMTE | PEA+9*, PEA+15, B+54*, B+60 |
| >> APCMTIME | CPOE+10, D+3, D+11, D+16, D+24, PEA+11, PEA+15, B+2, B+16, B+18 , B+56, B+60, HB+2, HB+16, HB+18 |
| >> APCMTV | PEA+9*, B+54* |
| >> APCMVALU | D+6*, D+19*, PEA+13*, B+11*, B+58*, HB+11* |
| >> APCMVDTE | B+12*, HB+12* |
| >> APCMVSTS | PEA+7 |
| >> APCMVSTS( | B+38, B+39, B+46, B+47 |
| B | TOTRX+4~, HASPEA+2~, SETD+2*, SETD+8*, SETD+9, SETD+12, SETD+13, SETD+16 |
| BD | HASPEA~ |
| C | TOTRX+4~, TOTRX+28*, TOTRX+35*, TOTRX+36*, HASPEA+2~, HASPEA+29*, HASPEA+30, HASPEA+31, HASPEA+32, HASPEA+33 , HASPEA+34 |
| CNT | B+24~, B+26*, B+34*, B+35, B+43*, B+44, B+49*, B+50 |
| D | D+6*, D+19*, TOTRX+4~, ORES~, ORES+6, ORES+7, B+29*, B+30, B+31, HASPEA+2~ , SETD+3*, SETD+5*, SETD+6*, SETD+7*, SETD+8, SETD+11, SETD+12 |
| >> DFN | D+7*, D+20*, PEA+7, B+9, B+27, B+52, HB+9 |
| DT | B+4, B+8, HB+5 |
| E | HASPEA+2~, HASPEA+13*, SETD+11*, SETD+12*, SETD+13, SETD+14 |
| ED | HASPEA~, HASPEA+7, HASPEA+13 |
| EDUC | HASPEA+2~, HASPEA+11! |
| EDUC(1 | HASPEA+14, HASPEA+15 |
| F | CPOE+6~, CPOE+9*, CPOE+10, D+1*, D+3, D+9*, D+11, D+14*, D+16, D+22* , D+24, PEA+10*, PEA+11, PEA+14*, PEA+15, B+1*, B+2, B+15*, B+16, B+17* , B+18, B+55*, B+56, B+59*, B+60, HB+1*, HB+2, HB+15*, HB+16, HB+17* , HB+18 |
| G | TOTRX+4~, TOTRX+23*, TOTRX+29*, TOTRX+31*, TOTRX+37*, TOTRX+38, HASPEA+18*, HASPEA+24, HASPEA+27*, HASPEA+28 |
| ID | TOTRX+4~, TOTRX+5*, TOTRX+6*, TOTRX+7, TOTRX+19 |
| J | ORES+3~, ORES+5*, ORES+7 |
| K | ORES+3~, ORES+4*, ORES+6 |
| N | CPOE+6~, D+2*, D+3, D+6*, D+10*, D+11, D+15*, D+16, D+19*, D+23* , D+24, TOTRX+4~ |
| ORACT0 | TOTRX+4~, TOTRX+18*, TOTRX+19, TOTRX+20, TOTRX+22, TOTRX+26, TOTRX+39 |
| ORDEB | TOTRX+4~, TOTRX+46* |
| ORIEN | TOTRX+4~, TOTRX+7*, TOTRX+8, TOTRX+9, TOTRX+10, TOTRX+12, TOTRX+14, TOTRX+15, TOTRX+16, TOTRX+18 , TOTRX+27, TOTRX+33, TOTRX+46 |
| ORNS | TOTRX+4~, TOTRX+16*, TOTRX+17 |
| ORORD | TOTRX+4~, TOTRX+20*, TOTRX+21, TOTRX+39*, TOTRX+45 |
| ORPFILE | TOTRX+4~, TOTRX+10*, TOTRX+11 |
| ORPTST | TOTRX+4~, TOTRX+15*, TOTRX+25, TOTRX+31 |
| >> ORPVID | TOTRX+22*, TOTRX+26*, TOTRX+41, TOTRX+49 |
| P | D+5*, D+6, D+7, D+18*, D+19, D+20, HASPEA~, HASPEA+6, HASPEA+7, HASPEA+8 , HASPEA+13 |
| PAT | TOTRX+4~, TOTRX+12*, TOTRX+13, TOTRX+41, TOTRX+42, TOTRX+49, TOTRX+50 |
| PATLOC | TOTRX+4~, TOTRX+27*, TOTRX+28, TOTRX+33*, TOTRX+34, TOTRX+35, TOTRX+36 |
| PED | HASPEA+2~ |
| PKG | NMSP~, NMSP+1 |
| PWH | HASPEA+2~, HASPEA+4*, HASPEA+8*, HASPEA+10, HASPEA+15*, HASPEA+17, SETD*, SETD+15, SETD+16*, SETD+17* , SETD+18 |
| Q | HASPEA+2~ |
| R | TOTRX+4~, ORES~, ORES+1, ORES+2, ORES+6, ORES+7, HASPEA~, HASPEA+25 |
| RPT | HASPEA~, HASPEA+22, SETD+3, SETD+4, SETD+11, SETD+12, SETD+13, SETD+14 |
| S | TOTRX+4~ |
| T | HASPEA+2~ |
| U | CPOE+9, D+1, D+2, D+6, D+9, D+10, D+14, D+15, D+19, D+22 , D+23, TOTRX+12, TOTRX+19, TOTRX+27, TOTRX+28, TOTRX+33, TOTRX+35, TOTRX+36, TOTRX+41, TOTRX+42 , TOTRX+49, TOTRX+50, ORES+6, ORES+7, PEA+9, PEA+10, PEA+13, PEA+14, B+1, B+11 , B+12, B+15, B+17, B+18, B+29, B+32, B+33, B+35, B+39, B+44 , B+47, B+50, B+54, B+55, B+58, B+59, HB+1, HB+11, HB+12, HB+15 , HB+17, HB+18, HASPEA+6, HASPEA+7, HASPEA+8, HASPEA+10, HASPEA+15, HASPEA+17, HASPEA+19, HASPEA+21 , HASPEA+23, HASPEA+25, HASPEA+26, SETD, SETD+5, SETD+15, SETD+16, SETD+17 |
| V | B+9*, B+11, B+12, B+18, B+39*, B+40, B+41, B+42, B+44, B+47* , B+48, B+50, HB+9*, HB+11, HB+12, HB+18, HASPEA+2~, HASPEA+19*, HASPEA+20, HASPEA+21 , HASPEA+23, HASPEA+24, HASPEA+29, SETD+3, SETD+5, SETD+6, SETD+7, SETD+8, SETD+16, ERDDT~ , ERDDT+1, ERDDT+3 |
| VSTS | HASPEA~ |
| VSTS( | HASPEA+17, HASPEA+19 |
| W | HASPEA+2~ |
| X | TOTRX+4~, B+27*, B+28, B+29, B+32, B+33, B+35, B+38*, B+39, B+46* , B+47, HASPEA+2~, HASPEA+17*, HASPEA+19, ERDDT+2~, ERDDT+3*, ERDDT+4, ERDDT+5 |
| Y | TOTRX+4~, NMSP+1~*, NMSP+2*, NMSP+3, B+14*, B+15, B+16, B+17, B+18, HB+14* , HB+15, HB+16, HB+17, HB+18, HASPEA+2~, HASPEA+12*, HASPEA+13, HASPEA+24*, HASPEA+25, HASPEA+26 , ERDDT+2~ |
| Z | HASPEA+2~, HASPEA+6*, HASPEA+7, HASPEA+8, HASPEA+13* |
| Name | Field # of Occurrence |
|---|---|
| $T(AUDITHIE^BCCDUTIL | SETD+8 |
| $T(PHR^BPHRMUPM | B+9, HB+9 |