AUPNSIC9 ; IHS/CMI/LAB - Screen Purpose of Visit/ICD9 codes 24-MAY-1993 ;
Source file <AUPNSIC9.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | EN^DDIOL ^DIR |
| DRG Grouper | 1 | ($$ICDDX,$$ICDOP,$$IMP,IMP)^ICDEX |
| IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
| Kernel | 1 | $$FMADD^XLFDT |
| Taxonomy | 1 | LST^ATXAPI |
| Package | Total | Caller Graph |
|---|---|---|
| Patient Care Component | 3 | APCDAPOV APCDCPOV APCDLPOV |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHKOP9 | ;EP
|
|
| CHKDX91 | ;CODING SYSTEM 1 - ICD9
|
|
| HELPOP9 | ;EP
|
|
| CHKPL9 | ;EP
|
|
| CHK9 | ;EP
|
|
| HELPPL9 | ;EP
|
|
| CHK91(Y) | ;EP
|
|
| ASKLISTO() | ;
|
|
| CHKE9 | ;EP
|
|
| HELPE9 | ;EP
|
|
| CHKPL91(Y) | ;
|
|
| ASKLIST() | ;
|
|
| EOP | ;
|
|
| CHKE91(Y) | ;
|
|
| CHKOP91(Y) | ;
|
|
| CSEX | ; IF 'USE WITH SEX' FIELD HAS A VALUE CHECK THAT VALUE AGAINST AUPNSEX
|
|
| HELP9 | ;EP
|
| Name | Field # of Occurrence |
|---|---|
| LST^ATXAPI | HELP9+3, HELP9+15, HELPE9+3, HELPE9+12, HELPPL9+3, HELPPL9+10, HELPOP9+3, HELPOP9+17 |
| EN^DDIOL | HELP9+7, HELP9+9, HELP9+25, HELPE9+5, HELPE9+6, HELPE9+21, HELPPL9+19, HELPOP9+8, HELPOP9+26 |
| ^DIR | ASKLIST+2, ASKLISTO+2, EOP+4 |
| $$ICDDX^ICDEX | CHK91+5, HELP9+21, CHKE91+5, HELPE9+18, CHKPL91+5, HELPPL9+16 |
| $$ICDOP^ICDEX | HELPOP9+23, CHKOP91+5 |
| $$IMP^ICDEX | CHK91+3, HELP9+4, CHKE91+3, HELPE9+4, CHKPL91+3, HELPPL9+4, HELPOP9+6, CHKOP91+3 |
| IMP^ICDEX | HELPOP9+6 |
| $$VAL^XBDIQ1 | HELP9+6 |
| $$FMADD^XLFDT | CHK91+3, HELP9+4, CHKE91+3, HELPE9+4, CHKPL91+3, HELPPL9+4, HELPOP9+6, CHKOP91+3 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ICD9 - [#80] | CHK9+2, CHKE9+2, CHKPL9+2, CHKOP9+2 |
| ^ICDS("F" | HELP9+2, HELPE9+2, HELPPL9+2, HELPOP9+2 |
| ^TMP($J | HELP9+14!, HELP9+18, HELP9+21, HELP9+27!, HELPE9+11!, HELPE9+15, HELPE9+18, HELPE9+23!, HELPPL9+9!, HELPPL9+13 , HELPPL9+16, HELPPL9+21!, HELPOP9+16!, HELPOP9+20, HELPOP9+23, HELPOP9+28! |
| Name | Line Occurrences |
|---|---|
| $$ASKLIST | HELP9+12, HELPE9+9, HELPPL9+7 |
| $$ASKLISTO | HELPOP9+14 |
| $$CHK91 | CHK9+1 |
| $$CHKE91 | CHKE9+1 |
| $$CHKOP91 | CHKOP9+1 |
| $$CHKPL91 | CHKPL9+1 |
| @( | CHK91+8 |
| EOP | HELP9+19, HELPE9+16, HELPPL9+14, HELPOP9+21 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | ASKLIST+1~, ASKLISTO+1~, CHK91+1~, CHK91+5*, CHK91+6, CHKDX91+1, CHKDX91+2, CSEX+3, HELP9+1~, HELP9+6* , HELP9+7, HELP9+21*, HELP9+23, HELP9+24, CHKE91+1~, CHKE91+5*, CHKE91+6, CHKE91+8, CHKE91+9, CHKE91+12 , HELPE9+1~, HELPE9+18*, HELPE9+19, HELPE9+20, CHKPL91+1~, CHKPL91+5*, CHKPL91+6, CHKPL91+8, CHKPL91+9, CHKPL91+12 , HELPPL9+1~, HELPPL9+16*, HELPPL9+17, HELPPL9+18, HELPOP9+1~, HELPOP9+7*, HELPOP9+8, HELPOP9+23*, HELPOP9+24, HELPOP9+25 , CHKOP91+1~, CHKOP91+5*, CHKOP91+6, CHKOP91+8, CHKOP91+11 |
| A | CHK91+1~, CHKE91+1~, CHKPL91+1~, CHKOP91+1~ |
| AUPNC | HELP9+13~, HELP9+14*, HELP9+15, HELPE9+10~, HELPE9+11*, HELPE9+12, HELPPL9+8~, HELPPL9+9*, HELPPL9+10, HELPOP9+15~ , HELPOP9+16*, HELPOP9+17 |
| AUPNF | HELP9+17~, HELP9+18*, HELP9+19, HELP9+26*, HELPE9+14~, HELPE9+15*, HELPE9+16, HELPE9+22*, HELPPL9+12~, HELPPL9+13* , HELPPL9+14, HELPPL9+20*, HELPOP9+19~, HELPOP9+20*, HELPOP9+21, HELPOP9+27* |
| AUPNQ | EOP+1*, EOP+5*, HELP9+17~, HELP9+18*, HELP9+19, HELPE9+14~, HELPE9+15*, HELPE9+16, HELPPL9+12~, HELPPL9+13* , HELPPL9+14, HELPOP9+19~, HELPOP9+20*, HELPOP9+21 |
| >> AUPNSEX | CSEX+1, CSEX+3, CHKE91+11, CHKE91+12, CHKPL91+11, CHKPL91+12, CHKOP91+10, CHKOP91+11 |
| AUPNX | HELP9+17~, HELP9+18*, HELP9+21, HELP9+22, HELP9+24, HELPE9+14~, HELPE9+15*, HELPE9+18, HELPE9+20, HELPPL9+12~ , HELPPL9+13*, HELPPL9+16, HELPPL9+18, HELPOP9+19~, HELPOP9+20*, HELPOP9+23, HELPOP9+25 |
| AUPNY | HELP9+17~, HELPE9+14~, HELPPL9+12~, HELPOP9+19~ |
| D | ASKLIST+1~, ASKLISTO+1~, EOP+2~, CHK91+1~, CHK91+2*, CHK91+3*, CHK91+5, HELP9+1~, HELP9+4*, HELP9+21 , CHKE91+1~, CHKE91+2*, CHKE91+3*, CHKE91+5, HELPE9+1~, HELPE9+4*, HELPE9+18, CHKPL91+1~, CHKPL91+2*, CHKPL91+3* , CHKPL91+5, HELPPL9+1~, HELPPL9+4*, HELPPL9+16, HELPOP9+1~, HELPOP9+4*, HELPOP9+6*, HELPOP9+23, CHKOP91+1~, CHKOP91+2* , CHKOP91+3* |
| 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 | HELPOP9+6 |
| DTOUT | EOP+3~ |
| DUOUT | ASKLIST+1~, ASKLISTO+1~, EOP+3~, EOP+5 |
| I | ASKLIST+1~, ASKLISTO+1~, CHK91+1~, CHK91+4*, CHK91+6, CHK91+7*, CHK91+8, HELP9+1~, HELP9+5*, HELP9+6 , HELP9+8, HELP9+15, HELP9+22, CHKE91+1~, CHKE91+4*, CHKE91+6, HELPE9+1~, CHKPL91+1~, CHKPL91+4*, CHKPL91+6 , HELPPL9+1~, HELPPL9+5*, HELPOP9+1~, HELPOP9+5*, HELPOP9+17, CHKOP91+1~, CHKOP91+4*, CHKOP91+6 |
| IOF | EOP+6 |
| IOSL | HELP9+19, HELPE9+16, HELPPL9+14, HELPOP9+21 |
| U | CHK91+6, CHKDX91+1, CHKDX91+2, CSEX+3, HELP9+21, HELP9+23, HELP9+24, CHKE91+6, CHKE91+8, CHKE91+9 , CHKE91+12, HELPE9+18, HELPE9+19, HELPE9+20, CHKPL91+6, CHKPL91+8, CHKPL91+9, CHKPL91+12, HELPPL9+16, HELPPL9+17 , HELPPL9+18, HELPOP9+23, HELPOP9+24, HELPOP9+25, CHKOP91+6, CHKOP91+8, CHKOP91+11 |
| X | ASKLIST+1~, ASKLISTO+1~, HELP9+10, HELP9+17~, HELP9+24*, HELP9+25, HELPE9+8, HELPE9+14~, HELPE9+20*, HELPE9+21 , HELPPL9+6, HELPPL9+12~, HELPPL9+18*, HELPPL9+19, HELPOP9+13, HELPOP9+19~, HELPOP9+25*, HELPOP9+26 |
| Y | ASKLIST+1~, ASKLIST+4, ASKLISTO+1~, ASKLISTO+4, CHK9+1, CHK9+2, CHK91~, CHK91+5, CHKE9+1, CHKE9+2 , CHKE91~, CHKE91+5, CHKPL9+1, CHKPL9+2, CHKPL91~, CHKPL91+5, CHKOP9+1, CHKOP9+2, CHKOP91~, CHKOP91+5 |
| Name | Field # of Occurrence |
|---|---|
| $T(IMP^ICDEX | HELPOP9+6 |
| $T(LST^ATXAPI | HELP9+3, HELPE9+3, HELPPL9+3, HELPOP9+3 |