XUSNPIX2 ;OAK_BP/CMW - NPI EXTRACT REPORT ;7/7/08 17:17
Source file <XUSNPIX2.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 3 | $$HTE^XLFDT MAILTO^XUSNPIX1 ($$P2PEXP,BCBSID,INSTID)^XUSNPIXU |
| VA Fileman | 2 | IX^DIC $$GET1^DIQ |
| MailMan | 1 | ^XMD |
| Outpatient Pharmacy | 1 | PSS^PSO59 |
| Registration | 1 | $$SITE^VASITE |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POA1 | ;
|
|
| PROC2(XUSRTN,XUSPROD,DTTM2) | ;Process all Institution records
|
|
| STAT(XUSRTN) | ; Pull station and Institution info
|
|
| EOF(XUSRTN) | ;
|
|
| EMAIL(XUSRTN) | ;
|
|
| GETPHARM | ;
; this subroutine retrieves data from the OUTPATIENT SITE file ; using the supported Pharmacy API PSS^PSO59. ; It takes the results and places them into a temporary ; global array that is accessed when processing data ; associated with a pharmacy institution. |
|
| POA(IEN,INST) | ; Check Parent of Association for Institution IEN up to VISN level to see if INST is in the chain
|
|
| INIT(XUSRTN) | ; check/init variables
|
|
| EXIT | ;
|
|
| ESEND | ||
| ENT(XUSPROD,XUSVER) | ; ENTRY POINT
; Initialize variables |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | GETPHARM+10 |
| ^DIC(4 - [#4] | STAT+19, PROC2+15, PROC2+16, PROC2+19, PROC2+26, PROC2+28, PROC2+40, PROC2+55, PROC2+81, PROC2+84 , POA1+4, GETPHARM+26 |
| ^DIC(4.1 - [#4.1] | PROC2+85 |
| ^DIC(5 - [#5] | STAT+22, PROC2+46 |
| ^IBE(350.9 - [#350.9] | STAT+13, STAT+14 |
| ^TMP( | EXIT+1!, INIT+4!, PROC2+106*, PROC2+107, PROC2+112*, PROC2+113, PROC2+118!, PROC2+120*, PROC2+128!, EOF+3* , EOF+5*, ESEND+3 |
| ^TMP("XUSNPIX" | EXIT+1!, PROC2+87, PROC2+88, GETPHARM+12!, GETPHARM+36* |
| ^TMP("XUSNPIXS" | PROC2+119*, PROC2+129* |
| ^TMP("XUSNPIXU" | INIT+8 |
| ^TMP($J | EXIT+1!, GETPHARM+12!, GETPHARM+17, GETPHARM+20, GETPHARM+24, GETPHARM+32 |
| ^USC(8932.1 - [#8932.1] | PROC2+56, PROC2+57 |
| ^XTMP( | ENT+6, EXIT+3*, EXIT+4, INIT+6* |
| ^XTMP("XUSNPIXT" | PROC2+132* |
| Name | Line Occurrences |
|---|---|
| $$POA | PROC2+21 |
| PROC2+117, PROC2+127 | |
| EOF | PROC2+116, PROC2+123 |
| ESEND | EMAIL+4 |
| EXIT | ENT+6 |
| GETPHARM | INIT+11 |
| INIT | ENT+8 |
| POA1 | POA1+8 |
| PROC2 | ENT+12 |
| STAT | ENT+10 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| COUNT | PROC2+3~, PROC2+12*, PROC2+105*, PROC2+106, PROC2+107, PROC2+111*, PROC2+112, PROC2+113, PROC2+119, PROC2+121* , PROC2+126, PROC2+129, EOF+1, EOF+3, EOF+4*, EOF+5 |
| D | GETPHARM+6~, GETPHARM+30* |
| DIC | GETPHARM+6~, GETPHARM+30* |
| DIC(0 | GETPHARM+30* |
| DIC0 | PROC2+3~, PROC2+26*, PROC2+45 |
| DIC1 | PROC2+3~, PROC2+40*, PROC2+41, PROC2+42, PROC2+43, PROC2+44, PROC2+47 |
| DIC4 | STAT+1~, STAT+19*, STAT+20, STAT+21, STAT+23 |
| DIFROM | ESEND~ |
| DT | INIT+6 |
| DTTM2 | ENT+4*, ENT+12, EXIT+5!, PROC2~, PROC2+132, EOF+3 |
| I | PROC2+3~, PROC2+36* |
| IBSITE | STAT+1~, STAT+12*, STAT+13*, STAT+14 |
| IEN | POA~, POA1+1, POA1+2, POA1+3, POA1+4, POA1+6, POA1+7* |
| INIEN | PROC2+3~, PROC2+16*, PROC2+19, PROC2+21, PROC2+26, PROC2+28, PROC2+35, PROC2+40, PROC2+55, PROC2+81 , PROC2+84, PROC2+87, PROC2+88 |
| INST | EXIT+5!, STAT+8*, STAT+18, STAT+19, PROC2+21, POA~, POA+2, POA1+5 |
| LDTCMP | PROC2+134! |
| MAXSIZE | PROC2+3~, PROC2+6*, PROC2+115 |
| MSGCNT | PROC2+3~, PROC2+12*, PROC2+119, PROC2+129, PROC2+132, EOF+2*, EOF+3 |
| NPIINS | PROC2+3~ |
| P | EXIT+5! |
| PSIEN | PROC2+3~ |
| PSSTA | PROC2+3~, GETPHARM+6~, GETPHARM+26*, GETPHARM+36 |
| RELINS | PROC2+3~ |
| SINFO | STAT+1~, STAT+4*, STAT+6, STAT+8 |
| SITE | STAT+6*, STAT+24, PROC2+76, PROC2+134! |
| TOTREC | PROC2+3~, PROC2+12*, PROC2+105*, PROC2+111*, PROC2+132 |
| U | EXIT+3, INIT+6, STAT+6, STAT+8, STAT+14, STAT+20, STAT+21, STAT+22, STAT+23, STAT+24 , PROC2+19, PROC2+28, PROC2+30, PROC2+36, PROC2+42, PROC2+43, PROC2+44, PROC2+45, PROC2+46, PROC2+47 , PROC2+48, PROC2+56, PROC2+57, PROC2+78, PROC2+81, PROC2+84, PROC2+85, PROC2+90, PROC2+92, PROC2+97 , PROC2+106, PROC2+112, PROC2+132, EOF+3, EOF+5, ESEND+3, POA1+4, GETPHARM+20, GETPHARM+24, GETPHARM+26 , GETPHARM+32 |
| X | GETPHARM+6~, GETPHARM+10*, GETPHARM+30* |
| XMDUN | ESEND~ |
| XMDUZ | ESEND~ |
| XMMG | ESEND~ |
| XMSUB | ESEND~, ESEND+3* |
| XMTEXT | ESEND~, ESEND+2* |
| XMY | EMAIL+1~, EMAIL+3 |
| XMZ | ESEND~ |
| XUNCP | GETPHARM+6~, GETPHARM+29*, GETPHARM+31*, GETPHARM+32*, GETPHARM+36 |
| XUPHM | PROC2+1~, PROC2+88*, PROC2+90, PROC2+92 |
| XUS59DA | GETPHARM+6~, GETPHARM+14*, GETPHARM+17*, GETPHARM+20, GETPHARM+24, GETPHARM+32 |
| XUSB | PROC2+109*, PROC2+110*, PROC2+112, PROC2+114! |
| XUSBFN | PROC2+3~ |
| XUSBXID | PROC2+100!, PROC2+101, PROC2+108, PROC2+114! |
| XUSBXID( | PROC2+110, PROC2+112 |
| XUSCITY | STAT+1~, STAT+2*, STAT+20*, STAT+24 |
| XUSDATA1 | PROC2+2~, PROC2+30*, PROC2+106, PROC2+112, PROC2+114! |
| XUSDATA2 | PROC2+2~, PROC2+36*, PROC2+37*, PROC2+106, PROC2+112, PROC2+114! |
| XUSDATA3 | PROC2+2~, PROC2+48*, PROC2+106, PROC2+112, PROC2+114! |
| XUSDATA4 | PROC2+2~, PROC2+78*, PROC2+106, PROC2+112, PROC2+114! |
| XUSDATA5 | PROC2+2~, PROC2+97*, PROC2+106, PROC2+112, PROC2+114! |
| XUSDESC | INIT+1~, INIT+5*, INIT+6 |
| XUSDIV | PROC2+1~, PROC2+33*, PROC2+34*, PROC2+35*, PROC2+36, PROC2+37 |
| XUSDT | PROC2+1~ |
| XUSEOL | PROC2+2~, PROC2+9*, PROC2+106, PROC2+112, EOF+3, EOF+5 |
| XUSFCN | PROC2+2~, PROC2+85*, PROC2+86 |
| XUSFCT | PROC2+2~, PROC2+84*, PROC2+85 |
| XUSHDR | EXIT+5!, STAT+24*, PROC2+120, EOF+3 |
| XUSI | PROC2+1~, PROC2+23* |
| XUSIN | PROC2+1~, PROC2+114! |
| XUSIN( | PROC2+23* |
| XUSIN(1 | PROC2+25*, PROC2+30 |
| XUSIN(10 | PROC2+42*, PROC2+48 |
| XUSIN(11 | PROC2+43*, PROC2+48 |
| XUSIN(12 | PROC2+44*, PROC2+48 |
| XUSIN(13 | PROC2+45*, PROC2+46*, PROC2+48 |
| XUSIN(14 | PROC2+47*, PROC2+48 |
| XUSIN(15 | PROC2+51*, PROC2+78 |
| XUSIN(16 | PROC2+59*, PROC2+60*, PROC2+78 |
| XUSIN(17 | PROC2+62*, PROC2+67*, PROC2+78 |
| XUSIN(18 | PROC2+72*, PROC2+78 |
| XUSIN(19 | PROC2+75*, PROC2+78 |
| XUSIN(2 | PROC2+28*, PROC2+30 |
| XUSIN(20 | PROC2+76*, PROC2+78 |
| XUSIN(21 | PROC2+81*, PROC2+97 |
| XUSIN(22 | PROC2+90*, PROC2+97 |
| XUSIN(23 | PROC2+95*, PROC2+97 |
| XUSIN(3 | PROC2+29*, PROC2+30 |
| XUSIZE | EXIT+5!, PROC2+12*, PROC2+107*, PROC2+113*, PROC2+115, PROC2+121* |
| XUSNEW | PROC2+1~ |
| XUSNPI | PROC2+1~, PROC2+14*, PROC2+15*, PROC2+16, PROC2+25 |
| XUSNPIDA | GETPHARM+6~, GETPHARM+20*, GETPHARM+21, GETPHARM+30, GETPHARM+36 |
| XUSPOA | POA+1~, POA1+4*, POA1+5, POA1+6, POA1+7 |
| XUSPOA( | POA1+2, POA1+3* |
| XUSPROD | ENT~, ENT+12, PROC2~, EOF+3, ESEND+3 |
| XUSPT | EXIT+5!, PROC2+134! |
| XUSRELDA | GETPHARM+6~, GETPHARM+24*, GETPHARM+26 |
| XUSRTN | ENT+2~, ENT+3*, ENT+6, ENT+8, ENT+10, ENT+12, EXIT+1, EXIT+3, EXIT+4, INIT~ , INIT+4, INIT+6, STAT~, PROC2~, PROC2+106, PROC2+107, PROC2+112, PROC2+113, PROC2+116, PROC2+117 , PROC2+118, PROC2+120, PROC2+123, PROC2+127, PROC2+128, EOF~, EOF+3, EOF+5, EMAIL~, ESEND+2 , ESEND+3 |
| XUSSPC | PROC2+1~, PROC2+56*, PROC2+58, PROC2+59, PROC2+60 |
| XUSSTA | PROC2+2~, PROC2+19*, PROC2+92*, PROC2+95 |
| XUSSTATE | STAT+1~, STAT+2*, STAT+21*, STAT+22*, STAT+24 |
| XUSTAX | PROC2+1~, PROC2+57*, PROC2+61, PROC2+62, PROC2+67 |
| XUSTAXID | EXIT+5!, STAT+11*, STAT+13, STAT+14*, PROC2+72, PROC2+134! |
| >> XUSTMP("P2P" | PROC2+34, PROC2+35 |
| XUSTXY | PROC2+1~, PROC2+54*, PROC2+55*, PROC2+56, PROC2+57 |
| XUSVER | ENT~, STAT+24 |
| XUSZIP | STAT+1~, STAT+2*, STAT+23*, STAT+24 |
| Y | GETPHARM+6~, GETPHARM+31 |