PSOSIG ;BIR/RTR-Utility to create SIG ;Feb 25, 2021@14:48
Source file <PSOSIG.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(PSOSIGX) | ;
|
|
SCH | ;*282 Preserve old functionality
|
|
SCHE(SCH) | ;
|
|
EXP(X) | ; expand based on 51.1 and 51
|
|
QTY(PSOQX) | ; PSOQX - Array containing Rx information
|
|
QTYCP | ;CPRS qty call comes through here
|
|
COMP | ;COMPLEX DOSE HERE
|
|
QTS | ;*282 Preserve Old Functionality
|
|
QTSCH(QTSH) | ;
; Return Frequency for Schedule QTSH ; Otherwise return "" |
|
QEND | ;
; PSOMTFLG variable indicates a Maintenance Rx (Titration/Maintenance) ; PSO*7.0*574 ;Defect 1155637 |
|
ROUND | ;
|
|
DAY(DATE) | ;First 5 digits of FileMan date
|
|
QTYX(PSOQX) | ;
|
|
QPASS | ||
DAYS(PSOQX) | ;Entry point for Days Supply calc for PSO
|
|
UPDQTY(NEWQTY) | ; If DAYS SUPPLY is being edited and previous QTY was not calculated, don't calculate and update QTY
; Also, if digitally signed, do not automatically calculate and update quantity if QTY increases ; Input: NEWQTY - Newly Calculated Quantity |
|
SCHFREQ() | ; Returns the Frequency (in minutes) for the schedule
; Output: SCHFREQ - Schedule Frequency (in minutes) |
|
PRN() | ; Returns if the Schedule is PRN (1) or not (0)
|
|
UPPER(PSOSCUP) | ;
|
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 |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^PS(51 - [#51] | GET1^DIQ |
^PS(51.1 - [#51.1] | GET1^DIQ |