©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
APCM25E6 ;IHS/CMI/LAB - IHS MU;
Source file <APCM25E6.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 2 | $$FMADD^XLFDT $$UP^XLFSTR |
| Patient Care Component Reports | 2 | $$DEMO^APCLUTL ($$ADMTYPE,$$CLINIC,$$DSCHTYPE,$$VD)^APCLV |
| Patient Care Component Table Maintiance | 2 | $$DATE^APCM1UTL (S,SETLIST)^APCM25E1 |
| Authorization Subscription | 1 | $$ISA^USRLM |
| IHS Patient | 1 | ($$AGE,$$DOB)^AUPNPAT |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| HASMMR(P,BD,ED,R,VSTS,APCMMETH) | ;does patient have a M-MR on each visit?
|
|
| EN | ;EP - CALCULATE ELECTRONIC NOTES
|
|
| FH | ;EP - FAMILY HX
|
|
| HOSER(Z,R) | ;EP
|
|
| DR | ||
| EN1 | ;set denominator value into field
|
|
| ADV1 | ;
|
|
| ADV | ;EP - CALCULATE adv directives
|
|
| HASADV(P,ED) | ;does patient have an ADVANCE DIRECTIVE before end of report period
|
|
| ERTRANSO(%) | ;
|
|
| HASFH(P,BD,ED) | ;does patient have a SMOKING STATUS
|
|
| MR | ;EP - med reconciliation
|
|
| TRANSOUT(%) | ;
|
|
| IMGR | ;EP - IMAGING RESULTS
|
|
| PVCL(N) | ;
|
|
| IMGR1 | ;EP -
|
|
| PRVD(%) | ;
|
|
| HASEN(P,BD,ED,R) | ;does patient have a AN ELECTRONIC NOTE?
|
|
| FH1 | ;set denominator value into field
|
|
| HASADM65(P,R,VSTS) | ;
|
|
| SN | ||
| ERTRANS(%) | ;
|
|
| TRANS(%) | ;
|
|
| DSCHDATE(V) | ;EP
|
|
| SCAN(%) | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$DEMO^APCLUTL | IMGR1+7 |
| $$ADMTYPE^APCLV | TRANS+2 |
| $$CLINIC^APCLV | HOSER+5, HASMMR+16 |
| $$DSCHTYPE^APCLV | TRANSOUT+2 |
| $$VD^APCLV | HASADM65+9, HASADM65+10, HASADV+17, DSCHDATE+7, DSCHDATE+11, DSCHDATE+12, DSCHDATE+14, SN+2 |
| $$DATE^APCM1UTL | ADV1+4, HASADV+11, HASADV+19, SN+2, EN1+3, FH1+3 |
| S^APCM25E1 | ADV+6, ADV1+3, ADV1+9, MR+11, MR+15, EN1+2, EN1+8, IMGR+10, DR+3, DR+11 , DR+16, DR+24, FH1+2, FH1+8 |
| SETLIST^APCM25E1 | ADV1+10, MR+17, EN1+9, DR+7, DR+20, FH1+9 |
| $$AGE^AUPNPAT | HASADM65+9, ADV1+4 |
| $$DOB^AUPNPAT | FH1+5 |
| $$GET1^DIQ | HASMMR+25, TRANS+3, PVCL+4, HASEN+14, HASEN+18, PRVD+2, PRVD+3, PRVD+6, PRVD+9, PRVD+10 , IMGR1+11, IMGR1+15, IMGR1+16, IMGR1+19, IMGR1+24, IMGR1+26, IMGR1+31, IMGR1+39, HASFH+8, HASFH+9 |
| $$ISA^USRLM | PRVD+9, PRVD+10 |
| $$VAL^XBDIQ1 | HASADV+15, ERTRANSO+4 |
| $$FMADD^XLFDT | IMGR1+4 |
| $$UP^XLFSTR | HASADV+16, SCAN+3 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^DGPM - [#405] | GET1^DIQ |
| ^DG(405.1 - [#405.1] | GET1^DIQ |
| 70.03 | GET1^DIQ |
| ^TIU(8925 - [#8925] | GET1^DIQ |
| ^AUPNVRUP - [#9000010.54] | GET1^DIQ |
| ^AUPNFH - [#9000014] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AMERVSIT - [#9009080] | ERTRANS+4 |
| ^AMERVSIT("AD" | ERTRANS+2, ERTRANSO+2 |
| ^APCM25OB - [#9001304.02] | ADV+5, ADV1+2, ADV1+8, MR+10, MR+14, EN1+1, EN1+7, IMGR+9, DR+1, DR+9 , DR+14, DR+22, FH1+1, FH1+7 |
| ^APCMMUCN - [#9001300.01] | PVCL+10 |
| ^APCMMUCN("B" | PVCL+8 |
| ^AUPNADVD - [#9000040] | HASADV+5, HASADV+6, HASADV+7, HASADV+9 |
| ^AUPNFH - [#9000014] | HASFH+7 |
| ^AUPNFH("AC" | HASFH+6 |
| ^AUPNFHR("AA" | HASFH+13 |
| ^AUPNVER - [#9000010.29] | DSCHDATE+12, DSCHDATE+13 |
| ^AUPNVER("AD" | DSCHDATE+10 |
| ^AUPNVINP - [#9000010.02] | DSCHDATE+8 |
| ^AUPNVINP("AD" | DSCHDATE+6 |
| ^AUPNVNOT - [#9000010.28] | HASADV+17 |
| ^AUPNVNOT("AC" | HASADV+14 |
| ^AUPNVRUP - [#9000010.54] | HASMMR+21, HASMMR+22 |
| ^AUPNVRUP("AC" | HASMMR+20 |
| ^AUPNVSIT - [#9000010] | HASADM65+5, HASADM65+6, HASADM65+7, HASADM65+8, HOSER+1, HOSER+2, HOSER+4, DSCHDATE+2, DSCHDATE+5, HASMMR+8 , HASMMR+9, HASMMR+10, HASMMR+14, HASMMR+15 |
| ^AUTTRLSH - [#9999999.36] | HASFH+14 |
| ^DGPM("AVISIT" | TRANS+3 |
| ^DIC(40.7 - [#40.7] | IMGR1+20, IMGR1+32 |
| ^DIC(7 - [#7] | PVCL+6 |
| ^RADPT - [#70] | IMGR1+9 |
| ^RADPT("AR" | IMGR1+5, IMGR1+6, IMGR1+8 |
| ^RARPT - [#74] | IMGR1+41 |
| ^SC - [#44] | IMGR1+20, IMGR1+32 |
| ^TIU(8925 - [#8925] | HASEN+8, HASEN+9, HASEN+10, SCAN+2 |
| ^TMP($J | IMGR+2!, IMGR+5!, DR+5, DR+6, DR+18, DR+19, DR+25!, IMGR1+36*, IMGR1+37*, IMGR1+42* , IMGR1+43* |
| ^VA(200 - [#200] | PVCL+2 |
| Name | Line Occurrences |
|---|---|
| $$ERTRANS | HASMMR+16 |
| $$HASADM65 | ADV+7 |
| $$HASADV | ADV1+6 |
| $$HASEN | EN1+5 |
| $$HASFH | FH1+5 |
| $$HASMMR | MR+8 |
| $$HOSER | HASMMR+12 |
| $$PRVD | HASEN+17 |
| $$PVCL | EN+5, PRVD+5, PRVD+7 |
| $$SCAN | HASEN+12 |
| $$TRANS | HASMMR+15 |
| ADV1 | ADV+9 |
| EN1 | EN+7, EN+11 |
| FH1 | FH+9, FH+13 |
| IMGR1 | IMGR+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | TRANS~, TRANS+2, TRANS+3, ERTRANS~, ERTRANS+2, TRANSOUT~, TRANSOUT+2, ERTRANSO~, ERTRANSO+2, SCAN~ , SCAN+2, PRVD~, PRVD+2, PRVD+3, PRVD+6, PRVD+9, PRVD+10 |
| A | HASADV+2~, HASMMR+2~, TRANS+1~, TRANS+2*, TRANS+3*, TRANS+4, TRANS+5, TRANS+6, TRANSOUT+1~, TRANSOUT+2* , TRANSOUT+3, HASEN+2~, SCAN+1~, SCAN+2*, PRVD+1~, PRVD+2*, PRVD+5, PRVD+9, IMGR1+3~, HASFH+2~ , HASFH+6*, HASFH+7, HASFH+8, HASFH+9, HASFH+13*, HASFH+14 |
| >> APCMBDAT | MR+8, EN1+5, IMGR1+4 |
| >> APCMD1 | ADV+2*, MR+5*, EN+2*, IMGR+7*, FH+5* |
| >> APCMDEMO | IMGR1+7 |
| >> APCMEDAT | ADV1+6, MR+8, EN1+5, IMGR1+5, FH1+5 |
| >> APCMEP | ADV1+6*, ADV1+7, ADV1+9, MR+8*, MR+11, MR+13, MR+15, MR+16, EN1+5*, EN1+6 , EN1+8, FH1+5*, FH1+6, FH1+8 |
| >> APCMFAC | ADV+4, MR+6, EN+9, DR+13, DR+15, DR+16, DR+18, DR+19, DR+23, DR+24 , IMGR1+37, IMGR1+43, FH+11 |
| >> APCMHO65( | ADV+5 |
| >> APCMHVTP( | MR+7, EN+6, EN+10, EN1+3, FH+8, FH+12, FH1+3 |
| >> APCMIC | ADV+5, ADV+6, ADV1+2, ADV1+3, ADV1+8, ADV1+9, MR+10, MR+11, MR+14, MR+15 , EN1+1, EN1+2, EN1+7, EN1+8, IMGR+9, IMGR+10, DR+1, DR+3, DR+9, DR+11 , DR+14, DR+16, DR+22, DR+24, FH1+1, FH1+2, FH1+7, FH1+8 |
| APCMMETH | MR+8, HASMMR~, HASMMR+11, HASMMR+14, IMGR1+28 |
| >> APCMN1 | ADV+2*, MR+5*, EN+2*, IMGR+7*, FH+5* |
| APCMP | ADV+1~, ADV+4*, ADV+5, ADV+6, ADV+7, HASADM65+8, ADV1+3, ADV1+9, MR+4~, MR+6* , MR+7, MR+8, MR+11, MR+15, EN+1~, EN+4*, EN+5, EN+6, EN+9*, EN+10 , EN1+2, EN1+3, EN1+5, EN1+8, IMGR+6~, IMGR+8*, IMGR+9, IMGR+10, DR+2, DR+3 , DR+5, DR+6, DR+10, DR+11, DR+13*, FH+4~, FH+7*, FH+8, FH+11*, FH+12 , FH1+2, FH1+3, FH1+8 |
| >> APCMPRV( | EN+4, IMGR+8, IMGR1+15, FH+7 |
| APCMRADS | IMGR+3!, DR+25! |
| APCMRADS( | IMGR+9, DR+2, DR+10, DR+15, DR+23, IMGR1+36*, IMGR1+37*, IMGR1+42*, IMGR1+43* |
| >> APCMRPT | ADV+6, ADV1+3, ADV1+9, MR+11, MR+15, EN1+2, EN1+8, IMGR+10, DR+3, DR+11 , DR+16, DR+24, FH1+2, FH1+8 |
| >> APCMRPTT | ADV+3, ADV+6, ADV1+3, ADV1+9, MR+6, MR+11, MR+15, EN+3, EN+8, EN1+2 , EN1+8, IMGR+8, IMGR+10, DR+3, DR+11, DR+12, DR+16, DR+24, IMGR1+14, IMGR1+22 , IMGR1+36, IMGR1+37, IMGR1+42, IMGR1+43, FH+6, FH+10, FH1+2, FH1+8 |
| >> APCMTIME | ADV+5, ADV+6, ADV1+3, ADV1+9, MR+11, MR+15, EN1+2, EN1+8, IMGR+10, DR+3 , DR+11, DR+16, DR+24, FH1+2, FH1+8 |
| >> APCMVALU | ADV1+4*, ADV1+7*, MR+13*, EN1+3*, EN1+6*, DR+6*, DR+19*, FH1+3*, FH1+6* |
| >> APCMVSTS | ADV+7, MR+8 |
| APCMZ | ADV+1~, ADV+7*, ADV+8, ADV1+4 |
| B | HASADV+2~, HASADV+9*, HASADV+10, HASADV+11, HASADV+15*, HASADV+16, HASMMR+2~, HASMMR+19*, SN+1*, SN+2 , HASEN+2~, SCAN+1~, SCAN+2*, SCAN+3, IMGR1+3~, HASFH+2~, HASFH+9*, HASFH+10, HASFH+11, HASFH+14* , HASFH+15, HASFH+16 |
| BD | HASMMR~, HASMMR+26, HASEN~, HASEN+15, HASFH~ |
| BDD | HASMMR+2~ |
| C | HASADV+2~, HOSER+3~, HOSER+5*, HOSER+6, HASMMR+2~, PVCL+3~, PVCL+4*, PVCL+5, PVCL+6*, PVCL+7 , PVCL+10, HASEN+2~, SCAN+1~, PRVD+1~, PRVD+6*, PRVD+7, IMGR1+3~, IMGR1+18*, IMGR1+20*, IMGR1+30* , IMGR1+32*, HASFH+2~, HASFH+3* |
| CN | IMGR1+3~, IMGR1+39*, IMGR1+40, IMGR1+41 |
| D | HASADV+2~, HASADV+7*, HASADV+8, HASADV+11, HASADV+17*, HASADV+18, HASADV+19, DSCHDATE+3~, DSCHDATE+4*, DSCHDATE+5 , DSCHDATE+7*, DSCHDATE+9*, HASMMR+2~, HASMMR+25*, HASMMR+26, HASMMR+27, HASEN+2~, HASEN+9*, HASEN+10, PRVD+1~ , DR+6*, DR+19*, IMGR1+3~, HASFH+2~ |
| >> DFN | ADV+7, ADV1+4, ADV1+6, MR+8, EN1+5, DR+7*, DR+20*, FH1+5 |
| E | HASADV+2~, HASADV+4*, HASADV+5, HASADV+11*, HASADV+12, HASADV+14, HASADV+19*, HASADV+20, HASMMR+2~, HASMMR+24* , ERTRANS+1~, ERTRANS+2*, ERTRANS+3, ERTRANS+4, ERTRANSO+1~, ERTRANSO+2*, ERTRANSO+3, ERTRANSO+4, HASEN+2~, HASFH+2~ |
| ED | HASADV~, HASADV+8, HASADV+18, HASMMR~, HASMMR+27, HASEN~, HASEN+16, HASFH~, HASFH+8 |
| EDD | HASMMR+2~ |
| EDUC | HASMMR+2~ |
| >> EIEN | IMGR1+9*, IMGR1+11, IMGR1+15, IMGR1+16, IMGR1+19, IMGR1+24, IMGR1+26, IMGR1+31, IMGR1+39 |
| F | ADV+5*, ADV+6, ADV1+2*, ADV1+3, ADV1+8*, ADV1+9, MR+10*, MR+11, MR+14*, MR+15 , EN1+1*, EN1+2, EN1+7*, EN1+8, IMGR+6~, IMGR+9*, IMGR+10, DR+1*, DR+3, DR+9* , DR+11, DR+14*, DR+16, DR+22*, DR+24, FH1+1*, FH1+2, FH1+7*, FH1+8 |
| G | HASADM65+1~, HASADM65+2*, HASADM65+3, HASADM65+10*, HASADM65+11, HASMMR+2~, HASMMR+6*, HASMMR+11, HASMMR+13*, HASEN+2~ , HASEN+3*, HASEN+8, HASEN+9, HASEN+10, HASEN+18*, HASEN+19, IMGR1+3~, IMGR1+13*, IMGR1+21*, IMGR1+27* , IMGR1+33*, IMGR1+34 |
| HF | HASFH+2~, HASFH+4*, HASFH+6, HASFH+11*, HASFH+12, HASFH+13, HASFH+16*, HASFH+17 |
| ID | IMGR1+3~, IMGR1+4*, IMGR1+5*, IMGR1+6, IMGR1+8 |
| IEN | IMGR1+3~, IMGR1+8*, IMGR1+9, IMGR1+11, IMGR1+15, IMGR1+16, IMGR1+19, IMGR1+24, IMGR1+26, IMGR1+31 , IMGR1+39 |
| J | ERTRANSO+1~, ERTRANSO+4*, ERTRANSO+5, ERTRANSO+6 |
| N | PVCL~, PVCL+1, PVCL+2, PVCL+4, HASEN+2~, IMGR+6~, DR+2*, DR+3, DR+6*, DR+10* , DR+11, DR+15*, DR+16, DR+19*, DR+23*, DR+24, IMGR1+3~ |
| ORDEB | IMGR1+3~ |
| ORPFILE | IMGR1+3~ |
| ORPTST | IMGR1+3~ |
| >> ORPVID | IMGR1+15*, IMGR1+24*, IMGR1+36, IMGR1+42 |
| P | HASADM65~, HASADM65+9, HASADV~, HASADV+5, HASADV+6, HASADV+7, HASADV+9, HASADV+14, HASMMR~, HASMMR+20 , HASEN~, HASEN+8, HASEN+9, HASEN+10, DR+5*, DR+6, DR+7, DR+18*, DR+19, DR+20 , HASFH~, HASFH+6, HASFH+13 |
| PAT | IMGR1+3~, IMGR1+6*, IMGR1+7, IMGR1+8, IMGR1+9, IMGR1+11, IMGR1+15, IMGR1+16, IMGR1+19, IMGR1+24 , IMGR1+26, IMGR1+31, IMGR1+36, IMGR1+37, IMGR1+39, IMGR1+42, IMGR1+43 |
| PATLOC | IMGR1+3~, IMGR1+19*, IMGR1+20, IMGR1+31*, IMGR1+32 |
| PATSTA | IMGR1+3~, IMGR1+16*, IMGR1+17, IMGR1+26*, IMGR1+27, IMGR1+29 |
| PWH | HASMMR+2~, HASMMR+4*, HASMMR+17*, SN+1*, SN+2*, SN+4 |
| Q | HASMMR+2~ |
| R | HASADM65~, HOSER~, HOSER+1, HASMMR~, HASMMR+10, HASMMR+12, HASEN~, IMGR1+3~ |
| S | PRVD+1~, PRVD+3*, PRVD+5, PRVD+10, IMGR1+3~, IMGR1+11*, IMGR1+12 |
| T | HASMMR+2~, PVCL+3~, PVCL+8*, PVCL+9, PVCL+10, HASEN+2~, HASEN+8*, HASEN+9, HASEN+10 |
| U | ADV+5, HASADM65+4, HASADM65+6, HASADM65+7, HASADM65+8, ADV1+2, ADV1+7, ADV1+8, ADV1+9, HASADV+7 , HASADV+9, HASADV+11, HASADV+17, HASADV+19, MR+10, MR+11, MR+13, MR+14, MR+15, MR+16 , HOSER+1, HOSER+2, HOSER+4, DSCHDATE+5, DSCHDATE+8, DSCHDATE+13, HASMMR+7, HASMMR+9, HASMMR+10, HASMMR+14 , HASMMR+15, HASMMR+17, HASMMR+22, SN+1, SN+2, ERTRANS+4, PVCL+6, EN1+1, EN1+6, EN1+7 , EN1+8, HASEN+18, IMGR+9, DR+1, DR+2, DR+6, DR+9, DR+10, DR+14, DR+15 , DR+19, DR+22, DR+23, IMGR1+20, IMGR1+32, IMGR1+36, IMGR1+37, IMGR1+42, IMGR1+43, FH1+1 , FH1+6, FH1+7, FH1+8, HASFH+11, HASFH+14, HASFH+16 |
| V | HASADM65+1~, HASADM65+4*, HASADM65+5, HASADM65+6, HASADM65+7, HASADM65+8, HASADM65+9, HASADM65+10, DSCHDATE~, DSCHDATE+1 , DSCHDATE+2, DSCHDATE+5, DSCHDATE+6, DSCHDATE+7, DSCHDATE+10, DSCHDATE+11, DSCHDATE+12, DSCHDATE+14, HASMMR+2~, HASMMR+7* , HASMMR+8, HASMMR+9, HASMMR+10, HASMMR+12, HASMMR+14, HASMMR+15, HASMMR+16, SN+2 |
| VSTS | HASADM65~, HASMMR~ |
| VSTS( | HASADM65+3, HASADM65+4, HASMMR+5, HASMMR+7 |
| W | HASMMR+2~, HASMMR+20*, HASMMR+21, HASMMR+22, HASMMR+25 |
| X | HASADM65+1~, HASADM65+3*, HASADM65+4, HASADV+2~, HASADV+5*, HASADV+6, HASADV+7, HASADV+9, HASADV+14*, HASADV+15 , HASADV+17, HASMMR+2~, HASMMR+5*, HASMMR+7, HASEN+2~, HASEN+10*, HASEN+12, HASEN+14, HASEN+17, HASEN+18 , IMGR1+3~ |
| Y | HASADM65+1~, DSCHDATE+3~, DSCHDATE+8*, DSCHDATE+9, DSCHDATE+13*, DSCHDATE+14, DSCHDATE+15, HASMMR+2~, HASMMR+21*, HASMMR+22 , HASEN+2~, IMGR1+3~ |
| Z | HASADM65+1~, HOSER~, HOSER+1, HOSER+2, HOSER+4, HOSER+5, DSCHDATE+3~, DSCHDATE+6*, DSCHDATE+7, DSCHDATE+8 , DSCHDATE+10*, DSCHDATE+11, DSCHDATE+12, DSCHDATE+13, HASMMR+2~, HASMMR+19*, HASMMR+20, HASMMR+21, SN*, HASEN+14* , HASEN+15, HASEN+16 |