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 |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^ECH

Package: Event Capture

Global: ^ECH


Information

FileMan FileNo FileMan Filename Package
721 EVENT CAPTURE PATIENT Event Capture

Description

Directly Accessed By Routines, Total: 50

Package Total Routines
Event Capture 46 CPT MODIFIER    EC20P95    EC2P24PT    EC2P72PT    ECBEN2U    ECBENF    ECBEPF    ECDSUTIL
ECDTPD    ECDUTL    ECED1    ECED3    ECEDF    ECEDU    ECEFPAT    ECINCONV
ECMLMF    ECMXP    ECMXP1    ECMXP2    ECMXPC    ECNTPCE    ECOSSUM    ECPAT
ECPCER    ECPCEU    ECPROV3    ECPRSUM1    ECPRVMUT    ECPRVUTL    ECRDSSA    ECRDSSU
ECRDSSU2    ECRPCLS    ECRPRSN    ECRPRSN2    ECUERPC    ECUERPC1    ECUERPC2    ECUTL
ECUTL1    ECUTL2    ECV3RPC    PROVIDER MULTIPLE    ^ECH    SECONDARY ICD CODE    
DSS Extracts 2 ECXEC    ECXUEC    

Accessed By FileMan Db Calls, Total: 26

Package Total Routines
Event Capture 26 EC20P95    EC2P5PST    ECBEN2U    ECBENF    ECBEPF    ECDTPD    ECED3    ECEDF
ECEFPAT    ECLATESH    ECMLMF    ECMXP    ECMXP1    ECMXP2    ECMXPC    ECPAT
ECPCER    ECPRVMUT    ECRDSSA    ECRECER    ECRPRSN2    ECUERPC1    ECUTL    ECUTL1
ECUTL2    ECV4RPC    

Pointer To FileMan Files, Total: 16

Package Total FileMan Files
Event Capture 5 EC NATIONAL PROCEDURE(#725)[8]    EVENT CAPTURE CATEGORY(#726)[7]    MEDICAL SPECIALTY(#723)[511]    DSS UNIT(#724)[6]    EC EVENT CODE SCREENS/PROC REASON LINK(#720.5)[344344]
Kernel 4 INSTITUTION(#4)[3]    SERVICE/SECTION(#49)[4]    PROVIDER CLASS(#7)[141618]
NEW PERSON(#200)[10131517#721.042(.01)]    
CPT HCPCS Codes 2 CPT MODIFIER(#81.3)[#721.036(.01)]    CPT(#81)[819]    
Scheduling 2 CLINIC STOP(#40.7)[27]    HOSPITAL LOCATION(#44)[26]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[20#721.038(.01)]    
PCE Patient Care Encounter 1 VISIT(#9000010)[28]    
Registration 1 PATIENT(#2)[1]    

Fields, Total: 48

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

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 27, 1996
  • HELP-PROMPT:  Type a Number between 1 and 9999999, 0 Decimal Digits.
  • DESCRIPTION:  
    This field contains the record number for this entry.
  • TECHNICAL DESCR:  
    The internal entry number (IEN) for this record.
  • CROSS-REFERENCE:  721^B
    1)= S ^ECH("B",$E(X,1,30),DA)=""
    2)= K ^ECH("B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  721^ADT1^MUMPS
    1)= Q
    2)= D KADT^ECDUTL
    3)= DO NOT DELETE
    This cross reference uses location, patient, DSS unit, and date and time to list data in the package summary reports.
    Defined as: ^ECH("ADT",location,patient,DSS unit,date and time,DA)=""
1 PATIENT 0;2 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • LAST EDITED:  FEB 27, 1996
  • HELP-PROMPT:  Enter the name of the patient for this procedure.
  • DESCRIPTION:  
    This is the name of the patient for which this procedure occurred.
  • TECHNICAL DESCR:  
    A pointer to the PATIENT file (#2) for this record.
  • CROSS-REFERENCE:  721^APAT^MUMPS
    1)= D APAT^ECDUTL
    2)= D KAPAT^ECDUTL
    3)= DO NOT DELETE
    This cross reference is used in printing patient specific reports in the Event Capture software.
    Defined as ^ECH("APAT",patient,date and time,DA)=""
  • CROSS-REFERENCE:  721^ADTP^MUMPS
    1)= D ADTP^ECDUTL
    2)= D KADTP^ECDUTL
    3)= DO NOT DELETE
    This cross reference is used in generating patient specific reports within the Event Capture software.
    Defined as: ^ECH("ADT",location,patient,DSS unit,date and time,DA)=""
