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 |  Found Entries |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^GMPL(125.12

Package: Problem List

Global: ^GMPL(125.12


Information

FileMan FileNo FileMan Filename Package
125.12 PROBLEM SELECTION CATEGORY CONTENTS Problem List

Description

Directly Accessed By Routines, Total: 7

Package Total Routines
Problem List 6 ^GMPL(125.12    GMPLBLCK    GMPLBLD    GMPLBLD2    GMPLBLD3    GMPLBLDC    
Order Entry Results Reporting 1 ORQQPL3    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Problem List 3 GMPLBLCK    GMPLBLD2    GMPLBLDF    

Pointer To FileMan Files, Total: 2

Package Total FileMan Files
Lexicon Utility 1 EXPRESSIONS(#757.01)[2]    
Problem List 1 PROBLEM SELECTION CATEGORY(#125.11)[.01]    

Fields, Total: 7

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

  • LAST EDITED:  NOV 29, 1993
  • HELP-PROMPT:  Enter the problem category to which this problem belongs.
  • DESCRIPTION:  
    This is the problem category that this problem entry belongs to.
  • CROSS-REFERENCE:  125.12^B
    1)= S ^GMPL(125.12,"B",$E(X,1,30),DA)=""
    2)= K ^GMPL(125.12,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  125.12^C^MUMPS
    1)= S:$P(^GMPL(125.12,DA,0),U,2) ^GMPL(125.12,"C",X,$P(^(0),U,2),DA)=""
    2)= K:$P(^GMPL(125.12,DA,0),U,2) ^GMPL(125.12,"C",X,$P(^(0),U,2),DA)
    Allows retrieval of problem categories in sequenced order.
1 SEQUENCE NUMBER 0;2 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>999.99)!(X<.01)!(X?.E1"."3N.N) X
  • LAST EDITED:  OCT 05, 1993
  • HELP-PROMPT:  Type a Number between .01 and 999.99, 2 Decimal Digits
  • DESCRIPTION:  This is a number which determines the order this problem will appear within this group; up to two decimal places may be used. Problems in a selection list will be automatically numbered for display and selection in whole
    numbers, beginning with 1.
  • CROSS-REFERENCE:  125.12^C1^MUMPS
    1)= S ^GMPL(125.12,"C",$P(^GMPL(125.12,DA,0),U),X,DA)=""
    2)= K ^GMPL(125.12,"C",$P(^GMPL(125.12,DA,0),U),X,DA)
    Allows retrieval of problem categories in sequenced order.
2 PROBLEM 0;3 POINTER ** TO AN UNDEFINED FILE **

  • LAST EDITED:  OCT 05, 1993
  • HELP-PROMPT:  Enter the problem you wish to include in this group.
  • DESCRIPTION:  
    This is a problem from the Clinical Lexicon Utility, which is to be included in this group.
3 DISPLAY TEXT 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>80!($L(X)<2) X
  • LAST EDITED:  OCT 05, 1993
  • HELP-PROMPT:  Answer must be 2-80 characters in length.
  • DESCRIPTION:  This is the text of the problem as it is to appear on the selection list display; if a suitable match was not found during a search of the Clinical Lexicon Utility and an 'Unresolved' entry was returned, this will be the
    text as specified by the user.
4 CODE 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<2) X
  • LAST EDITED:  OCT 07, 1993
  • HELP-PROMPT:  Enter the code (ICD, CPT, etc) you wish to have displayed with this problem.
  • DESCRIPTION:  
    This is a code which is to be displayed with the text of this problem; it may be from any coding system, but will generally be assumed to be an ICD Diagnosis in the Problem List context.
5 SNOMED CT CONCEPT CODE 0;6 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1)!'(X?1.40N) X
  • LAST EDITED:  SEP 20, 2011
  • HELP-PROMPT:  Answer must be 1-40 numeric characters in length.
  • DESCRIPTION:  
    A clinical idea to which a unique ConceptID has been assigned in SNOMED CT. Each Concept is represented by a row in the Concepts Table.
6 SNOMED CT DESIGNATION CODE 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>40!($L(X)<1)!'(X?1.40N) X
  • LAST EDITED:  SEP 20, 2011
  • HELP-PROMPT:  Answer must be 1-40 numeric characters in length.
  • DESCRIPTION:  A single SNOMED CT Concept may have multiple Designations, where a Designation may be considered an alternate way of expressing the concept. Synonyms, lexical variants, abbreviations are all different types of
    designations. In many cases, a problem (as reported by the patient) and a finding indicating a problem will share the same concept and concept code (e.g., abdominal pain), but will have different designation codes (i.e.,
    the generic "abdominal pain" and "abdominal pain (finding)" share the concept code 21522001, but they have the designation codes 36112013 and 750827015 respectively.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2973
  • ORDER ENTRY/RESULTS REPORTING
    		•  PROBLEM (2).
    Access: Direct Global Read & w/Fileman

    DISPLAY TEXT (3).
    Access: Direct Global Read & w/Fileman

    CODE (4).
    Access: Direct Global Read & w/Fileman

    Global Variables Directly Accessed

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

    Naked Globals

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

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

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