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 |