| 
            Last change
 on this file since 1294 was             628, checked in by George Lilly, 16 years ago           | 
        
        
          | 
             
initial load of FOIAVistA 6/30/08 version 
 
           | 
        
        
          | 
            File size:
            606 bytes
           | 
        
      
      
| Line |   | 
|---|
| 1 | PSGWPERC ;BHAM ISC/KKA - Print Percentage Stock On Hand ; 29 Dec 93 / 11:46 AM
 | 
|---|
| 2 |  ;;2.3; Automatic Replenishment/Ward Stock ;;4 JAN 94
 | 
|---|
| 3 |  I '$D(PGWSITE) D ^PSGWSET Q:'$D(PSGWSITE)
 | 
|---|
| 4 |  I $P(PSGWSITE,"^",5) D  K CONT Q
 | 
|---|
| 5 |  .W *7,!!,"You may not use this option because the ""Merge Inventory Sheet and",!,"Pick List"" site parameter is set to ""YES"". If on hand amounts are not"
 | 
|---|
| 6 |  .W !,"being entered, this report will not have the necessary data to produce",!,"accurate results."
 | 
|---|
| 7 |  .W !!,"Press RETURN to continue: " R CONT:DTIME
 | 
|---|
| 8 |  K DIC S DIC=58.1,L=0,FLDS="[PSGW PERCENTAGE]",BY="[PSGW PERCENTAGE]" D EN1^DIP K DIC
 | 
|---|
| 9 |  Q
 | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.