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 |