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: ^DGHT(391.31

Package: Registration

Global: ^DGHT(391.31


Information

FileMan FileNo FileMan Filename Package
391.31 HOME TELEHEALTH PATIENT Registration

Description

Directly Accessed By Routines, Total: 9

Package Total Routines
Registration 9 DGHTENR    DGHTHLAA    DGHTINAC    DGHTRPT    DGHTRPT1    DGHTRTX    DGHTXREF    ^DGHT(391.31
TRANSACTION    

Accessed By FileMan Db Calls, Total: 2

Package Total Routines
Registration 2 DGHTENR    DGHTRTX    

Pointer To FileMan Files, Total: 4

Package Total FileMan Files
Kernel 2 INSTITUTION(#4)[2]    NEW PERSON(#200)[4#391.317(.03)]    
Consult Request Tracking 1 REQUEST/CONSULTATION(#123)[3]    
Registration 1 PATIENT(#2)[1]    

Fields, Total: 8

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

  • INPUT TRANSFORM:  K:+X'=X!(X>9999999)!(X<0)!(X?.E1"."1N.N) X S:$D(X) DINUM=X
  • LAST EDITED:  FEB 14, 2005
  • HELP-PROMPT:  Type a Number between 0 and 9999999, 0 Decimal Digits
  • DESCRIPTION:  
    This field contains the record number for this entry.
  • TECHNICAL DESCR:  
    The internal entry number (IEN) for this record.
  • DELETE TEST:  .01,0)= I 1 D EN^DDIOL("Home Telehealth entries cannot be deleted")
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  391.31^B
    1)= S ^DGHT(391.31,"B",$E(X,1,30),DA)=""
    2)= K ^DGHT(391.31,"B",$E(X,1,30),DA)
1 PATIENT 0;2 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • LAST EDITED:  AUG 23, 2006
  • HELP-PROMPT:  Enter the name of the patient being assigned for Home Telehealth.
  • DESCRIPTION:  
    This is the name of patient assigned for Home Telehealth service.
  • TECHNICAL DESCR:  
    A pointer to the PATIENT file (#2).
    DELETE AUTHORITY:
  • CROSS-REFERENCE:  391.31^E
    1)= S ^DGHT(391.31,"E",$E(X,1,30),DA)=""
    2)= K ^DGHT(391.31,"E",$E(X,1,30),DA)
  • RECORD INDEXES:  APATVN (#792)
2 VENDOR 0;3 POINTER TO INSTITUTION FILE (#4)
************************REQUIRED FIELD************************
INSTITUTION(#4)

  • INPUT TRANSFORM:  S DIC("S")="I $P($G(^DIC(4,+Y,99)),""^"")?1""200T"".E" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 14, 2005
  • HELP-PROMPT:  Enter the vendor assigned to this Home Telehealth patient.
  • DESCRIPTION:  This is the name of the vendor assigned to this Home Telehealth patient. The vendor data comes from the Institution file #4 and are the 200T* entries. These entries are specifically added to file #4 for Home Telehealth
    vendors.
  • TECHNICAL DESCR:  
    A pointer to the INSTITUTION file (#4).
  • SCREEN:  S DIC("S")="I $P($G(^DIC(4,+Y,99)),""^"")?1""200T"".E"
  • EXPLANATION:  Only 200T entries are valid.
  • RECORD INDEXES:  APATVN (#792)
3 CONSULT NUMBER 0;4 POINTER TO REQUEST/CONSULTATION FILE (#123)
************************REQUIRED FIELD************************
REQUEST/CONSULTATION(#123)

  • LAST EDITED:  JAN 19, 2005
  • HELP-PROMPT:  Enter IEN of the consult from REQUEST/CONSULTATION file (#123).
  • DESCRIPTION:  
    This is the internal entry number of the consultation.
  • TECHNICAL DESCR:  
    A pointer to the REQUEST/CONSULTATION file (#123).
4 CARE COORDINATOR 0;5 POINTER TO NEW PERSON FILE (#200)
************************REQUIRED FIELD************************
NEW PERSON(#200)

  • LAST EDITED:  JAN 19, 2005
  • HELP-PROMPT:  Enter the name of the Care Coordinator responsible for patient.
  • DESCRIPTION:  
    This is the name of the Care Coordinator responsible for assigning this patient for Home Telehealth service. Care Coordinator is selected from entries in the NEW PERSON file (#200).
  • TECHNICAL DESCR:  
    A pointer to the NEW PERSON file (#200).
5 ACTIVATION DATE 0;6 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 07, 2005
  • HELP-PROMPT:  The date/time the patient was activated for Home Telehealth service.
  • DESCRIPTION:  
    The date and time the patient was assigned/registered/sign-up for Home Telehealth services.
6 INACTIVATION DATE 0;7 DATE

  • INPUT TRANSFORM:  S %DT="ESTXR" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  FEB 07, 2005
  • HELP-PROMPT:  The date/time the patient was inactivated from Home Telehealth service.
  • DESCRIPTION:  
    The date and time this patient was inactivated from Home Telehealth service.
7 TRANSACTION TRAN;0 DATE Multiple #391.317 391.317

  • DESCRIPTION:  
    Transaction relating to home telehealth patient sign-up/activation (admission) and inactivation (discharge).

External References

Name Field # of Occurrence
^%DT 5+1, 6+1
EN^DDIOL .01DEL.01+1
^DIC 2+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGHT(391.31 - [#391.31] IXAPATVNSL+1*, IXAPATVNKL+1!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT 5+1*, 6+1*
>> DA IXAPATVNSL+1, IXAPATVNKL+1, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K)
DIC 2+1!*
DIC("S" 2+1*, 2SCR+1*
>> DIE 2+1
>> DINUM .01+1*
X .01+1!, .01(XREF 1S), .01(XREF 1K), 1(XREF 1S), 1(XREF 1K), 2+1*!, 5+1*!, 6+1*!
X(1 IXAPATVNSL+1, IXAPATVNKL+1
X(2 IXAPATVNSL+1, IXAPATVNKL+1
>> Y 2+1, 5+1, 6+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