PSORLLLI ;AITC/BWF - ONEVA LASER LABELS INITIALIZATION ;10/06/16 9:28am
Source file <PSORLLLI.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DQ | ||
| DQS | ||
| DQ1 | ||
| HLEX | ||
| C | ||
| ORIG | ||
| STA | ;
 | 
|
| LBL | ||
| LBL2 | ||
| REF | ||
| CHECK | ; use DFN from ZTSAVE instead of from RX
 | 
|
| OSET | ;
 | 
|
| DOUB | ;
 | 
|
| SNO | ;
 | 
|
| ZZ(LDIEN) | ; Returns VA print name, Trade Name, Generic Name
 | 
|
| END | ||
| PSOLBL2 | ;
 | 
|
| QUIT | ||
| SIG | ||
| SIGOLD | ||
| DPT | ||
| PSOLBL3 | ;
 | 
|
| FMSIG | ||
| OPAI | ; OPAI interface for One-Va prescriptions
 | 
|
| ACK | ;Process ack from OPAI dispense for a OneVa fill, called from PSOHLDS
 | 
|
| ACKK | ;
 | 
|
| UPD | ;Update File 52.09 at dispensing site
 | 
| FileNo | Call Tags | 
|---|---|
| ^VA(200 - [#200] | GET1^DIQ | 
| ^PSRX - [#52] | GET1^DIQ | 
| ^PS(59 - [#59] | GET1^DIQ |