PSOERSE3 ;ALB/RM - PSO ERX SINGLE ERX DISPLAY INIT section continuation ;Jan 30, 2024@12:43:34
Source file <PSOERSE3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISPRX | ;continuation of PSOERSE2 routine
|
|
| ALG(LINE) | ;
|
|
| DSPLYDUE(ERXIEN,LINE,DSPLYTO,TMPGBL) | ;Display the Prescriber Drug Use Evaluation
|
|
| ACCEPT | ; Validate All Matches (Patient/Provider/Drug) & Accept eRx
|
|
| NEXTDRUG | ||
| NEXTERX(ERXPAT,ERXIEN) | ; Returns the next Actionable eRx for the Patient
; Input:(r) ERXPAT - Pointer to the ERX EXTERNAL PATIENT file (#52.46) ; (r) ERXIEN - Current eRx - Pointer to the ERX HOLDING QUEUE file (#52.49) |
|
| EDITDRUG | ; Edit Drug fields from Single eRx View/Display
|
|
| MISSINGPI(ERXIEN) | ; Returns whether it is likely the eRx should have Patient Instructions entered or not
; Input: (r) ERXIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^PS(52.45 - [#52.45] | GET1^DIQ |
| ^PS(52.49 - [#52.49] | GET1^DIQ |