ORKPS ; slc/CLA - Order checking support procedures for medications ;12/29/17 11:58
Source file <ORKPS.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHECK(YY,DFN,MED,OI,ORKDG,OROIL,ORSUPPLY,ORIVTYPE,ORIVRAN,ORDODSG) | ; return drug order checks
|
|
| CHKSESS(YY,DFN,MED,OI,ORKPDATA,ORKDG,ORSUPPLY,ORIVTYPE) | ; return drug order checks for session
|
|
| IVADD(ORDRUG,OROI) | ;RETURN YES OR NO IF SHOULD ADD THE IV ITEM
|
|
| SHRNKPR | ;REMOVE DUPLICATS FROM PROSPECTIVE LIST
|
|
| GETPSNM(ORIEN) | ;GET THE FILE 50 .01 FIELD FROM A FILE 50 IEN
|
|
| TAKEMED(ORKDFN,ORKMED) | ;extrinsic function returns med orderable item if any
|
|
| POLYRX(DFN) | ;extrins funct rtns 1 if patient exceeds polypharmacy, 0 if not
|
|
| GLCREAT(DFN) | ;extrinsic function returns patient's (DFN) most recent serum
; creatinine within # of days from parameter ORK GLUCOPHAGE CREATININE ; results format: test id^result units flag ref range collect d/t^result ; used by order check GLUCOPHAGE-LAB RESULTS |
|
| GCDAYS(DFN) | ;extrinsic function to return number of days to look for
; glucophage serum creatinine result |
|
| SUPPLY(OI) | ;extrinsic function returns 1 (true) if the orderable item is
; a supply |
|
| NUMRX(DFN) | ;extrinsic funct returns number of active meds patient is taking
|
|
| OI2DD(OROI,ORPSPKG,ORCHKTYP) |
