STANDARD DATA DICTIONARY #728.904 -- UNIT DOSE EXTRACT DATA FILE 9/29/25 PAGE 1
STORED IN ^ECX(728.904, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file holds data from the Unit Dose module of the Inpatient Medications package to be extracted by the DSS software. Data is
entered into this file by routine ECXUD1 which is called by pick list options in the Unit Dose module. Data is deleted from this
file after it is extracted in a form to be shipped to the commercial software.
Data in this file should not be entered, edited, or deleted through direct access via VA FileMan.
COMPILED CROSS-REFERENCE ROUTINE: ECX8904
CROSS
REFERENCED BY: DATE(A), EXTRACT NUMBER(AC), SEQUENCE NUMBER(AINV)
INDEXED BY: DFN & ORDER NUMBER (AO)
728.904,.01 SEQUENCE NUMBER 0;1 NUMBER (Required)
Sequence Number
INPUT TRANSFORM: K:+X'=X!(X>100000)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Enter a number between 1 and 999999999, 0 decimal digits.
DESCRIPTION:
The record number for this extract entry.
TECHNICAL DESCR:
The internal entry number (IEN) for this record. This entry is DINUMed.
UNEDITABLE
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 728.904^AINV^MUMPS
1)= S ^ECX(728.904,"AINV",-X,DA)=""
2)= K ^ECX(728.904,"AINV",-X,DA)
3)= DO NOT DELETE.
This is an inverse entry cross reference. It is used to find the last entry in the file. It is
essential for the management of the data held in this file.
728.904,1 DFN 0;2 POINTER TO PATIENT FILE (#2)
Patient Number
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Enter the name of the patient for this extract record.
DESCRIPTION:
Enter the name of the patient receiving medication for this extract record.
TECHNICAL DESCR: Derived from the PATIENT field (.01) within the PATIENT multiple (1) of the PICK LIST file (#53.5).
Patient is a pointer to the PHARMACY PATIENT file (#55) which is DINUMed to the PATIENT file (#2).
This data represents the patient DFN.
UNEDITABLE
RECORD INDEXES: AO (#317)
728.904,2 DATE 0;3 DATE
Date
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: NOV 01, 1996
HELP-PROMPT: Enter the date/time this drug was dispensed.
DESCRIPTION:
This is the date/time when the medication was dispensed.
TECHNICAL DESCR:
Date is derived from the START DATE/TIME field (.03) of the PICK LIST file (#53.5).
UNEDITABLE
CROSS-REFERENCE: 728.904^A
1)= S ^ECX(728.904,"A",$E(X,1,30),DA)=""
2)= K ^ECX(728.904,"A",$E(X,1,30),DA)
3)= DO NOT DELETE.
This cross reference is essential.
728.904,2.5 ORDER NUMBER 0;10 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 21, 2012
HELP-PROMPT: Type a Number between 1 and 9999999999, 0 Decimal Digits.
DESCRIPTION:
Unit Dose Order number associated with patient record.
RECORD INDEXES: AO (#317)
728.904,3 DRUG 0;4 POINTER TO DRUG FILE (#50)
Drug
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Enter the drug dispensed.
DESCRIPTION:
This is the item dispensed as identified in the local DRUG file (#50).
TECHNICAL DESCR: Drug is derived from the DISPENSE DRUG field (.01) within the DISPENSE DRUG multiple (2) within the
UNIT DOSE multiple (62) of the PHARMACY PATIENT file (#55). It is a pointer to the DRUG file (#50).
UNEDITABLE
728.904,4 QUANTITY 0;5 NUMBER
Quantity
INPUT TRANSFORM: K:+X'=X!(X>10000)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Enter a number between 1 and 10000, 0 decimal digits.
DESCRIPTION:
This is the number of items dispensed.
TECHNICAL DESCR: Quantity is derived from the #DOSES ACTUALLY DISPENSED field (.03) within the DISPENSE DRUG
multiple (1) within the ORDER multiple (1) within the PATIENT multiple (1) of the PICK LIST file
(#53.5).
UNEDITABLE
728.904,5 WARD 0;6 POINTER TO WARD LOCATION FILE (#42)
Ward
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Enter the ward location for this patient.
DESCRIPTION:
This is the location of the patient when he received the medication.
TECHNICAL DESCR: Derived from the WARD field (.03) within the PATIENT multiple (1) of the PICK LIST file (#53.5).
WARD is a pointer to the WARD LOCATION file (#42).
UNEDITABLE
728.904,6 PROVIDER 0;7 FREE TEXT
Provider
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Your answer must be 1 to 30 characters in length.
DESCRIPTION:
This is the provider responsible for this medication order.
TECHNICAL DESCR: Derived from the PROVIDER field (1) within the UNIT DOSE multiple (62) of the PHARMACY PATIENT file
(#55). Provider is the NEW PERSON file (#200) pointer number concatenated with ";200".
UNEDITABLE
728.904,7 TOTAL COST 0;8 NUMBER
Total Cost
INPUT TRANSFORM: K:+X'=X!(X>10000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Enter a number between 0 and 10000, 0 decimal digits.
DESCRIPTION:
This is the total cost of the items dispensed in this order.
TECHNICAL DESCR: Total cost is derived from the PRICE PER DISPENSE UNIT field (16) of the DRUG file (#50) multiplied
by the #DOSES ACTUALLY DISPENSED field (.03) within the DISPENSE DRUG multiple (1) of the PICK LIST
file (#53.5).
UNEDITABLE
728.904,8 EXTRACT NUMBER 1;1 POINTER TO DSS EXTRACT LOG FILE (#727)
Extract Number
LAST EDITED: SEP 12, 1996
HELP-PROMPT: Enter the extract number for this medication dispensing action.
DESCRIPTION:
Pointer to the corresponding entry in the DSS EXTRACT LOG file (#727).
TECHNICAL DESCR: This entry and the corresponding cross reference are set when data is extracted from this file into
the UNIT DOSE LOCAL EXTRACT file (#727.809). The cross reference on this field is used to control
extracting data from this file and also used to permit purging of data in this file.
CROSS-REFERENCE: 728.904^AC
1)= S ^ECX(728.904,"AC",$E(X,1,30),DA)=""
2)= K ^ECX(728.904,"AC",$E(X,1,30),DA)
3)= DO NOT DELETE.
This cross reference is essential for managing the transfer of data from this to file the UNIT DOSE
LOCAL EXTRACT file (#727.809) and ultimately to the commercial DSS software. It is also used to
control purging of data from this file. This cross reference must not be modified.
728.904,9 ORDER DATE 0;9 DATE
Order Date
INPUT TRANSFORM: S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: JUN 12, 2002
HELP-PROMPT: Enter the date/time the order was made.
DESCRIPTION:
This is the date/time the medication was ordered.
TECHNICAL DESCR: Derived from the START DATE/TIME field (#10) in the UNIT DOSE Multiple (file 55.06) of the PHARMACY
PATIENT file (#55).
FILES POINTED TO FIELDS
DRUG (#50) DRUG (#3)
DSS EXTRACT LOG (#727) EXTRACT NUMBER (#8)
PATIENT (#2) DFN (#1)
WARD LOCATION (#42) WARD (#5)
File #728.904
Record Indexes:
AO (#317) RECORD REGULAR IR SORTING ONLY
Short Descr: Regular index of DFN and ORDER NUMBER.
Description: This cross reference is by patient DFN and ORDER NUMBER. It is used to identify unit dose ORDER numbers for
comparison with entries in the BCMA MEDICATION LOG file (#53.79) as part of the BCM extract.
Set Logic: S ^ECX(728.904,"AO",X(1),X(2),DA)=""
Kill Logic: K ^ECX(728.904,"AO",X(1),X(2),DA)
Whole Kill: K ^ECX(728.904,"AO")
X(1): DFN (728.904,1) (Subscr 1) (forwards)
X(2): ORDER NUMBER (728.904,2.5) (Subscr 2) (forwards)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
SORT TEMPLATE(S):
FORM(S)/BLOCK(S):