AUPNSICH ; IHS/CMI/LAB - Screen Purpose of Visit/ICD9 codes 24-MAY-1993 ;
Source file <AUPNSICH.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 2 | EN^DDIOL ^DIR | 
| DRG Grouper | 1 | ($$ICDDX,$$ICDOP)^ICDEX | 
| IHS Patient | 1 | ($$IMP,$$IMPOP)^AUPNSICD | 
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 | 
| Patient Care Component Reports | 1 | $$DSCHDATE^APCLV | 
| Taxonomy | 1 | LST^ATXAPI | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| HELPFH | ;EP | |
| HELPE | ;EP | |
| HELP | ;EP | |
| HELPLEX | ;EP | |
| ASKLISTO() | ; | |
| ASKLIST() | ; | |
| HELPOP | ;EP | |
| EOP | ; | |
| HELPPL | ;EP | |
| HELPRFB | ;EP | 
| Name | Field # of Occurrence | 
|---|---|
| $$DSCHDATE^APCLV | HELP+6, HELPFH+6, HELPE+6, HELPPL+6, HELPOP+6, HELPRFB+6, HELPLEX+6 | 
| LST^ATXAPI | HELP+4, HELP+25, HELPFH+4, HELPFH+25, HELPE+4, HELPE+19, HELPE+39, HELPPL+4, HELPPL+21, HELPPL+41 , HELPOP+4, HELPOP+21, HELPRFB+4, HELPRFB+22, HELPLEX+4, HELPLEX+16 | 
| $$IMP^AUPNSICD | HELP+10, HELPFH+10, HELPE+10, HELPPL+10, HELPRFB+10, HELPLEX+10 | 
| $$IMPOP^AUPNSICD | HELPOP+10 | 
| EN^DDIOL | HELP+12, HELP+14, HELP+17, HELP+39, HELPFH+13, HELPFH+15, HELPFH+16, HELPFH+18, HELPFH+19, HELPFH+34 , HELPE+12, HELPE+13, HELPE+28, HELPE+32, HELPE+33, HELPE+48, HELPPL+12, HELPPL+14, HELPPL+15, HELPPL+30 , HELPPL+34, HELPPL+35, HELPPL+50, HELPOP+12, HELPOP+30, HELPRFB+15, HELPRFB+16, HELPRFB+31, HELPLEX+30 | 
| ^DIR | ASKLIST+2, ASKLISTO+2, EOP+4 | 
| $$ICDDX^ICDEX | HELP+31, HELPFH+31, HELPE+25, HELPE+45, HELPPL+27, HELPPL+47, HELPRFB+28, HELPLEX+27 | 
| $$ICDOP^ICDEX | HELPOP+27 | 
| $$VAL^XBDIQ1 | HELPPL+11 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNVSIT - [#9000010] | HELP+5, HELP+6, HELP+7, HELPFH+5, HELPFH+6, HELPFH+7, HELPE+5, HELPE+6, HELPE+7, HELPPL+5 , HELPPL+6, HELPPL+7, HELPOP+5, HELPOP+6, HELPOP+7, HELPRFB+5, HELPRFB+6, HELPRFB+7, HELPLEX+5, HELPLEX+6 , HELPLEX+7 | 
| ^ICDS("F" | HELP+3, HELPFH+3, HELPE+3, HELPPL+3, HELPOP+3, HELPRFB+3, HELPLEX+3 | 
| ^TMP($J | HELP+24!, HELP+28, HELP+31, HELP+41!, HELPFH+24!, HELPFH+28, HELPFH+31, HELPFH+36!, HELPE+18!, HELPE+22 , HELPE+25, HELPE+30!, HELPE+38!, HELPE+42, HELPE+45, HELPE+50!, HELPPL+20!, HELPPL+24, HELPPL+27, HELPPL+32! , HELPPL+40!, HELPPL+44, HELPPL+47, HELPPL+52!, HELPOP+20!, HELPOP+24, HELPOP+27, HELPOP+32!, HELPRFB+21!, HELPRFB+25 , HELPRFB+28, HELPRFB+33!, HELPLEX+15!, HELPLEX+19, HELPLEX+32! | 
| Name | Line Occurrences | 
|---|---|
| $$ASKLIST | HELP+22, HELPFH+22, HELPE+16, HELPE+36, HELPPL+18, HELPPL+38, HELPRFB+19, HELPLEX+13 | 
| $$ASKLISTO | HELPOP+18 | 
| EOP | HELP+29, HELPFH+29, HELPE+23, HELPE+43, HELPPL+25, HELPPL+45, HELPOP+25, HELPRFB+26, HELPLEX+20 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| % | HELP+1~, HELP+11*, HELP+12, HELP+31*, HELP+33, HELP+34, HELP+35, HELP+36, HELP+37, HELP+38 , ASKLIST+1~, ASKLISTO+1~, HELPFH+1~, HELPFH+31*, HELPFH+32, HELPFH+33, HELPE+1~, HELPE+25*, HELPE+26, HELPE+27 , HELPE+45*, HELPE+46, HELPE+47, HELPPL+1~, HELPPL+11*, HELPPL+12, HELPPL+27*, HELPPL+28, HELPPL+29, HELPPL+47* , HELPPL+48, HELPPL+49, HELPOP+1~, HELPOP+11*, HELPOP+12, HELPOP+27*, HELPOP+28, HELPOP+29, HELPRFB+1~, HELPRFB+28* , HELPRFB+29, HELPRFB+30, HELPLEX+1~, HELPLEX+23, HELPLEX+24, HELPLEX+25, HELPLEX+26, HELPLEX+27*, HELPLEX+28, HELPLEX+29 | 
| >> APCDDATE | HELP+8, HELPFH+8, HELPE+8, HELPPL+8, HELPOP+8, HELPRFB+8, HELPLEX+8 | 
| >> APCDVSIT | HELP+5, HELP+6, HELP+7, HELPFH+5, HELPFH+6, HELPFH+7, HELPE+5, HELPE+6, HELPE+7, HELPPL+5 , HELPPL+6, HELPPL+7, HELPOP+5, HELPOP+6, HELPOP+7, HELPRFB+5, HELPRFB+6, HELPRFB+7, HELPLEX+5, HELPLEX+6 , HELPLEX+7 | 
| AUPNC | HELP+23~, HELP+24*, HELP+25, HELPFH+23~, HELPFH+24*, HELPFH+25, HELPE+17~, HELPE+18*, HELPE+19, HELPE+37~ , HELPE+38*, HELPE+39, HELPPL+19~, HELPPL+20*, HELPPL+21, HELPPL+39~, HELPPL+40*, HELPPL+41, HELPOP+19~, HELPOP+20* , HELPOP+21, HELPRFB+20~, HELPRFB+21*, HELPRFB+22, HELPLEX+14~, HELPLEX+15*, HELPLEX+16 | 
| AUPNC( | HELPLEX+27 | 
| AUPNF | HELP+27~, HELP+28*, HELP+29, HELP+40*, HELPFH+27~, HELPFH+28*, HELPFH+29, HELPFH+35*, HELPE+21~, HELPE+22* , HELPE+23, HELPE+29*, HELPE+41~, HELPE+42*, HELPE+43, HELPE+49*, HELPPL+23~, HELPPL+24*, HELPPL+25, HELPPL+31* , HELPPL+43~, HELPPL+44*, HELPPL+45, HELPPL+51*, HELPOP+23~, HELPOP+24*, HELPOP+25, HELPOP+31*, HELPRFB+24~, HELPRFB+25* , HELPRFB+26, HELPRFB+32*, HELPLEX+18~, HELPLEX+19*, HELPLEX+20, HELPLEX+31* | 
| AUPNQ | HELP+27~, HELP+28*, HELP+29, HELPFH+27~, HELPFH+28*, HELPFH+29, HELPE+21~, HELPE+22*, HELPE+23, HELPE+41~ , HELPE+42*, HELPE+43, EOP+1*, EOP+5*, HELPPL+23~, HELPPL+24*, HELPPL+25, HELPPL+43~, HELPPL+44*, HELPPL+45 , HELPOP+23~, HELPOP+24*, HELPOP+25, HELPRFB+24~, HELPRFB+25*, HELPRFB+26, HELPLEX+18~, HELPLEX+19*, HELPLEX+20 | 
| AUPNX | HELP+27~, HELP+28*, HELP+31, HELP+32, HELP+38, HELPFH+27~, HELPFH+28*, HELPFH+31, HELPFH+33, HELPE+21~ , HELPE+22*, HELPE+25, HELPE+27, HELPE+41~, HELPE+42*, HELPE+45, HELPE+47, HELPPL+23~, HELPPL+24*, HELPPL+27 , HELPPL+29, HELPPL+43~, HELPPL+44*, HELPPL+47, HELPPL+49, HELPOP+23~, HELPOP+24*, HELPOP+27, HELPOP+29, HELPRFB+24~ , HELPRFB+25*, HELPRFB+28, HELPRFB+30, HELPLEX+18~, HELPLEX+19*, HELPLEX+22, HELPLEX+27, HELPLEX+29 | 
| AUPNY | HELP+27~, HELPFH+27~, HELPE+21~, HELPE+41~, HELPPL+23~, HELPPL+43~, HELPOP+23~, HELPRFB+24~, HELPLEX+18~ | 
| D | HELP+1~, HELP+2*, HELP+6*, HELP+7*, HELP+8*, HELP+9*, HELP+10, HELP+31, ASKLIST+1~, ASKLISTO+1~ , HELPFH+1~, HELPFH+2*, HELPFH+6*, HELPFH+7*, HELPFH+8*, HELPFH+9*, HELPFH+10, HELPFH+31, HELPE+1~, HELPE+2* , HELPE+6*, HELPE+7*, HELPE+8*, HELPE+9*, HELPE+10, HELPE+25, HELPE+45, HELPPL+1~, HELPPL+2*, HELPPL+6* , HELPPL+7*, HELPPL+8*, HELPPL+9*, HELPPL+10, HELPPL+27, HELPPL+47, HELPOP+1~, HELPOP+2*, HELPOP+6*, HELPOP+7* , HELPOP+8*, HELPOP+9*, HELPOP+10, HELPOP+27, HELPRFB+1~, HELPRFB+2*, HELPRFB+6*, HELPRFB+7*, HELPRFB+8*, HELPRFB+9* , HELPRFB+10, HELPRFB+28, HELPLEX+1~, HELPLEX+2*, HELPLEX+6*, HELPLEX+7*, HELPLEX+8*, HELPLEX+9*, HELPLEX+10, HELPLEX+27 | 
| DA | ASKLIST+1~, ASKLIST+2!, ASKLISTO+1~, ASKLISTO+2! | 
| DFOUT | EOP+3~ | 
| DIC | ASKLIST+1~, ASKLISTO+1~ | 
| DIE | ASKLIST+1~, ASKLISTO+1~ | 
| DIR | ASKLIST+1~, ASKLIST+2!, ASKLISTO+1~, ASKLISTO+2!, EOP+2~, EOP+4! | 
| DIR("A" | ASKLIST+2*, ASKLISTO+2* | 
| DIR("B" | ASKLIST+2*, ASKLISTO+2* | 
| DIR(0 | ASKLIST+2*, ASKLISTO+2*, EOP+4* | 
| DIRUT | ASKLIST+1~, ASKLIST+3, ASKLISTO+1~, ASKLISTO+3, EOP+3~ | 
| DLOUT | EOP+3~ | 
| DT | HELP+9, HELPFH+9, HELPE+9, HELPPL+9, HELPOP+9, HELPRFB+9, HELPLEX+9 | 
| DTOUT | EOP+3~ | 
| DUOUT | ASKLIST+1~, ASKLISTO+1~, EOP+3~, EOP+5 | 
| I | HELP+1~, HELP+10*, HELP+11, HELP+13, HELP+16, HELP+25, HELP+32, HELP+33, HELP+34, HELP+35 , HELP+36, ASKLIST+1~, ASKLISTO+1~, HELPFH+1~, HELPFH+10*, HELPFH+14, HELPFH+17, HELPFH+25, HELPE+1~, HELPE+10* , HELPE+11, HELPE+31, HELPPL+1~, HELPPL+10*, HELPPL+11, HELPPL+12, HELPPL+13, HELPPL+33, HELPOP+1~, HELPOP+10* , HELPOP+11, HELPOP+21, HELPRFB+1~, HELPRFB+10*, HELPRFB+13, HELPRFB+14, HELPLEX+1~, HELPLEX+10*, HELPLEX+16, HELPLEX+22 , HELPLEX+23, HELPLEX+24, HELPLEX+25, HELPLEX+26 | 
| IOF | EOP+6 | 
| IOSL | HELP+29, HELPFH+29, HELPE+23, HELPE+43, HELPPL+25, HELPPL+45, HELPOP+25, HELPRFB+26, HELPLEX+20 | 
| U | HELP+6, HELP+7, HELP+31, HELP+33, HELP+34, HELP+35, HELP+36, HELP+37, HELP+38, HELPFH+6 , HELPFH+7, HELPFH+31, HELPFH+32, HELPFH+33, HELPE+6, HELPE+7, HELPE+25, HELPE+26, HELPE+27, HELPE+45 , HELPE+46, HELPE+47, HELPPL+6, HELPPL+7, HELPPL+27, HELPPL+28, HELPPL+29, HELPPL+47, HELPPL+48, HELPPL+49 , HELPOP+6, HELPOP+7, HELPOP+27, HELPOP+28, HELPOP+29, HELPRFB+6, HELPRFB+7, HELPRFB+28, HELPRFB+29, HELPRFB+30 , HELPLEX+6, HELPLEX+7, HELPLEX+23, HELPLEX+24, HELPLEX+25, HELPLEX+26, HELPLEX+27, HELPLEX+28, HELPLEX+29 | 
| X | HELP+20, HELP+27~, HELP+38*, HELP+39, ASKLIST+1~, ASKLISTO+1~, HELPFH+21, HELPFH+27~, HELPFH+33*, HELPFH+34 , HELPE+15, HELPE+21~, HELPE+27*, HELPE+28, HELPE+35, HELPE+41~, HELPE+47*, HELPE+48, HELPPL+17, HELPPL+23~ , HELPPL+29*, HELPPL+30, HELPPL+37, HELPPL+43~, HELPPL+49*, HELPPL+50, HELPOP+17, HELPOP+23~, HELPOP+29*, HELPOP+30 , HELPRFB+18, HELPRFB+24~, HELPRFB+30*, HELPRFB+31, HELPLEX+12, HELPLEX+18~, HELPLEX+29*, HELPLEX+30 | 
| Y | ASKLIST+1~, ASKLIST+4, ASKLISTO+1~, ASKLISTO+4 | 
| Name | Field # of Occurrence | 
|---|---|
| $T(LST^ATXAPI | HELP+4, HELPFH+4, HELPE+4, HELPPL+4, HELPOP+4, HELPRFB+4, HELPLEX+4 |