PSOERUT7 ;ALB/MFR - eRx Drug Validation (VD) Utilities; 06/25/2023 5:14pm
Source file <PSOERUT7.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DOSEDUE(MODE,NPSPC,ERXIEN) | ; Sets Dosage & DUE Information
 ; Input: MODE - Display Mode: "RS": Roll & Scroll | "LM": ListMan ; NMSPC - ListMan Temp Global Namespace (e.g., "PSOERXP1") ; ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49)  | 
|
| SAMEDOSE(ERX,RX) | ; Returns if the eRx Dosage and VistA Rx Dosage are the same
 ; Input: ERX - Pointer to ERX HOLDING QUEUE file (#52.49) ; RX - Pointer to PRESCRIPTION file (#52)  | 
| FileNo | Call Tags | 
|---|---|
| ^PS(50.607 - [#50.607] | GET1^DIQ | 
| ^PS(52.45 - [#52.45] | GET1^DIQ | 
| ^PS(52.49 - [#52.49] | GET1^DIQ |