| 
            Last change
 on this file since 643 was             628, checked in by George Lilly, 16 years ago           | 
        
        
          | 
             
initial load of FOIAVistA 6/30/08 version 
 
           | 
        
        
          | 
            File size:
            439 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | PSURTQ ;BIR/RDC - PATIENT DEMOGRAPHIC QUEUE RETRANSMITION; 12 APR 2004
 | 
|---|
| 2 |  ;;4.0;PHARMACY BENEFITS MANAGEMENT;;MARCH, 2005
 | 
|---|
| 3 |  ;
 | 
|---|
| 4 | EN ; ENTRY POINT TO QUEUE RETRANSMITION OF PATIENT
 | 
|---|
| 5 |  ; DEMOGRAPHICS FOR PBM EXTRACT
 | 
|---|
| 6 |  ;
 | 
|---|
| 7 |  S ZTDTH=PSUWHEN
 | 
|---|
| 8 |  S ZTRTN="QUEUE^PSURT2"
 | 
|---|
| 9 |  S ZTDESC="RETRANSMITION OF PATIENT DEMOGRAPHICS DATA FOR PBM"
 | 
|---|
| 10 |  S ZTIO=""
 | 
|---|
| 11 |  S ZTSAVE("PSUSTART")=""
 | 
|---|
| 12 |  S ZTSAVE("PSULAST")=""
 | 
|---|
| 13 |  S ZTSAVE("PSUMME")=""
 | 
|---|
| 14 |  S ZTSAVE("PSUMMSTR")=""
 | 
|---|
| 15 |  D ^%ZTLOAD
 | 
|---|
| 16 |  Q
 | 
|---|
| 17 |  ;
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.