XUSNPIX2 ;OAK_BP/CMW - NPI EXTRACT REPORT ;7/7/08 17:17
Source file <XUSNPIX2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ENT(XUSPROD,XUSVER) | ; ENTRY POINT
; Initialize variables |
|
| EXIT | ;
|
|
| INIT(XUSRTN) | ; check/init variables
|
|
| STAT(XUSRTN) | ; Pull station and Institution info
|
|
| PROC2(XUSRTN,XUSPROD,DTTM2) | ;Process all Institution records
|
|
| EOF(XUSRTN) | ;
|
|
| EMAIL(XUSRTN) | ;
|
|
| ESEND | ||
| POA(IEN,INST) | ; Check Parent of Association for Institution IEN up to VISN level to see if INST is in the chain
|
|
| POA1 | ;
|
|
| 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. |
