PSOERUT3 ;ALB/MFR - eRx Listman Allergy Utilities; 06/25/2022 5:14pm
Source file <PSOERUT3.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ALLERGY(MODE,NMSPC,ERXIEN,DFN) | ; Sets Allergy and Adverse Reaction 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) ; DFN - Pointer to PATIENT File(#2)  | 
|
| ADDALLS | ; Add Alergies to the Screen (Reverses or Highlights Video for each Allergy)
 | 
|
| SETDIAGS(MODE,NMSPC,ERXIEN,CALLER) | ; Sets Diagnosis and Indication For Use 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) ; CALLER - Functionality calling this API ("SE":Single eRx View/Display;"VD":Validate Drug;"VP":Validate Patient;"PEN":Pending Order)  | 
|
| GETDIAGS(ERXIEN,ICDARR) | ; Returns the diagnosis codes for the eRx order
 ; Input: (r) ERXIEN - Pointer to the ERX HOLDING QUEUE file (52.49)  | 
|
| SUGSIG(RXIEN,ERXIEN) | ; Returns the Suggested SIG retrieved from the VA Rx
 ; Input:ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49) ; RXIEN - Prescription IEN - Pointer to PRESCRIPTION file (#52)  | 
|
| VAPATINS(OI,DFN) | ; Returns the Pharmacy Orderable Patient Instructions, if any
 ; Input: OI - Pointer to the PHARMACY ORDERABLE ITEM file (#50.7) ; (o)DFN - Pointer to the PATIEN file (#2)  | 
| FileNo | Call Tags | 
|---|---|
| ^PSDRUG - [#50] | GET1^DIQ | 
| ^PS(50.7 - [#50.7] | GET1^DIQ | 
| ^PSRX - [#52] | GET1^DIQ | 
| ^PS(52.49 - [#52.49] | GET1^DIQ | 
| 52.493113 | GETS^DIQ | 
| ^PS(55 - [#55] | GET1^DIQ |