| 
            Last change
 on this file since 1006 was             613, checked in by George Lilly, 16 years ago           | 
        
        
          | 
             
initial load of WorldVistAEHR 
 
           | 
        
        
          | 
            File size:
            682 bytes
           | 
        
      
      
| Rev | Line |   | 
|---|
| [613] | 1 | PSOP7206        ;SMT - PSO*7*206 Post Install ; 10/17/07 7:40am
 | 
|---|
 | 2 |         ;;7.0;OUTPATIENT PHARMACY;**206**;APR 2007;Build 39
 | 
|---|
 | 3 |         ;
 | 
|---|
 | 4 |         ;Enter at EN^PSOP7206 for POST INSTALL PSO*7*206
 | 
|---|
 | 5 |         ;Cleanup routine, to fix erroneous listings of partials in the
 | 
|---|
 | 6 |         ;activity log.
 | 
|---|
 | 7 |         ;
 | 
|---|
 | 8 |         ;
 | 
|---|
 | 9 | EN      ;
 | 
|---|
 | 10 |         N XMMG,XMSTRIP,XMROU,XMYBLOB,XMZ,XMDUZ,XMSUB,XMTEXT,DIFROM,XMY,X,CNT,OP,VAR
 | 
|---|
 | 11 |         S OP(1)="DRUG DEA CODES MAY HAVE CHANGED. PATCH PSO*7*206 HAS BEEN INSTALLED."
 | 
|---|
 | 12 |         S OP(2)="SCHEDULING CHANGES HAVE BEEN MADE AND SHOULD HAVE BEEN VERIFIED."
 | 
|---|
 | 13 |         S OP(3)="FOR MORE INFORMATION PLEASE SEE PATCH PSS*1*126."
 | 
|---|
 | 14 |         S XMDUZ=.5,XMSUB="VERIFY DRUG SCHEDULING CHANGES",XMTEXT="OP("
 | 
|---|
 | 15 |         S X="" F  S X=$O(^XUSEC("PSNMGR",X)) Q:'X  S XMY(X)=""
 | 
|---|
 | 16 |         D ^XMD
 | 
|---|
 | 17 |         Q
 | 
|---|
 | 18 |         ; 
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.