PSOERUT4 ;ALB/MFR - eRx Drug Suggestion Utilities; 06/25/2023 5:14pm
Source file <PSOERUT4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
MATCHSUG(ERXIEN,VIEW) | ; Match Suggestion Prompt
; Input: ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49) ; (o)VIEW - View Only Mode (1:YES,0/null: NO) |
|
CMPMEDS(ERXIEN,VISTARX,COUNTER) | ; Display the Comparison Between eRx and VistA Providers
|
|
CSPRV(PROV,DRG,ORN) | ; Sets CS Information (DEA#, Detox #, Site Address,...)
|
|
VASIG(ORD) | ; Returns The Pending Order SIG
; Input: ORD - Pointer to the PENDING ORDER file (#52.41) |
|
ERXDOSE(ERXIEN,DOSEARR,INTVAL) | ; Retrieves the Dosage for an eRx and loads an Array
; Input: ERXIEN - Pointer to the ERX HOLDING QUEUE file (#52.49) ; (o)INTVAL - 1: Use Internal Value Flag | 0/null: External Value |
|
VARXDOSE(RXIEN,DOSEARR) | ; Retrieves the Dosage for a PRESCRIPTION and loads an Array
; Input: RXIEN - Pointer to the PRESCRIPTION file (#52) |
|
PODOSAGE(NMSPC,ORDIEN,PENDATA,RENEWORD) | ; Set ListMan Side-By-Side Section for VistA Pending Order Dosage
|
|
PENFLAG(NMSPC,ORD) | ; Backdoor ListManager Display of Flag/Unflag Information
|
|
ACCDTBY(ERXIEN) | ; Returns the eRx latest Accepted Date/Time
; Input: ERXIEN - Pointer to ERX HOLDING QUEUE file (#52.49) |
|
PROVCOMM(COMM) | ; Expand Provider Comments
; Input: Provider Comments |
|
FREQ(DUR) | ; Returns the Duration Frequency word (WEEKS, DAYS, etc..)
; Input: DUR - Schedule Duration (e.g., "4D", "3W", "6H", etc...) |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^PSDRUG - [#50] | GET1^DIQ |
^PS(50.607 - [#50.607] | GET1^DIQ |
^PS(51.2 - [#51.2] | GET1^DIQ |
^PSRX - [#52] | GET1^DIQ, GETS^DIQ |
^PS(52.41 - [#52.41] | GET1^DIQ, GETS^DIQ |
^PS(52.45 - [#52.45] | GET1^DIQ |
^PS(52.49 - [#52.49] | GETS^DIQ |
52.4919 | GET1^DIQ |