2 DATE/TIME OF PROCEDURE 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  DEC 03, 1996
  • HELP-PROMPT:  Enter date and time this procedure was performed.
  • DESCRIPTION:  
    This field contains the date and time of this procedure.
  • TECHNICAL DESCR:  
    Date and time of this patient procedure. Time is now required.
  • CROSS-REFERENCE:  721^ADT^MUMPS
    1)= D ADT^ECDUTL
    2)= D KILLADT^ECDUTL
    3)= DO NOT DELETE
    This cross reference uses location, patient, DSS unit, and date and time to list data in the package summary reports.
    Defined as: ^ECH("ADT",location,patient,DSS unit,date and time,DA)=""
  • CROSS-REFERENCE:  721^AC
    1)= S ^ECH("AC",$E(X,1,30),DA)=""
    2)= K ^ECH("AC",$E(X,1,30),DA)
  • CROSS-REFERENCE:  721^AC1^MUMPS
    1)= Q:$P(^ECH(DA,0),U,4)']"" S ^ECH("AC1",$P(^(0),U,4),X,DA)=""
    2)= Q:$P(^ECH(DA,0),U,4)']"" K ^ECH("AC1",$P(^(0),U,4),X,DA)
    3)= DO NOT DELETE
    This cross reference uses location and date and time to list data in the package summary reports.
    Defined as: ^ECH("AC1",location,date and time,DA)=""
  • CROSS-REFERENCE:  721^APAT1^MUMPS
    1)= D APAT1^ECDUTL
    2)= D KAPAT1^ECDUTL
    3)= DO NOT DELETE
    This cross reference is used in printing patient specific reports in the Event Capture software.
    Defined as ^ECH("APAT",patient,date and time,DA)=""
3 LOCATION 0;4 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^DIC(4,""LOC"",$P(^DIC(4,+Y,0),""^""),+Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 27, 1996
  • HELP-PROMPT:  Enter the name of the location where this procedure was performed.
  • DESCRIPTION:  
    This is the name of the facility where this procedure was performed. This facility name is recognized as the location within the Event Capture software.
  • TECHNICAL DESCR:  
    A pointer to the INSTITUTION file (#4).
  • SCREEN:  S DIC("S")="I $D(^DIC(4,""LOC"",$P(^DIC(4,+Y,0),""^""),+Y))"
  • EXPLANATION:  Current Event Capture locations only.
  • CROSS-REFERENCE:  721^AC2^MUMPS
    1)= Q:$P(^ECH(DA,0),U,3)']"" S ^ECH("AC1",X,$P(^(0),U,3),DA)=""
    2)= Q:$P(^ECH(DA,0),U,3)']"" K ^ECH("AC1",X,$P(^(0),U,3),DA)
    3)= DO NOT DELETE
    This cross reference uses location, date time to list data in the package summary reports.
    Defined as: ^ECH("AC1",location,date and time,DA)=""
  • CROSS-REFERENCE:  721^ADTL^MUMPS
    1)= D ADTL^ECDUTL
    2)= D KADTL^ECDUTL
    3)= DO NOT DELETE
    This cross reference is used in creating patient specific reports within the Event Capture software.
    Defined as: ^ECH("ADT",location,patient,DSS unit,date and time,DA)=""
