PSJ LM NEW CM ORDER (5344)    PROTOCOL (101)

View in ViViaN Menu
Name Value
NAME PSJ LM NEW CM ORDER
ITEM TEXT New Clinic Medication Entry
PACKAGE INPATIENT MEDICATIONS
EXIT ACTION D KILL^PSJBCMA5(+$G(PSJSYSP)) I PSJLK S X=DFN_";DPT(" D ULK^ORX2 K PSJCMO
ENTRY ACTION K PSJSTARI,^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) D HOLDHDR^PSJOE K PSJLK,PSJCMO S X=DFN_";DPT(" D LK^ORX2 S PSJLK=Y,PSJCMO=1 I Y D LMNEW^PSJOE0(DFN,PSJPROT)
DESCRIPTION
Allows the user to enter a new clinic medication order for the selected
patient without seeing a medication profile.
TYPE action
CREATOR USER,SIXTYFIVE
TIMESTAMP 2020-09-23 15:43:41