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  | All
Print Page as PDF
Global: ^DGOTH(33

Package: Registration

Global: ^DGOTH(33


Information

FileMan FileNo FileMan Filename Package
33 OTH ELIGIBILITY PATIENT Registration

Description

Directly Accessed By Routines, Total: 21

Package Total Routines
Registration 21 DG53P952    DGENELA1    DGENUPL5    DGENUPL8    DGOTHBTN    DGOTHD    DGOTHD1    DGOTHD2
DGOTHEL    DGOTHINQ    DGOTHMGT    DGOTHMST    DGOTHRP1    DGOTHRP2    DGOTHRP3    DGOTHRP5
DGOTHRP6    DGOTHRPT    DGOTHUT1    VAFHLZE1    VAFHLZTE    

Accessed By FileMan Db Calls, Total: 13

Package Total Routines
Registration 13 DGENUPL8    DGOTHBTN    DGOTHD2    DGOTHEL    DGOTHINQ    DGOTHMG1    DGOTHMGT    DGOTHRP1
DGOTHRP2    DGOTHRP3    DGOTHRP5    DGOTHUT1    VAFHLZE1    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Registration 2 ELIGIBILITY CODE(#8)[#33.02(.02)]    PATIENT(#2)[.01]    
Kernel 1 INSTITUTION(#4)[.06#33.02(.05)#33.02(.07)#33.03(.06)#33.11(.08)]    

Fields, Total: 11

Field # Name Loc Type Details
.01 OTH PATIENT 0;1 POINTER TO PATIENT FILE (#2)
************************REQUIRED FIELD************************
PATIENT(#2)

  • LAST EDITED:  MAY 29, 2019
  • HELP-PROMPT:  Select the patient with OTH eligibility clock.
  • DESCRIPTION:  
    Patient with OTH 90 DAYS ELIGIBILITY that receives mental health care in the VA facility.
  • TECHNICAL DESCR:  
    Pointer to the PATIENT file (#2).
  • CROSS-REFERENCE:  33^B
    1)= S ^DGOTH(33,"B",$E(X,1,30),DA)=""
    2)= K ^DGOTH(33,"B",$E(X,1,30),DA)
  • CROSS-REFERENCE:  ^^TRIGGER^33^.07
    1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGOTH(33,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X=DIV S X=0 S DIH=$G(^DGOTH(33,DIV(0),0)),DIV=X S $P(^(0),U,7)=DIV,DIH=33,DIG=.07 D ^DICR
    2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^DGOTH(33,D0,0)):^(0),1:"") S X=$P(Y(1),U,7),X=X S DIU=X K Y S X="" S DIH=$G(^DGOTH(33,DIV(0),0)),DIV=X S $P(^(0),U,7)=DIV,DIH=33,DIG=.07 D ^DICR
    CREATE VALUE)= S X=0
    DELETE VALUE)= @
    FIELD)= PENDING REQUEST?
    This trigger sets field .07 (PENDING REQUEST?) to default value of "NO".
.02 OTH STATUS 0;2 SET
  • '0' FOR INACTIVE;
  • '1' FOR ACTIVE;

  • LAST EDITED:  MAR 29, 2019
  • HELP-PROMPT:  Enter status of the OTH patient.
  • DESCRIPTION:  
    The current status of the OTH patient.
.03 PENDING AUTH REQ DATE 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  JUN 27, 2019
  • HELP-PROMPT:  Enter submission date for this pending authorization request.
  • DESCRIPTION:  
    Date of pending authorization request submission.
  • TECHNICAL DESCR:  
    This field should be populated only if "PENDING REQUEST?" field (.07) is set to "YES".
.04 PENDING REQUEST ENTERED BY 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>60!($L(X)<5) X
    MAXIMUM LENGTH: 60
  • LAST EDITED:  MAY 07, 2019
  • HELP-PROMPT:  Answer must be 5-60 characters in length.
  • DESCRIPTION:  
    The user who entered pending request for this patient.
.05 PENDING AUTH SYS DATE/TIME 0;5 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:X<1 X
  • LAST EDITED:  JUN 27, 2019
  • HELP-PROMPT:  Enter date and time when pending request was entered or edited.
  • DESCRIPTION:  
    Date and time when pending request was entered or edited.
.06 PENDING AUTH REQUEST FACILITY 0;6 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  MAY 29, 2019
  • HELP-PROMPT:  Select the facility where this pending request was entered.
  • DESCRIPTION:  
    Facility where this pending request was entered.
.07 PENDING AUTH REQUEST (Y/N) 0;7 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  MAY 29, 2019
  • HELP-PROMPT:  Set this to 'YES' if there is a pending authorization request for this patient.
  • DESCRIPTION:  
    Setting this field to 'YES' indicates that there's an existing pending authorization request for this patient.
  • NOTES:  TRIGGERED by the OTH PATIENT field of the OTH ELIGIBILITY PATIENT File
  • FIELD INDEX:  C (#1564) REGULAR IR LOOKUP & SORTING
    Short Descr: Index on field .07
    Description: Index on 'PENDING REQUEST?' field.
    Set Logic: S ^DGOTH(33,"C",X,DA)=""
    Kill Logic: K ^DGOTH(33,"C",X,DA)
    Whole Kill: K ^DGOTH(33,"C")
    X(1): PENDING AUTH REQUEST (Y/N) (33,.07) (Subscr 1) (forwards)
.08 PEND AUTH CREATION DATE/TIME 0;8 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  JUN 04, 2019
  • HELP-PROMPT:  Enter date/time when pending request was created
  • DESCRIPTION:  
    Date / time when pending request was created. Used as unique identifier by Enrollment System.
1 OTH 365 DAY CLOCK 1;0 Multiple #33.01 33.01

  • LAST EDITED:  MAY 29, 2019
  • DESCRIPTION:  
    This multiple contains data for tracking 365 days clock status.
2 ELIGIBILITY CHANGES 2;0 DATE Multiple #33.02 33.02

  • DESCRIPTION:  
    This multiple contains history of OTH eligibility changes.
3 DENIED REQUEST 3;0 Multiple #33.03 33.03

  • LAST EDITED:  MAY 29, 2019
  • DESCRIPTION:  
    This multiple contains authorization requests that have been disapproved.
  • INDEXED BY:  DATE REQUEST SUBMITTED (C)
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields  | All