4 SERVICE 0;5 POINTER TO SERVICE/SECTION FILE (#49)
************************REQUIRED FIELD************************
SERVICE/SECTION(#49)

  • LAST EDITED:  APR 06, 1989
  • HELP-PROMPT:  Enter the name of the service associated with this procedure.
  • DESCRIPTION:  
    This field contains the name of the corresponding service associated with this procedure.
  • TECHNICAL DESCR:  
    A pointer to the SERVICE/SECTION file (#49).
5 SECTION 0;6 POINTER TO MEDICAL SPECIALTY FILE (#723)
************************REQUIRED FIELD************************
MEDICAL SPECIALTY(#723)

  • LAST EDITED:  OCT 18, 1989
  • HELP-PROMPT:  Enter the name of the medical specialty associated with this procedure.
  • DESCRIPTION:  
    This field contains the name of the corresponding medical specialty for this procedure.
  • TECHNICAL DESCR:  
    A pointer to the MEDICAL SPECIALTY file (#723).
6 DSS UNIT 0;7 POINTER TO DSS UNIT FILE (#724)
************************REQUIRED FIELD************************
DSS UNIT(#724)

  • LAST EDITED:  FEB 27, 1996
  • HELP-PROMPT:  Enter the name of the DSS unit associated with this procedure.
  • DESCRIPTION:  
    This is the name of the DSS unit associated with this procedure.
  • TECHNICAL DESCR:  
    A pointer to the DSS UNIT file (#724).
  • CROSS-REFERENCE:  721^ADTU^MUMPS
    1)= D ADTU^ECDUTL
    2)= D KADTU^ECDUTL
    3)= DO NOT DELETE
    This cross reference is used in listing data on several package summary reports.
    Defined as: ^ECH("ADT",location,patient,DSS unit,date and time,DA)=""
7 CATEGORY 0;8 POINTER TO EVENT CAPTURE CATEGORY FILE (#726) EVENT CAPTURE CATEGORY(#726)

  • LAST EDITED:  APR 05, 1995
  • HELP-PROMPT:  Enter the name of the category used to group this procedure.
  • DESCRIPTION:  
    This is the name of the category used to group this procedure. If category is not used, it can be entered as a zero (0).
  • TECHNICAL DESCR:  
    A pointer to the EVENT CAPTURE CATEGORY file (#726).
8 PROCEDURE 0;9 VARIABLE POINTER
************************REQUIRED FIELD************************
CPT(#81)  EC NATIONAL PROCEDURE(#725)  

  • LAST EDITED:  MAY 16, 1995
  • HELP-PROMPT:  Enter the name of the procedure performed.
  • DESCRIPTION:  
    This field contains the name of the procedure. Procedures can be selected from either the CPT file (#81) or EC NATIONAL PROCEDURE file (#725).
  • TECHNICAL DESCR:  
    A variable pointer to either A. CPT file (#81)or EC NATIONAL PROCEDURE file (#725).
9 VOLUME 0;10 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 16, 1995
  • HELP-PROMPT:  Type a Number between 1 and 9999, 0 Decimal Digits.
  • DESCRIPTION:  The ECS volume field DOES NOT capture the number of patients seen by ECS providers. Volume is usually associated with the number of procedures performed.
    The volume field can be used to record and track 3 different values:
    1. Number of Procedures: When a selected procedure code CONTAINS inherent time elements (such as "30M Massage Therapy") then a volume of one is usually entered, meaning 1 of this specific procedure/service was provided.
    OR
    2. Time: Amount of time shown in increments of minutes (M). When a selected procedure code DOES NOT have inherent time elements THEN the volume field is used to capture the time spent completing the procedure/service: 1 =
    15M, 2 = 30M, 3= 45M, etc.
    OR
    3. Days: Number of days patient was in VA paid facilities such as State Home, DOM, or a Nursing Home. When entering workload for a patient in a VA-Paid facility, volume of 1 means 1 day, 2 means 2 days, etc.
    NOTE: It is imperative to understand and keep track of the values you are entering in the volume field and what they represent for the patients you are treating.
  • TECHNICAL DESCR:  
    A numeric volume for this procedure.
10 *PROVIDER 0;11 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  DEC 02, 2005
  • HELP-PROMPT:  Enter the name of the provider performing this procedure.
  • DESCRIPTION:  This is the name of the provider performing this procedure. Provider can be selected from entries in the NEW PERSON file (#200).
    Starred for inactivation with EC*2.0*72. Data converted and stored in Field #42 'PROVIDER MULTIPLE'.
  • TECHNICAL DESCR:  A pointer to the NEW PERSON file (#200).
    Starred for inactivation with EC*2.0*72. Data converted and stored in Field #42 'PROVIDER MULTIPLE'.
11 ORDERING SECTION 0;12 POINTER TO MEDICAL SPECIALTY FILE (#723)
************************REQUIRED FIELD************************
MEDICAL SPECIALTY(#723)

  • LAST EDITED:  FEB 29, 1996
  • HELP-PROMPT:  Enter the name of the section ordering this procedure.
  • DESCRIPTION:  
    This is the of name of the section ordering this procedure. Ordering section can be selected from entries in the MEDICAL SPECIALTY file (#723).
  • TECHNICAL DESCR:  
    A pointer to the MEDICAL SPECIALTY file (#723).
13 ENTERED/EDITED BY 0;13 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  NOV 12, 1992
  • HELP-PROMPT:  Enter the name of the person recording this procedure.
  • DESCRIPTION:  
    This field contains the name of the person entering patient data. This name can be selected from entries in the NEW PERSON file (#200).
  • TECHNICAL DESCR:  
    A pointer to the NEW PERSON file (#200).
14 *PROVIDER TYPE 0;14 POINTER TO PROVIDER CLASS FILE (#7) PROVIDER CLASS(#7)

  • LAST EDITED:  AUG 05, 1997
  • HELP-PROMPT:  Enter the name of the classification for the provider who performed this procedure.
  • DESCRIPTION:  
    This field contains the name of the classification of the provider who performed this procedure. Starred for deletion with EC*2*5.
  • TECHNICAL DESCR:  A pointer to the PROVIDER CLASS file (#7).
    Starred for deletion with EC*2*5.
15 *PROVIDER #2 0;15 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 02, 2005
  • HELP-PROMPT:  Enter the name of the person who assisted in performing this procedure.
  • DESCRIPTION:  This is the name of the person who assisted in performing this procedure. This name can be selected from entries in the NEW PERSON file (#200).
    Starred for inactivation with EC*2.0*72. Data converted and stored in Field #42 'PROVIDER MULTIPLE'.
  • TECHNICAL DESCR:  A pointer to the NEW PERSON file (#200).
    Starred for inactivation with EC*2.0*72. Data converted and stored in Field #42 'PROVIDER MULTIPLE'.
16 *PROVIDER #2 TYPE 0;16 POINTER TO PROVIDER CLASS FILE (#7) PROVIDER CLASS(#7)

  • LAST EDITED:  AUG 01, 1997
  • HELP-PROMPT:  Enter the name of the classification for the provider who assisted in performing this procedure.
  • DESCRIPTION:  The name of the classification of the provider who assisted in performing this procedure.
    Starred for deletion with EC*2*5.
  • TECHNICAL DESCR:  A pointer to the PROVIDER CLASS file (#7).
    Starred for deletion with EC*2*5.
17 *PROVIDER #3 0;17 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  DEC 02, 2005
  • HELP-PROMPT:  Enter the name of the person who assisted in performing this procedure.
  • DESCRIPTION:  This is the name of the person who assisted in performing this procedure. This name can be selected from entries in the NEW PERSON file (#200).
    Starred for inactivation with EC*2.0*72. Data converted and stored in Field #42 'PROVIDER MULTIPLE'.
  • TECHNICAL DESCR:  A pointer to the NEW PERSON file (#200).
    Starred for inactivation with EC*2.0*72. Data converted and stored in Field #42 'PROVIDER MULTIPLE'.
18 *PROVIDER #3 TYPE 0;18 POINTER TO PROVIDER CLASS FILE (#7) PROVIDER CLASS(#7)

  • LAST EDITED:  AUG 01, 1997
  • HELP-PROMPT:  Enter the name of the classification for the provider who assisted in performing this procedure.
  • DESCRIPTION:  The name of the classification of the provider who assisted in performing this procedure.
    Starred for deletion with EC*2*5.
  • TECHNICAL DESCR:  A pointer to the PROVIDER CLASS file (#7).
    Starred for deletion with EC*2*5.
19 PCE CPT CODE P;1 POINTER TO CPT FILE (#81) CPT(#81)

  • LAST EDITED:  NOV 19, 1996
  • HELP-PROMPT:  Enter the PCE CPT code for this record.
  • DESCRIPTION:  
    The Current Procedural Terminology (CPT) code for the procedure performed.
  • TECHNICAL DESCR:  If a CPT code, the procedure pointer pulled from the PROCEDURE field (8) in the EVENT CAPTURE PATIENT file (#721). For national procedures from the EC NATIONAL PROCEDURE file (#725), it is the CPT field (4) from the EC
    NATIONAL PROCEDURE file (#725).
20 PRIMARY ICD CODE P;2 POINTER TO ICD DIAGNOSIS FILE (#80)
************************REQUIRED FIELD************************
ICD DIAGNOSIS(#80)

  • INPUT TRANSFORM:  S DIC("S")="I $P($$LS^ICDEX(80,+Y,$G(ECDT)),U,1)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 07, 2012
  • HELP-PROMPT:  Enter the Primary ICD diagnosis code for this encounter.
  • DESCRIPTION:  
    The Primary ICD diagnosis code for this encounter.
  • TECHNICAL DESCR:  
    Primary ICD code is derived from the ICD DIAGNOSIS file (#80).
  • SCREEN:  S DIC("S")="I $P($$LS^ICDEX(80,+Y,$G(ECDT)),U,1)"
  • EXPLANATION:  Allows selection of active codes only.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
21 AGENT ORANGE P;3 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  MAR 09, 1997
  • HELP-PROMPT:  Select the appropriate agent orange status for this patient.
  • DESCRIPTION:  This field will be used to indicate if this procedure is treating a VA patient for a problem that is related to Agent Orange Exposure.
    Data is Y if this patient was exposed to agent orange, N if not, or U if unknown.
  • TECHNICAL DESCR:  
    Agent Orange exposure is a component of sending certain data to PCE.
22 RADIATION EXPOSURE P;4 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  NOV 19, 1996
  • HELP-PROMPT:  Select the appropriate radiation status for this patient.
  • DESCRIPTION:  This field will be used to indicate if this procedure is treating a VA patient for a problem that is related to Ionizing Radiation Exposure.
    Data is Y if this patient claims exposure to ionizing radiation, N if not, or U if unknown.
  • TECHNICAL DESCR:  
    Radiation exposure is a component of sending certain data to PCE.
23 SW ASIA CONDITIONS P;5 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  MAY 20, 2009
  • HELP-PROMPT:  Select the appropriate south west asia conditions status for this patient.
  • DESCRIPTION:  
    This field is used to indicate if this visit represents treatment of a VA patient claiming exposure to Southwest Asia Conditions.
  • TECHNICAL DESCR:  
    Southwest Asia Conditions is a component of sending certain data to PCE.
24 SERVICE CONNECTED P;6 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;

  • LAST EDITED:  NOV 19, 1996
  • HELP-PROMPT:  Select the appropriate service connected status for this patient.
  • DESCRIPTION:  
    This field will be used to indicate if this procedure is treating a VA patient for a service connected problem. Data is Y if this patient is service connected or N if not service connected.
  • TECHNICAL DESCR:  
    Service connected status is a component of sending certain data to PCE.
25 SENT TO PCE P;7 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  APR 29, 1998
  • HELP-PROMPT:  Enter 1 if data has been sent to PCE, 0 if not.
  • DESCRIPTION:  
    This field flags data that has been sent from Event Capture to PCE. If sent, this field will contain a 1 (YES = 1). If not, this field will contain null or zero (NO = null or zero).
  • TECHNICAL DESCR:  
    Record is flagged 1 when sent to PCE, null or zero if not sent.
26 ASSOCIATED CLINIC 0;19 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),""^"",3)=""C""" D ^DIC K DIC S DIC=DIE,(X,ECYCLN)=+Y K:'+$$CLNCK^SDUTL2(+Y,0) X
  • LAST EDITED:  APR 27, 2004
  • HELP-PROMPT:  Enter the clinic associated with this DSS Unit.
  • DESCRIPTION:  
    This is the clinic associated with this record.
  • TECHNICAL DESCR:  
    Pointer to the HOSPITAL LOCATION file (#44). These entries are screened by TYPE field (2). Only entries with a TYPE of C for Clinic may be selected.
  • SCREEN:  S DIC("S")="I $P(^(0),""^"",3)=""C"""
  • EXPLANATION:  Allows selection of Clinic entries only.
  • EXECUTABLE HELP:  I $G(ECYCLN)>0 D:'+$$CLNCK^SDUTL2(ECYCLN,1) EN^DDIOL(" Clinic MUST be corrected before selecting.") K ECYCLN
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
27 DSS ID 0;20 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • LAST EDITED:  JAN 06, 1997
  • HELP-PROMPT:  Enter the DSS ID for this record.
  • DESCRIPTION:  
    The DSS ID, formerly stop code, associated with this patient record.
  • TECHNICAL DESCR:  
    Pointer to the CLINIC STOP file (#40.7). The DSS ID is pulled from the STOP CODE NUMBER field (7) in the HOSPITAL LOCATION file (#44). The DSS ID for the clinic associated with this record is pulled.
28 VISIT 0;21 POINTER TO VISIT FILE (#9000010) VISIT(#9000010)

  • LAST EDITED:  SEP 16, 1997
  • HELP-PROMPT:  Select the visit associated with this record.
  • DESCRIPTION:  
    This is the visit associated with this patient procedure.
  • TECHNICAL DESCR:  
    Pointer to the VISIT file (#9000010).
  • CROSS-REFERENCE:  721^C
    1)= S ^ECH("C",$E(X,1,30),DA)=""
    2)= K ^ECH("C",$E(X,1,30),DA)
    3)= This cross reference is required to comply with DBIA 1902.
    This cross reference is used by PCE to assure that an entry in the Visit file (#9000010) is not deleted when an entry in another package points to that entry.
  • CROSS-REFERENCE:  721^AE^MUMPS
    1)= D ADD^AUPNVSIT
    2)= D SUB^AUPNVSIT
    3)= This cross reference is required to comply with DBIA 1902.
    This cross reference is used to maintain a dependent entry count in the Visit file (#9000010).
29 IN/OUTPATIENT 0;22 SET
************************REQUIRED FIELD************************
  • 'I' FOR INPATIENT;
  • 'O' FOR OUTPATIENT;

  • LAST EDITED:  JAN 22, 1997
  • HELP-PROMPT:  Enter a status of inpatient or outpatient for this event.
  • DESCRIPTION:  
    The status of the patient when this event occurred. The code "I" represents an inpatient event or an "O" represents an outpatient event occurred.
  • TECHNICAL DESCR:  
    Set of codes that represent an "I" for inpatient or an "O" for an outpatient event. This field is used in determining which records to send to the Patient Care Encounter (PCE) software.
30 PCE DATA FEED PCE;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>240!($L(X)<1) X
  • LAST EDITED:  JAN 16, 1997
  • HELP-PROMPT:  Answer must be 1-240 characters in length.
  • DESCRIPTION:  
    The field contains the ECS data formatted to feed the Patient Care Encounter (PCE) software.
  • TECHNICAL DESCR:  Data stored at this node is transmitted to PCE and contains the following:- date/time~patient dfn~hospital location~institution~dss id~provider #1 (no longer populated with EC*2.0*72)~provider 2 (not populated)~provider 3
    (not populated)~volume~cpt code~diagnosis~agent orange~radiation~ enviromental contaminants/SWAC~service connected~ecs national # & name~eligibility ~military sexual trauma~head/neck cancer~combat veteran~project 112/shad
31 SEND TO PCE SEND;1 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JAN 15, 1997
  • HELP-PROMPT:  Enter the date/time to flag this record ready to send to PCE.
  • DESCRIPTION:  
    This flag controls the ECS data that is ready to send to PCE. If this record should be sent to PCE, this flag will be set with a date.
  • CROSS-REFERENCE:  721^AD
    1)= S ^ECH("AD",$E(X,1,30),DA)=""
    2)= K ^ECH("AD",$E(X,1,30),DA)
    3)= Do not delete.
    This cross reference controls the data that is ready to send to the Patient Care Encounter (PCE) software.
32 CHECKOUT D/T P;8 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 25, 1997
  • HELP-PROMPT:  Enter the checkout date and time for this patient event.
  • DESCRIPTION:  
    This field contains the checkout date and time of this procedure.
  • TECHNICAL DESCR:  
    Checkout date and time of this patient procedure. The checkout date and time is generated when the nighly background job is run.
33 REASON R;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>200!($L(X)<1) X
  • LAST EDITED:  MAR 11, 1997
  • HELP-PROMPT:  Answer must be 1-200 characters in length.
  • DESCRIPTION:  
    This field contains the reasons why this patient record was not sent to the Patient Care Encounter (PCE) software.
  • TECHNICAL DESCR:  
    Free text field that may contain multiples reasons. Each reason will be delimited by a semi-colon.
34 PROCEDURE REASON 0;23 POINTER TO EC EVENT CODE SCREENS/PROC REASON LINK FILE (#720.5) EC EVENT CODE SCREENS/PROC REASON LINK(#720.5)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=$$GETSCRN^ECDSUTIL(DA)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  AUG 15, 1997
  • HELP-PROMPT:  Enter applicable procedure reason for the patient's procedure.
  • DESCRIPTION:  
    A procedure reason for the patient's procedure may be selected during data entry. The user may only select procedure reason(s) which were previously entered during the creation or edit of the associated event code screen.
  • TECHNICAL DESCR:  
    This field contains the procedure reason for the patient's procedure and is a pointer to the EC Event Code Screens/Procedure Reason file (#720.5).
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=$$GETSCRN^ECDSUTIL(DA)"
  • EXPLANATION:  Only allow procedure reason(s) associated with the event code screen.
35 MILITARY SEXUAL TRAUMA P;9 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  APR 07, 1999
  • HELP-PROMPT:  Select the appropriate military sexual trauma status for this patient.
  • DESCRIPTION:  This field will be used to indicate if this procedure is treating a VA patient for a problem that is related to Military Sexual Trauma.
    Data is Y if this patient treatment is related to military sexual trauma, N if not, or U if unknown.
  • TECHNICAL DESCR:  
    Military Sexual Trauma is a component of sending certain data to PCE.
36 CPT MODIFIER MOD;0 POINTER Multiple #721.036 721.036

  • LAST EDITED:  JUL 06, 1999
  • DESCRIPTION:  
    This is a multiple field. It points to the CPT MODIFIER file #81.3.
37 PCE CPT MODIFIER PCE1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<2)!'($L(X)>60!($L(X)<2)) X
  • LAST EDITED:  JUL 02, 1999
  • HELP-PROMPT:  This field is stuffed with the modifiers entered for the CPT procedure code.
  • DESCRIPTION:  
    The modifiers associated with the CPT procedure code that will be passed to PCE.
  • TECHNICAL DESCR:  
    PCE CPT MODIFIER is derived from the multiple CPT MODIFIER field 36. The modifiers are separated by semicolon (;). The source of the CPT modifiers is the MODIFIER field (#.01) of the CPT MODIFIER file (#81.3).
    SOURCE OF DATA: Field #36 multiple separated by semicolon (;).
38 SECONDARY ICD CODE DX;0 POINTER Multiple #721.038 721.038

  • LAST EDITED:  MAY 07, 2012
  • DESCRIPTION:  
    The secondary ICD diagnosis code for the procedure performed.
39 HEAD/NECK CANCER P;10 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  SEP 30, 2002
  • HELP-PROMPT:  Select the appropriate status if this procedure is treating a problem related to Head/Neck Cancer.
  • DESCRIPTION:  
    This field indicates that the EC procedure represents treatment of a VA patient for a problem that is related to Head and/or Neck Cancer.
40 COMBAT VETERAN P;11 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  OCT 30, 2003
  • HELP-PROMPT:  Select the appropriate status if this procedure is treating a problem related to Combat Veteran.
  • DESCRIPTION:  
    This field indicates that the EC procedure represents treatment of a VA patient for a problem that is related to Combat Veteran.
41 PROJECT 112/SHAD P;12 SET
  • 'Y' FOR YES;
  • 'N' FOR NO;
  • 'U' FOR UNKNOWN;

  • LAST EDITED:  JUN 24, 2005
  • HELP-PROMPT:  Select the appropriate status if this procedure is treating a problem related to Project 112/SHAD
  • DESCRIPTION:  
    This field indicates that the EC procedure represents treatment of a VA patient for a problem that is related to Project 112/SHAD.
42 PROVIDER MULTIPLE PRV;0 POINTER Multiple #721.042 721.042

  • DESCRIPTION:  This is the provider(s) giving patient care for this encounter.
    Prior to the installation of EC*2.0*72 provider data was stored in fields #10, #15 and #17. EC*2.0*72 converted and stored these fields' data in this field #42,"PROVIDER MULTIPLE".
  • TECHNICAL DESCR:  
    This is a pointer to the NEW PERSON file #200.
43 PROCEDURE REASON #2 0;24 POINTER TO EC EVENT CODE SCREENS/PROC REASON LINK FILE (#720.5) EC EVENT CODE SCREENS/PROC REASON LINK(#720.5)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=$$GETSCRN^ECDSUTIL(DA)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 19, 2011
  • HELP-PROMPT:  Enter second applicable procedure reason for the patient's procedure.
  • DESCRIPTION:  A second procedure reason for the patient's procedure may be selected during data entry. The user may only select procedure reasons which were previously entered during the creation or editing of the associated event code
    screen.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=$$GETSCRN^ECDSUTIL(DA)"
  • EXPLANATION:  Only allow procedure reason(s) associated with the event code screen.
44 PROCEDURE REASON #3 1;1 POINTER TO EC EVENT CODE SCREENS/PROC REASON LINK FILE (#720.5) EC EVENT CODE SCREENS/PROC REASON LINK(#720.5)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=$$GETSCRN^ECDSUTIL(DA)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  OCT 19, 2011
  • HELP-PROMPT:  Enter third applicable procedure reason for the patient's procedure.
  • DESCRIPTION:  A third procedure reason for the patient's procedure may be selected during data entry. The user may only select procedure reasons which were previously entered during the creation or editing of the associated event code
    screen.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=$$GETSCRN^ECDSUTIL(DA)"
  • EXPLANATION:  Only allow procedure reason(s) associated with the event code screen.
45 SOURCE 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
    MAXIMUM LENGTH: 30
  • LAST EDITED:  JUN 22, 2018
  • HELP-PROMPT:  Enter the source of this record. Answer must be between 1 and 30 characters.
  • DESCRIPTION:  
    This field will identify the source by which this record was added to the file if it's not entered through Event Capture data entry options.
  • TECHNICAL DESCR:  This field will identify a record entered through another method besides the Event Capture data entry options. For example, records entered through spread sheet upload would have the source field populated indicating that
    the record was loaded from a spread sheet.
46 ENTRY STATUS 2;2 SET
  • 'L' FOR LATE;
  • 'C' FOR LATE CORRECTED;

  • LAST EDITED:  OCT 05, 2017
  • HELP-PROMPT:  Indicate the status of the record.
  • DESCRIPTION:  
    This field will be used to indicate the entry status of the record when entered through spread sheet upload.
  • TECHNICAL DESCR:  When entering records through the spread sheet upload option, this field will indicate the status of the record at the time of entry. If the record is entered and its procedure date/time is after the last DSS extract date
    for Event Capture then the record will be considered "late". If the record is entered in a timely fashion or is entered via options other than the spread sheet upload, this field will be blank.
47 DATE/TIME IMPORTED 2;3 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 21, 2017
  • HELP-PROMPT:  Enter the date and time this record was imported.
  • DESCRIPTION:  
    For records entered via spread sheet upload, this will indicate the date and time that the records were imported.
  • TECHNICAL DESCR:  
    For any records entered via spread sheet upload, this field will store the date and time that the records were imported. This date and time will be used to identify records that were imported together.
48 SSID 2;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3) X
    MAXIMUM LENGTH: 30
  • LAST EDITED:  JUN 22, 2018
  • HELP-PROMPT:  Enter a unique spread sheet identifier for this record. Answer must be between 3 and 30 characters.
  • DESCRIPTION:  
    This field will store the Spread Sheet Identification (SSID) for records entered via the spread sheet upload option.
  • TECHNICAL DESCR:  For any records entered via the spread sheet upload options a unique SSID will be assigned to all records imported and uploaded at the same time. This information will be used to group records together so that action can
    be taken on all records within a spread sheet, such as deleting or resubmitting.
    The format of the SSID is as follows:
    2 char month
    2 char day
    4 char year
    2 char military hour
    2 char minutes
    2 char seconds
    4 char imported row count
    6 char imported volume sum

External References

Name Field # of Occurrence
^%DT 2+1, 31+1, 32+1, 47+1
ADD^AUPNVSIT 28(XREF 2S)
SUB^AUPNVSIT 28(XREF 2K)
EN^DDIOL 26(HELP )
^DIC 3+1, 20+1, 26+1, 34+1, 43+1, 44+1
ADT^ECDUTL 2(XREF 1S)
ADTL^ECDUTL 3(XREF 2S)
ADTP^ECDUTL 1(XREF 2S)
ADTU^ECDUTL 6(XREF 1S)
APAT^ECDUTL 1(XREF 1S)
APAT1^ECDUTL 2(XREF 4S)
KADT^ECDUTL .01(XREF 2K)
KADTL^ECDUTL 3(XREF 2K)
KADTP^ECDUTL 1(XREF 2K)
KADTU^ECDUTL 6(XREF 1K)
KAPAT^ECDUTL 1(XREF 1K)
KAPAT1^ECDUTL 2(XREF 4K)
KILLADT^ECDUTL 2(XREF 1K)
$$CLNCK^SDUTL2 26+1, 26(HELP )

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECH - [#721] 2(XREF 3S), 2(XREF 3K), 3(XREF 1S), 3(XREF 1K)
^ECH("AC" 2(XREF 2S), 2(XREF 2K)
^ECH("AC1" 2(XREF 3S), 2(XREF 3K), 3(XREF 1S), 3(XREF 1K)
^ECH("AD" 31(XREF 1S), 31(XREF 1K)
^ECH("B" .01(XREF 1S), .01(XREF 1K)
^ECH("C" 28(XREF 1S), 28(XREF 1K)

Naked Globals

Name Field # of Occurrence
^(0 2(XREF 3S), 2(XREF 3K), 3(XREF 1S), 3(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 2+1*, 31+1*, 32+1*, 47+1*
>> DA .01(XREF 1S), .01(XREF 1K), 2(XREF 2S), 2(XREF 2K), 2(XREF 3S), 2(XREF 3K), 3(XREF 1S), 3(XREF 1K), 28(XREF 1S), 28(XREF 1K)
31(XREF 1S), 31(XREF 1K)
DIC 3+1!*, 20+1!*, 26+1!*, 34+1!*, 43+1!*, 44+1!*
DIC("S" 3+1*, 3SCR+1*, 20+1*, 20SCR+1*, 26+1*, 26SCR+1*, 34+1*, 34SCR+1*, 43+1*, 43SCR+1*
, 44+1*, 44SCR+1*
>> DIE 3+1, 20+1, 26+1, 34+1, 43+1, 44+1
ECYCLN 26+1*, 26(HELP )
U 2(XREF 3S), 2(XREF 3K), 3(XREF 1S), 3(XREF 1K)
X .01+1!, .01(XREF 1S), .01(XREF 1K), 2+1*!, 2(XREF 2S), 2(XREF 2K), 2(XREF 3S), 2(XREF 3K), 3+1*!, 3(XREF 1S)
3(XREF 1K), 9+1!, 20+1*!, 26+1*!, 28(XREF 1S), 28(XREF 1K), 30+1!, 31+1*!, 31(XREF 1S), 31(XREF 1K)
, 32+1*!, 33+1!, 34+1*!, 37+1!, 43+1*!, 44+1*!, 45+1!, 47+1*!, 48+1!
>> Y 2+1, 3+1, 20+1, 26+1, 31+1, 32+1, 34+1, 43+1, 44+1, 47+1
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All