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 |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^GMPL(125.8

Package: Problem List

Global: ^GMPL(125.8


Information

FileMan FileNo FileMan Filename Package
125.8 PROBLEM LIST AUDIT Problem List

Description

Directly Accessed By Routines, Total: 12

Package Total Routines
Problem List 9 GMPLHIST    GMPLUTL2    ^GMPL(125.8    GMPL31P    GMPLCLNP    GMPLDISP    GMPLRPTR    GMPLX
MAPPING TARGETS    
Enterprise Health Management Platform 1 HMPSTMP    
Order Entry Results Reporting 1 ORQQPL2    

Accessed By FileMan Db Calls, Total: 1

Package Total Routines
Problem List 1 GMPLX    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Kernel 1 NEW PERSON(#200)[3, 7]    
Problem List 1 PROBLEM(#9000011)[.01]    

Fields, Total: 9

Field # Name Loc Type Details
.01 PROBLEM 0;1 POINTER TO PROBLEM FILE (#9000011)
************************REQUIRED FIELD************************
PROBLEM(#9000011)

  • LAST EDITED:  JUN 03, 1993
  • DESCRIPTION:  
    This is the problem for which a change is being recorded.
  • CROSS-REFERENCE:  125.8^B
    1)= S ^GMPL(125.8,"B",$E(X,1,30),DA)=""
    2)= K ^GMPL(125.8,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  125.8^AD^MUMPS
    1)= S:+$P(^GMPL(125.8,DA,0),U,3) ^GMPL(125.8,"AD",X,(9999999-$P(^(0),U,3)),DA)=""
    2)= K ^GMPL(125.8,"AD",X,+(9999999-$P(^GMPL(125.8,DA,0),U,3)),DA)
    Used to retrieve a problem's audit trail in reverse-chronological order.
1 FIELD NUMBER 0;2 NUMBER
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:+X'=X!(X>9999.9999)!(X<.01)!(X?.E1"."5N.N) X
  • LAST EDITED:  OCT 28, 1992
  • HELP-PROMPT:  Type a Number between .01 and 9999.9999, 4 Decimal Digits
  • DESCRIPTION:  
    This is the number of the field for which a change is being recorded.
2 DATE/TIME MODIFIED 0;3 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 03, 1993
  • DESCRIPTION:  
    This is the date and time that this data was changed.
  • CROSS-REFERENCE:  125.8^AD1^MUMPS
    1)= S ^GMPL(125.8,"AD",$P(^GMPL(125.8,DA,0),U),(9999999-X),DA)=""
    2)= K ^GMPL(125.8,"AD",$P(^GMPL(125.8,DA,0),U),(9999999-X),DA)
    Used to retrieve a problem's audit trail in reverse-chronological order.
3 WHO MODIFIED 0;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  OCT 28, 1992
  • DESCRIPTION:  
    This is the user who actually made the change to this data; the current user's DUZ is stuffed in here.
4 OLD VALUE 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  OCT 28, 1992
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  
    This is the original value as stored in the Problem file global (internal format).
5 NEW VALUE 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
  • LAST EDITED:  OCT 28, 1992
  • HELP-PROMPT:  Answer must be 1-15 characters in length.
  • DESCRIPTION:  
    This is the new value now stored in the Problem file global (internal format).
6 REASON FOR CHANGE 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>25!($L(X)<3) X
  • LAST EDITED:  OCT 28, 1992
  • HELP-PROMPT:  Answer must be 3-25 characters in length.
  • DESCRIPTION:  
    This is the description of why the change was made, if known.
7 REQUESTING PROVIDER 0;8 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  MAR 05, 1993
  • DESCRIPTION:  
    This is the provider who either changed this data, or directed it to be changed.
10 OLD PROBLEM ENTRY 1;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>150!($L(X)<1) X
  • LAST EDITED:  MAR 05, 1993
  • HELP-PROMPT:  Answer must be 1-150 characters in length.
  • DESCRIPTION:  
    This is the entire problem entry (internal format) as it existed prior to changing this data.
  • TECHNICAL DESCR:  
    This field consists of the original 0-node concatenated with an "^" and the original 1-node, prior to modifying this data.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2974
  • Order Entry Results Reporting
  • Enterprise Health Management Platform
    		•

    External References

    Name Field # of Occurrence
    ^%DT 2+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^GMPL(125.8 - [#125.8] .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 2(XREF 1S), 2(XREF 1K)

    Naked Globals

    Name Field # of Occurrence
    ^(0 .01(XREF 2S)

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> %DT 2+1*
    >> DA .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 2(XREF 1S), 2(XREF 1K)
    U .01(XREF 2S), .01(XREF 2K), 2(XREF 1S), 2(XREF 1K)
    X .01(XREF 1S), .01(XREF 1K), .01(XREF 2S), .01(XREF 2K), 1+1!, 2+1*!, 2(XREF 1S), 2(XREF 1K), 4+1!, 5+1!
    , 6+1!, 10+1!
    >> Y 2+1
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All