Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Pointer To FileMan Files |  Fields |  Found Entries |  All
Print Page as PDF
Global: ^EDR(705

Package: Event Driven Reporting

Global: ^EDR(705


Information

FileMan FileNo FileMan Filename Package
705 EDR EVENT Event Driven Reporting

Description

Pointer To FileMan Files, Total: 1

Package Total FileMan Files
Registration 1 PATIENT(#2)[2]    

Fields, Total: 6

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

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  MAR 18, 1993
  • HELP-PROMPT:  The date of the event.
  • DESCRIPTION:  
    The date of the event.
  • CROSS-REFERENCE:  705^B
    1)= S ^EDR(705,"B",$E(X,1,30),DA)=""
    2)= K ^EDR(705,"B",$E(X,1,30),DA)
    Regular 'B' cross reference.
  • CROSS-REFERENCE:  705^ABDC1^MUMPS
    1)= S EDR=$G(^EDR(705,DA,0)) S:$P(EDR,"^",2)&($P(EDR,"^",3))&($P(EDR,"^",4)) ^EDR(705,"ABDC",X,$P(EDR,"^",2),$P(EDR,"^",3),$P(EDR,"^",4),DA)="" K EDR
    2)= S EDR=$G(^EDR(705,DA,0)) K:$P(EDR,"^",2)&($P(EDR,"^",3))&($P(EDR,"^",4)) ^EDR(705,"ABDC",X,$P(EDR,"^",2),$P(EDR,"^",3),$P(EDR,"^",4),DA) K EDR
    This cross reference is used to look up all events for a specific date and patient.  It sets the 'ABDC' cross reference in conjunction with similar cross references on fields 2, 3 and 4.
2 PATIENT 0;2 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • LAST EDITED:  MAR 18, 1993
  • HELP-PROMPT:  The patient associated with the event.
  • DESCRIPTION:  
    The patient associated with the event.
  • CROSS-REFERENCE:  705^ABDC2^MUMPS
    1)= S EDR=$G(^EDR(705,DA,0)) S:$P(EDR,"^")&($P(EDR,"^",3))&($P(EDR,"^",4)) ^EDR(705,"ABDC",$P(EDR,"^"),X,$P(EDR,"^",3),$P(EDR,"^",4),DA)="" K EDR
    2)= S EDR=$G(^EDR(705,DA,0)) K:$P(EDR,"^")&($P(EDR,"^",3))&($P(EDR,"^",4)) ^EDR(705,"ABDC",$P(EDR,"^"),X,$P(EDR,"^",3),$P(EDR,"^",4),DA) K EDR
    This cross reference is used to look up all events for a specific date and patient.  It sets the 'ABDC' cross reference in conjunction with similar cross references on fields .01, 3 and 4.
3 EVENT NUMBER 0;3 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 18, 1993
  • HELP-PROMPT:  The event number associated with the event. Type a Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    The event number associated with the event.
  • CROSS-REFERENCE:  705^ABDC3^MUMPS
    1)= S EDR=$G(^EDR(705,DA,0)) S:$P(EDR,"^")&($P(EDR,"^",2))&($P(EDR,"^",4)) ^EDR(705,"ABDC",$P(EDR,"^"),$P(EDR,"^",2),X,$P(EDR,"^",4),DA)="" K EDR
    2)= S EDR=$G(^EDR(705,DA,0)) K:$P(EDR,"^")&($P(EDR,"^",2))&($P(EDR,"^",4)) ^EDR(705,"ABDC",$P(EDR,"^"),$P(EDR,"^",2),X,$P(EDR,"^",4),DA) K EDR
    This cross reference is used to look up all events for a specific date and patient.  It sets the 'ABDC' cross reference in conjunction with similar cross references on fields .01, 2 and 4.
4 TRANSACTION TYPE NUMBER 0;4 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>13)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 18, 1993
  • HELP-PROMPT:  The transaction number associated with the event. Type a Number between 1 and 13, 0 Decimal Digits
  • DESCRIPTION:  
    The transaction number associated with the event.
  • CROSS-REFERENCE:  705^ABDC4^MUMPS
    1)= S EDR=$G(^EDR(705,DA,0)) S:$P(EDR,"^")&($P(EDR,"^",2))&($P(EDR,"^",3)) ^EDR(705,"ABDC",$P(EDR,"^"),$P(EDR,"^",2),$P(EDR,"^",3),X,DA)="" K EDR
    2)= S EDR=$G(^EDR(705,DA,0)) K:$P(EDR,"^")&($P(EDR,"^",2))&($P(EDR,"^",3)) ^EDR(705,"ABDC",$P(EDR,"^"),$P(EDR,"^",2),$P(EDR,"^",3),X,DA) K EDR
    This cross reference is used to look up all events for a specific date and patient.  It sets the 'ABDC' cross reference in conjunction with similar cross references on fields .01, 2 and 3.
5 TRANSMISSION NUMBER 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999999999)!(X<1)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAR 25, 1993
  • HELP-PROMPT:  A number indicating the HL7 transmission that contained this event. Type a Number between 1 and 999999999, 0 Decimal Digits
  • DESCRIPTION:  
    A number indicating the HL7 transmission that contained this event.
100 EVENT INFORMATION 100;E1,245 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>245!($L(X)<1) X
  • LAST EDITED:  MAR 18, 1993
  • HELP-PROMPT:  A string of information associated with the event. Answer must be 1-245 characters in length.
  • DESCRIPTION:  
    A string of information associated with the event.  This is the information that will be processed and transmitted to the central system.
Info |  Desc |  Pointer To FileMan Files |  Fields |  Found Entries |  All