PSJOC ;BIR/MV - NEW ORDER CHECKS DRIVER ; 9/10/14 10:53pm
Source file <PSJOC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
OC(PSPDRG,PSJPTYP) | ;
|
|
DISPLAY | ;
|
|
GMRAOC | ;Display allergy & CPRS OC regardless if FDB is connected
|
|
ALLERGY | ;Do allergy order check
|
|
DSPORD(ON,PSJNLST,PSJCLINF) | ;Display the order data
|
|
DRUGERR | ;Display drug level errors
|
|
DSPDRGER(PSJDSFLG) | ;
|
|
ERRCHK(PSJTYPE,PSJX) | ;
|
|
PING(PSJMSG) | ;Check if FDB is down. Return 0 if it is
|
|
DSPSERR(PSJMSG) | ;Display system errors
|
|
NOFDB(PSJX,PSJMSG) | ;Display connection down message
|
|
PROSPERR() | ;Display exceptions for prospective drug
|
|
HAZCHK | ;Check for a hazardous drug component and display soft error type warning roll and scroll alert *364
|
|
HAZDRUG(FILE,AR) | ;Get Hazardous to Handle and Hazardous to Dispose fields per component and return Haz array by DRUG IEN *364
; FILE = file root + Order Num from inpatient variables during workflow; Example VAR contains: "^PS(55,DFN,5,ON," or "(PS(53.1,ON," or "^PS(55,DFN,"IV",ON," ; (build ROOT to the multiple level to find all Disp Drugs or Additives or Solution and get HAZ flags) ; AR = array of component's IEN and their Haz flag settings |
|
WRAPTEXT(TEXT,LIMIT,CSPACES) | ;Wrap text util copied in from a PSO routine originally *364
|
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 |
|
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 |