STANDARD DATA DICTIONARY #57.6 -- UNIT DOSE PICK LIST STATS FILE                                                  3/24/25    PAGE 1
STORED IN ^PS(57.6,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                         (VERSION 5.0)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
  Contains medication amounts and costs for the Unit Dose package.  Data is entered into this file when pick lists are filed away,
and when pre- exchange units, extra units dispensed, and returns are entered through the package.  Most of the cost reports gather
their data from this file.  


              DD ACCESS: @
              WR ACCESS: ^
             DEL ACCESS: ^
           LAYGO ACCESS: ^




57.6,.01      DATE                   0;1 DATE (Required)

              INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X S:$D(X) DINUM=X
              LAST EDITED:      DEC 22, 1986 
              DESCRIPTION:
                                  This field should contain the date (no time) that the drug was dispensed or returned.  

              WRITE AUTHORITY:  ^
              GROUP:            PSJU
                                UNEDITABLE
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


57.6,1        WARD                   1;0 POINTER Multiple #57.61 (Add New Entry without Asking)

              DESCRIPTION:
                                  This is wards for which dispensing information has been entered.  

              TECHNICAL DESCR:    This is wards for which dispensing information has been entered.  The dispensing information
                                includes the provider for which the information was entered, the drug that was dispensed, and the
                                amount dispensed.  

              WRITE AUTHORITY:  ^
              GROUP:            PSJU

57.61,.01       WARD                   0;1 POINTER TO WARD LOCATION FILE (#42) (Required)

                INPUT TRANSFORM:  S DINUM=X
                LAST EDITED:      OCT 30, 1986 
                DESCRIPTION:
                                    This field should contain the ward of the patient when the drug was dispensed (or returned).  

                WRITE AUTHORITY:  ^
                GROUP:            PSJU
                                  UNEDITABLE
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


57.61,1         PROVIDER               1;0 POINTER Multiple #57.62 (Add New Entry without Asking)

                DESCRIPTION:
                                    This is providers for which dispensing information has been entered.  

                TECHNICAL DESCR:    This is privers for which dispensing information has been entered.  The information includes
                                  the drug dispensed and the amount dispensed.  

                WRITE AUTHORITY:  ^
                GROUP:            PSJU

57.62,.01         PROVIDER               0;1 POINTER TO NEW PERSON FILE (#200)

                  INPUT TRANSFORM:  S:$D(X) DINUM=X
                  LAST EDITED:      JUL 08, 1991 
                  DESCRIPTION:
                                      This field should contain the physician who ordered the drug dispensed (or returned).  

                  WRITE AUTHORITY:  ^
                  GROUP:            PSJU
                                    UNEDITABLE
                  NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


57.62,1           DRUG                   1;0 POINTER Multiple #57.63 (Add New Entry without Asking)

                  DESCRIPTION:
                                      This is the drugs and related information that were dispensed.  

                  TECHNICAL DESCR:    This is the drugs and related information that were dispensed.  The information includes the
                                    drug, the amount dispensed (or returned) and the cost.  

                  WRITE AUTHORITY:  ^
                  GROUP:            PSJU

57.63,.01           DRUG                   0;1 POINTER TO DRUG FILE (#50)

                    INPUT TRANSFORM:  S DINUM=X
                    LAST EDITED:      DEC 13, 1990 
                    DESCRIPTION:
                                        This field should contain the drug dispensed or returned.  

                    WRITE AUTHORITY:  ^
                    GROUP:            PSJU
                                      UNEDITABLE
                    NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


57.63,1             DISPENSED AMOUNT       0;2 NUMBER

                    INPUT TRANSFORM:  K:+X'=X!(X>1000000)!(X<0)!(X?.E1"."3N.N) X
                    LAST EDITED:      DEC 22, 1986 
                    HELP-PROMPT:      Enter a number between 0 and 1000000. 
                    DESCRIPTION:        This field contains the cumulative dispensed amount for the drug entered.  This field is
                                      updated when PRE-EXCHANGE UNITS and EXTRA UNITS DISPENSED are entered for an order, and when
                                      PICK LISTS are filed away.  Please note that any negative amounts entered into the
                                      aforementioned fields, the amount will be added to the RETURNED AMOUNT field.  

                    WRITE AUTHORITY:  ^
                    GROUP:            PSJU
                                      UNEDITABLE

57.63,2             DISPENSED COST         0;3 NUMBER

                    INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?.N1"."2N)!(X>10000000)!(X<0) X
                    LAST EDITED:      DEC 22, 1986 
                    HELP-PROMPT:      Enter a number between 0 and 10000000. 
                    DESCRIPTION:        This field contains the cumulative dispensed cost for the drug entered.  This field is
                                      updated when the DISPENSED AMOUNT field is updated, using that amount multiplied by the PRICE
                                      PER DISPENSED UNIT for the drug from the DRUG file.  

                    WRITE AUTHORITY:  ^
                    GROUP:            PSJU
                                      UNEDITABLE

57.63,3             RETURNED AMOUNT        0;4 NUMBER

                    INPUT TRANSFORM:  K:+X'=X!(X>1000000)!(X<0)!(X?.E1"."3N.N) X
                    LAST EDITED:      DEC 22, 1986 
                    HELP-PROMPT:      Enter a number between 0 and 1000000. 
                    DESCRIPTION:        This field contains the cumulative returned amount (in units) for the drug entered.  This
                                      field is updated when RETURNS are entered for an order.  Please note that a negative amount
                                      entered as RETURNS is added to the DISPENSED AMOUNT in this file.  

                    WRITE AUTHORITY:  ^
                    GROUP:            PSJU
                                      UNEDITABLE

57.63,4             RETURNED COST          0;5 NUMBER

                    INPUT TRANSFORM:  S:X["$" X=$P(X,"$",2) K:+X'=X&(X'?.N1"."2N)!(X>10000000)!(X<0) X
                    LAST EDITED:      DEC 22, 1986 
                    HELP-PROMPT:      Enter a number between 0 and 10000000. 
                    DESCRIPTION:        This field contains the cumulative returned cost for the drug entered.  This field is
                                      updated when the RETURNED AMOUNT is updated, by multiplying the amount returned by the PRICE
                                      PER DISPENSE UNIT found in the DRUG file for the drug entered.  

                    WRITE AUTHORITY:  ^
                    GROUP:            PSJU
                                      UNEDITABLE








      FILES POINTED TO                      FIELDS

DRUG (#50)                        DRUG:DRUG (#.01)

NEW PERSON (#200)                 PROVIDER:PROVIDER (#.01)

WARD LOCATION (#42)               WARD:WARD (#.01)



INPUT TEMPLATE(S):

PRINT TEMPLATE(S):

SORT TEMPLATE(S):

FORM(S)/BLOCK(S):