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 |  Pointer To FileMan Files |  Fields
Print Page as PDF
Global: ^EDP(230.1

Package: Emergency Department Integration Software

Global: ^EDP(230.1


Information

FileMan FileNo FileMan Filename Package
230.1 ED LOG HISTORY Emergency Department Integration Software

Description

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Emergency Department Integration Software 3 EDPARPT    EDPARPT1    EDPLOGA    

Pointer To FileMan Files, Total: 6

Package Total FileMan Files
Emergency Department Integration Software 3 ED LOG(#230)[.01]    TRACKING ROOM-BED(#231.8)[3.4]    TRACKING CODE(#233.1)[.1, .11, .12, 3.2, 3.3]    
Kernel 1 NEW PERSON(#200)[.03, .072, .074, 3.5, 3.6, 3.7]    
Registration 1 PATIENT(#2)[.06]    
Scheduling 1 HOSPITAL LOCATION(#44)[.14]    

Fields, Total: 28

Field # Name Loc Type Details
.01 LOG ENTRY 0;1 POINTER TO ED LOG FILE (#230)
************************REQUIRED FIELD************************
ED LOG(#230)

  • LAST EDITED:  OCT 16, 2008
  • HELP-PROMPT:  Select ED LOG entry.
  • DESCRIPTION:  
    This references an entry in the ED LOG file. Entries in this file record modifications to entries in the ED LOG file.
  • CROSS-REFERENCE:  230.1^B
    1)= S ^EDP(230.1,"B",$E(X,1,30),DA)=""
    2)= K ^EDP(230.1,"B",$E(X,1,30),DA)
  • RECORD INDEXES:  ADF (#868), ADR (#869), C (#870)
.02 TIME 0;2 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 16, 2008
  • HELP-PROMPT:  Enter time of modification.
  • DESCRIPTION:  
    This is the time that the log record was modified.
  • RECORD INDEXES:  ADF (#868), ADR (#869), C (#870)
.03 ENTERED BY 0;3 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  SEP 12, 2008
  • HELP-PROMPT:  Select the person responsible for this update.
  • DESCRIPTION:  
    This is the person who updated the log.
.04 PATIENT NAME 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
  • LAST EDITED:  NOV 23, 2007
  • HELP-PROMPT:  Answer must be 3-40 characters in length.
  • DESCRIPTION:  
    If updated, this is the updated value of the patient name.
.05 PATIENT SSN* 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  MAR 05, 2008
  • HELP-PROMPT:  Answer must be 1-10 characters in length.
  • DESCRIPTION:  
    If updated, this is the updated value of the patient social security number.
  • TECHNICAL DESCR:  
    The social security number was recorded in the class 3 product in the case that a patient without a DFN came to the emergency room. It is not currently used, but is here for compatibility with the class 3 version.
.06 PATIENT ID 0;6 POINTER TO PATIENT FILE (#2) PATIENT(#2)

  • LAST EDITED:  MAR 05, 2008
  • HELP-PROMPT:  Select the patient.
  • DESCRIPTION:  
    If updated, this is the updated value of the patient DFN.
.07 COMPLAINT 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  NOV 23, 2007
  • HELP-PROMPT:  Answer must be 1-50 characters in length.
  • DESCRIPTION:  
    If updated, this is the updated value of the complaint.
.0701 CLOSED 3;9 SET
  • '1' FOR YES;
  • '0' FOR NO;

  • LAST EDITED:  FEB 21, 2012
  • CROSS-REFERENCE:  ^^TRIGGER^230.1^.071
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^EDP(230.1,D0,3)):^(3),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$$NOW^XLFDT() S DIH=$G(^EDP(230.1,DIV(0),3)),DIV=X S $P(^(3),U,10)=DIV,DIH=230.1,DIG=.071 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^EDP(230.1,D0,3)):^(3),1:"") S X=$P(Y(1),U,10),X=X S DIU=X K Y S X=DIV S X=$$NOW^XLFDT S DIH=$G(^EDP(230.1,DIV(0),3)),DIV=X S $P(^(3),U,10)=DIV,DIH=230.1,DIG=.071 D ^DICR
    CREATE VALUE)= S X=$$NOW^XLFDT()
    DELETE VALUE)= S X=$$NOW^XLFDT
    FIELD)= CLOSED DATE/TIME
  • CROSS-REFERENCE:  ^^TRIGGER^230.1^.072
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^EDP(230.1,D0,3)):^(3),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S X=DIV S X=$G(DUZ) S DIH=$G(^EDP(230.1,DIV(0),3)),DIV=X S $P(^(3),U,11)=DIV,DIH=230.1,DIG=.072 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^EDP(230.1,D0,3)):^(3),1:"") S X=$P(Y(1),U,11),X=X S DIU=X K Y S X=DIV S X=$G(DUZ) S DIH=$G(^EDP(230.1,DIV(0),3)),DIV=X S $P(^(3),U,11)=DIV,DIH=230.1,DIG=.072 D ^DICR
    CREATE VALUE)= S X=$G(DUZ)
    DELETE VALUE)= S X=$G(DUZ)
    FIELD)= CLOSED BY
