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):