©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
PXCAPL2 ;ISL/dee & LEA/Chylton - Translates data from the PCE Device Interface for "DIAGNOSIS/PROBLEM" into a call to update Problem List ;7/19/96
Source file <PXCAPL2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PROBLIST | ;Problem List
|
| Name | Field # of Occurrence |
|---|---|
| UPDATE^GMPLUTL | PROBLIST+1, PROBLIST+34 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNPROB - [#9000011] | PROBLIST+1 |
| ^TMP("PXK" | PROBLIST+38 |
| Name | Field # of Occurrence |
|---|---|
| ^("AFTER" | PROBLIST+38* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> PXCA("DIAGNOSIS/PROBLEM" | PROBLIST+5, PROBLIST+7, PROBLIST+12, PROBLIST+13 |
| >> PXCA("ENCOUNTER" | PROBLIST+33 |
| >> PXCA("ERROR" | PROBLIST+10 |
| >> PXCA("WARNING" | PROBLIST+37* |
| >> PXCADNUM( | PROBLIST+38 |
| PXCADXPL | PROBLIST+11~, PROBLIST+12*, PROBLIST+15, PROBLIST+19, PROBLIST+20, PROBLIST+21, PROBLIST+22, PROBLIST+23, PROBLIST+24, PROBLIST+25 , PROBLIST+26, PROBLIST+27, PROBLIST+28, PROBLIST+30, PROBLIST+31, PROBLIST+32 |
| >> PXCAHLOC | PROBLIST+18 |
| PXCAINDX | PROBLIST+2~, PROBLIST+6*, PROBLIST+7*, PROBLIST+10, PROBLIST+12, PROBLIST+13, PROBLIST+36, PROBLIST+37, PROBLIST+38 |
| PXCANUMB | PROBLIST+2~, PROBLIST+3*, PROBLIST+8*, PROBLIST+36 |
| >> PXCAPAT | PROBLIST+16 |
| PXCAPL | PROBLIST+11~, PROBLIST+34 |
| PXCAPL("AO" | PROBLIST+26* |
| PXCAPL("COMMENT" | PROBLIST+13*, PROBLIST+15 |
| PXCAPL("DIAGNOSIS" | PROBLIST+19* |
| PXCAPL("EC" | PROBLIST+28* |
| PXCAPL("HNC" | PROBLIST+31* |
| PXCAPL("IR" | PROBLIST+27* |
| PXCAPL("LEXICON" | PROBLIST+20* |
| PXCAPL("LOCATION" | PROBLIST+18* |
| PXCAPL("MST" | PROBLIST+30* |
| PXCAPL("NARRATIVE" | PROBLIST+32* |
| PXCAPL("ONSET" | PROBLIST+23* |
| PXCAPL("PATIENT" | PROBLIST+16* |
| PXCAPL("PROBLEM" | PROBLIST+21*, PROBLIST+33 |
| PXCAPL("PROVIDER" | PROBLIST+17* |
| PXCAPL("RECORDED" | PROBLIST+33* |
| PXCAPL("RESOLVED" | PROBLIST+24* |
| PXCAPL("SC" | PROBLIST+25* |
| PXCAPL("STATUS" | PROBLIST+22* |
| PXCAPRV | PROBLIST+2~, PROBLIST+4*, PROBLIST+5*, PROBLIST+7, PROBLIST+10, PROBLIST+12, PROBLIST+13, PROBLIST+17, PROBLIST+36, PROBLIST+37 , PROBLIST+38 |
| PXCARES | PROBLIST+11~, PROBLIST+34, PROBLIST+35, PROBLIST+38 |
| PXCARES(0 | PROBLIST+36, PROBLIST+37 |
| >> PXKERROR("PL" | PROBLIST+36* |
| Name | Field # of Occurrence |
|---|---|
| $T(UPDATE^GMPLUTL | PROBLIST+1 |