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 |  All
Print Page as PDF
Global: ^HLEV(776.4

Package: Health Level Seven

Global: ^HLEV(776.4


Information

FileMan FileNo FileMan Filename Package
776.4 HL7 MONITOR EVENT Health Level Seven

Description

Directly Accessed By Routines, Total: 12

Package Total Routines
Health Level Seven 10 HLEMDD    HLEME    HLEME1    HLEMEP    HLEMRCV    HLEMSA    HLEMSE    HLEMSL
HLEMSND    HLEVAPI2    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Health Level Seven 3 HLEMSE    HLEMSL    HLEMST    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Kernel 2 INSTITUTION(#4)[.03]    NEW PERSON(#200)[.08]    
Health Level Seven 1 HL7 MONITOR EVENT TYPE(#776.3)[.02]    

Fields, Total: 20

Field # Name Loc Type Details
.01 DT/TM 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  AUG 21, 2003
  • HELP-PROMPT:  When exactly did the even occur?
  • DESCRIPTION:  
    The date and time the event occurred.
  • CROSS-REFERENCE:  776.4^B
    1)= S ^HLEV(776.4,"B",$E(X,1,30),DA)=""
    2)= K ^HLEV(776.4,"B",$E(X,1,30),DA)
    There is only one entry in the HL Event Parameters file (#776.999).  The entry's name is stored on the Name field (#.01), which is cross-referenced in this B xref.
  • FIELD INDEX:  AC (#196) MUMPS ACTION
    Short Descr:  This trigger sets the ID field.
    Set Logic:  D SETID^HLEMDD(DA)
    Kill Logic:  Q
    X(1):  DT/TM  (776.4,.01)  (forwards)
  • RECORD INDEXES:  AE (#198), AF (#199), AJ (#203), D (#206)
.02 TYPE 0;2 POINTER TO HL7 MONITOR EVENT TYPE FILE (#776.3)
************************REQUIRED FIELD************************
HL7 MONITOR EVENT TYPE(#776.3)

  • LAST EDITED:  AUG 21, 2003
  • HELP-PROMPT:  What type of event is this?
  • RECORD INDEXES:  AE (#198), AF (#199), AJ (#203), D (#206)
.03 SITE 0;3 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • LAST EDITED:  JUL 23, 2003
  • HELP-PROMPT:  Where did the event occur?
  • DESCRIPTION:  
    This is the location of the event.
  • RECORD INDEXES:  AE (#198), AF (#199), D (#206)
.04 ID 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>12!($L(X)<5) X
  • LAST EDITED:  JUL 14, 2003
  • HELP-PROMPT:  Should begin with a prefix consisting of the station number followed by a hyphen.
  • DESCRIPTION:  
    This will uniquely identify the event across the entire VHA.
  • FIELD INDEX:  C (#205) REGULAR IR LOOKUP & SORTING
    Short Descr:  Uniqueness Index for Key 'A' of File #776.4
    Set Logic:  S ^HLEV(776.4,"C",X,DA)=""
    Kill Logic:  K ^HLEV(776.4,"C",X,DA)
    Whole Kill:  K ^HLEV(776.4,"C")
    X(1):  ID  (776.4,.04)  (Subscr 1)
.05 ACTION STATUS 0;5 SET
************************REQUIRED FIELD************************
  • '0' FOR ACTION NOT REQUIRED;
  • '1' FOR NOT YET INITIATED;
  • '2' FOR IN PROGRESS;
  • '3' FOR SUCCESS;
  • '4' FOR FAILURE;

  • LAST EDITED:  JUL 22, 2003
  • HELP-PROMPT:  What is the status of the action?
  • FIELD INDEX:  AD (#197) MUMPS ACTION
    Short Descr:  Updates REVIEW STATUS if contingent on ACTION STATUS
    Set Logic:  D STATUS^HLEMDD($G(DA),$G(X2))
    Kill Logic:  Q
    X(1):  ACTION STATUS  (776.4,.05)  (forwards)
  • RECORD INDEXES:  AG (#200)
.06 REVIEW STATUS 0;6 SET
************************REQUIRED FIELD************************
  • '0' FOR NOT REQUIRED;
  • '1' FOR REQUIRED;
  • '2' FOR IF ACTION FAILS;
  • '3' FOR PENDING;
  • '4' FOR COMPLETED;

  • LAST EDITED:  AUG 20, 2003
  • HELP-PROMPT:  Is a review needed? Has it been completed? Enter the most appropriate status.
  • FIELD INDEX:  AI (#202) MUMPS ACTION
    Short Descr:  If the review status changes to completed, sets the date and reviewer.
    Set Logic:  D CSTATUS^HLEMDD($G(DA),X2(1))
    Kill Logic:  Q
    X(1):  REVIEW STATUS  (776.4,.06)  (Subscr 1)  (forwards)
  • RECORD INDEXES:  AF (#199), AG (#200), D (#206)
.07 DT/TM REVIEWED 0;7 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 11, 2003
  • HELP-PROMPT:  When was this event reviewed?
  • DESCRIPTION:  
    This documents when the event was manually reviewed.  If never reviewed, the field is blank.
.08 REVIEWER 0;8 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUL 10, 2003
  • HELP-PROMPT:  Who reviewed this event?
.09 DT/TM ACTION 0;9 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUL 11, 2003
  • HELP-PROMPT:  When was the autmated action executed?
.1 HL7 ID 0;10 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<1) X
  • LAST EDITED:  JUL 15, 2003
  • HELP-PROMPT:  If the event is associated with a particular HL7 message, enter the unique HL7 Message ID.
.11 COUNT 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  JUL 23, 2003
  • HELP-PROMPT:  For conglomerated events, enter the count of discrete events included in this event.
  • DESCRIPTION:  
    This field pertains only to conglomerated events, that is, events that represent a count of discrete events over some spefcific time period.
  • RECORD INDEXES:  AF (#199)
.12 URGENT 0;12 SET
  • '0' FOR NO;
  • '1' FOR YES;
  • '2' FOR URGENT IF ACTION FAILS;

  • LAST EDITED:  JUL 22, 2003
  • HELP-PROMPT:  Is it urgent that this event be reviewed?
  • RECORD INDEXES:  AG (#200)
.13 MESSAGE TYPE 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  JUL 22, 2003
  • HELP-PROMPT:  Answer with the 3 character HL7 message type code.
.14 HL7 EVENT TYPE 0;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<3) X
  • LAST EDITED:  JUL 22, 2003
  • HELP-PROMPT:  Answer with the 3 character HL7 event type code
.15 LINK 0;15 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>10!($L(X)<1) X
  • LAST EDITED:  JUL 22, 2003
  • HELP-PROMPT:  Answer with the name of the HL Logical Link over which the message was transmitted.
.16 SENDING APPLICATION 0;16 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<3) X
  • LAST EDITED:  SEP 24, 2003
  • HELP-PROMPT:  Answer with the name of the HL7 Application Parameter that represents the application that sent the message.
.17 CREATE DT/TM 0;17 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  SEP 24, 2003
  • HELP-PROMPT:  Enter the exact date and time that this record was created.
  • FIELD INDEX:  AK (#204) MUMPS ACTION
    Short Descr:  Maintains a queue of events that should be sent to remote servers.
    Description:  The format of the cross-reference is:
    ^HLEV(776.4,"AK",,)=""
    Only events that need to be sent to remote servers are placed on this cross-reference.  The cross-reference is created when $$EVENT^HLEM is called by an application, created within that call.  It is deleted by the
    background job that sends the event to the remote location.
    Set Logic:  Q
    Kill Logic:  Q
    X(1):  CREATE DT/TM  (776.4,.17)  (Subscr 1)  (forwards)





1
NOTES
1;0
WORD-PROCESSING #776.41





2
MAIL
2;0
Multiple #776.42
776.42
  • LAST EDITED:  JUL 15, 2003





3
APPLICATION DATA
3;0
Multiple #776.43
776.43
  • DESCRIPTION:  
    This allows an application to store its own information relevant to resolving the event along with the event.







    



Info | 
Desc | 
Directly Accessed By Routines | 
Accessed By FileMan Db Calls | 
Pointer To FileMan Files | 
Fields | 
All