©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
APCHPMH2 ; IHS/CMI/LAB - Patient Wellness Handout ;
Source file <APCHPMH2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETLABSX | ;get lab tests ordered today
|
|
| TYPEREF(N) | ;
|
|
| LOINC(A,B) | ;
|
|
| LAB(P,T,LT) | ;EP
|
|
| DATE(D) | ;EP - convert to slashed date
|
|
| GETLABS | ;get todays labs from V Lab File
|
|
| APCHLHD | ;
|
|
| REF(P,T,D) | ;return refusal string after date D for test is tax T
|
|
| REF1(P,F,I,D,T) | ; ;
|
| Name | Field # of Occurrence |
|---|---|
| $$FMTE^XLFDT | LAB+14 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ATXAX - [#9002226] | LOINC+3, LOINC+5 |
| ^ATXLAB - [#9002228] | LAB+5, REF+4 |
| ^AUPNPREF - [#9000022] | TYPEREF+1 |
| ^AUPNPREF("AA" | REF1+6, REF1+8 |
| ^AUPNVLAB - [#9000010.09] | LAB+5, LAB+7, LAB+14, GETLABS+6, GETLABS+8 |
| ^AUPNVLAB("AE" | LAB+2, LAB+3, LAB+4, GETLABS+2, GETLABS+3, GETLABS+5 |
| ^AUPNVSIT - [#9000010] | LAB+14 |
| ^DPT - [#2] | GETLABSX+2 |
| ^LAB(60 - [#60] | GETLABSX+7, GETLABS+4 |
| ^LAB(95.3 - [#95.3] | LOINC+2, LOINC+4 |
| ^LRO(69 - [#69] | GETLABSX+4, GETLABSX+5, GETLABSX+6 |
| Name | Line Occurrences |
|---|---|
| $$DATE | REF1+10, REF1+12 |
| $$LOINC | LAB+8 |
| $$REF | LAB+13, LAB+14 |
| $$REF1 | REF+5 |
| $$TYPEREF | REF1+10, REF1+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | LOINC+1~, LOINC+2*, LOINC+3, LOINC+4*, LOINC+5, REF+6*, TYPEREF+1~*, TYPEREF+2, TYPEREF+3, TYPEREF+4 |
| A | LOINC~, LOINC+2, LOINC+4 |
| >> APCHCTR | GETLABS+6*, GETLABS+7, GETLABS+8 |
| >> APCHLR | GETLABSX+2*, GETLABSX+3, GETLABSX+4 |
| >> APCHLRO | GETLABSX+3*, GETLABSX+4*, GETLABSX+5, GETLABSX+6 |
| APCHREF | REF+4~, REF+6 |
| APCHREF( | REF+6 |
| APCHREF(9999999 | REF+5* |
| >> APCHSDFN | GETLABSX+2, GETLABS+2, GETLABS+3, GETLABS+5 |
| >> APCHSIVD | GETLABS+1*, GETLABS+2, GETLABS+3, GETLABS+5 |
| APCHT | REF+4~*, REF+5 |
| >> APCHTCTR | GETLABSX+6* |
| >> APCHTEST | GETLABSX+7*, GETLABSX+8, GETLABS+4*, GETLABS+8 |
| >> APCHTST( | GETLABSX+8*, GETLABS+4*, GETLABS+8* |
| >> APCHTSTP | GETLABSX+3*, GETLABSX+5*, GETLABSX+6, GETLABSX+7, GETLABS+2*, GETLABS+3*, GETLABS+4, GETLABS+5 |
| >> APCHVLAB | GETLABS+2*, GETLABS+5*, GETLABS+6, GETLABS+8 |
| B | LOINC~, LOINC+3, LOINC+5 |
| D | LAB+2~*, LAB+3, LAB+4, DATE~, DATE+1, DATE+2, REF~, REF+3*, REF+5, REF1~ , REF1+4*, REF1+10 |
| DT | GETLABSX+4, GETLABSX+5, GETLABSX+6, GETLABS+1 |
| F | REF1~, REF1+2, REF1+6, REF1+8 |
| G | LAB+2~*, LAB+3, LAB+4, LAB+5*, LAB+9*, LAB+13, LAB+14 |
| I | REF1~, REF1+3, REF1+6, REF1+8 |
| J | LAB+2~, LAB+7*, LAB+8 |
| LT | LAB~, LAB+1*, LAB+6, LAB+8 |
| N | REF1+6~, REF1+8*, REF1+10, REF1+12, TYPEREF~, TYPEREF+1 |
| P | LAB~, LAB+2, LAB+3, LAB+4, LAB+13, LAB+14, REF~, REF+1, REF+5, REF1~ , REF1+1, REF1+6, REF1+8 |
| >> R | LAB+13* |
| T | LAB~, LAB+5, LAB+13, LAB+14, REF~, REF+2, REF+4, REF1~, REF1+5*, REF1+10 , REF1+11 |
| U | LAB+5, LAB+7, LAB+14, LOINC+2, LOINC+4, REF+5, TYPEREF+1, GETLABSX+7, GETLABS+4, GETLABS+8 |
| V | LAB+2~, REF+4~, REF+5*, REF+6* |
| X | LAB+2~, LAB+3*, LAB+4, LAB+5, REF1+6~*, REF1+7, REF1+8, REF1+9 |
| Y | LAB+4*, LAB+5, LAB+7, LAB+9, REF1+9~*, REF1+10, REF1+11, REF1+12 |