©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
PSUDEM3 ;BIR/DAM - ICD9 codes for Outpatient Encounter Extract ; 20 DEC 2001
Source file <PSUDEM3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ICD1 | ;Find ICD9 codes from pointers and place in an array
|
|
| EN | ;EN Called from PSUDEM2
|
|
| FIN | ;$O through array, and set codes into the Outpatient Visit
|
|
| CLEAN | ;Delete all ^XTMP("PSU_"_PSUJOB,"PSUOPV" entries that do not have associated
|
|
| ICD | ;Find all ICD9 pointers associated with Patient pointer
|
| Name | Field # of Occurrence |
|---|---|
| EN^PSUDEM6 | ICD+7, ICD+8 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVCPT - [#9000010.18] | ICD+5, ICD+6, ICD+7 |
| ^AUPNVCPT("C" | ICD+4, ICD+8 |
| ^ICD9 - [#80] | ICD1+4 |
| ^XTMP("PSU_" | ICD1+5*, FIN+6, FIN+7*, FIN+10, FIN+11*, CLEAN+4, CLEAN+5, CLEAN+6! |
| Name | Line Occurrences |
|---|---|
| CLEAN | EN+2 |
| FIN | ICD+9 |
| ICD | EN+1 |
| ICD1 | ICD+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> I | FIN+5*, FIN+6, FIN+7, FIN+8* |
| >> N | FIN+10*, FIN+11 |
| >> PSUC1 | ICD+3*, ICD+4*, ICD+5, ICD+6, ICD+7 |
| >> PSUCL | CLEAN+3*, CLEAN+4*, CLEAN+5, CLEAN+6 |
| >> PSUCPT | ICD+7*, ICD+8* |
| PSUICD | ICD+2~, ICD+6*, ICD1+4 |
| PSUID2 | ICD1+3~, ICD1+4*, ICD1+5 |
| >> PSUIDF | FIN+4*, FIN+6*, FIN+7 |
| >> PSUJOB | ICD1+5, FIN+6, FIN+7, FIN+10, FIN+11, CLEAN+4, CLEAN+5, CLEAN+6 |
| >> PSUPT | ICD+4, ICD+8 |
| >> PSUVIEN | ICD+5, ICD1+5, FIN+6, FIN+7, FIN+10, FIN+11 |
| U | ICD+5, ICD+6, ICD+7, ICD1+4, FIN+7, FIN+10, FIN+11, CLEAN+5, CLEAN+6 |