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 |  External References |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Global: ^GMR(123.033

Package: Consult Request Tracking

Global: ^GMR(123.033


Information

FileMan FileNo FileMan Filename Package
123.033 GMRC CONSULT MAPPING Consult Request Tracking

Description

Directly Accessed By Routines, Total: 11

Package Total Routines
Consult Request Tracking 11 GMRCCB    NOTE TITLES    PRE-V3 ACTION IENS FROM 123.1    ^GMR(123.033    CLINICS    CONSULTS CLIN PROC    CONSULTS ORDER ITEM    CONSULTS PROCEDURE
CONSULTS SERVICE    GMRCCA    GMRCCD    

Accessed By FileMan Db Calls, Total: 4

Package Total Routines
Consult Request Tracking 4 GMRCCA    GMRCCB    GMRCCC    GMRCCD    

Pointer To FileMan Files, Total: 8

Package Total FileMan Files
Consult Request Tracking 2 GMRC PROCEDURE(#123.3)[#123.0332(.01)]    REQUEST SERVICES(#123.5)[#123.0331(.01)]    
Scheduling 2 CLINIC STOP(#40.7)[.06]    HOSPITAL LOCATION(#44)[#123.0335(.01)]    
Clinical Procedures 1 CP DEFINITION(#702.01)[#123.0334(.01)]    
Kernel 1 PROTOCOL(#101)[#123.0333(.01)]    
Order Entry Results Reporting 1 OE/RR LIST(#100.21)[.03]    
Text Integration Utility 1 TIU DOCUMENT DEFINITION(#8925.1)[#123.0336(.01)]    

Fields, Total: 12

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

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<3)!'(X'?1P.E) X
    MAXIMUM LENGTH: 30
  • LAST EDITED:  FEB 01, 2017
  • HELP-PROMPT:  Answer must be 3-30 characters in length.
  • DESCRIPTION:  
    Any descriptive free-text name.
  • CROSS-REFERENCE:  123.033^B
    1)= S ^GMR(123.033,"B",$E(X,1,30),DA)=""
    2)= K ^GMR(123.033,"B",$E(X,1,30),DA)
.02 INACTIVE 0;2 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  FEB 01, 2017
  • HELP-PROMPT:  Enter Y[es] to inactivate this configuration.
  • DESCRIPTION:  
    Inactive configurations are not selectable in the report option, but will remain selectable in the edit option.
.03 CPRS TEAM 0;3 POINTER TO OE/RR LIST FILE (#100.21) OE/RR LIST(#100.21)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,2)=""TM""" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  MAY 11, 2006
  • HELP-PROMPT:  Select a CPRS team.
  • DESCRIPTION:  If a CPRS team is associated with the configuration, the team will be populated with the patients identified by the report. Any pre-existing patients in the team will be replaced. Only manual patient teams are
    selectable.
  • SCREEN:  S DIC("S")="I $P(^(0),U,2)=""TM"""
  • EXPLANATION:  Only manual patient list teams are selectable.
.04 DAYS CONS->APPT 0;4 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>1836)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 01, 2017
  • HELP-PROMPT:  Enter a number between 0 and 1836, 0 decimal digits.
  • DESCRIPTION:  
    The maximum number of days between the consult and the appointment.
.05 DAYS APPT->NOTE 0;5 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>1836)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  FEB 01, 2017
  • HELP-PROMPT:  Enter a number between 0 and 1836, 0 decimal digits.
  • DESCRIPTION:  
    The maximum number of days between the appointment and the note.
.06 STOP CODE 0;6 POINTER TO CLINIC STOP FILE (#40.7) CLINIC STOP(#40.7)

  • INPUT TRANSFORM:  S DIC("S")="N % S %=$P(^(0),U,3) I (%'>0)!(%>$$DT^XLFDT)" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • OUTPUT TRANSFORM:  S Y=$$GET1^DIQ(40.7,+Y,1)
  • LAST EDITED:  FEB 01, 2017
  • HELP-PROMPT:  Enter a stop code associated with the consult(s).
  • DESCRIPTION:  
    This is a stop code associated with the consult(s).
  • SCREEN:  S DIC("S")="N % S %=$P(^(0),U,3) I (%'>0)!(%>$$DT^XLFDT)"
  • EXPLANATION:  Only active clinic stops are selectable.
1000 CONSULTS SERVICE CONS;0 POINTER Multiple #123.0331 123.0331

  • DESCRIPTION:  
    Consult services for the request.
2000 CONSULTS PROCEDURE CONP;0 POINTER Multiple #123.0332 123.0332

  • DESCRIPTION:  
    Consult procedures that the configuration will look for.
3000 CONSULTS ORDER ITEM PROT;0 POINTER Multiple #123.0333 123.0333

  • DESCRIPTION:  
    Consult order items for this request.
4000 CONSULTS CLIN PROC CLPR;0 POINTER Multiple #123.0334 123.0334

  • DESCRIPTION:  
    Consult clinical procedures for this request.
5000 CLINICS CLIN;0 POINTER Multiple #123.0335 123.0335

  • DESCRIPTION:  
    Clinics associated with the consult(s).
6000 NOTE TITLES NOTE;0 POINTER Multiple #123.0336 123.0336

  • DESCRIPTION:  
    Note title associated with the consult(s) / clinic(s).

External References

Name Field # of Occurrence
^DIC .03+1, .06+1
$$GET1^DIQ .06OT+1

Global Variables Directly Accessed

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K)
DIC .03+1!*, .06+1!*
DIC("S" .03+1*, .03SCR+1*, .06+1*, .06SCR+1*
>> DIE .03+1, .06+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .03+1*!, .04+1!, .05+1!, .06+1*!
>> Y .03+1, .06+1, .06OT+1*
>> Y(0 .06OT+1*
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  External References |  Global Variables Directly Accessed |  Local Variables  | All