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 |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^MDC(704.1211

Package: Clinical Procedures

Global: ^MDC(704.1211


Information

FileMan FileNo FileMan Filename Package
704.1211 CP_KARDEX_EVENTS Clinical Procedures

Description

Directly Accessed By Routines, Total: 1

Package Total Routines
Clinical Procedures 1 ^MDC(704.1211    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Clinical Procedures 1 CP_KARDEX_AUDIT(#704.1212)[.02]    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Clinical Procedures 1 CP_KARDEX_ACTION(#704.121)[.02]    
Kernel 1 NEW PERSON(#200)[.05]    

Fields, Total: 8

Field # Name Loc Type Details
.01 EVENT_ID 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:'$$ISGUID^MDCLIO1(X) X
  • LAST EDITED:  APR 23, 2009
  • HELP-PROMPT:  Answer with the system generated GUID for this event.
  • DESCRIPTION:  
    This is a Globally Unique IDentifier (GUID) for this entry. This is maintained nationally so it is the same throughout the enterprise. A sample EVENT ID could be "{69DBD11E-9A8C-4ECE-AFA4-73947218807D}".
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • FIELD INDEX:  PK (#967) REGULAR IR LOOKUP & SORTING
    Unique for: Key A (#114), File #704.1211
    Short Descr: Uniqueness Index for Key 'A' of File #704.1211
    Description: This will provide a quick reference to all unique events.
    Set Logic: S ^MDC(704.1211,"PK",$E(X,1,38),DA)=""
    Kill Logic: K ^MDC(704.1211,"PK",$E(X,1,38),DA)
    Whole Kill: K ^MDC(704.1211,"PK")
    X(1): EVENT_ID (704.1211,.01) (Subscr 1) (Len 38)
.02 CARE_ACTION_ID 0;2 POINTER TO CP_KARDEX_ACTION FILE (#704.121)
************************REQUIRED FIELD************************
CP_KARDEX_ACTION(#704.121)

  • LAST EDITED:  APR 23, 2009
  • HELP-PROMPT:  Answer with an identifier for the action for this event.
  • DESCRIPTION:  
    This identifies the action (#704.121) to which this event will be assigned.
  • RECORD INDEXES:  TD (#968), TS (#969)
.03 DUE_DATE_TIME 0;3 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 23, 2009
  • HELP-PROMPT:  Enter the date/time that this event is to be executed.
  • DESCRIPTION:  
    This is the date/time this event is scheduled to be executed.
  • RECORD INDEXES:  TD (#968)
.04 COMPLETED_DATE_TIME 0;4 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  APR 23, 2009
  • HELP-PROMPT:  Enter the date/time this event was actually completed.
  • DESCRIPTION:  
    This is the date/time this event was actually done.
.05 COMPLETED_BY_ID 0;5 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  APR 23, 2009
  • HELP-PROMPT:  Answer with an identifier for the person that completed this event.
  • DESCRIPTION:  
    This identifies the person (file #200) who marked this event as completed.
.09 STATUS 0;9 SET
************************REQUIRED FIELD************************
  • '0' FOR PENDING;
  • '1' FOR COMPLETED;
  • '2' FOR HELD;
  • '3' FOR REFUSED;

  • LAST EDITED:  APR 23, 2009
  • HELP-PROMPT:  Select the status of this event.
  • DESCRIPTION:  
    This indicates the status, condition, or state of this event.
  • RECORD INDEXES:  TS (#969)
.1 COMMENT .1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>250!($L(X)<1) X
  • LAST EDITED:  APR 23, 2009
  • HELP-PROMPT:  Answer must be 1-250 characters in length.
  • DESCRIPTION:  
    This is a free-text, user entered COMMENT for this event. A sample COMMENT could be "This event was completed on time. It was entered late".
.991 AUDIT_COUNT COMPUTED

  • MUMPS CODE:  S X=0 X "F Y=0:0 S Y=$O(^MDC(704.1212,""FKE"",D0,Y)) Q:'Y S X=X+1" S X=$J(X,0,0)
  • ALGORITHM:  S X=0 X "F Y=0:0 S Y=$O(^MDC(704.1212,""FKE"",D0,Y)) Q:'Y S X=X+1" (ALWAYS 0 DECIMAL DIGITS)
  • LAST EDITED:  APR 23, 2009
  • DESCRIPTION:  
    This is a calculated count of the number of audits for this event.

External References

Name Field # of Occurrence
^%DT .03+1, .04+1
$$ISGUID^MDCLIO1 .01+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MDC(704.1211 - [#704.1211] IXPKSL+1*, IXPKKL+1!, IXPKKEIC+1!, IXTDSL+1*, IXTDKL+1!, IXTDKEIC+1!, IXTSSL+1*, IXTSKL+1!, IXTSKEIC+1!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT .03+1*, .04+1*
>> DA IXPKSL+1, IXPKKL+1, IXTDSL+1, IXTDKL+1, IXTSSL+1, IXTSKL+1
X IXPKSL+1, IXPKKL+1, .01+1!, .03+1*!, .04+1*!, .1+1!, .991+1*
X(1 IXTDSL+1, IXTDKL+1, IXTSSL+1, IXTSKL+1
X(2 IXTDSL+1, IXTDKL+1, IXTSSL+1, IXTSKL+1
>> Y .03+1, .04+1
Info |  Desc |  Directly Accessed By Routines |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All