Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^ECX(728.904

Package: DSS Extracts

Global: ^ECX(728.904


Information

FileMan FileNo FileMan Filename Package
728.904 UNIT DOSE EXTRACT DATA DSS Extracts

Description

Directly Accessed By Routines, Total: 13

Package Total Routines
DSS Extracts 12 ECX89041    ECX89042    ECXAPHA2    ECXPURG    ^ECX(728.904    ECXAPHP2    ECXBCM    ECXDRUG2
ECXPURG1    ECXUD    ECXUD1    ^ECX(729    
Event Capture 1 ECUD1    

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
DSS Extracts 3 ECX3P136    ECXPURG    ECXUD1    
Event Capture 1 ECUD1    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Registration 2 WARD LOCATION(#42)[5]    PATIENT(#2)[1]    
DSS Extracts 1 DSS EXTRACT LOG(#727)[8]    
Pharmacy Data Management 1 DRUG(#50)[3]    

Fields, Total: 11

Field # Name Loc Type Details
.01 SEQUENCE NUMBER 0;1 NUMBER
************************REQUIRED FIELD************************

  • 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.
1 DFN 0;2 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • 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)
2 DATE 0;3 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.
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)
3 DRUG 0;4 POINTER TO DRUG FILE (#50) DRUG(#50)

  • 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
4 QUANTITY 0;5 NUMBER

  • 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
5 WARD 0;6 POINTER TO WARD LOCATION FILE (#42) WARD LOCATION(#42)

  • 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
6 PROVIDER 0;7 FREE TEXT

  • 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
7 TOTAL COST 0;8 NUMBER

  • 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
8 EXTRACT NUMBER 1;1 POINTER TO DSS EXTRACT LOG FILE (#727) DSS EXTRACT LOG(#727)

  • 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.
9 ORDER DATE 0;9 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).

External References

Name Field # of Occurrence
^%DT 2+1, 9+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECX(728.904 - [#728.904] IXAOSL+1*, IXAOKL+1!, IXAOKEIC+1!, .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 8(XREF 1S), 8(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 2+1*, 9+1*
>> DA IXAOSL+1, IXAOKL+1, .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 8(XREF 1S), 8(XREF 1K)
>> DINUM .01+1*
X .01+1!, .01(XREF 1S), .01(XREF 1K), 2+1*!, 2(XREF 1S), 2(XREF 1K), 2.5+1!, 4+1!, 6+1!, 7+1!
, 8(XREF 1S), 8(XREF 1K), 9+1*!
X(1 IXAOSL+1, IXAOKL+1
X(2 IXAOSL+1, IXAOKL+1
>> Y 2+1, 9+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All