| PSJ OR PAT OE |
protocol |
|
This protocol allows the entry of Unit Dose and non-fluid IV orders through the Order Entry/Results Reporting package. This protocol assumes that the patient has been selected prior to this protocol being selected. |
D ^PSJORA |
|
| PSJU OR PAT PR |
action |
|
This allows a user to print to any device a profile (list) of a patient's Unit Dose orders for the patient's current or last (if patient has been discharged) admission. If the user's terminal is selected as the printing device, this option will allow the user to select any of the printed orders to be shown in complete detail, including the activity logs, if any. This protocol assumes that a patient has already been selected. |
D ENOR^PSGPR |
|
| PSJ OR PAT MENU |
protocol menu |
|
This contains Inpatient (Unit Dose and IV) Medications reports for use with the OE/RR package. These reports assume that the patient has been selected prior to the protocol being selected. |
|
|
| PSJI OR PAT PR |
action |
|
This will allow a patient's IV profile to be sent to a printer. With each profile printed, a view of each order within the profile can also be printed. This protocol assumes that a patient has been selected prior to this protocol being selected. |
D ENOR^PSIVPR |
|
| PSJU OR VBW |
action |
|
This allows the user to verify (or take other actions) on non-verified Unit Dose orders for patients. If the user is a pharmacist, this protocol will show all orders not verified by a pharmacist for a ward group, ward, or single patient, as the user chooses. If the user is a nurse, this protocol will show all orders not verified by a nurse. If the user is ward staff, this protocol will show patients with orders not verified by a nurse, but not allow any action to be taken. |
D ^PSGVBW |
|
| PSJ OR MENU |
protocol menu |
|
This contains Inpatient (Unit Dose and IV) Medications reports that may be run by ward personnel through the OE/RR package. |
|
|
| PSJU OR AP-1 |
action |
|
This allows the user to print a profile of patients' active Unit Dose orders for review by the physician. It includes places for the physician to mark each order and sign the profile. When possible, space is also included for new orders. |
D ^PSGAP |
|
| PSJU OR AP-2 |
action |
|
This allows the user to print a profile of patients' active Unit Dose orders for review by the physician. It includes places for the physician to mark each order and sign the profile. When possible, space is also included for new orders. |
D ^PSGCAP |
|
| PSJU OR 7D MAR |
action |
|
This allows the user to print selected patients' Unit Dose orders on a Medication Administration Record (MAR) for the charting of the administration of the orders over a seven day period. It is designed to replace the manual Continuing Medication Record (CMR). |
D EN7^PSGMMAR |
|
| PSJU OR 14D MAR |
action |
|
This allows the user to print selected patients' Unit Dose orders on a Medication Administration Record (MAR) for the charting of the administration of the orders over a fourteen day period. It is designed to replace the manual Continuing Medication Record (CMR). |
D EN14^PSGMMAR |
|
| PSJU OR PAT AP-1 |
action |
|
This allows the user to print a profile of a patient's active Unit Dose orders for review by the physician. It includes places for the physician to mark each order and sign the profile. When possible, space is also included for new orders. This protocol assumes that a patient has already been selected. |
D ENOR^PSGAP |
|
| PSJU OR PAT AP-2 |
action |
|
This allows the user to print a profile of a patient's active Unit Dose orders for review by the physician. It includes places for the physician to mark each order and sign the profile. When possible, space is also included for new orders. This protocol assumes that a patient has already been selected. |
D ENOR^PSGCAP0 |
|
| PSJU OR PAT VBW |
action |
|
This allows the user to verify (or take other actions) on non-verified Unit Dose orders for a patient. If the user is a pharmacist, this protocol will show all orders not verified by a pharmacist for a selected patient. If the user is a nurse, this protocol will show all orders not verified by a nurse. If the user is ward staff, this protocol will show the patient's orders not verified by a nurse, but not allow any action to be taken. This protocol assumes that a patient has already been selected. |
D ENOR^PSGVBW |
|
| PSJU OR PAT DS |
action |
|
This gives the physician and/or Outpatient Pharmacy a report of the active Unit Dose medications for a patient about to be discharged or transferred to Authorized Absence, and allows the physician to mark the appropriate action deemed necessary for each medication. This protocol assumes that a patient has already been selected. |
D ENOR^PSGDS |
|
| PSJ OR PAT PR |
action |
|
This allows the user to print Inpatient Medications orders for a selected patient. This protocol assumes that the patient has already been selected. |
S:'$G(PSGP)&(+$G(ORVP)) PSGP=+ORVP Q:'$D(PSGP) D ENOR^PSJPR(PSGP) |
K PSGP |
| PSJU OR DS |
action |
|
This gives the physician and/or Outpatient Pharmacy a report of the active Unit Dose medications for patients about to be discharged or transferred to Authorized Absence, and allows the physician to mark the appropriate action deemed necessary for each medication. |
D ^PSGDS |
|
| PSJU OR PR |
action |
|
This allows a user to print to any device a profile (list) of patients' Unit Dose orders for the patient's current or last (if patient has been discharged) admission. If the user's terminal is selected as the printing device, this protocol will allow the user to select any of the printed orders to be shown in complete detail, including the activity logs, if any. The user may print patients' profiles for a single patient, or for an entire ward group or an entire ward. |
D ^PSGPR |
|
| PSJU OR PAT 14D MAR |
action |
|
This allows the user to print a selected patient's Unit Dose orders on a Medication Administration Record (MAR) for the charting of the administration of the orders over a fourteen day period. It is designed to replace the manual Continuing Medication Record (CMR). This protocol assumes that a patient has already been selected. |
S PSGMARDF=14 D ENOR^PSGMMAR |
|
| PSJU OR PAT 7D MAR |
action |
|
This allows the user to print a selected patient's Unit Dose orders on a Medication Administration Record (MAR) for the charting of the administration of the orders over a seven day period. It is designed to replace the manual Continuing Medication Record (CMR). This protocol assumes that a patient has already been selected. |
S PSGMARDF=7 D ENOR^PSGMMAR |
|
| PSJ OR PAT PR MENU |
menu |
|
These are Inpatient Medications profiles for use with the OE/RR package. These protocols all assume that the patient has already been selected through the OE/RR package. |
|
|
| PSJ OR PR |
action |
|
This allows the user to print Inpatient Medications orders for selected patients. Profiles can be printed by patient, ward, or ward group. |
D ^PSJPR |
|
| PSJI OR PR |
action |
|
This will allow a patient's IV profile to be sent to a printer. With each profile printed, a view of each order within the profile can also be printed. |
D ^PSIVXU Q:$D(XQUIT) D ^PSIVPR,ENIVKV^PSGSETU K J,N2,ORIFN,P17 |
|
| PSJ OR PAT ADT |
action |
|
This takes the appropriate action on a patient's Inpatient Medication orders whenever the patient is Admitted, Discharged, or Transferred (ADT). This is an action protocol to be used within the DG MOVEMENT EVENTS protocol. |
D ^PSJADT |
|
| PSJI OR PAT FLUID OE |
protocol |
|
This allows entry of IV fluids orders through OE/RR. This protocol assumes that a patient has been selected prior to this protocol being selected. |
D ^PSIVORA |
|
| PSJI OR PAT HYPERAL OE |
action |
|
This allows limited processing of IV Hyperal orders through OE/RR. |
S ORPK="TESTING ORPK SET" D ^PSIVORH |
|
| PSJI OR PAT FLUID OE MENU |
protocol menu |
|
Placeholder, possible replacement: PSJI OR PAT FLUID OE |
|
|
| PSJ OR PAT OE MENU |
protocol menu |
|
This is a menu that allows the entry of Unit Dose and non-fluid IV orders through OE/RR. This menu should contain the Inpatients Medications order entry protocol and any Inpatient Medications quick order protocols. |
|
|
| PSJQ4 AMY |
protocol |
|
|
D PROCESS^PSJQSET(4) |
|
| PSJQ5 MAI |
protocol |
|
|
D PROCESS^PSJQSET(5) |
|
| PSJ LM DC |
action |
|
Allows the user to discontinue IV, UD, or pending orders for a patient. |
D DC^PSJOE(DFN,PSJORD) |
|
| PSJ LM PENDING ACTION |
menu |
|
|
|
|
| PSJU LM ACTIONS MENU |
menu |
|
|
|
|
| PSJ LM PATIENT INFO |
action |
|
|
D BRFALL^PSJLMUTL(DFN) |
W "" |
| PSJ LM PATIENT DATA |
action |
|
Allows the user to add/edit INPATIENT NARRATIVE and UD DEFAULT STOP DATE/TIME. |
D UPR^PSJLMUTL(DFN) |
S VALMBCK="R" |
| PSJ LM SELECT ORDER |
action |
|
|
K ^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) D SELECT^PSJOE |
D KILL^PSJBCMA5(+$G(PSJSYSP)) |
| PSJ LM NEW ORDER |
action |
|
Allows the user to enter a new order for the selected patient without seeing a medication profile. |
K PSJSTARI,^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) D HOLDHDR^PSJOE K PSJLK S X=DFN_";DPT(" D LK^ORX2 S PSJLK=Y I Y D LMNEW^PSJOE0(DFN,PSJPROT) |
D KILL^PSJBCMA5(+$G(PSJSYSP)) I PSJLK S X=DFN_";DPT(" D ULK^ORX2 S VALMBCK="Q" |
| PSJ LM FINISH |
action |
|
Allows a user to finish IV, UD, or pending orders for a patient. |
S PSJINFIN=1 K ^TMP("PSJINTER",$J) D CWARN^PSJBCMA6($G(DFN),$G(PSGORD)),OVRDISF^PSGSICH2($G(DFN),$G(PSGORD),3) D FINISH^PSGOEF |
K PSJINFIN,^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) |
| PSJU LM ACCEPT |
action |
|
|
S PSJACEPT=1,VALMBCK="Q" I $G(PSJLMFIN) D:$D(^TMP("PSJINTER",$J)) STOREINT^PSGSICH1 |
S VALMBCK="Q" |
| PSJ LM FINISH MENU |
menu |
|
|
|
S VALMBCK="Q" |
| PSJU LM EDIT |
action |
|
|
D EDIT^PSJOE(PSGP,PSJORD,1) |
|
| PSJ LM BYPASS |
action |
|
Allows the user to bypass the order and take no action. |
D BYPASS^PSGOEF |
S PSJLMQT=1 |
| PSJ LM BRIEF PATIENT INFO MENU |
menu |
|
Displays a brief version of the patient's allergy information and allows the user access to update patient information, enter new orders, enter a pharmacy intervention, show a profile or display a detailed view of allergy information. |
|
|
| PSJ LM DETAILED ALLERGY |
action |
|
Allows the user to view a detailed allergy display for the selected patient. |
D EN^PSJLMDA |
D EXIT^PSJLMDA S VALMBCK="R" |
| PSJ LM SHOW PROFILE |
action |
|
Allows the user to choose to display a short, long, or no medication profile for the selected patient. |
K ^PS(53.45,+$G(DUZ),5),^PS(53.45,+$G(DUZ),6) D ENL^PSJO3 I "LSN"[PSJOL S PSJLMCON=1 |
S VALMBCK="Q" K ^PS(53.45,+$G(DUZ),5),^PS(53.45,+$G(DUZ),6) |
| PSJU LM RENEW |
action |
|
|
D:$$ASKDISP^PSGSICH1 OVRDISP^PSGSICH2($G(DFN),$G(PSJORD),3) D RENEW^PSJOE(DFN,PSJORD) |
K ^TMP("PSJINTER",$J) |
| PSJ LM HOLD |
action |
|
Allows a user to place an order on hold or take an order already on hold off of hold. |
D HOLD^PSJOE(DFN,PSJORD) |
|
| PSJU LM ACTIVITY LOG |
action |
|
|
D ^PSJHVARS,LOG^PSJOE(DFN,PSJORD) |
D RESTORE^PSJHVARS |
| PSJU LM COPY |
action |
|
|
Q:$$ACTCLIN^PSJAC(DFN,PSJORD) D COPY^PSJOE(DFN,PSJORD) |
S VALMBCK="R" |
| PSJU LM ACCEPT MENU |
menu |
|
|
;D:$D(PSGP)&($D(PSGORD)) INIT^PSJLMUDE(PSGP,PSGORD) |
|
| PSJI LM PENDING ACTION |
menu |
|
This menu allows user a set of actions to take on an IV pending order. |
|
|
| PSJI LM FINISH |
action |
|
This action allows the user to complete an IV pending order. |
S PSJINFIN=1 K ^TMP("PSJINTER",$J) D CWARN^PSJBCMA6($G(DFN),$G(PSJORD)),OVRDISF^PSGSICH2($G(DFN),$G(PSJORD),2) D FINISH^PSJLIFN D SETIVINT^PSGSICH1 |
K PSJINFIN,^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) |
| PSJI LM DISCONTINUE |
action |
|
This action allows the user to discontinue an IV order. |
D DC^PSJLIACT |
|
| PSJI LM EDIT |
action |
|
This action allows the user to make changes to an IV order. |
D ASKOVR^PSGOEE($G(Y(1)),$G(PSJORD),.PSJSTARI) D EDIT^PSJLIACT |
|
| PSJU LM ACCEPT EDIT |
action |
|
|
D EDIT^PSJOE1(1) |
S VALMBCK="R" |
| PSJI LM ACTIVE MENU |
menu |
|
This menu allows the user a set of actions to take on an active IV order. |
|
|
| PSJU LM VERIFY |
action |
|
|
D EN^PSGOEV(PSJORD) |
S VALMBCK="Q" D SETUDINT^PSGSICH1($G(PSJORD)) K ^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) |
| PSJI PC RENEWAL |
action |
|
This action allows the user to renew an IV order. |
D:$$ASKDISP^PSGSICH1 OVRDISP^PSGSICH2($G(DFN),$G(PSJORD),3) D R^PSJLIACT |
D STOREINT^PSGSICH1 K ^TMP("PSJINTER",$J) |
| PSJ PC IV LOG |
action |
|
This option allows the user to view the history, activity, label logs for an IV order. |
D L^PSJLIACT |
|
| PSJI PC HOLD |
action |
|
This option allows the user to put an IV order on/off hold if it has not been put on hold by CPRS. |
D H^PSJLIACT |
|
| PSJI PC ONCALL |
action |
|
This action allows the user to change the IV order's status to ONCALL. |
D O^PSJLIACT |
|
| PSJ SELECT ALLERGY |
action |
|
|
D SEL^PSJORDA |
|
| PSJ LM EDIT ALLERGY/ADR DATA |
action |
|
Allows the user to edit Allergy/ADR data for the selected patient. |
D NEWALL^PSJLMUTL(DFN) |
S VALMBCK="R" D INIT^PSJLMDA |
| PSJ LM DETAILED ALLERGY MENU |
menu |
|
|
|
|
| PSJI LM ACTIVITY LOG |
action |
|
This option allows the user to view the activity log on an IV order. |
S PSIVLOG=1 D ENPR^PSIVVW1 |
K PSIVLOG |
| PSJI LM LABEL LOG |
action |
|
This option allows the user to view the Label log for an IV order. |
S PSIVLAB=1 D ENPR^PSIVVW1 |
K PSIVLAB |
| PSJI LM LOG MENU |
menu |
|
This is the View Activity Log and View Label Log Menu when the IV Profile option is selected. |
|
|
| PSJ LM NEW SELECT ORDER |
action |
|
Allows the user to select the order from the profile by number. |
K ^TMP("PSJINTER",$J),PSJSTARI D KILL^PSJBCMA5(+$G(PSJSYSP)) D NEWSEL^PSJOE |
D KILL^PSJBCMA5(+$G(PSJSYSP)) |
| PSJ LM MAR MENU |
menu |
|
This menu allows the user a choice of different Medication Administration Reports. |
D ^PSJHVARS |
D RESTORE^PSJHVARS S VALMBCK="R" |
| PSJ LM PROFILE MENU |
menu |
|
This menu gives access to the Inpatient Medications Profile, the IV Medications Profile, and the Unit Dose Medications Profile. |
D ^PSJHVARS |
D RESTORE^PSJHVARS S VALMBCK="R" |
| PSJI LM RETURNS |
action |
|
This option allows the entry of returned, recycled, canceled, or destroyed items per day in IV room or satellite. |
N PSJLMPRO D FULL^VALM1,^PSIVRD |
S VALMBCK="R" |
| PSJU LM RET |
action |
|
This option allows a user to enter the units of returned medication (as when a patient is discharged) into the medication order record. Data entered is used in the cost reports. |
N VAIN,VADM K PSGEFN D FULL^VALM1,^PSGRET |
S VALMBCK="R" |
| PSJ LM RETURNS/DESTROYED MENU |
menu |
|
This menu allows the user access to the Report Returns (UD) option and the Returns/Destroyed Entry (IV) option. |
S PSJHIDFG=1 |
S VALMBCK="R" K PSJHIDFG |
| PSJU LM PLDP |
action |
|
Allows the user to enter the units actually dispensed into the cart for which the respective pick list was run. This option allows the user to select only those pick lists which have not already been filed away. From here, the user may then file the pick list away, a process that makes the data usable for the cost reports. |
N VAIN,VADM D FULL^VALM1,^PSGPLDP |
S VALMBCK="R" |
| PSJU LM PLEUD |
action |
|
Allows a pharmacist to enter the number of any extra units dispensed for a Unit Dose order. Any data entered here is used by the cost reports. |
N VAIN,VADM K PSGEFN D FULL^VALM1,^PSGEUD |
S VALMBCK="R" |
| PSJU LM PL |
action |
|
The Pick List is used by pharmacy when filling medication carts. The list is sorted by administering team, ward, room-bed, and then patient. The site may define ward groups and generate the pick list by these groups to match site-specific filling practices. The pick list will calculate the units needed to be dispensed for selected patients' orders over a selected date range. |
N VAIN,VADM D FULL^VALM1,^PSGPL |
S VALMBCK="R" |
| PSJU LM PL MENU |
menu |
|
Contains various functions related to the Unit Dose pick list, mainly removing pick lists from the system. |
D ^PSJHVARS |
D RESTORE^PSJHVARS S VALMBCK="R" |
| PSJU LM LABEL |
action |
|
Allows the user to print new unprinted labels and/or reprint the latest label for any order containing a label record. |
N VAIN,VADM K PSGEFN D FULL^VALM1,^PSGL |
S VALMBCK="R" |
| PSJU LM AL |
action |
|
Allows the user to align the label stock on a printer so that Unit Dose order information will print within the physical boundaries of the label. |
N VAIN,VADM D FULL^VALM1,ENAL^PSGLBA |
S VALMBCK="R" |
| PSJI LM ALIGNMENT |
action |
|
This option allows the user to align the labels on whatever printer he/she is preparing to print. Three test labels will always print. |
N VAIN,VADM D FULL^VALM1,^PSIVXU Q:$D(XQUIT) D ^PSIVALN,ENIVKV^PSGSETU K I,Z,ZISI |
S VALMBCK="R" |
| PSJI LM LBLI |
action |
|
This option allows the printing of labels for a patient's order. The user may choose whether or not the labels are to be counted as daily usage. This is often used for on-call orders or those not automatically delivered without a written request. |
S PSJHIDFG=1 N PSJLMPRO D ^PSIVXU Q:$D(XQUIT) S PSIVAC="PROL",PSIVBR="D ENLBLI^PSIVLBL1" D FULL^VALM1,ENCHS^PSIV,ENIVKV^PSGSETU K J,N,J2,P17,PS,PSIVAC,PSIVBR,PSIVCT,PSIVNOL,PSIVNOW,TN,ZQ7 |
S VALMBCK="R" K PSJHIDFG |
| PSJI LM LBLS |
action |
|
This option prints labels for a particular scheduled manufacturing time. Usually a manufacturing list has been run prior to the printing of the labels. If this has been done, the labels will print immediately and in the same order as on the manufacturing list. The use of this option also causes workload counts in the IV STATS file. |
N VAIN,VADM D ^PSIVXU Q:$D(XQUIT) D FULL^VALM1,^PSIVLBL1,ENIVKV^PSGSETU |
K I1 S VALMBCK="R" |
| PSJI LM LBLR |
action |
|
This option allows the user to reprint IV labels which failed to print during the running of the Scheduled Labels (IV) option (PSJI LBLS). This option may not be used to reprint labels for dates and IV type which printing has not been attempted through the Scheduled Labels (IV) option. Labels prepared with this option will only be counted as usage if they were not added during the running of Scheduled Labels. |
N VAIN,VADM D FULL^VALM1,^PSIVRP |
K I1 S VALMBCK="R" |
| PSJ LM LABEL PRINT/REPRINT MENU |
menu |
|
Allows the user access to label options to print or reprint unit dose and IV labels, as well as the alignment options for each label type. |
D ^PSJHVARS N DRG |
S VALMBCK="R" D RESTORE^PSJHVARS |
| PSJ LM 24H MAR |
action |
|
This allows the user to print a selected patient's medication orders on a Medication Administration Record (MAR) for the charting of the administration of the orders over a 24 hour period. It is designed to replace the manual Continuing Medication Record (CMR). This protocol assumes that a patient has already been selected. |
N VAIN,VADM D FULL^VALM1,ENLM^PSGMAR |
S VALMBCK="R" |
| PSJ LM 7D MAR |
action |
|
This allows the user to print a selected patient's medication orders on a Medication Administration Record (MAR) for the charting of the administration of the orders over a 7 day period. It is designed to replace the manual Continuing Medication Record (CMR). This protocol assumes that a patient has already been selected. |
N VAIN,VADM S PSGMARDF=7 D FULL^VALM1,ENLM^PSGMMAR |
S VALMBCK="R" |
| PSJ LM 14D MAR |
action |
|
This allows the user to print a selected patient's medication orders on a Medication Administration Record (MAR) for the charting of the administration of the orders over a 14 day period. It is designed to replace the manual Continuing Medication Record (CMR). This protocol assumes that a patient has already been selected. |
N VADM,VAIN S PSGMARDF=14 D FULL^VALM1,ENLM^PSGMMAR |
S VALMBCK="R" |
| PSJ LM PAT PR |
action |
|
This allows the user to print Inpatient Medications orders for a selected patient. This protocol assumes that the patient has already been selected. |
N VAIN,VADM,PSJLM D FULL^VALM1,ENOR^PSJPR(PSGP) |
S VALMBCK="R" |
| PSJI LM PAT PR |
action |
|
This will allow a patient's IV profile to be sent to a printer. With each profile printed, a view of each order within the profile can also be printed. This protocol assumes that a patient has already been selected. |
N VAIN,VADM,PSJLM D FULL^VALM1,ENLM^PSIVPR |
S VALMBCK="R" |
| PSJU LM PAT PR |
action |
|
This allows the user to print to any device a profile (list) of a patient's Unit Dose orders for the patient's current or last (if patient has been discharged) admission. If the user's terminal is selected as the printing device, this option will allow the user to select any of the printed orders to be shown in complete detail, including activity logs, if any. This protocol assumes that a patient has already been selected. |
N VADM,VAIN,PSJLM D FULL^VALM1,ENLM^PSGPR |
S VALMBCK="R" |
| PSJ LM PNV JUMP |
action |
|
Used to allow user to skip to a specific patient in the list of pending/non- verified orders selected in PSJU VBW |
D FULL^VALM1,GOTOP^PSGVBWU |
|
| PSJ LM NEW ORDER FROM PROFILE |
action |
|
This is used to create new Inpatient Medication orders from the profile list. |
K PSJSTARI,^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) K PSJLK S X=DFN_";DPT(" D LK^ORX2 S PSJLK=Y I Y D LMNEW^PSJOE0(DFN,PSJPROT) |
D KILL^PSJBCMA5(+$G(PSJSYSP)) I PSJLK S X=DFN_";DPT(" D ULK^ORX2 D INIT^PSJLMHED(PSJPROT) S VALMBCK="Q" |
| PSJ LM OTHER PHARMACY OPTIONS |
menu |
|
|
D ^PSJHVARS N DRG |
D RESTORE^PSJHVARS S VALMBCK="R" |
| PSJU LM HIDDEN ACTIONS |
menu |
|
This menu adds the ability of adding new orders and viewing brief patient information to the order view screen. |
|
S VALMBCK="R" |
| PSJU LM SPEED FINISH |
action |
|
This protocol will allow a user to finish multiple orders for a patient which are in a pending renewal status without all the usual prompts. |
D ^PSJHVARS D EN^PSGOESF |
D RESTORE^PSJHVARS S VALMBCK="Q" |
| PSJU LM SPEED RENEW |
action |
|
This protocol will allow a user to renew multiple orders for a patient. |
D ^PSJHVARS D EN^PSGOERS |
D RESTORE^PSJHVARS S VALMBCK="Q" |
| PSJU LM SPEED DISCONTINUE |
action |
|
This protocol will allow a user to discontinue multiple medication orders for a patient. |
D ^PSJHVARS D:'$G(PSJHIDFG) EN^PSGOECS |
D RESTORE^PSJHVARS S VALMBCK="Q" |
| PSJ PC IV ACCEPT |
action |
|
This option will accept and save the changes in the IV file. |
D STOREINT^PSGSICH1 D ACCEPT^PSJLIACT D SETIVINT^PSGSICH1 |
D SETIVINT^PSGSICH1 K ^TMP("PSJINTER",$J),PSJSTARI |
| PSJ PC IV AC/EDIT ACTION |
menu |
|
This menu offers the user a choice of accepting or editing an IV order that is currently being worked on. |
|
Q:('$G(ON55)!($G(ON55)["P")) N X S X=$G(^PS(55,DFN,"IV",+ON55,0)) I $P(X,U,2)="",($P(X,U,3)="") D DEL55^PSIVORE2 |
| PSJ LM OE MENU |
menu |
|
|
K PSGEFN |
W "" |
| PSJU LM HIDDEN UD ACTIONS |
menu |
|
|
|
S VALMBCK="R" |
| PSJ LM PHARMACY INTERVENTION MENU |
menu |
PSJ RPHARM |
This is the main menu for the Pharmacy Intervention options. |
|
S VALMBCK="R" |
| PSJ LM INTERVENTION NEW ENTRY |
action |
|
This option is used to enter an entry into the APSP INTERVENTION file (#32.4). |
D FULL^VALM1 F I=0:0 S DIC(0)="QEAML",DLAYGO=9009032.4,DIC="^APSPQA(32.4,",DIADD="" D ^DIC K DA,DR,DIADD K:Y=-1 X,DIC,DIADD,DA,DIE Q:Y=-1 S DA=+Y,DIE=DIC,DR="[PSO INTERVENTION NEW]" K DIC D ^DIE |
S VALMBCK="R" |
| PSJ LM INTERVENTION EDIT |
action |
|
This option is used to edit an already existing entry in the APSP INTERVENTION file (#32.4). |
D FULL^VALM1 F I=0:0 S DIC(0)="QEAM",DIC="^APSPQA(32.4,",DIC("A")="Select INTERVENTION:" D ^DIC K:Y=-1 X,DIC,DA,DIE Q:Y=-1 S DA=+Y,DIE=DIC,DR="[PSO INTERVENTION EDIT]" D ^DIE |
S VALMBCK="R" |
| PSJ LM INTERVENTION PRINTOUT |
action |
|
This option is used to obtain a captioned printout of Pharmacy Interventions for a certain date range. It will print out on normal width paper and can be queued to print at a later time. |
D FULL^VALM1 S L=0,DIC="^APSPQA(32.4,",FLDS="[PSO INTERVENTIONS]",BY="[PSO INTERVENTIONS]" D EN1^DIP K L,DIC,FLDS,BY,Y |
S VALMBCK="R" |
| PSJ LM INTERVENTION DELETE |
action |
|
This option is used to delete an intervention from the APSP INTERVENTION file (#32.4). You may only delete an intervention that was entered on the same day. |
D FULL^VALM1,^PSODELI |
S VALMBCK="R" |
| PSJ LM INTERVENTION VIEW |
action |
|
This option is used to display Pharmacy Interventions in a captioned format. You may view more than one intervention at a time. |
D FULL^VALM1 S PSOVWI("DIC")="^APSPQA(32.4," D ^PSOVWI |
S VALMBCK="R" |
| PSJ LM AP1 |
action |
|
Allows the user to print a profile of patients' active orders for review by the physician. Includes places for the physician to mark each order and sign the profile. When possible, space is included for new orders. |
N VADM,VAIN D FULL^VALM1,ENLM^PSGAP |
S VALMBCK="R" |
| PSJ LM AP2 |
action |
|
Allows the user to print a profile of patients' active orders for review by the physician. Includes places for the physician to mark each order and sign the profile. When possible, space is included for new orders. The user may choose to print all active orders or expiring orders only. |
N VADM,VAIN D FULL^VALM1,ENLM^PSGCAP |
S VALMBCK="R" |
| PSJ LM EXTP |
action |
|
This report allows viewing all of the orders on file for a patient (not just since last discharge). All orders that have not been purged can be viewed, or a date entered to start searching forward from. |
N VAIN,VADM,P,PSJLM S PSJEXTP=1 D FULL^VALM1,ENLM^PSJPR |
K PSJEXTP S VALMBCK="R" |
| PSJU LM PLRP |
action |
|
Allows the user to PRINT or REPRINT any PICK LIST previously run. |
N VAIN,VADM D FULL^VALM1,^PSGPLRP |
S VALMBCK="R" |
| PSJU PLATCS |
action |
|
Allows the user to have the appropriate meds from a selected Pick List dispensed through the ATC machine. PLEASE NOTE that only those meds on the pick list that have the appropriate ATC data (canister # and mnemonic) will dispense through the ATC. |
N VAIN,VADM D FULL^VALM1,^PSGTAP |
S VALMBCK="R" |
| PSJU LM PLUP |
action |
|
Allows the pharmacy personnel to update a pick list that has already been run but not yet started, picking up the new orders, renewed orders, and orders that were being edited when the pick list was first run. This option allows the pharmacist to print only th updated orders, or the entire pick list, including the updated orders. |
N VAIN,VADM D FULL^VALM1,^PSGPLUP |
S VALMBCK="R" |
| PSJ LM MDWS |
action |
|
Allows the user to print the Medications Due Worksheet. The worksheet shows the patient's orders that are to be administered within a 24 hour period. |
N VAIN,VADM S PSGWD=PSJPWD D FULL^VALM1,ENLM^PSJMDWS |
S VALMBCK="R" |
| PSJ LM NEW SELECT ALLERGY |
action |
|
Allows the user to select allergy item by number. |
D NEWSEL^PSJORDA |
|
| PSJ LM IV SELECT ORDER |
action |
|
This option allows the user to select an IV order from the profile. |
K PSJSTARI D SELSO^PSIV |
S VALMBCK="Q" |
| PSJ LM IV OE MENU |
menu |
|
This menu allows the user to take action on the IV order entry process. |
K PSGEFN |
|
| PSJ LM IV NEW SELECT ORDER |
action |
|
Allows a user to select an IV order for action by number. |
K PSJSTARI D SELNUM^PSIV |
|
| PSJ LM EDIT NEW |
action |
|
Allows a user to edit an order by selecting field numbers. The user does not have to select edit first. |
D EDIT^PSJOE(PSGP,PSJORD,0) |
|
| PSJU LM ACCEPT EDIT NEW |
action |
|
|
D EDIT^PSJOE1(0) |
S VALMBCK="R" |
| PSJ LM BPI HIDDEN ACTIONS |
menu |
|
This is the Hidden Menu that will be attached to the Patient Information list template. It includes the standard hidden menu item and some extra Inpatient Pharmacy Items felt to be beneficial to the user. |
|
S VALMBCK="R" |
| PSJ LM PROFILE HIDDEN ACTIONS |
menu |
|
This is the Hidden Menu that will be attached to the List Templates that show pharmacy order profiles. It includes most of the standard hidden items and some other items Inpatient Pharmacy felt would be beneficial to the user. |
|
S VALMBCK="R" |
| PSJ LM ORDER VIEW HIDDEN ACTIONS |
menu |
|
This is the Hidden Menu that will be attached to the Order View list templates. It includes most of the standard hidden menu items and some extra items Inpatient Pharmacy felt would be beneficial tothe user. |
|
S VALMBCK="R" |
| PSJU LM SPEED VERIFY |
action |
|
This protocol will allow a user to verify multiple orders for a patient. It will only speed verify orders that were created because of a renew. |
D ^PSJHVARS D EN^PSGOEVS |
D RESTORE^PSJHVARS S VALMBCK="Q" |
| PSJ LM PRINT OUTPATIENT PROFILE |
action |
|
This protocol will call INPAT^PSOBUILD(DFN) to allow a patient's outpatient profile to be viewed while in the Inpatient Meds software. |
D INPAT^PSOBUILD(PSGP) |
S VALMBCK="R" H 1 |
| PSJU LM MARK NOT GIVE |
action |
|
Protocol to mark a discontinued order as "Not to be given". |
D ^PSGOENG |
|
| PSJU LM MARK INCOMPLETE |
action |
|
This protocol will allow the user to mark a non-verified order as incomplete. |
D ^PSGOEI |
|
| PSJ LM DIN |
action |
|
Created for NFI chg #4 5/2/00; to display a hidden action DIN for drug text indication. |
D DINHIDE^PSJDIN(DFN,$G(PSJORD)) |
S VALMBCK="R" |
| PSJ PC IV LABELS ACTION |
menu |
|
|
D EN^PSIVLB(DFN,ON,PSIVLBTP,PSJMORE) |
Q |
| PSJ PC IV NEW LABELS |
action |
|
This action will allow the user to print new IV labels. |
D LBLBEG^PSIVLBL1 |
S VALMBCK="Q" |
| PSJ PC IV REPRINT LABELS |
action |
|
This action will allow the user to reprint one or all labels that have not been reprinted, recycled, cancelled or destroyed and have not marked as Given or Completed in BCMA. |
D EN^PSIVLBRP(.PSJIDLST) |
K PSJLB S VALMBCK="Q" |
| PSJ PC RETURN IV LABELS ACTION |
menu |
|
|
D EN^PSIVLB(DFN,ON,PSIVLBTP,PSJMORE) |
Q |
| PSJ PC IV RECYCLED |
action |
|
This action will allow the user to recycle selected labels. |
S PSIVC=2 D WARD^PSIVRD |
S VALMBCK="R" |
| PSJ PC IV DESTROYED |
action |
|
This action will allow the user to enter destroyed IV labels. |
S PSIVC=3 D WARD^PSIVRD |
S VALMBCK="R" |
| PSJ PC IV CANCELLED |
action |
|
This action will allow the user to cancel selected labels. |
S PSIVC=4 D WARD^PSIVRD |
S VALMBCK="R" |
| PSJI LM VERIFY |
action |
|
This action allows the user to verify an IV order. |
N PSJIOPIV S PSJIOPIV=1 D PSBPOIV^PSIVORC1,VF^PSJLIACT,SETNML55^PSIVORC1 D SETIVINT^PSGSICH1 K PSJIOPIV |
D SETIVINT^PSGSICH1 K ^TMP("PSJINTER",$J) D KILL^PSJBCMA5(+$G(PSJSYSP)) |
| PSJ LM FLAG |
action |
|
This option allows the user to flag/unflag an Inpatient Medications order. |
D FLAG^PSJOE(DFN,PSJORD) |
|
| PSJ LM CWAD |
action |
|
Displaying the CWAD information for the selected patient. |
D CWAD^PSJALG(DFN) |
S VALMBCK="R" |
| PSJ LM OVERRIDES |
action |
|
Created to display provider override reasons from CPRS and pharamcist interventions from Inpatient Medications associated with this order. |
S:'$G(ON)&($G(PSGORD)) ON=PSGORD D OVRDISP^PSGSICH2(DFN,$S(($G(PSIVAC)]""):ON,1:$G(PSJORD)),3) |
S VALMBCK="R" K ^TMP($J,"PSJ") |
| PSJ LM DRUG CHECK |
action |
|
This action is used to check for enhanced order checks of a prospective drug against the drugs on the patient's medication profile screen. |
D DGCK^PSJDGCK |
|
| PSJ DISPLAY DRUG ALLERGIES |
action |
|
displays signs/symptoms of an allergy associated to a med order. |
D ^PSJDGAL2 |
S VALMBCK="R" |
| PSJ LM ECO MENU |
menu |
|
|
S XQORM("?")="D HELP^PSJCLOR1" K PSGEFN,^PS(53.45,+$G(DUZ),5),^PS(53.45,+$G(DUZ),6) |
|
| PSJ LM ECO START |
action |
|
|
D PRMPTSD^PSJCLOR3 |
|
| PSJ LM ECO SELECT |
action |
|
|
D PRMPTOR^PSJCLOR3 |
|
| PSJ LM VIEW ORDER DETAIL |
action |
|
|
D VWDETAIL^PSJCLOR2($G(PSGP)) |
S VALMBCK="R",VALM("TITLE")="Clinic Order Entry" |
| PSJ LM ECO HIDDEN ACTIONS |
menu |
|
|
|
S VALMBCK="R" |
| PSJ LM ECO IM PR |
action |
|
|
D IMPATPR^PSJCLOR1 |
S VALMBCK="R" |
| PSJ LM ECO RANGE |
action |
|
|
D CHGDT^PSJCLOR2 |
S VALMBCK="R" |
| PSJ LM ADM HIST |
action |
|
This will display the last five actions on the Orderable Items for active orders for the patient chosen in PSJ OE. |
D INIT^PSGAH |
D RESTORE^PSJHVARS S VALMBCK="R" |
| PSJ LM PADE ACTIVITY |
action |
|
This displays all Pharamcy Automated Dispensing Equipment (PADE) activity for the current patient. The display includes the Date and Time the activity occured, the type of activity, the drug item, the quantity, and the PADE cabinet/dispensing device. This hidden action is available in Inpatient Order Entry. |
D PADECK^PSJPADPT |
|
| PSIVARH PHARMACY |
action |
|
|
D EN101^PSIVARH(.XQORMSG) |
|
| PSJ LM DRUG LOOK |
action |
|
Hidden menu option to view drug information |
D DMACTN^PSJUTL3 |
|
| PSJ LM VIEW PROVIDER |
action |
|
Hidden menu option to view provider information |
D VPACTN^PSJUTL3 |
|
| PSJ LM NEW CM ORDER |
action |
|
Allows the user to enter a new clinic medication order for the selected patient without seeing a medication profile. |
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) |
D KILL^PSJBCMA5(+$G(PSJSYSP)) I PSJLK S X=DFN_";DPT(" D ULK^ORX2 K PSJCMO |