.071 CLOSED DATE/TIME 3;10 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 25, 2011
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the CLOSED field of the ED LOG HISTORY File
.072 CLOSED BY 3;11 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 25, 2011
    WRITE AUTHORITY: ^
  • NOTES:  TRIGGERED by the CLOSED field of the ED LOG HISTORY File
.073 REMOVED IN ERROR 3;12 SET
  • '1' FOR YES;

  • LAST EDITED:  OCT 25, 2011
.074 RESTORED BY 3;13 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 25, 2011
.075 RESTORED DATE/TIME 3;14 DATE

  • INPUT TRANSFORM:  S %DT="EST" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  OCT 25, 2011
.08 TIME IN 0;8 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 23, 2007
  • HELP-PROMPT:  Enter the arrival time of the patient.
  • DESCRIPTION:  
    If updated, this is the updated value of the arrival time of the patient.
.09 TIME OUT 0;9 DATE

  • INPUT TRANSFORM:  S %DT="ETXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 23, 2007
  • HELP-PROMPT:  Enter the departure time.
  • DESCRIPTION:  
    If updated, this is the updated value of the departure time of the patient.
.1 ARRIVAL MODE 0;10 POINTER TO TRACKING CODE FILE (#233.1) TRACKING CODE(#233.1)

  • LAST EDITED:  NOV 23, 2007
  • HELP-PROMPT:  Enter the source of the patient visit.
  • DESCRIPTION:  
    If updated, this is the updated value of the source of the patient visit (came from nursing home, hospital ward, walk-in).
.11 DISPOSITION 0;11 POINTER TO TRACKING CODE FILE (#233.1) TRACKING CODE(#233.1)

  • LAST EDITED:  NOV 23, 2007
  • HELP-PROMPT:  Enter the disposition.
  • DESCRIPTION:  
    If updated, this is the updated value of the disposition.
.12 DELAY 0;12 POINTER TO TRACKING CODE FILE (#233.1) TRACKING CODE(#233.1)

  • LAST EDITED:  NOV 23, 2007
  • HELP-PROMPT:  Enter the delay reason.
  • DESCRIPTION:  
    If updated, this is the updated value of the delay reason.
.14 CLINIC 0;14 POINTER TO HOSPITAL LOCATION FILE (#44) HOSPITAL LOCATION(#44)

  • LAST EDITED:  DEC 15, 2008
  • HELP-PROMPT:  Select a clinic.
  • DESCRIPTION:  
    If updated, this is the updated value of the clinic.
2 COMPLAINT (LONG) 2;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>220!($L(X)<1) X
  • LAST EDITED:  NOV 29, 2007
  • HELP-PROMPT:  Answer must be 1-220 characters in length.
  • DESCRIPTION:  
    If updated, this is the updated value of the long complaint (the optional complaint that may be longer than the display board allows).
3.2 STATUS 3;2 POINTER TO TRACKING CODE FILE (#233.1) TRACKING CODE(#233.1)

  • LAST EDITED:  NOV 29, 2007
  • HELP-PROMPT:  Select a status.
  • DESCRIPTION:  
    If updated, this is the updated value of the status.
3.3 ACUITY 3;3 POINTER TO TRACKING CODE FILE (#233.1) TRACKING CODE(#233.1)

  • LAST EDITED:  NOV 29, 2007
  • HELP-PROMPT:  Select an acuity level.
  • DESCRIPTION:  
    If updated, this is the updated value of the acuity.
3.4 LOC 3;4 POINTER TO TRACKING ROOM-BED FILE (#231.8) TRACKING ROOM-BED(#231.8)

  • LAST EDITED:  NOV 29, 2007
  • HELP-PROMPT:  Select a room/area
  • DESCRIPTION:  
    If updated, this is the updated value of the room / area.
3.5 MD ASSIGNED 3;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 05, 2008
  • HELP-PROMPT:  Select a provider.
  • DESCRIPTION:  
    If updated, this is the updated provider.
3.6 NURSE ASSIGNED 3;6 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 05, 2008
  • HELP-PROMPT:  Select a nurse.
  • DESCRIPTION:  
    If updated, this is the updated nurse.
3.7 RESIDENT ASSIGNED 3;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 05, 2008
  • HELP-PROMPT:  Select a resident.
  • DESCRIPTION:  
    If updated, this is the updated resident.
3.8 COMMENT 3;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<1) X
  • LAST EDITED:  NOV 29, 2007
  • HELP-PROMPT:  Answer must be 1-80 characters in length.
  • DESCRIPTION:  
    If updated, this is the updated comment.
9.1 MODIFIED FIELDS 9;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>100!($L(X)<1) X
  • LAST EDITED:  APR 11, 2008
  • HELP-PROMPT:  Answer must be 1-100 characters in length.
  • DESCRIPTION:  
    This lists the fields that were modified in the corresponding ED LOG record at the time of this update. The list contains the field numbers and is semi-colon delimited.
Info |  Desc |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields