STANDARD DATA DICTIONARY #57.6 -- UNIT DOSE PICK LIST STATS FILE 9/29/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):