PSGFILD1 ;BIR/CML3-AUTO CANCEL SET UP HELP ;03 AUG 94 / 5:18 PM
;;5.0; INPATIENT MEDICATIONS ;;16 DEC 97
;
ENWAI ;
W:$Y @IOF W !?67,"Page: 1 of 4",! F Q=1:1:18 S X=$P($T(WAI+Q),";",3) W !,X
R !!,"Press RETURN to continue, enter '^' to end instructions: ",X:DTIME S:'$T X="^" W:'$T $C(7) I X="^" K Q,X Q
W:$Y @IOF W !?67,"Page: 2 of 4",! F Q=20:1:38 S X=$P($T(WAI+Q),";",3) W !,X
R !!,"Press RETURN to continue, enter '^' to end instructions: ",X:DTIME S:'$T X="^" W:'$T $C(7) I X="^" K Q,X Q
G ENWAI^PSGFILD2
;
WAI ;
;;
;; ORDER ACTION ON PATIENT TRANSFER
;;
;; The Inpatient Medications package has changed the criteria for the auto
;;discontinuing of a patient's IV & Unit Dose orders whenever the patient is
;;transferred between wards and/or services.
;; The decision to d/c Inpatient orders is now determined by the site on a
;;ward by ward (or service by service) basis. While this new process will entail
;;initial extra set up on the site's part, it will allow the site almost complete
;;control of the auto discontinue process.
;; The set up for this process involves three main steps:
;;
;;1. If your site wishes to have Inpatient orders d/c'd on all or most ward
;;transfers, you can have the package automatically set up all wards as 'from'
;;and 'to' wards for you, saving some time. If you choose to do this, all wards
;;currently marked as inactive will be included. Also, if you choose to do so,
;;you can still delete, edit, or add 'from' and 'to' wards at any time. See
;;step 2c for further information.
;;
;;2. Ward transfers - Select a 'from' ward. This is a ward from which a patient
;;may be transferred. For each 'from' ward, you can:
;; A. Select an 'On Pass' action. This is the action the Inpatient Medications
;;package will take on a patient's orders whenever the patient is transferred
;;from the selected 'from' ward to authorized absence less than 96 hours (known
;;as 'on pass'). The actions include:
;; 1. discontinue the orders
;; 2. place the orders on hold
;; 3. take no action
;; B. Select an 'Authorized Absence' action. This is the action the Inpatient
;;Medications package will take on a patient's orders whenever the patient is
;;transferred from the selected 'from' ward to authorized absence greater than
;;96 hours. The actions include:
;; 1. discontinue the orders
;; 2. place the orders on hold
;; 3. take no action
;; C. Select the 'To' wards. Whenever a patient is transferred from the selected
;;'from' ward to any of the selected 'to' wards, the patient's IV and Unit Dose
;;orders will be d/c'd. For example, if '1 North' is selected as a 'from'
--- Routine Detail --- with STRUCTURED ROUTINE LISTING ---[H[J[2J[HPSGFILD1 2753 printed Oct 16, 2024@18:02:01 Page 2
PSGFILD1 ;BIR/CML3-AUTO CANCEL SET UP HELP ;03 AUG 94 / 5:18 PM
+1 ;;5.0; INPATIENT MEDICATIONS ;;16 DEC 97
+2 ;
ENWAI ;
+1 if $Y
WRITE @IOF
WRITE !?67,"Page: 1 of 4",!
FOR Q=1:1:18
SET X=$PIECE($TEXT(WAI+Q),";",3)
WRITE !,X
+2 READ !!,"Press RETURN to continue, enter '^' to end instructions: ",X:DTIME
if '$TEST
SET X="^"
if '$TEST
WRITE $CHAR(7)
IF X="^"
KILL Q,X
QUIT
+3 if $Y
WRITE @IOF
WRITE !?67,"Page: 2 of 4",!
FOR Q=20:1:38
SET X=$PIECE($TEXT(WAI+Q),";",3)
WRITE !,X
+4 READ !!,"Press RETURN to continue, enter '^' to end instructions: ",X:DTIME
if '$TEST
SET X="^"
if '$TEST
WRITE $CHAR(7)
IF X="^"
KILL Q,X
QUIT
+5 GOTO ENWAI^PSGFILD2
+6 ;
WAI ;
+1 ;;
+2 ;; ORDER ACTION ON PATIENT TRANSFER
+3 ;;
+4 ;; The Inpatient Medications package has changed the criteria for the auto
+5 ;;discontinuing of a patient's IV & Unit Dose orders whenever the patient is
+6 ;;transferred between wards and/or services.
+7 ;; The decision to d/c Inpatient orders is now determined by the site on a
+8 ;;ward by ward (or service by service) basis. While this new process will entail
+9 ;;initial extra set up on the site's part, it will allow the site almost complete
+10 ;;control of the auto discontinue process.
+11 ;; The set up for this process involves three main steps:
+12 ;;
+13 ;;1. If your site wishes to have Inpatient orders d/c'd on all or most ward
+14 ;;transfers, you can have the package automatically set up all wards as 'from'
+15 ;;and 'to' wards for you, saving some time. If you choose to do this, all wards
+16 ;;currently marked as inactive will be included. Also, if you choose to do so,
+17 ;;you can still delete, edit, or add 'from' and 'to' wards at any time. See
+18 ;;step 2c for further information.
+19 ;;
+20 ;;2. Ward transfers - Select a 'from' ward. This is a ward from which a patient
+21 ;;may be transferred. For each 'from' ward, you can:
+22 ;; A. Select an 'On Pass' action. This is the action the Inpatient Medications
+23 ;;package will take on a patient's orders whenever the patient is transferred
+24 ;;from the selected 'from' ward to authorized absence less than 96 hours (known
+25 ;;as 'on pass'). The actions include:
+26 ;; 1. discontinue the orders
+27 ;; 2. place the orders on hold
+28 ;; 3. take no action
+29 ;; B. Select an 'Authorized Absence' action. This is the action the Inpatient
+30 ;;Medications package will take on a patient's orders whenever the patient is
+31 ;;transferred from the selected 'from' ward to authorized absence greater than
+32 ;;96 hours. The actions include:
+33 ;; 1. discontinue the orders
+34 ;; 2. place the orders on hold
+35 ;; 3. take no action
+36 ;; C. Select the 'To' wards. Whenever a patient is transferred from the selected
+37 ;;'from' ward to any of the selected 'to' wards, the patient's IV and Unit Dose
+38 ;;orders will be d/c'd. For example, if '1 North' is selected as a 'from'
