©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
APCM24E9 ;IHS/CMI/LAB - IHS MU; ; 29 Jul 2013 4:09 PM
Source file <APCM24E9.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)^APCM24E1 $$BD^APCM24E4 |
| 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
|
|
| D | ||
| CPOE | ;EP - CALCULATE EPRESCRIBING
|
|
| 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 | PEA+49, HASPEA+29 |
| $$DDTM^APCLV | SETD+5 |
| $$LOCENC^APCLV | PEA+41, PEA+50 |
| $$SC^APCLV | PEA+42, PEA+51, PEA+57 |
| $$VD^APCLV | SETD+18 |
| $$DATE^APCM1UTL | PEA+21, PEA+74, HASPEA+8, HASPEA+15, SETD+18 |
| S^APCM24E1 | CPOE+10, D+3, D+11, D+16, D+24, PEA+11, PEA+15, PEA+18, PEA+25, PEA+27 , PEA+65, PEA+69, PEA+72, PEA+78, PEA+80 |
| SETLIST^APCM24E1 | D+7, D+20, PEA+29, PEA+82 |
| $$BD^APCM24E4 | SETD+13 |
| $$DOB^AUPNPAT | HASPEA+13 |
| $$AUDITHIE^BCCDUTIL | SETD+9 |
| AUDITHIE^BCCDUTIL | SETD+9 |
| PHR^BPHRMUPM | PEA+19, PEA+73 |
| $$GET1^DIQ | NMSP+1, SETD+3, SETD+7, ERDDT+5 |
| $$FMADD^XLFDT | TOTRX+5 |
| $$FMDIFF^XLFDT | SETD+14 |
| $$FMTE^XLFDT | HASPEA+13 |
| Name | Line Occurrences |
|---|---|
| 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) |
|---|---|
| ^APCM24OB - [#9001303.02] | CPOE+9, D+1, D+9, D+14, D+22, PEA+10, PEA+14, PEA+17, PEA+24, PEA+26 , PEA+64, PEA+68, PEA+71, PEA+77, PEA+79 |
| ^APCM24OB("B" | PEA+17, PEA+18, PEA+23, PEA+71, PEA+72, PEA+76 |
| ^AUPNPAT - [#9000001] | HASPEA+6, HASPEA+7, HASPEA+8 |
| ^AUPNVER("AD" | ERDDT+3 |
| ^AUPNVINP - [#9000010.02] | PEA+37, PEA+38, PEA+41, PEA+42, PEA+44 |
| ^AUPNVINP("AC" | PEA+36 |
| ^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, PEA+61 |
| $$NMSP | TOTRX+16 |
| 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" | PEA+17 |
| >> APCMATTE("S2.025.H.1" | PEA+71 |
| >> APCMBDAT | TOTRX+5, PEA+7, PEA+19, PEA+39, PEA+61, PEA+73 |
| >> APCMD1 | CPOE+7*, PEA+3* |
| >> APCMDEMO | TOTRX+13 |
| >> APCMEDAT | TOTRX+6, PEA+7, PEA+40, PEA+61 |
| >> APCMEP | PEA+7*, PEA+9, PEA+13, PEA+21, PEA+61*, PEA+63, PEA+67, PEA+74 |
| >> APCMFAC | D+13, D+15, D+16, D+18, D+19, D+23, D+24, TOTRX+36, TOTRX+42, TOTRX+50 , PEA+31, PEA+41, PEA+50 |
| APCMHER | PEA+33~, PEA+34!, PEA+60, PEA+61 |
| APCMHER( | PEA+44*, PEA+53*, PEA+59* |
| APCMHERL | PEA+33~ |
| >> APCMHVTP( | PEA+5 |
| >> 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, PEA+64, PEA+65, PEA+68, PEA+69 |
| >> APCMMETH | TOTRX+32, PEA+46, PEA+54 |
| >> APCMN1 | CPOE+7*, PEA+3* |
| 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, PEA+17, PEA+18, PEA+25 , PEA+27, PEA+31*, PEA+61, PEA+65, PEA+69, PEA+71, PEA+72, PEA+78, PEA+80 |
| >> APCMPRV( | CPOE+8, TOTRX+26, PEA+4 |
| >> APCMRPT | CPOE+10, D+3, D+11, D+16, D+24, PEA+11, PEA+15, PEA+18, PEA+25, PEA+27 , PEA+65, PEA+69, PEA+72, PEA+78, PEA+80 |
| >> 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, PEA+18, PEA+25, PEA+27, PEA+30 , PEA+65, PEA+69, PEA+72, PEA+78, PEA+80 |
| 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, PEA+63*, PEA+69 |
| >> APCMTIME | CPOE+10, D+3, D+11, D+16, D+24, PEA+11, PEA+15, PEA+18, PEA+25, PEA+27 , PEA+65, PEA+69, PEA+72, PEA+78, PEA+80 |
| >> APCMTV | PEA+9*, PEA+63* |
| >> APCMVALU | D+6*, D+19*, PEA+13*, PEA+21*, PEA+67*, PEA+74* |
| >> APCMVSTS | PEA+7 |
| >> APCMVSTS( | PEA+47, PEA+48, PEA+55, PEA+56 |
| B | TOTRX+4~, HASPEA+2~, SETD+2*, SETD+9*, SETD+11, SETD+14, SETD+15, SETD+18 |
| 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 | PEA+33~, PEA+35*, PEA+43*, PEA+44, PEA+52*, PEA+53, PEA+58*, PEA+59 |
| D | D+6*, D+19*, TOTRX+4~, ORES~, ORES+6, ORES+7, PEA+38*, PEA+39, PEA+40, HASPEA+2~ , SETD+3*, SETD+5*, SETD+6*, SETD+7*, SETD+9, SETD+13, SETD+14 |
| >> DFN | D+7*, D+20*, PEA+7, PEA+19, PEA+36, PEA+61, PEA+73 |
| DT | PEA+19, PEA+73 |
| E | HASPEA+2~, HASPEA+13*, SETD+13*, SETD+14*, SETD+15, SETD+16 |
| 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, PEA+17*, PEA+18, PEA+24*, PEA+25, PEA+26* , PEA+27, PEA+64*, PEA+65, PEA+68*, PEA+69, PEA+71*, PEA+72, PEA+77*, PEA+78, PEA+79* , PEA+80 |
| 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+17, SETD+18*, SETD+19* , SETD+20 |
| 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+13, SETD+14, SETD+15, SETD+16 |
| 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, PEA+17, PEA+21 , PEA+24, PEA+26, PEA+27, PEA+38, PEA+41, PEA+42, PEA+44, PEA+48, PEA+53, PEA+56 , PEA+59, PEA+63, PEA+64, PEA+67, PEA+68, PEA+71, PEA+74, PEA+77, PEA+79, PEA+80 , 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+17, SETD+18, SETD+19 |
| V | PEA+19*, PEA+21, PEA+27, PEA+48*, PEA+49, PEA+50, PEA+51, PEA+53, PEA+56*, PEA+57 , PEA+59, PEA+73*, PEA+74, PEA+80, HASPEA+2~, HASPEA+19*, HASPEA+20, HASPEA+21, HASPEA+23, HASPEA+24 , HASPEA+29, SETD+3, SETD+5, SETD+6, SETD+7, SETD+9, SETD+18, ERDDT~, ERDDT+1, ERDDT+3 |
| VSTS | HASPEA~ |
| VSTS( | HASPEA+17, HASPEA+19 |
| W | HASPEA+2~ |
| X | TOTRX+4~, PEA+36*, PEA+37, PEA+38, PEA+41, PEA+42, PEA+44, PEA+47*, PEA+48, PEA+55* , PEA+56, HASPEA+2~, HASPEA+17*, HASPEA+19, ERDDT+2~, ERDDT+3*, ERDDT+4, ERDDT+5 |
| Y | TOTRX+4~, NMSP+1~*, NMSP+2*, NMSP+3, PEA+23*, PEA+24, PEA+25, PEA+26, PEA+27, PEA+76* , PEA+77, PEA+78, PEA+79, PEA+80, 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+9 |
| $T(PHR^BPHRMUPM | PEA+19, PEA+73 |