PSGFILD1.m

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 ---PSGFILD1   2753     printed  Apr 09, 2024@21:10:35                                                                                                                                                                                                    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'