Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields  | All
Print Page as PDF
Global: ^ECX(727

Package: DSS Extracts

Global: ^ECX(727


Information

FileMan FileNo FileMan Filename Package
727 DSS EXTRACT LOG DSS Extracts

Description

Accessed By FileMan Db Calls, Total: 9

Package Total Routines
DSS Extracts 8 ECX384PT    ECXBSC    ECXSETU1    ECXTAUTO    ECXTRAC    ECXTRANS    ECXUTLA    ECXXREV
Event Capture 1 ECEFPAT    

Pointed To By FileMan Files, Total: 30

Package Total FileMan Files
DSS Extracts 30 DSS EXTRACT LOG(#727)[10]    ADMISSION EXTRACT(#727.802)[2]    CLINIC NOSHOW EXTRACT(#727.804)[2]    NURSING EXTRACT(#727.805)[2]    DENTAL EXTRACT(#727.806)[2]    PHYSICAL MOVEMENT EXTRACT(#727.808)[2]    UNIT DOSE LOCAL EXTRACT(#727.809)[2]    PRESCRIPTION EXTRACT(#727.81)[2]    SURGERY EXTRACT(#727.811)[2]    MENTAL HEALTH EXTRACT(#727.812)[2]    LABORATORY EXTRACT(#727.813)[2]    RADIOLOGY EXTRACT(#727.814)[2]    EVENT CAPTURE LOCAL EXTRACT(#727.815)[2]    CLINIC I EXTRACT(#727.816)[2]    TREATING SPECIALTY CHANGE EXTRACT(#727.817)[2]    CLINIC II EXTRACT(#727.818)[2]    IV DETAIL EXTRACT(#727.819)[2]    ADMISSION SETUP EXTRACT(#727.82)[2]    PHYSICAL MOVEMENT SETUP EXTRACT(#727.821)[2]    TREATING SPECIALTY CHANGE SETUP EXTRACT(#727.822)[2]    PAI EXTRACT(#727.823)[2]    LAB RESULTS EXTRACT(#727.824)[2]    QUASAR EXTRACT(#727.825)[2]    PROSTHETICS EXTRACT(#727.826)[2]    CLINIC EXTRACT(#727.827)[2]    BLOOD BANK EXTRACT(#727.829)[2]    NUTRITION EXTRACT(#727.832)[2]    BCMA EXTRACT(#727.833)[2]    IV EXTRACT DATA(#728.113)[10]    UNIT DOSE EXTRACT DATA(#728.904)[8]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Kernel 2 INSTITUTION(#4)[15]    NEW PERSON(#200)[16]    
DSS Extracts 1 DSS EXTRACT LOG(#727)[10]    

Fields, Total: 19

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

  • 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)
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)
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
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.
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
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
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)
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
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
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
10 OTHER IFCAP EXTRACT IFCAP;1 POINTER TO DSS EXTRACT LOG FILE (#727) DSS EXTRACT LOG(#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).
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.
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
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
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.
15 DIVISION DIV;1 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • 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).
16 USER 0;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#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.
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.
301 MESSAGE NUMBER 1;0 Multiple #727.0301 727.0301

  • DESCRIPTION:  
    This multiple holds the message numbers sent to the Austin Automation Center for this extract.
Info |  Desc |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields  | All