- 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 Feb 18, 2025@23:27:38 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'