PSSDSEXE ;BIR/CMF-Exceptions for Dose call Continuation ;02/24/09
Source file <PSSDSEXE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
TWEAK2 | ;; loop through exception then error globals, look for OR related tweaks
|
|
TWEAK21(NODE) | ;; test for OR inactive drug
|
|
TWEAK22 | ;; loop through initial entry array, look for drugs which may have not been excepted
|
|
TWEAK23(NODE) | ;; change CPRS message on bad dose route, bad dose type
|
|
TWEAK24(NODE) | ;; change CPRS message on bad frequency or bad frequency duration
|
|
TWEAK25(NODE) | ;; change CPRS message on Free Text Dosage could not be evaluated
|
|
TWEAK26(NODE) | ;; change CPRS message on Free Text Infusion Rate could not be evaluated
|
|
TWEAK27(PSSDWLP,PSSDWL1) | ||
TWEAK20(PSSDWEX2) | ||
TWEAK28(PSSDWLP) | ||
TWEAK29(PSSDWLP) | ||
TWEAK29A(PSSDWEX2) | ||
ORTEST(DRUGIEN) | ;; return 1 if Orderable Item is inactive
|
|
MSGEND(PSSDWEX2,DRUGNAME) | ;; build end of message, add dose to drugname if necessary, add route information if necessary
|
|
ROUTEMSG(PSSDWEX2,DRUGNAME) | ;; build end of message, add route information if necessary
|
|
TWEAK4 | ||
ISCMPLET(PSSLOOP) | ;; is completed
|
|
ISCMPLEB(PSSLOOP) | ;; is completed, both attempted, did both finish?
|
|
GETGNRL3(PSSDWEX2) | ;; ensure General Dosing set if intermittent + bad frequency
|
FileNo | Call Tags |
---|---|
^PSDRUG - [#50] | GET1^DIQ |
^PS(50.7 - [#50.7] | GET1^DIQ |
^PS(51.2 - [#51.2] | GET1^DIQ |