STANDARD DATA DICTIONARY #727 -- DSS EXTRACT LOG FILE 3/24/25 PAGE 1
STORED IN ^ECX(727, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 3.0)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
This file contains data about the extracts from DHCP packages. Each entry includes the date of the extract, the package for which
the extract was run, the date range covered by the extract, and the number of records sent. Data is entered into this file by the
extract routines at the time extracts are transmitted to the commercial software. Data in this file may be viewed by appropriate
options within the DSS package. It is not intended that this file be read directly via VA FileMan and DATA IN THIS FILE MUST NEVER
BE EDITED. Editing data in this file will severely compromise the integrity of all DSS applications.
IDENTIFIED BY: EXTRACT DATE (#1), TYPE (#2)
POINTED TO BY: OTHER IFCAP EXTRACT field (#10) of the DSS EXTRACT LOG File (#727)
EXTRACT NUMBER field (#2) of the ADMISSION EXTRACT File (#727.802)
EXTRACT NUMBER field (#2) of the CLINIC NOSHOW EXTRACT File (#727.804)
EXTRACT NUMBER field (#2) of the NURSING EXTRACT File (#727.805)
EXTRACT NUMBER field (#2) of the DENTAL EXTRACT File (#727.806)
EXTRACT NUMBER field (#2) of the PHYSICAL MOVEMENT EXTRACT File (#727.808)
EXTRACT NUMBER field (#2) of the UNIT DOSE LOCAL EXTRACT File (#727.809)
EXTRACT NUMBER field (#2) of the PRESCRIPTION EXTRACT File (#727.81)
EXTRACT NUMBER field (#2) of the SURGERY EXTRACT File (#727.811)
EXTRACT NUMBER field (#2) of the MENTAL HEALTH EXTRACT File (#727.812)
EXTRACT NUMBER field (#2) of the LABORATORY EXTRACT File (#727.813)
EXTRACT NUMBER field (#2) of the RADIOLOGY EXTRACT File (#727.814)
EXTRACT NUMBER field (#2) of the EVENT CAPTURE LOCAL EXTRACT File (#727.815)
EXTRACT NUMBER field (#2) of the CLINIC I EXTRACT File (#727.816)
EXTRACT NUMBER field (#2) of the TREATING SPECIALTY CHANGE EXTRACT File (#727.817)
EXTRACT NUMBER field (#2) of the CLINIC II EXTRACT File (#727.818)
EXTRACT NUMBER field (#2) of the IV DETAIL EXTRACT File (#727.819)
EXTRACT NUMBER field (#2) of the ADMISSION SETUP EXTRACT File (#727.82)
EXTRACT NUMBER field (#2) of the PHYSICAL MOVEMENT SETUP EXTRACT File (#727.821)
EXTRACT NUMBER field (#2) of the TREATING SPECIALTY CHANGE SETUP EXTRACT File (#727.822)
EXTRACT NUMBER field (#2) of the PAI EXTRACT File (#727.823)
EXTRACT NUMBER field (#2) of the LAB RESULTS EXTRACT File (#727.824)
EXTRACT NUMBER field (#2) of the QUASAR EXTRACT File (#727.825)
EXTRACT NUMBER field (#2) of the PROSTHETICS EXTRACT File (#727.826)
EXTRACT NUMBER field (#2) of the CLINIC EXTRACT File (#727.827)
EXTRACT NUMBER field (#2) of the BLOOD BANK EXTRACT File (#727.829)
EXTRACT NUMBER field (#2) of the NUTRITION EXTRACT File (#727.832)
EXTRACT NUMBER field (#2) of the BCMA EXTRACT File (#727.833)
EXTRACT NUMBER field (#10) of the IV EXTRACT DATA File (#728.113)
EXTRACT NUMBER field (#8) of the UNIT DOSE EXTRACT DATA File (#728.904)
CROSS
REFERENCED BY: MESSAGE NUMBER(AB), EXTRACT DATE(AC), TYPE(AD), START DATE/TIME(AE), TRANSMITTED(AT), RECORD NUMBER(B), TYPE(C),
TYPE(D), HEADER FOR MESSAGE(E)
727,.01 RECORD NUMBER 0;1 NUMBER (Required)
INPUT TRANSFORM: K:+X'=X!(X>999999999)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: MAY 01, 1997
HELP-PROMPT: Type a Number between 0 and 999999999, 0 Decimal Digits
DESCRIPTION:
The record numbers will be sequential and be reused at some point in the future.
UNEDITABLE
CROSS-REFERENCE: 727^B
1)= S ^ECX(727,"B",$E(X,1,30),DA)=""
2)= K ^ECX(727,"B",$E(X,1,30),DA)
727,1 EXTRACT DATE 0;2 DATE
INPUT TRANSFORM: S %DT="E" D ^%DT S X=Y K:Y<1 X
LAST EDITED: FEB 19, 1991
DESCRIPTION:
The date the DSS extract was run.
UNEDITABLE
CROSS-REFERENCE: 727^AC
1)= S ^ECX(727,"AC",$E(X,1,30),DA)=""
2)= K ^ECX(727,"AC",$E(X,1,30),DA)
727,2 TYPE 0;3 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>20!($L(X)<1) X
LAST EDITED: NOV 01, 1994
HELP-PROMPT: Answer must be 1-20 characters in length.
DESCRIPTION:
The type of extract that was run. Example: Admission for MAS Admission extract.
TECHNICAL DESCR:
Taken from the variable ECPACK used in the extract routines.
UNEDITABLE
CROSS-REFERENCE: 727^AD
1)= S ^ECX(727,"AD",$E(X,1,30),DA)=""
2)= K ^ECX(727,"AD",$E(X,1,30),DA)
CROSS-REFERENCE: 727^C
1)= S ^ECX(727,"C",$E(X,1,30),DA)=""
2)= K ^ECX(727,"C",$E(X,1,30),DA)
CROSS-REFERENCE: 727^D^MUMPS
1)= S ^ECX(727,"D",$TR(X,"zxcvbnmasdfghjklqwertyuiop","ZXCVBNMASDFGHJKLQWERTYUIOP"),DA)=""
2)= K ^ECX(727,"D",$TR(X,"zxcvbnmasdfghjklqwertyuiop","ZXCVBNMASDFGHJKLQWERTYUIOP"),DA)
Upper case for lookup
727,3 START DATE/TIME 0;4 DATE
INPUT TRANSFORM: S %DT="ETX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: OCT 26, 2005
DESCRIPTION:
The beginning date covered by the extract.
UNEDITABLE
CROSS-REFERENCE: 727^AE
1)= S ^ECX(727,"AE",$E(X,1,30),DA)=""
2)= K ^ECX(727,"AE",$E(X,1,30),DA)
Cross reference of start/date and time.
727,4 END DATE/TIME 0;5 DATE
INPUT TRANSFORM: S %DT="ET" D ^%DT S X=Y K:Y<1 X
LAST EDITED: FEB 19, 1991
DESCRIPTION:
The ending date covered by the extract.
UNEDITABLE
727,5 NUMBER OF RECORDS 0;6 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>100000)!(X<0)!(X?.E1"."1N.N) X
LAST EDITED: FEB 19, 1991
HELP-PROMPT: Type a Number between 0 and 100000, 0 Decimal Digits
DESCRIPTION:
The number of records included in this extract.
UNEDITABLE
727,6 HEADER FOR MESSAGE HEAD;1 FREE TEXT
INPUT TRANSFORM: K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>30!($L(X)<1) X
LAST EDITED: NOV 01, 1994
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
The header for the extract run. Example: ADMISSIONS/DEMOG for the MAS Admissions extract.
UNEDITABLE
CROSS-REFERENCE: 727^E
1)= S ^ECX(727,"E",$E(X,1,30),DA)=""
2)= K ^ECX(727,"E",$E(X,1,30),DA)
727,7 FILE NUMBER FILE;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999)!(X<727)!(X?.E1"."5N.N) X
LAST EDITED: NOV 12, 1991
HELP-PROMPT: Type a Number between 727 and 999, 4 Decimal Digits
DESCRIPTION:
An indicator (pointer) of the file in ECX in which the data for this extract can be found.
UNEDITABLE
727,8 GROUP GRP;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<1) X
LAST EDITED: NOV 12, 1991
HELP-PROMPT: Answer must be 1-20 characters in length.
DESCRIPTION: The mail group to which this extract summary message was sent. The actual mail group name will be
"DSS-"group name. Example: ADM for the mail group DSS-ADMS for the MAS Admission extract.
UNEDITABLE
727,9 PURGED PURG;1 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: FEB 16, 1996
DESCRIPTION:
The date on which the data for this extract was deleted from the local extract file.
TECHNICAL DESCR:
This date is set when data is deleted from the corresponding local extract file.
UNEDITABLE
727,10 OTHER IFCAP EXTRACT IFCAP;1 POINTER TO DSS EXTRACT LOG FILE (#727)
LAST EDITED: NOV 02, 1992
DESCRIPTION: The combined IFCAP extract consists of two separate extracts, the detailed extract and the summary
extract. This field is used to link the two so that they can be purged simultaneously. Like all
fields in this file, it is set by the extract routines and should not be edited.
TECHNICAL DESCR:
Pointer to the DSS EXTRACT LOG file (#727).
727,11 QUEUED Q;1 NUMBER
INPUT TRANSFORM: K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
LAST EDITED: MAY 05, 1993
HELP-PROMPT: Type a Number between 1 and 999999999, 0 Decimal Digits
DESCRIPTION: This field will contain the number of the task (ZTSK) for this queued transmission. It is set by
the transmit routine (ECXTRANS) when the job is queued and cleared by the same routine when the
transmission is completed. This field should not be edited directly via VA FileMan.
TECHNICAL DESCR: The variable ZTSK is set into this field by line SET^ECXTRANS when the job is queued to run and
cleared by line CLEAN^ECXTRANS when the job completes. It is used to prevent the user from queuing
the same transmission twice. This field should not be edited via VA FileMan.
727,12 LOCAL EXTRACT L;1 SET
'L' FOR LOCAL;
LAST EDITED: AUG 05, 1993
DESCRIPTION: This field will be set for any extract designed to be transmitted to some local non-DHCP database
rather than to the commercial vendor database. If this field is set, this extract can not be
chosen for transmission to the commercial vendor.
TECHNICAL DESCR: This field is used in a DIC("S") screen in routine ECXTRANS to prevent an extract intended for
local use to be transmitted to the commercial vendor.
UNEDITABLE
727,13 VERSION VER;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>3!($L(X)<1) X
LAST EDITED: JUL 31, 1995
HELP-PROMPT: Answer must be 1-3 characters in length.
DESCRIPTION: This field contains a version identifier to be used as part of the header in transmissions to
Austin. It can then be used by the SAS programs at Austin to change the processing logic as
versions change.
TECHNICAL DESCR: Picked up in line START+2^ECXTRANS and padded to a length of 3 and tacked onto the header at
START+7
727,14 EXTRACT LOGIC VER;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>5!($L(X)<4)!'(X?4N.1N.1A.1" ") X
LAST EDITED: JUL 10, 2003
HELP-PROMPT: Enter the fiscal year extract logic used
DESCRIPTION: Fiscal year extract logic used when extracting the data. Format of is the extract year + an
optional revision denotion (ex: "2004", "2004A", "20041"). Note that "2004" and "2004 " are
considered the same value.
727,15 DIVISION DIV;1 POINTER TO INSTITUTION FILE (#4) (Required)
Division
LAST EDITED: JUL 15, 1998
HELP-PROMPT: Enter the division of the user that completed the extract.
DESCRIPTION: This field indicates the division of the user that generated the extract. This field will also
indicate the division from which information was extracted for prosthetics extracts.
TECHNICAL DESCR: ECXTRAC defines the value of this field. To address the divisional considerations at some
hospitals with prosthetic services, this field was added and will indicated the division for which
the prosthetic extract contains information.
SOURCE OF DATA: The DSS Extract software (ECXTRAC).
727,16 USER 0;7 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: APR 20, 2005
DESCRIPTION: Internal Entry Number (IEN) from the New Person File (#200) of the user that ran the specified
extract.
727,300 TRANSMITTED TR;1 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: AUG 05, 1993
DESCRIPTION: This field is set when the entries for this file are transmitted to the commercial vendor. This
field and the cross reference are essential for managing and purging data in this file.
TECHNICAL DESCR: The date when these file entries were loaded into a mail message for transmission, set by the
transmit routine.
UNEDITABLE
CROSS-REFERENCE: 727^AT
1)= S ^ECX(727,"AT",$E(X,1,30),DA)=""
2)= K ^ECX(727,"AT",$E(X,1,30),DA)
3)= This cross reference is essental for managing and purging data in several files. DO NOT DELETE
.
727,301 MESSAGE NUMBER 1;0 Multiple #727.0301 (Add New Entry without Asking)
DESCRIPTION:
This multiple holds the message numbers sent to the Austin Automation Center for this extract.
727.0301,.01 MESSAGE NUMBER 0;1 NUMBER (Multiply asked)
INPUT TRANSFORM: K:+X'=X!(X>999999999999)!(X<1)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
LAST EDITED: FEB 10, 1994
HELP-PROMPT: Type a Number between 1 and 999999999999, 0 Decimal Digits
DESCRIPTION: This field holds the message number of a message for this extract which was sent to the Austin
Automation Center. It is created by routine ECXTRANS when the message was transmitted and
deleted by routine ECXMDELE when the confirmation message is received from the Austin Automation
Center. A necessary and sufficient condition for an extract to have been successfully
transmitted to the Austin Automation Center is the existence of TRANSMITTED field (#300) and no
entries in this multiple.
TECHNICAL DESCR: Created at line SETM^ECXTRANS at the time of transmission to the Austin Automation Center and
deleted at line DEL^ECXMDELE when the confirmation message is received from the Austin Automation
Center. For this deletion to occur, the server option S.ECXMDELE@ must be a remote
member of the mail group DMS.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 727.0301^B
1)= S ^ECX(727,DA(1),1,"B",$E(X,1,30),DA)=""
2)= K ^ECX(727,DA(1),1,"B",$E(X,1,30),DA)
CROSS-REFERENCE: 727^AB
1)= S ^ECX(727,"AB",$E(X,1,30),DA(1),DA)=""
2)= K ^ECX(727,"AB",$E(X,1,30),DA(1),DA)
3)= Do not delete
This cross reference is used to manage the deletion of entries in this sub file when confirmation
messages are received from the AAC.
FILES POINTED TO FIELDS
DSS EXTRACT LOG (#727) OTHER IFCAP EXTRACT (#10)
INSTITUTION (#4) DIVISION (#15)
NEW PERSON (#200) USER (#16)
INPUT TEMPLATE(S):
PRINT TEMPLATE(S):
ECX LOG APR 27, 2004@11:15 USER #0 [ECX LOG HEADER]
SORT TEMPLATE(S):
ECX LOG AUG 05, 1994@12:57 USER #0
SORT BY: @TYPE// (TYPE not null)
WITHIN TYPE, SORT BY: @START DATE/TIME// (User is asked range)
WITHIN START DATE/TIME, SORT BY: (#5)>0;L1// ((#5)>0)
FORM(S)/BLOCK(S):