Select the objects that you wish to see in the downloaded PDF
Info Desc Directly Accessed By Routines Accessed By FileMan Db Calls Pointer To FileMan Files Fields External References Global Variables Directly Accessed Local Variables
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.
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.
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
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).
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).
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".
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).
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.