PSJOCDS ;BIR/MV - SET INPUT DATA FOR DOSING ORDER CHECKS ; Jun 06, 2007@15:37
Source file <PSJOCDS.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| IN(PSJPON,PSJTYPE,PSJDD) | ;
|
|
| UD | ;Process data from a UD order
|
|
| FDBDATA | ;Set data needed by FDB's Dose API
|
|
| DOWCHK(PSJSCHD,PSJADM) | ;Append the admin times to the schedule if it's not defined in 51.1
|
|
| LITER | ;FDB requires "L" instead of ML for the particular conditions below
|
|
| UND24HRS(PSJDUR,PSGAT,PSGS0XT,PSGSD,PSGFD,PSGSCH) | ;
|
|
| CNTDOSE(PSGSD,PSGFD) | ;Count # of admins to set the Freq to
|
|
| DURATION(PSGSD,PSGFD) | ;Figure out the duration from the start, stop dates
|
|
| DOSE() | ;Figure out the dose, unit, & dosage Ordered
|
|
| DOSE1(PSJDUP) | ;
|
|
| DATES(PSJPON) | ;Check the correct Start, Stop dates to use
|
|
| OINM(PSJPON) | ;For speed renew, returns OI name if order has multiple DD else returns null
|
|
| DELSING | ; Find and delete single dose message on continuous IV orders
; ^TMP(9980,"PSJPRE1","OUT",1,"I;55V;PROSPECTIVE;1","MESSAGE","1_SINGLE",1609) ; |
|
| RESETI | ; Change subscript for ITEM from SINGLE_RANGE to _RANGE
|