PSOERUT6 ;ALB/MFR - eRx & Pending Order Side-by-Side LM Display - Cont'd; 06/25/2023 5:14pm
Source file <PSOERUT6.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ; Continuation of PSOERUT5 due to routine size limit
|
|
| VISTAPAT(ERXIEN) | ; Returns the VistA Patient For Responses that pass through the eRx Holding Queue w/out matching/validation
; Input: ERXIEN - Pointer to the ERX HOLDING QUEUE (#52.49) |
|
| CSERX(ORD) | ; Check whether a Pending Order is for a CS eRx
; Input: ORD - Pointer to OUTPATIENT PENDING ORDER file (#52.41) |
|
| CSDRG(DRGIEN) | ; Controlled Substance drug?
; Input: DRGIEN - Pointer to DRUG file (#50) |
|
| VS(ERXIEN,TYPE) | ; View Suggestion(s)
|
|
| LASTRXST(RXIEN) | ; Returns the Rx Last Fill status (For Future Fill Suggestion only)
; Input: RXIEN - pointer to PRESCRIPTION file (#52) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| ^PSDRUG - [#50] | GET1^DIQ |
| ^PSRX - [#52] | GET1^DIQ |
| ^PS(52.41 - [#52.41] | GET1^DIQ |
| ^PS(52.49 - [#52.49] | GET1^DIQ |
